Okuma OSP-P20L - Page 323

5238-E P-310
SECTION 12 USER TASK
• Subprogram
LE33013R0301400490010
• Main program (cutting program)
LE33013R0301400490011
RADIUS-TAPER. SUB %
ORT01
N1001
N1002
N1003
N1004
L=V11Z=ZL2
Z=ZL3
Z=ZL1
X=XD2
X=XD3
G01
G02
G01
RTS
N1000 XD2=XD1+2∗ [V11-DIS2] ZL2=ZL3+DIS4
$ ZL1=AL2+DIS3
FRANGE-1. MIN %
O100
N101
N102
NLAP1
N103
N104
N105
N106
N107
F0.2
Z300
Z137
Z135
L-2
Z115
L-3
V10=15 V11=16 XD1=110 XD3=90 ZL3=32
G00
G81
G00
G42
G75
G75
X800
X76
G01
X80
X=X01
N109
N110
N111
N120
N121
N122
N123
N124
N125
N126
N128
I10
S110 T010101 M03 M08
F0.35 U0.2 M0.1
T020202
N05 M09
Z-2
X200
Z300
Z137
D6
Z300
S130
Z300
G00
X800
X202
NLAP1
X800
NLAP2
X800
G40
G80
G00
G96
G85
G00
G87
G00
M02
N108 CALL ORT01 DIS1= [XD3-X01] /2 DIS2-V11∗SIN [V10]
$ DIS3=V11∗COS(V10) DIS4= [DIS1+DIS2-V11] ∗TAN [V11]