下面展示一些 内联代码片
。
-- a=box width:90 height:80 length:60 --创建一个几何体
-- a.pivot [100,100,100]
-- convertToPoly a --转成可编辑多边形
-- move a [x,y,z] --移动几何体
-- a.pivot 1,2,3
kd=2400 --宽度
gd=2600 --高度
sd=580 --深度
--创建一个立方体设置大小和位置以及轴心点
a=box width:100 length:200 heigth:200 pos:[100,100,200] pivot:[100,100,100]
b=box width:(kd-36) length:18 height:60 --踏脚板
b.pos=[0,(-280),0]
b=box width:kd length:18 height:60 --上封板
b.pos=[0,(-280),gd-60]
f
bb=box width:(kd-36) length:sd height:18 --下1横板
bb.pos=[0,0,60]
cc=box width:(kd-36) length:sd height:18 --顶板
cc.pos=[0,0,(gd-60-18)]
cc=box width:(kd-36) length:sd height:18 --上中横板
cc.pos=[0,0,(gd-628)]
a=box width:18 length:sd height:(gd-60) --左1侧板
wz=(kd-18)/6
a.pos=[-(wz*3),0,0]
copy a --左2侧板
a.length=sd-18
move a[wz*2,9,78]
a.height=gd-156
copy a --左3侧板
move a[wz*2,00,0]
--instance a --左4侧板
copy a
a.height=gd-60
a.length=sd
-- move a[wz*2,9,78]
move a[wz*2,-9,-78]
-- a.height=2000
--背板
beiban=box width:(kd-36) length:5 height:(gd-78)
move beiban[0,290,0]
--横隔板
geban01=box width:((wz*2)-18) length:(580-18) height:18
gbgd=(gd-646)/2+78
move geban01[-(wz*2),9,gbgd]
copy geban01
move geban01[(wz*2),0,0]
copy geban01
move geban01[(wz*2),0,-600]
select $box*
$.wireColor=(color 178 178 178)