Here is a two axis Okuma jaw boring macro with graphics.
( OKUMA 2 AXIS LATHE JAW BORING PROGRAM WITH GRAPHICS )
( **** SET TOOL TO FRONT OF JAWS **** )
( **** SET THE FOLLOWING VALUES **** )
V1= ( SPINDLE RPM "SFM" ) 300
V2= ( "X" START POINT ) 2.0
V3= ( T00L NUMBER ) 0303
V4= ( DEPTH OF CUT "DIAM" ) 0.05
V5= ( "Z" DEPTH "-" VALUE ) -1.00
V6= ( ROUGH FEED RATE ) 0.008
V7= ( FINISH FEED RATE ) 0.005
V8= ( FINISH DIAM OF JAWS ) 2.75
( NUMBER IN [ ] IS TOOL NUMBER )
VTLIN[3]=8 VTLFN[3]=1 VTLD[3]=0.625 VTLL[3]=2 VTLA2[3]=0 VTLA1[3]=80
VWKR=393.7007 VCHKL=0 VCHKD=0 VCHKX=4 VCHKZ=-3
DEF WORK
PT LF,LC,[-30 ,0],[40,40],[30,0]
PT LF,RC,[0,0],[18,18],[59,0],0
END
DEF WORKF
PF 0,[0,0],40,D
END
CLEAR
DRAW
(**********************)
G00 X20. Z20.
G50 S2000
G96 S=V1 M41 M03 M08
G00 X=V2 Z0.1 T=V3
G85 NBORE D=V4 F=V6 U0.01 W0.002
NBORE G81
G00 X=V8 Z.1
G01 Z0 G41 F=V7
Z=V5
X=V2
G40 K-.0004
G80
G00 Z.1
X20. Z20. M9
M01
/
(FINISH PASS)
G0 X20. Z20.
T=V3 G96 M3 S=V1
G87 NBORE
G0 Z.1
G0 X20. Z20. M9
M02 |