O0101
S2000 M03
G54 G90 G00 X0 Y0 Z30.
G65 P8101 A10. B0 D60. Q4. R13.5 X50. Y20. Z-32. F550.
m30
O8101
G52 X#24 Y#25
#3=#7/2-#18
#4=TAN[#1]
#5=#17*#4
#6=#3+#26*#4
G00 X#3 Y0
Z[#2+1.]
G01 Z#2 F#9
WHILE [#3 GT #6] DO 1
G91 G02 X-#5 I-#3 Z-#17 F#9 G02
#3＝#3-#5
END 1
G90 G01 X0 Y0
G00 Z30.
G52 X0 Y0
M99
