// ---------------------------------------- // // 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. // ---------------------------------------- //Machine: Linde CM100 Burner //Control: Union Carbide UCNC-7/8 II //Date: Feb. 13, 1991 @START #EVAL(#U9=0) #IF(#U9=1)<*******START***********> % #ONBLK #NEXTPT @END #IF(#U9=1)<*******END*****************> #OFFBLK% @STPROF #IF(#U9=1)<*******START*PROF**********> #IF(#TOOL<2)<#EVAL(#C0=0)> #IF(#TOOL>1)<#EVAL(#C0=1)> <#MOVX#XPOSY#YPOS> #DCOMP #C0 @ENDPROF #IF(#U9=1)<*******END PROFILE*****> #IF(#TOOL<2)<#EVAL(#C1=0)> #IF(#TOOL>1)<#EVAL(#C1=1)> #C1 #DCOMP @RAP #IF(#U9=1)<*******RAPID***********> <#MOV> @LINE #IF(#U9=1)<*******LINE************> <#MOV> @ARC #EVAL(#U1=#XCTR) #EVAL(#U2=#YCTR) #IF(#U1<-.0051)<#EVAL(#U3=1)>#ELSE<#EVAL(#U3=0)> #IF(#U2<-.0051)<#EVAL(#U4=1)>#ELSE<#EVAL(#U4=0)> #IF(#U1>-.0051,AND#U1>-.0001)<#EVAL(#U5=1)> #IF(#U1>.0001,AND#U1<.0051)<#EVAL(#U5=1)> #IF(#U2>-.0051,AND#U1>-.0001)<#EVAL(#U5=1)> #IF(#U2>.0001,AND#U1<.0051)<#EVAL(#U5=1)> #IF(#U9=1)<**ARC*U1=#U1*U2=#U2*V1=#V1*V2=#V2**> <#MOV>X#XPOSY#YPOS#IF(#U1>.0051)#EXLN #IF(#U1<.0051,AND#U1>-.0051)#EXLN #IF(#U3=1)#EXLN #IF(#U2>.0051)#EXLN #IF(#U2<.0051,AND#U2>-.0051)#IF(#U4=1)#EXLN @NOTES CONTROL IS UNION CARBIDE UCNC-7/8 II MACHINE IS LINDE CM100 BURNER WITH PLASSA ATTACHMENT. @