blob: 94c267075b1ac6f8fd2f4388e0b3f95182538f47 (
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
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
|
(author: Chris P)
(version: 0.3)
(date: 04/25/19)
(Probe right top side for x,z 0,0 position)
(Start probe position is over right side edge of stock)
(inside the step off width distance and within max z distance)
(ensure all settings have been set properly according to help diagrams)
o<probe_right_outside> sub
(uses NGCGUI style arg spec)
(number after "=" in comment is default value)
#<probe_tool_number> = #1 (=99)
#<max_z_distance> = #2 (=0.5000)
#<max_xy_distance> = #3 (=0.5000)
#<xy_clearance> = #4 (=0.1000)
#<z_clearance> = #5 (=0.1000)
#<step_off_width> = #6 (=0.5000)
#<extra_probe_depth> = #7 (=0.0000)
#<probe_slow_fr> = #8 (=0.0)
#<probe_fast_fr> = #9 (=10.0)
#<calibration_offset> = #10 (=0.0000)
#<x_hint> = #11 (=1.0000)
#<y_hint> = #12 (=1.0000)
#<diameter_hint> = #13 (=1.0000)
#<edge_width> = #14 (=0.5000)
#<probe_mode> = #15 (=0)
(Cancel G92 offsets)
G92.1
#<workspace_x> = #[5201 + [20 * #5220]]
(Probe Tool Safety Check)
o<110> if [#5400 NE #<probe_tool_number>]
(MSG, Specified probe tool #<probe_tool_number> not in spindle, aborting)
o<Probe_right_top_side> return
o<110> endif
(Probe Diameter)
#<probe_diameter> = #5410
(Probing depth from the z probed clearance height, used for z moves)
#<z_probe_stack> = [#<z_clearance> + #<probe_diameter> + #<extra_probe_depth>]
(Probe X Positioning Move, Step Off Width)
G91
G0 X[#<step_off_width>]
(Probe X Positioning Move, to Probing Depth)
F[#<probe_fast_fr>]
G1 Z-[#<z_probe_stack>]
(Call sub "probe_x_minus" to Probe x- side of Workpiece)
o<probe_x_minus> call [#1][#3][#4][#8][#9][#10]
#<x_minus_zero_edge> = #<_value>
(value returned safety check, aborts if no value returned)
o<120> if [#<probe_mode> EQ 1 AND #<_value_returned> NE 1]
(MSG, Missing X Sub returned edge parameter, aborting)
o<probe_right_top_side> return
o<120> endif
(Probe Completion Move to Z Clearance Plane, and Y Zero)
G91
G0 Z[#<z_probe_stack>]
G90
G0 X[#<x_minus_zero_edge>]
(probe mode rules for WCO or probe position measuring only)
o<130> if [#<probe_mode> EQ 0]
(Record Zero in selected axes and WCO)
G10 L2 P#5220 X[#<x_minus_zero_edge> + #<workspace_x>]
o<probe_right_top_side> return
o<130> endif
o<probe_right_outside> endsub
M2 (end program)
|
