|
T101;
9 m5 v* ?7 ?3 l* v# g. ` G0 X85. Z16.;, C k: z0 O7 E* N& E; {% U
M3 S200;
( X; E3 j+ E7 F3 U0 f #1=0;6 R! C8 f$ K0 s w. Y. @0 `
N1 #26=29;
. A# `! ]( t: s l( o #2=SQRT[[100-#1]*[100-#1]-29*29]-59.54 `2 e0 z( q g
G0 X[2*[#2]]
0 ?& c! J" p* ^+ \! M7 P$ j4 U" [N2 #3=[100-#1]*[100-#1]-[#26]*[#26];
9 y1 \" @" w1 ~# Y0 z+ N #24=2*[SQRT[#3]-59.5]; ^3 p- z: u0 h; E7 i
G32 X[#24] Z[#26-13] F8.;* O9 Z! v4 k$ O1 A
#26=#26-0.01;6 O" o: @: L! m" [
IF[#26 GE [-34]] GOTO2
: X. V+ o6 j" @2 v& P G0 X85.;
: @# ?+ F0 S1 p5 M6 a Z16.;
! Z& e# D) ^3 j0 ] #1=#1+0.03;
6 L2 a; D! R8 s: j IF[#1 LE 3] GOTO1;$ d& \; O0 n! @7 H2 l
G0 X85.;
" j4 d+ H" f& s. J3 w3 c: k Z100.;
6 g4 e/ ^5 Z. I; A( r, M0 F M5;; `; m& B7 F' x5 @
M30; |
|