T0 D0
$ C0 }! w& S) ]G0 G56 Z500 W0
& e; G0 V/ z( l$ a; t4 pR3=0, t( T3 J X- l0 j: f
X-600 Y0
2 A- N) P F! @# ?3 NM447 ?* y! l" O4 Z+ y) B/ }6 u5 @
M3 S350 F2000) Q9 l8 x9 O! \/ M; }/ o" d, {6 y
Z14.5
' g3 }' u* i/ d3 ]8 {3 b WG1 G41 X=-540/2 T1 D1
; v3 y$ S! Y+ ~2 y/ Y) PG2 X=-540/2 Y0 I=540/2
9 v( |6 J" P% j3 }2 c. gG0 G40 X-600# r6 ?: e! ^4 }( x c0 E9 }
AA:7 K/ [" T1 c/ [' F; A7 |+ ?7 q# K8 u
X-600 Y0
' B7 V6 H/ \1 A- f4 x1 K$ L8 mIF R3>908 m+ T' h0 G; ]1 o) x
R3=90# \6 O( S, Q0 ^! i$ s, Z3 f
ENDIF
4 x8 ^4 r# S1 C% @2 wR3=R3+1.5$ ~$ Z2 I% K" j5 C6 N% y$ m
Z=14.6-SIN(R3)*14.56 c' i+ m7 W# ]# X# H6 z' g0 i
G1 G41 X=-540/2-(14.5-COS(R3)*14.5) T1 D1; D; t4 R( m1 G, s* i1 p: o
G2 X=-540/2-(14.5-COS(R3)*14.5) I=540/2+(14.5-COS(R3)*14.5)1 _0 A$ f- m2 @% h! b) r9 s/ b
G0 G40 X-6005 w a3 l% S: n: b
IF R3<90 GOTOB AA, E# c( a# Z, ?. _
Z500 W0
0 D0 A, J" \8 B3 l5 E# W3 dM30 |