// ---------------------------------------- // // 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. // ---------------------------------------- @NOTES CONTROL IS MAZATROL T3 VERSION C SOFTWARE AND LATER. IT HAS NOT BEEN PROVEN ON B OR EARLIER SOFTWARE. EIA/ISO OPTION MUST BE ON TO USE G CODE. MACHINE IS MAZAK SL40N UNI-TURRET LATHE. @START #IF(#U1=1)<*****************************START***********> #EVAL(#U0=1) #EVAL(#U1=0) % :#FILE #ONBLK G28 U0. W0. G50 X#XSET Z#ZSET S2000 T#TOFF #SPMODE S#SPEED #SPNDL M08 #NEXTPT @TOOLCHG #IF(#U1=1)<****************************TLCHG************> #EVAL(#U0=0) < #MOV> X#XPOS Z#ZPOS< #SPOFF> T#TOFF G50 X#XSET Z#ZSET S2000 #SPMODE S#SPEED #SPNDL M08 @END G28 U0. Z0. M09 T0000 M05 M30 #OFFBLK% @STPROF #IF(#U1=1)<*****************************STPROF**********> #IF(#U0=1)<#RESET(#MOV)> #RESET(#FXD) < #MOV>< X#XPOS>< Z#ZPOS> #EVAL(#U0=0) @RAP #IF(#U1=1)<*****************************RAPID***********> #RESET(#FXD) < #MOV>< X#XPOS>< Z#ZPOS> #EVAL(#U0=0) @LINE #IF(#U1=1)<*****************************LINE************> #RESET(#FXD) < #MOV>< X#XPOS>< Z#ZPOS>< F#FEED> #EVAL(#U0=0) @ARC #IF(#U1=1)<*****************************ARC*************> #RESET(#FXD) < #MOV>< X#XPOS>< Z#ZPOS>< I#XCTR>< K#ZCTR>< F#FEED> #EVAL(#U0=0) @FXD1 #IF(#U1=1)<*****************************FXD1************> G76 X#XPASS Z#ZPASS< I#XOV> K#V1 D#FMT(#V2,T1.4) E#FTHRD A60 #EVAL(#U0=0) @FXD2 #IF(#U1=1)<*****************************FXD2************> < G00< X#XPOS> Z#ZPOS> < #FXD>< X#XPASS>< Z#ZPASS>< F#FEED> #EVAL(#U0=0) @FXD3 #IF(#U1=1)<*****************************FXD3************> < G00 X#XPOS > < #FXD>< X#XPASS>< Z#ZPASS>< F#FEED> #EVAL(#U0=0) @FXD4 #IF(#U1=1)<*****************************FXD4************> G33 Z#ZPASS F#FEED M03 G33 Z#ZPOS F#FEED #EVAL(#U0=0) @FXD5 #IF(#U1=1)<*****************************FXD5************> G74 Z#ZPASS K#PECK F#FEED #EVAL(#U0=0) @DWELL G04 P#DWELL#EVAL(#TIME=#DWELL/60) #EVAL(#U0=0) @