T0 D0
/ H6 e: w) H, ?, e* NG0 G56 Z500 W0: |! ^ j4 M2 ?4 E' w
R3=0
& h8 u8 w+ h0 M9 S: mX-600 Y0/ A, l+ J3 c$ N6 [0 b$ g
M44
4 a' r, K* v$ u, g2 ~M3 S350 F2000
. ]( `# M o4 b% g8 S4 UZ14.5* j5 s" C4 s* J3 l
G1 G41 X=-540/2 T1 D1
/ h+ m. m" I* D+ G" qG2 X=-540/2 Y0 I=540/2
6 S1 |. C" D; U9 F6 b* k1 @G0 G40 X-600
6 ?/ e1 b4 u& Z$ oAA:
3 X. {: F' E$ |6 W* d# ~7 g, bX-600 Y0( L3 N/ |7 X( @ ~
IF R3>90
7 Y" z! S# f7 G' p& c! t; sR3=90* }2 U. T. i2 |- }8 k" O, N1 G# ^
ENDIF# \+ t Z7 j6 r' L8 `$ C
R3=R3+1.5
M+ y1 q' @9 KZ=14.6-SIN(R3)*14.5
1 r* s+ |. W4 o+ V: S# t0 qG1 G41 X=-540/2-(14.5-COS(R3)*14.5) T1 D11 v2 x: }- K0 z2 P2 u; e! [, g/ n. S9 k
G2 X=-540/2-(14.5-COS(R3)*14.5) I=540/2+(14.5-COS(R3)*14.5)0 I& E$ n( A% f
G0 G40 X-600
/ c8 O. I+ c2 m1 ?IF R3<90 GOTOB AA
' W) I. Q# o4 n* y+ g4 V5 \1 YZ500 W0) n1 x, w3 F% ~9 E) K# I
M30 |