// ---------------------------------------- // // The following SmartCAM code generator has been // created to generate NC code for the respective // machine and control combinations listed below. // // Due to differences in programming styles, // controller versions, and optional equipment, // SmartCAMcnc DOES NOT and CANNOT guarantee // that the NC code generated is correct for any // specific machine. Some modification to the code // generator to match your setup and output // requirements is likely necessary. // // Modifications to code generators do not TYPICALLY // require a significant amount of time. SmartCAM // customers with active SSA contracts are entitled // to support for their code generators from the // SmartCAMcnc Support Group. To contact them for // support, please send an email to: // Support@SmartCAMcnc.com. If you would like // information on purchasing SSA for your SmartCAM // products, please contact: Sales@SmartCAMcnc.com // // DISCLAIMER: It is the responsibility of the end // user to confirm and verify that the NC code // created by any code generator is accurate and // will not cause a machine malfunction which // could result in stock, tooling, machine, and/or // personal injury. // // SmartCAMcnc assumes no responsibility or // liability for any damage caused or alleged to // have been caused by the use of any of the code // generators it provides. // ---------------------------------------- //September 15, 1992 //Mazak STX 48 Laser //Control: Mazatrol L-32 @START % #ONBLK G90 G92 X0 Y0 #MOV X#XPOS Y#YPOS G82 P#V3 Q#V4 R#V5 #S1 M32 M20 M22 G04 X#DWELL G82 P#TLID Q#DOFF R#LOFF F#FEED #S2 G04 X#DWELL #EVAL(#V8=#XPOS) #EVAL(#V9=#YPOS) @TOOLCHG #EVAL(#U3=1) #RESET(#MOV) @END M23 M21 M09 M31 G91 G00 Z1.0 G90 G28 Z0 G28 X0 Y0 M30 #OFFBLK% @STPROF #IF(#V8<>#XPOS,#OR#V9<>#YPOS)< M23 M21 M09 M31 < #ABSI>< #MOV>< X#XPOS>< Y#YPOS> #CALL(PIERCE)> @ENDPROF #EVAL(#V8=#XPOS) #EVAL(#V9=#YPOS) @RAP < #ABSI>< #MOV>< X#XPOS>< Y#YPOS> @LINE #IF(#U3=1)<< G82 P#TLID Q#DOFF R#LOFF F#FEED>> #IF(#U2=1)< G09>< #DCOMP>< #MOV>< X#XPOS>< Y#YPOS>< D#U0> #EVAL(#U3=0) @ARC #IF(#U3=1)<< G82 P#TLID Q#DOFF R#LOFF F#FEED>> #IF(#U2=1)< G09>< #DCOMP>< #MOV>< X#XPOS>< Y#YPOS>< I#XCTR>< J#YCTR>< D#U0> #EVAL(#U3=0) @DWELL G04 X#DWELL @PIERCE #EVAL(#U3=0) G82 P#V3 Q#V4 R#V5 #S1 M32 M20 M22 G04 X#DWELL G82 P#TLID Q#DOFF R#LOFF F#FEED #S2 G04 X#DWELL @VARIABLES #S1 = ASSIST GAS COMMAND (PIERCE) - SET IN JOB INFO #S2 = ASSIST GAS COMMAND (CUT) - SET IN JOB INFO #V3 = LASER PEAK OUTPUT (PIERCE) - SET IN JOB INFO #V4 = PULSE FREQUENCY (PIERCE) - SET IN JOB INFO #V5 = PULSE DUTY RATIO (PIERCE) - SET IN JOB INFO #V8 = X POSITION AT ENDPROF #V9 = Y POSITION AT ENDPROF #TLID = LASER PEAK OUTPUT (CUT) - SET IN JOB PLAN #DOFF = PULSE FREQUENCY (CUT) - SET IN JOB PLAN #LOFF = PULSE DUTY RATIO (CUT) - SET IN JOB PLAN #U0 = USED IN PLACE OF #DOFF FOR COMPENSATION (1-4 ONLY) - SET IN JOB INFO #U2 = EXACT STOP ON (#U2=1); CONTINOUS CUTTING (#U2=0) SET IN COMMENT OF TOOL #U3 = SWITCH USED TO TEST FOR TOOLCHG