Fanuc 18i Heli-bore program

[krustykrab]

Does anyone have a kick-*** heli bore program for the Fanuc 18i controller?

Preferrable one that uses variables/parameters.

Need it asap,

thanks

[cogsman1]

HERES ONE i PICKED UP SOMEWHERE.

O8000 (helical)
#100=1.0(CUTTER DIAMETER)
#101=30.0(X CENTRE)
#102=30.0(Y CENTRE)
#103=0.0
#104=30.0(DEPTH OF HOLE)
#105=50.0(DIA OF HOLE)
#106=3000(SPNDLE SPEED)
#107=500.0(FEED)
#108=10(TOOL POS)
#110=20.0(DEPTH OF CUT)
G00G91G28Z0.0
G91G28X0.0Y0.0
T#108M06
G00G90G54X#101Y#102S#106M03
G43Z10.0H#108M08
N1WHILE[-#104LE#103]DO1
#103=[#103-#110]
IF[-#104GT#103]GOTO20
G1Z#103F[#107/3]
G03X[#101+#105-#100/2]R[[#105-#100]/4]F#107 I-[#105/2-#100/2]J0.0
X#101R[[#105-#100]/4]
G00Z10.0
END1
N20#103=-#104
G01Z#103F[#107/3]
G03X[#101+#105-#100/2]R[[#105-#100]/4]F#107[[#10-#100]/4]
G00Z10.0 M09
G00G91G28Z0.0
G91G28X0.0Y0.0
M30

[krustykrab]

Thanks a lot. We'll give it a go and see what happens.

You guys on this forum are awesome...and I mean that!!!!