Код: Выделить всё
#<x-num> = 10 (количество отверстий в ряду)
#<y-num> = 10 (количество рядов)
#<x-0> = 10 (начальная позиция X)
#<y-0> = 10 (начальная позиция Y)
#<x-step> = 4 (шаг по X)
#<y-step> = 4 (шаг по Y)
#<y-shift> = [#<y-step>/2]
#<x> = #<x-0>
#<y> = #<y-0>
#<y-num_1> = [#<y-num>-1]
#<i> = 0
F800
o100 REPEAT [[#<x-num>*2]-1]
#<y> = #<y-0>
#<i> = [[#<i>+1] MOD 2]
#<y> = [#<y> - #<i>*#<y-shift>]
(DEBUG, i = #<i>,n = #<y-numN> )
o120 IF [#<i> EQ 1]
#<y-numN> = #<y-num>
o120 ELSE
#<y-numN> = #<y-num_1>
o120 ENDIF
o101 REPEAT [#<y-numN>]
G1 X#<x> Y#<y>
G1 z-5
G0 z0
#<y> = [#<y>+#<y-step>]
o101 ENDREPEAT
#<x> = [#<x>+[#<x-step>/2]]
o100 ENDREPEAT
M2