Hi,
can someone help with this please?
PUT -A/2,yy1+rr1,1,
A/2,yy1+rr1,1
FOR angle=alfa TO 180-alfa+EPS STEP delta
y=(yy1+rr1)*sin(angle)
x=(yy1+rr1)*cos(angle)
PUT x,y,1
NEXT angle
PUT -A/2+(A/2+e1),yy1+rr1,-e2,
A/2-(A/2+e1),yy1+rr1,-e2
FOR angle2=alfa2 TO 180-alfa2+EPS STEP delta2
y=(yy1+rr1-(A/2+e1))*sin(angle2)
x=(yy1+rr1-(A/2+e1))*cos(angle2)
PUT x,y,-e2
NEXT angle2
pen WALL_SECT_PEN
MATERIAL WALL_MAT_A
addz -0.1
addy B-(yy1+rr1)
RULED NSP/6,1+2+4+16+32,
USE(NSP)
DEL 2
addz -WIDO_SILL - WIDO_REVEAL_SIDE*(WALL_THICKNESS - 2*WIDO_SILL)
rotx -90
wallniche 6, 1, 1,
0, 0, 1, B,
A/2, 1, 1+2+16,
A/2, 0, 1+2+16,
-e1, e2, 1+2+16,
e1, e2, 1+2+16,
-A/2, 0, 1+2+16,
-A/2, 1, 1+2+16
DEL 2
Ryzen Threadripper 1950X - 64GB RAM; NVidia GTX 1080Ti ; Windows 10 64bit; AC10-AC23 (64bit)