#100 = 390; (LENGTH RECTANGLE)
#101 = 210; (WIDTH RECTANGLE)
#102 = 50; (MIN COORD X)
#103 = 50; (MIN COORD Y)
#105=16;
#104 = FIX[#100/#105]; (COUNTER)
#106 = FIX[#101/#105]; (COUNTER)
IF [#104 LE #106] THEN #107=#104;
IF [#106 LE #104] THEN #107=#106;
#108=2.2;
G17 G21 G90 G54 G40 G49 G80;
M06 T1;
G43 H1;
M03 S10000;
G00 X0.Y0.Z10.;
Z5;
N50 IF [#107 EQ 0] GOTO 1000
G90 G00 X#102 Y#103;
G01 Z-#108 F100;
G91
X#100;
Y#101;
X-#100;
Y-#101;
G00 Z5.;
#107=#107-1;
#100 = #100-#105;
#101 = #101-#105;
#102 = #102+[#105/2];
#103 = #103+[#105/2];
#108=#108+1;
GOTO 50;
N1000 M05;
M09;
G91 G28 Z0.;
G28 X0.Y0.;
G90;
M30;

---

......
.....
......

#500=#500+1;
M30;

#500 = 0;

MDI