Renishaw Macro O9818

SpeedsandFeeds said:

Does anyone know where I can find the macro program 9818 for renishaw probe? This macro aligns the A axis using two y axis points with a z move down, to find the y axis points on the part which is then stored in the A offset. My renishaw software came with the 9817 macro program which aligns the b axis using two x axis moves. I tried to alter that macro but had no luck. Anyone out there have the macro or know where I can find it?

Thanks,
Speedsandfeeds.

Click to expand...

O09818 (REN 4TH AXIS Y MEASURE)
G103 P1
G04 P1
G04 P1
G04 P1
G04 P1
G04 P1
G04 P1
#3001= 0
G04 P250
G04 P1
G04 P1
G04 P1
G04 P1
G04 P1
G04 P1
IF [ #3001 LT 200 ] GOTO999
G65 P9724
IF [ #25 EQ #0 ] GOTO10
IF [ #26 EQ #0 ] GOTO11
IF [ #25 EQ 0 ] GOTO12
N1
#5= 185
WHILE [ #5 LE 199 ] DO1
#[ #5 ]= #0
#5= #5 + 1
END1
#3= 4 (4TH AXIS NUMBER)
#4= 1 (1=CW -1=CCW CORRECTION)
IF [ #17 NE #0 ] GOTO2
#17= 10 * #179
N2
#10= #5042 (Y)
#12= #5043 - #166 (Z)
G31 Y [ #10 + [ #25 / 2 ] ] F#169
#199= 1
IF [ ABS[ #5042 - [ #10 + [ #25 / 2 ] ] ] GE #173 ] GOTO13
G65 P9726 Z#26 Q#17
IF [ #199 NE 0 ] GOTO13
#30= #176 (Z1)
G00 Y#10
G31 Y [ #10 - [ #25 / 2 ] ] F#169
#199= 1
IF [ ABS[ #5042 - [ #10 - [ #25 / 2 ] ] ] GE #173 ] GOTO13
G65 P9726 Z#26 Q#17
IF [ #199 NE 0 ] GOTO13
#31= #176 (Z2)
G00 Y#10
#29= [ #31 - #30 ] * #4
G65 P9731 Y [ #29 ] X [ #25 ] (ATAN)
#16= #168
N3
#189= #16 + #[ 5040 + #3 ]
#193= #29
#194= #16 (ANG ERR)
IF [ #23 EQ #0 ] GOTO4
G65 P9730 A [ #189 - #16 ] Q#2 W#23
N4
IF [ #2 EQ #0 ] GOTO6
IF [ ABS[ #194 ] LT #2 ] GOTO5
#198= 4
N5
IF [ #170 AND 4 EQ 4 ] GOTO6
IF [ ABS[ #194 ] LT #2 ] GOTO6
#[ 3006 - [ [ #170 AND 8 ] / 8 * 6 ] ]= 1 (ANGLE OUT OF TOL)
N6
IF [ #19 EQ #0 ] GOTO15
IF [ #19 GE 154 ] GOTO9
IF [ #19 GE 110 ] GOTO8
IF [ #19 NE 0 ] GOTO7
(EXTL)
#[ 5200 + #3 ]= #[ 5200 + #3 ] + #16
GOTO15
N7
(W OFF)
#[ 5200 + #3 + [ #19 * 20 ] ]= #[ 5020 + #3 ] - #[ 5040 + #3 ] + #16 - #[ 5200 + #3 ]
GOTO15
N8
(ADDITIONAL OFFSETS)
#30= #19 - 110
#[ 7000 + #3 + [ #30 * 20 ] ]= #[ 5020 + #3 ] - #[ 5040 + #3 ] + #16 - #[ 5200 + #3 ]
GOTO15
N9
(G154 P OFFSETS)
#30= [ ROUND[ [ #19 - FIX[ #19 ] ] * 100 ] ] - 1
#[ 14000 + #3 + [ #30 * 20 ] ]= #[ 5020 + #3 ] - #[ 5040 + #3 ] + #16 - #[ 5200 + #3 ]
GOTO15
N10
#3000= 91 (Y INPUT MISSING)
N11
#3000= 91 (Z INPUT MISSING)
N12
#3000= 91 (Y0 INPUT NOT ALLOWED)
N13
G00 Z#12
Y#10
IF [ #199 EQ 2 ] GOTO14
#3000= 92 (PROBE OPEN)
N14
#3000= 93 (PROBE FAIL)
N15
#199= 0
N999
G103
M99

Click to expand...

SpeedsandFeeds said:

I have a fanuc control 32i model b is that macro for fanuc?

Click to expand...