%
#<Feed> = 2000
#<Xsize> = 110
#<Depth> = 3
#<DPC> =1

(G91 G28 Z0)
G91 G28 Z0
G90
M3 s24000
G00 G90 X0.0 Y0.0 
G0 z5
G1 F[#<Feed>]


#1 = 0
O100 while [#1 gt 0-[#<Depth>-#<DPC> ]]
                #1 = [#1-#<DPC>]
                G1 F[#<Feed>]  z[#1]
                x[#<Xsize>]
                G0 z5
                x0
O100 endwhile

G1 F[#<Feed>] 
z[0-#<Depth>]
x[#<Xsize>]
G0 z5
x0
G91 G28 Z0
G90
M2
%