
1.USER PROGRAMS FOR SETTING DATA FORMAT OF MACHINING PROCESS SAMPLE PROGRAM B-63343EN/02
- 144 -
#[22120+36]=0014053 ;Data item #16 Start feed type
#[22120+38]=0014053 ;Data item #17 Start clearance type
N300 IF[#[22120+29]NE124]GOTO400 ;IF Machining is trough hole
#[22120+30]=0014053 ;Data item #13 Depth decreese type
#[22120+32]=0014053 ;Data item #14 Return amount type
#[22120+34]=0014053 ;Data item #15 Minimum Depth type
#[22120+36]=0014053 ;Data item #16 Start feed type
#[22120+38]=0014053 ;Data item #17 Start clearance type
#[22120+40]=0014053 ;Data item #18 End feed type
#[22120+42]=0014053 ;Data item #19 End clearance type
N400 IF[#[22120+29]EQ125]GOTO500 ;IF Machining is trough deep hole
IF[#[22120+29]NE126]GOTO600 ;IF Machining is high speed trough deep hole
N500 #[22120+30]=0014053 ;Data item #13 Depth decreese type
#[22120+32]=0014053 ;Data item #14 Return amount type
#[22120+34]=0014053 ;Data item #15 Minimum Depth type
#[22120+36]=0014053 ;Data item #16 Start feed type
#[22120+38]=0014053 ;Data item #17 Start clearance type
#[22120+40]=0014053 ;Data item #18 End feed type
#[22120+42]=0014053 ;Data item #19 End clearance type
N600 M99; return
/*
/* User Programs for Machining program
/* O7512 For CYCLE Cutting Item type definition
/*
/* **** Reaming machining ****
/*
O7512
#[22120+1]=2 ;process (2)Reaming
#[22120+3]=9 ;process Drilling
#[22120+4]=-1 ;Machining area None
#[22120+5]=1 ;cycle common
#[22120+6]=3004051 ;Data item #1 Tool Number type
IF[#[22120+8]EQ#0]GOTO10 ;IF NOT DATA SET THEN DATA SET
IF[#[22120+8]NE-1]GOTO11 ;IF DATA TYPE -1 ELSE SKIP DATA SET
N10 #[22120+8]=4004053 ;Data item #2 Feedrate type
N11 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]=1104050 ;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]=0004053 ;Data item #7 Hole diameter type
#[22120+20]=0004053 ;Data item #8 Start Z type
IF[#[22120+22]EQ#0]GOTO120 ;IF NOT DATA SET THEN DATA SET
IF[#[22120+22]NE-1]GOTO121 ;IF DATA TYPE -1 ELSE SKIP DATA SET
N120 #[22120+22]=8104053 ;Data item #9 End Z / Hole depth type
N121 #[22120+24]=0004053 ;Data item #10 Chamf length
#[22120+26]=0004053 ;Data item #11 Dwell type
#[22120+28]=-1 ;Data item #12 Reaming type
#[22120+29]=121 ;Data item #12 Reaming Data default
#[22120+30]=0014053 ;Data item #13 Return amount type
#[22120+32]=0014053 ;Data item #14 Start feed type
#[22120+34]=-1 ;Data item #15 End feed type
#[22120+36]=-1 ;Data item #16
#[22120+38]=-1 ;Data item #17
#[22120+40]=-1 ;Data item #18
#[22120+42]=-1 ;Data item #19
#[22120+44]=0014053 ;Data item #20 Approach X type
#[22120+46]=0014053 ;Data item #21 Approach Z type
#[22120+48]=1010001 ;Data item #22 Coolant type
#[22120+50]=1214050 ;Data item #23 Spindle Gear type
IF[#[22120+29]EQ121]GOTO100 ;IF Reaming is braind hole then jmp
#[22120+34]=0014053 ;Data item #15 End feed type
N100 M99 ;return
/*
/* User Programs for Machining program