// ---------------------------------------- // // 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 SMA 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 SMA 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 MACHINE IS A JAPAX EDM. WITH A JAPAX 3 CONTROL. @START #ONBLK #ZSET=ZSET G90 G21 E#YSET Z01(UPPER ARM POSITION) G20 E#ZSET Z02(THICKNESS OF WORK PIECE) E1.609 Z03(GUIDE SPAN DISTANCE) E0.719 Z04(WORK TABLE HEIGHT) E0.591 Z05(EDGE CUT TABLE STROKE) #EVAL(#QANG=TAN(#QANG)*#ZSET) #EVAL(#U1=1) #EVAL(#V9=0) E0.0 D1 @END M02 #OFFBLK% @STPROF #IF(#U1=1)< G92 X#XPOS Y#YPOS> #IF(#U1=1)<#EVAL(#U1=0)#EXIT> #MOV< X#XPOS>< Y#YPOS> M00 @TN1 #IF(#V1<>0)<#EVAL(#V1=TAN(#V1))> E#V1 A01(SETTING A01 FOR THE TAPER) #EVAL(#U3=1) @TN2 #IF(#V1<>0)<#EVAL(#V1=TAN(#V1)> E#V1 A02(SETTING A02 FOR THE TAPER) #EVAL(#U3=2) @TAPERL1 #IF(#V1>0)<#EVAL(#V1=TAN(#V1)*#ZSET)> #IF(#U1=1) E#V1 A01(SETTING A01 FOR THE TAPER) #EVAL(#U3=1) @TAPERL2 #IF(#V1>0)<#EVAL(#V1=TAN(#V1)*#ZSET)> #IF(#U1=1)< E0.0D#DOFF> E#V1 A02(SETTING A02 FOR THE TAPER) #EVAL(#U3=2) @GS X#XPOS Y#YPOS M00 @RAP #MOV X#XPOS Y#YPOS @LINE #IF(#V1<>0)<<#DCOMP>>#EXLN < #MOV>< X#XPOS>< Y#YPOS>#IF(#V1<>0,AND#V9<>#V1)#EXLN #IF(#V1=0,AND#V1<>#V9) #EVAL(#V9=#V1) @ARC < #MOV>< X#XPOS>< Y#YPOS>< I#XCTR>< J#YCTR> @ENDPROF < #MOV> X#XPOS Y#YPOS M00 @