%
O1000;
#100 = 20;
#101 = 25;
#102 = 120;
#103 = 170;
#104 = 8;
#106 = 8;
#105 = 5;
G17 G21 G90 G54 G40 G49 G80;
M06 T5;
M03 S10000;
G43 H5;
M07;
N100 IF [#105 EQ 0] GOTO 1000;
G00 X#100 Y#101 Z10;
G91
Z-5;
G01 Z-8. F1200;
Y#102
X#103
Y-#102
X-#103
G00 Z13.;
G90;
#100 = #100 + #104;
#101 = #101 + #106;
#102 = #102 - [#104*2];
#103 = #103 - [#106*2];
#105 = #105 - 1;
GOTO 100
N1000 M05;
M09;
G91 G28 Z0.;
G28 X0.Y0.;
G90;
M30;
%