%
<T-001+A>(MICRO 7 - CHANNEL 1);
( PATH 1 )
( CUSTOMER: 		)
( DRAWING NO.: 		)
( MATERIAL: 		)
( DATE: 21.10.2008		)
( NAME: 			)
M9000;
(ENTERING TOOL GEMETRIES)
G10 P20001 X0 Z0 Y0;
G10 P10001 X0 Z-18 R0 Q0 Y0;
;
(*** INITIALIZATION ***);
(GLOBAL VARIABLE MEMORISATION);
G900 A101 B5 C0.05 D30 E0 H1 I1.5 J5000 K5 M0 Q0 S15 Y0 Z0;
(A: CUTOFF TOOL NO)
(B: BARSTOCK DIAMETER)
(C: INITIAL FEED RATE)
(D: PART LENGTH)
(E: ADDIT. RE-LOAD)
(H:BUSHING TYPE : 0=FIXED 1=ROTATING) 
(I: CUTOFF TOOL WIDTH)
(J: S1 RPM FOR INITIAL FACE OFF)
(K: DIST. PART PICKUP)
(M: PICKUP COLLET GEOM.)
(Q: LENGTH MAIN OPS COLLET)
(S: CUTOFF TOOL ANGLE)
(Y: ADD. MAT. FOR FACE OFF M'OPS)
(Z: ADD. MAT. FOR FACE OFF C'OPS)
;
G28 G91 X0 G90 (REFERENCING X1);
M8;
G4 X1;
M103 S1=5000;
G910;
M9001;
M9002;
(*** LOOP START ***);
N1 M120;
(*** TEST END OF BAR ***);
G913;
M9003;
(*** FEED NEW PART ***);
G912;
(*** RETRACT CUTOFF TOOL ***);
G0 G91 Z0.5;
G0 G90 X7.5;
(*** CUT WITH MAINWORK GANG 1 ***);
;
(******)
(PART PROGRAM)
(******)
M9200;
M9201;
(*** ORIENT CUTOFF TOOL ***);
G0 Y0 M103 S1=5000 T0101;
M9202;
(*** PREPARATION FOR CUTTING ***);
G0 X7.5;
G0 Z-30;
M418 (SYNCHRO S1-S4);
M9203;
M9204;
(*** CUTOFF, CUTOFF FOLLOWUP ***);
G1 X1.5 F0.05;
G1 X-0.2 F0.03;
M9205;
(*** END OF CUTOFF ***);
G1 X-0.9 F0.05 (APPROXIMATE VALUE OF HEIGHT OF ANGLE  x-0.8038);
(*** LOOP END ***);
M121;
M9206;
(*** AUXILIARY FUNCTIONS ***);
(M1105);
M891;
M893;
M9;
M46;
M105;
M9207;
(*** UNCONDITIONAL STOP. MAKE AN ATTEMPT START ***);
M122;
(*** RESET FUNCTIONS ***);
M8;
M103 S1=5000;
M9208;
(*** END OF PROGRAM. RETURN BEGINNING OF CYCLE ***);
M99 P1;
M2;
<T-001+B>(MICRO 7 - CHANNEL 2);
( PATH 2 )
( CUSTOMER: 		)
( DRAWING NO.: 		)
( MATERIAL: 		)
( DATE: 21.10.2008		)
( NAME: 			)
M9000;
(ENTERING TOOL GEMETRIES)
G10 P20005 X0 Z0;
G10 P10005 X0 Z0 R0 Q0;
;
(*** INITIALIZATION ***) ;
M110;
M161;
M85;
G28 G91 X0 G90 (REFERENCING X2);
G28 G91 Z0 G90 (REFERENCING Z4);
M9001;
(*** COMPUTE BACKWORK ZERO OFFSET ***);
G921;
M9002;
(*** LOOP START ***);
N1 M120;
(*** Z4 ZERO OFFSET ***);
G55;
M9003;
(*** BACKWORK ***);
;
(******)
(PART PROGRAM)
(******)
M9200;
(*** EJECT PART ***);
M160;
G4 X0.5;
M411;
M84;
M161;
M85;
M404 S4=5000;
M9201;
M9202;
(*** APPROACH PICKOFF SPINDLE ***);
G54 (PART PICKOFF ZERO OFFSET);
(TOOL T05 PICKOFF SPINDLE);
G0 Z5 T0505;
M170 ( ENABLE Z4 TORQUE LIMIT );
M9203;
(*** PART PICKOFF ***);
G924;
G4 X0.1;
M172 (SERVO-LAG CHECK  Z4);
M410;
M173;
M9204;
M9205;
(*** RETRACT AFTER PART PICKOFF ***);
G1 G91 Z2 G94 F2000 (CHECK CUTOFF TOOL);
G95 G90;
G4 X0.1;
M172;
M173;
M171;
G28 G91 Z0 G90 (REFERENCING Z4);
M405;
(*** LOOP END ***);
M121;
M9206;
M9207;
(*** UNCONDITIONAL STOP. MAKE AN ATTEMPT START ***);
M122;
M9208
(*** END OF PROGRAM. RETURN BEGINNING OF CYCLE ***);
M99 P1;
M2;
%