#101 = 194;
#102 = 0;
#103 = 0;
#104 = 5;
#100 = FIX[#101/#104]/2;
G90 G17 G21 G54 G40 G49
M06 T1;
M03 S10000;
G43 H1;
N20 IF [#100 EQ 0] THEN M30;
G00 X#102 Y#103 Z10.;
Z5.;
G01 Z-3. F1000;
Y#101 F1200;
X#101;
Y#103;
X#102;
G00 Z10.;
#100 = #100 - 1;
#102 = #102 + #104;
#103 = #103 + #104;
#101 = #101 - #104;
GOTO 20;