#7 =ABS(#7 )
#17 =ABS(#17 )
#11 =ABS(#11 )
#9 =ABS(#9 )
#16 =ABS(#16 )
#4 =ABS(#4 )
#5=ABS(#5)
#351=#18-#9
G0 G90 X#351 Y#19
G42 D#3
#350 =#18 +#9
G0 G90 X#350 Y#19
Z#12
#265=#12-#17
IF(#265LT#20)GOTO90
G01G91Z-#17F#5
GOTO100
N90G01G90Z#20F#5
N100#300=1
#305=#7-#4
#306=(#305/#9)
#307=FIX(#306)
#308=(#307*#9)*2
N10#300=#300+1
IF(#9*#300 GT#308 )GOTO26
#303=(#9*#300 )
#304=(#303/2)
G91G02X-#303I-#304F#5
#300=#300+1
IF(#9*#300 GT#308 )GOTO28
#303=#9*#300
#304=(#303/2)
G91G02X#303I#304F#5
IF(#9*#300 LE#308)GOTO10
N26#290=#5041-#18
#299=ABS(#290)
#291=#7-#4
#310=#299+#291
#311=(#310/2)
G91G02X#310I#311F#5
IF(#306EQ#307)GOTO105
#312=#7-#4
G91G02X0I-#312F#5
GOTO105
N28#290=#5041-#18
#299=ABS(#290)
#291=#7-#4
#310=#299+#291
#311=(#310/2)
G91G02X#310I#311F#5
IF(#306EQ#307)GOTO105
#312=#7-#4
G91G02X0I-#312F#5
N105 
#250=#5043+#16
#251=#5043-#11
IF(#251LE#20)GOTO200
G0G90Z#12
G0X#350Y#19G90
G0G90Z#250
#253=#16+#11
G01G91Z-#253F#5
IF(#5043GT#20)GOTO100 
N200 #260 = #12- #17
IF(#260 LT#20 )GOTO600
IF(#5043EQ#20)GOTO600
G0G90Z#12
G0X#350Y#19G90
G0G90Z#250
G01Z#20F#5
GOTO100 
N600
G0 Z#12 G90
X#18 Y#19
G40
M99
