aboutsummaryrefslogtreecommitdiffstats
path: root/nc_files/lathe_g7x_quadrants.ngc
blob: 7c5045d6d1e7ac071cc5092b9cd50b4ee10b8957 (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
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
G54 G18 G21
F400


O100 SUB
	G0Z-12X14
	G1Z-10X14
	G1 X10 Z-10
	G3 K5 I0 X5 Z-5
	G1 X5 Z0
	X-1
	Z2
O100 ENDSUB

G70 Q100 X15 Z4 D1 P1
G71 Q100 X-5 Z-14 D0.5 I1 R0.3
G72 Q100 X15 Z4 D0.5 I1 R0.3

#<_distance>=20
O101 SUB
	G0 X-1 Z[2+#<_distance>]
	G1 X-1 Z[0+#<_distance>]
	G1 X5 Z[0+#<_distance>]
	G1 X5 Z[-5+#<_distance>]
	G2 I5 K0 X10 Z[-10+#<_distance>]
	G1 X14 Z[-10+#<_distance>]
	G0 X14 Z[-12+#<_distance>]
O101 ENDSUB

G72 Q101 X-5 Z[-14+#<_distance>] D0.5 I1 R0.3
G71 Q101 X15 Z[4+#<_distance>] D0.5 I1 R0.3
G70 Q101 X15 Z[4+#<_distance>] D1 P1

#<_distance>=[#<_distance>+12]
O102 SUB
	G0Z[12+#<_distance>]X14
	G1Z[10+#<_distance>]X14
	G1 X10 Z[10+#<_distance>]
	G2 K-5 I0 X5 Z[5+#<_distance>]
	G1 X5 Z[0+#<_distance>]
	X-1
	Z[-2+#<_distance>]
O102 ENDSUB

G71 Q102 X-5 Z[14+#<_distance>] D0.5 I1 R0.3
G72 Q102 X15 Z[-4+#<_distance>] D0.5 I1 R0.3
G70 Q102 X15 Z[-4+#<_distance>] D1 P1

#<_distance>=[#<_distance>+20]
O103 SUB
	G0 X-1 Z[-2+#<_distance>]
	G1 X-1 Z[-0+#<_distance>]
	G1 X5 Z[-0+#<_distance>]
	G1 X5 Z[5+#<_distance>]
	G3 I5 K0 X10 Z[10+#<_distance>]
	G1 X14 Z[10+#<_distance>]
	G0 X14 Z[12+#<_distance>]
O103 ENDSUB

G72 Q103 X-5 Z[14+#<_distance>] D0.5 I1 R0.3
G71 Q103 X15 Z[-4+#<_distance>] D0.5 I1 R0.3
G70 Q103 X15 Z[-4+#<_distance>] D1 P1

M2
bues.ch cgit interface