
B–62444E–1/04
7. CHECKING MACHINING PROGRAMS
OPERATION
93
/* Offset data save and restore function G30 → G00 replace operation
/*
/* INPUT P9766#3(OSV)
/* Input Macro parameter #20666 material length
/* #20667 material outer diamiter
/* #20737 input unit
/* #20794 program zero point
/* #9127 state of execution
/* OUTPUT none
O0000 IF[[P9766AND4]EQ0]GOTO500;No.9766#2(OSV) 0:non effective 1:effective
IF[#9127NE1]GOTO500 ;#9127 1:Processing simulation
; 2:Convert in to NC program
#1=#20666 ;material length
#2=#20667 ;material outer diamiter
IF[#20794EQ1]GOTO100 ;program zero point 0:workpiece and 1:chuck end
#1=0 ;matelial length data clear
N100 IF[#20737EQ1]GOTO120 ;#20737 0:input unit mm 1:input unit inch
;***mm unit
#1=150+#1 ;#1=150+ material length (z coordenate)
#2=100+#2 ;#2=100+ material diamiter (x coordenate)
GOTO200
;**inch unit
N120 #1=15+#1 ;#1=150+ material length (z coordenate)
#2=10+#2 ;#2=100+ material diamiter (x coordenate)
N200 G00X#2Z#1 ;*** G00 command
GOTO900
N500 G30U0W0V0 ;*** G30 command
N900 M99 ;return
example)