
B-63343EN/02 SAMPLE PROGRAM 1.USER PROGRAMS FOR SETTING DATA FORMAT OF MACHINING PROCESS
- 139 -
#[22120+40]=-1 ;Data item #18
/* #[22120+42]=1214050 ;Data item #19 Release type
#[22120+42]=-1 ;Data item #19 -X area machining type
IF [P9970 AND 16 EQ 0] GOTO 100
#[22120+42]=1214050 ;Data item #19 -X area machining type
N100 #[22120+44]=0014053 ;Data item #20 Approach X type MD0019
#[22120+46]=0014053 ;Data item #21 Approach Z type MD0019
#[22120+48]=1010001 ;Data item #22 Coolant type
#[22120+50]=1214050 ;Data item #23 Spindle Gear type
M99; return
/*
/* User Programs for Machining program
/* O7504 For CYCLE Cutting Item type definition
/*
/* **** Bar machining Finishing ****
/*
O7504
#[22120+3]=1 ;process Bar
#[22120+5]=2 ;cycle Finishing
#[22120+6]=3004051 ;Data item #1 Tool Number type
IF[#[22120+8]EQ#0]GOTO100 ;IF NOT DATA SET THEN DATA SET
IF[#[22120+8]NE-1]GOTO101 ;IF DATA TYPE -1 ELSE SKIP DATA SET
N100 #[22120+8]=4004053 ;Data item #2 Feedrate type
N101 IF[#[22120+10]EQ#0]GOTO110 ;IF NOT DATA SET THEN DATA SET
IF[#[22120+10]NE-1]GOTO111 ;IF DATA TYPE -1 ELSE SKIP DATA SET
N110 #[22120+10]=1004050 ;Data item #3 Spindle Speed type
N111 #[22120+12]=1204050 ;Data item #4 Spindle direction type
#[22120+14]=0004053 ;Data item #5 Start position X type MD0019
#[22120+16]=0004053 ;Data item #6 Start position Z typeMD0019
#[22120+18]=-1 ;Data item #7 Data type #07
#[22120+20]=-1 ;Data item #8 Data type #08
#[22120+22]=-1 ;Data item #9 Data type #09
#[22120+24]=-1 ;Data item #10 Data type #10
#[22120+26]=-1 ;Data item #11 Data type #11
#[22120+28]=-1 ;Data item #12 Data type #12
#[22120+30]=-1 ;Data item #13 Data type #13
#[22120+32]=-1 ;Data item #14 Data type #14
#[22120+34]=-1 ;Data item #15 Data type #15
#[22120+36]=0014051 ;Data item #16 Cut edge angle type
#[22120+38]=0014051 ;Data item #17 Nose angle type
#[22120+40]=0014053 ;Data item #18 Release amount type
#[22120+42]=-1 ;Data item #19 Data type #19
IF [P9970 AND 16 EQ 0] GOTO 150
#[22120+42]=1214050 ;Data item #19 Data type #19 98/05/14
N150 #[22120+44]=0014053 ;Data item #20 Approach X type MD0019
#[22120+46]=0014053 ;Data item #21 Approach Z type MD0019
#[22120+48]=1010001 ;Data item #22 Coolant type
#[22120+50]=1214050 ;Data item #23 Spindle Gear type
M99; return
/*
/* User Programs for Machining program
/* O7505 For CYCLE Cutting Item type definition
/*
/* **** Threading machining ****
/*
O7505
#[22120+3]=5 ;process Thread
#[22120+5]=1 ;cycle common
#[22120+6]=3004051 ;Data item #1 Tool Number type
#[22120+8]=-1 ;Data item #2 Data type #02
IF[#[22120+10]EQ#0]GOTO110 ;IF NOT DATA SET THEN DATA SET
IF[#[22120+10]NE-1]GOTO111 ;IF DATA TYPE -1 ELSE SKIP DATA SET
N110 #[22120+10]=1004050 ;Data item #3 Spindle Speed type
N111 #[22120+12]=1204050 ;Data item #4 Spindle direction type
#[22120+14]=0004053 ;Data item #5 Start position X type
#[22120+16]=0004053 ;Data item #6 Start position Z type
#[22120+18]=1204050 ;Data item #7 Chamfaring on/off type