T0 D0
/ L' i$ m( k; q" ^9 Q- }' WG0 G56 Z500 W05 T6 v: {1 W! @4 h. d7 ~
R3=0
: q) j4 Z3 z2 E! b; @X-600 Y0
" {$ v, g* t7 ?" ~5 U6 z$ B: a- kM44: ~" E. k* @" \( U
M3 S350 F2000; \4 w0 a( F, K& n
Z14.5% l2 W. x9 g7 ?9 n
G1 G41 X=-540/2 T1 D1
: c P+ X+ g! t3 M, t J+ fG2 X=-540/2 Y0 I=540/20 d q0 r& X0 u# u% a
G0 G40 X-600! w( _; K* T9 d0 k- [1 W8 b
AA:# `9 R) \2 g0 W8 D$ W1 v
X-600 Y0
& A# {# |) F% K9 [$ {/ wIF R3>904 a- ]6 y/ T: b/ B
R3=90! E0 W% _8 R! A8 S4 k# n' E9 B7 k# J
ENDIF
7 T7 [; H- R ~. b7 }; N+ O3 ~R3=R3+1.5- _7 o1 c" v- U& _8 \! v+ F7 A
Z=14.6-SIN(R3)*14.5' q, t/ P, h" b" i9 m7 A
G1 G41 X=-540/2-(14.5-COS(R3)*14.5) T1 D1
1 V A3 X! {- a' l* P d8 eG2 X=-540/2-(14.5-COS(R3)*14.5) I=540/2+(14.5-COS(R3)*14.5)% F) N/ B9 C% ~3 T8 E) a- i7 K7 I6 h
G0 G40 X-600, H6 b4 z: b }5 {6 m! q
IF R3<90 GOTOB AA5 h8 t8 u- D2 c/ {% E% ?2 H. i. p
Z500 W0) C: p; m; x0 [% c- Z3 z
M30 |