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

G91 G28 Z0
G00 G90 X0.0 Y0.0 S0
G0 z5
G1 F[#<Feed>]


#1 = 0
O100 while [#1 gt 0-[#<Depth>-#<DPC>]]
                #1 = [#1-#<DPC>]
                G1 F[#<Feed>]  z[#1]
                Y[#<Ysize>]
                G0 z5
                Y0
O100 endwhile

G1 F[#<Feed>] 
z[0-#<Depth>]
Y[#<Ysize>]
G0 z5
Y0
G91 G28 Z0
G90
%