(imperial squares)

#1 = 2  (Scale)
#2 = 3  (Iterations)
#3 = 30 (Feed Rate)
#4 = 0.5
#5 = [#1*#2*#4]

G20 (imperial units)
G64 P0.005 (path tolerance)
M52 P1 (enable adaptive feed)

F#<_hal[plasmac.cut-feed-rate]> (feed rate from cut parameters)

o100 repeat [#2]
  G0 X[#5-#4*#1] Y[#5-#4*#1]
  M3 $0 S1 (start plasma torch)
  G1 Y[#5+#4*#1]
  G1 X[#5+#4*#1]
  G1 Y[#5-#4*#1]
  G1 X[#5-#4*#1]
  M5 $0 (stop plasma torch)
  #4 = [#4+0.5]
o100 endrepeat

G0 X0 Y0
M2 (end program)