blob: 6f8829febaac3afa33f3e94af1d40901ac09413d (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
|
;imperial squares
#1 = 2 (Scale)
#2 = 3 (Iterations)
#3 = 30 (Feed Rate)
#4 = 0.5
#5 = [#1*#2*#4]
G20
G64 P0.0005
M52 P1 ;to enable reverse-run
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 (select plasma torch)
G1 Y[#5+#4*#1]
G1 X[#5+#4*#1]
G1 Y[#5-#4*#1]
G1 X[#5-#4*#1]
M5 $0
#4 = [#4+0.5]
o100 endrepeat
G0 X0 Y0
M2
|
