ich weiss zwar nicht genau, was das werden wird, hab aber mal 'was gebastelt:
- erst noch einen ganzzahlparameter n anlegen, wert auf 5 setzen,
a auf 0,6
das wirds wohhl noch nicht sein, deshalb einfach nochmal melden & beschreibven, was anders werden soll.
</font><blockquote><font size="1" face="Verdana, Helvetica, sans-serif">Code:</font><hr /><pre style="font-size:x-small; font-family: monospace;"> material matg
rotx 90
roty 270
Prism_ 6,A,
0,0,15,
B/3,0,15,
B/3,(8/10*zzyzx),15,
B,(7/10*zzyzx),15,
B,(9/10*zzyzx),15,
0,zzyzx,15
del 2
rotx 90
roty 270
addz zb/2
addy 8/10*zzyzx-zh
addx B/3
material matz
for i = 1 to n
Prism_ 5,zb,
0,0,15,
zt/6,0,1,
zt,(2.5/6*zh),1015,
zt,(5.5/6*zh),15,
0,zh,15
addy 2.5/6*zh
addx zt/6
cylind zb,0.025
del 2
addz (a-2*zb)/(n-1)
next i