Физика

Химия

Биология

Техника и    технологии

Срипт создания модели чашки

max reset file

fn drawLineBetweenTwoPoints pointA pointB =

(

ss = SplineShape pos:pointA

addNewSpline ss

addKnot ss 1 #corner #line PointA

addKnot ss 1 #corner #line PointB

updateShape ss

ss

)

newSpline = drawLineBetweenTwoPoints [0,10,0] [30,0,0]--1

newSpline = drawLineBetweenTwoPoints [30,0,0] [40,0,0]--2

newSpline = drawLineBetweenTwoPoints [40,0,0] [40,5,0]--3

newSpline = drawLineBetweenTwoPoints [40,5,0] [5,15,0]--4

newSpline = drawLineBetweenTwoPoints [5,15,0] [10,20,0]--5

newSpline = drawLineBetweenTwoPoints [10,20,0] [5,60,0]--6

newSpline = drawLineBetweenTwoPoints [5,60,0] [20,70,0]--7

newSpline = drawLineBetweenTwoPoints [20,70,0] [60,130,0]--8

newSpline = drawLineBetweenTwoPoints [60,130,0] [60,150,0]--9

newSpline = drawLineBetweenTwoPoints [60,150,0] [50,150,0]--10

newSpline = drawLineBetweenTwoPoints [50,150,0] [50,130,0]--11

newSpline = drawLineBetweenTwoPoints [50,130,0] [0,90,0]--12

max select all

modPanel.addModToSelection (Lathe ()) ui:on

max group group

rotate  $Group01 (angleaxis 90 [1,0,0])

$Shape12.modifiers[#Lathe].segs = 40

--Мозгов не хватае для автоматизации

messagebox "Нажимай кнопку Align=>Min"

Назад

 На главную страницу