// ---------------------------------------- // // 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. // ---------------------------------------- //February 27,1990 //HEIAN NC-432-P //Control: FANUC 15M @START % O#S0 #ONBLK G40 G90 G17 #MOV X#XPOS Y#YPOS M92 #EVAL(#U1=0) #NEXTPT @TOOLCHG M92 M95 #IF(#TOOL<1999)<#EVAL(#U0=20)> #IF(#TOOL>1999,AND#TOOL<2200)<#EVAL(#U0=10)> #IF(#TOOL>4999,AND#TOOL<5200)<#EVAL(#U0=20)> #IF(#TOOL>5999,AND#TOOL<6200)<#EVAL(#U0=10)> #IF(#TOOL>6999,AND#TOOL<7200)<#EVAL(#U0=40)> #IF(#TOOL>2999,AND#TOOL<3200)<#EVAL(#U0=40)> #IF(#U0=#U1)< M01> #IF(#U0<>#U1)< M00> #IF(#TLID=1)<#EVAL(#U9=54)> #IF(#TLID=2)<#EVAL(#U9=55)> #IF(#TLID=3)<#EVAL(#U9=56)> #IF(#TLID=4)<#EVAL(#U9=57)> #IF(#TLID=5)<#EVAL(#U9=58)> #IF(#TLID=6)<#EVAL(#U9=59)> #IF(#TOOL=5001,OR#TOOL=6001,OR#TOOL=7001)< M51> #IF(#TOOL=5002,OR#TOOL=6002,OR#TOOL=7002)< M61> #IF(#TOOL=5003,OR#TOOL=6003,OR#TOOL=7003)< M71> #IF(#TOOL=5004,OR#TOOL=6004,OR#TOOL=7004)< M81> #IF(#TOOL=5012,OR#TOOL=6012)<#EVAL(#U5=61) M51> #IF(#TOOL=5013,OR#TOOL=6013)<#EVAL(#U5=71) M51> #IF(#TOOL=5014,OR#TOOL=6014)<#EVAL(#U5=81) M51> #IF(#TOOL=5023,OR#TOOL=6023)<#EVAL(#U5=71) M61> #IF(#TOOL=5024,OR#TOOL=6024)<#EVAL(#U5=81) M61> #IF(#TOOL=5034,OR#TOOL=6034)<#EVAL(#U5=81) M71> #IF(#TOOL=5123,OR#TOOL=6123)<#EVAL(#U5=61)#EVAL(#U6=71) M51> #IF(#TOOL=5000,OR#TOOL=6000)<#EVAL(#U5=61)#EVAL(#U6=71)#EVAL(#U3=81) M51> #IF(#U5=61)< M61> #IF(#U5=71)< M71> #IF(#U5=81)< M81> #IF(#U6=71)< M71> #IF(#U3=81)< M81> #EVAL(#U6=0) #EVAL(#U5=0) #EVAL(#U3=0) #IF(#TOOL=1001,OR#TOOL=2001,OR#TOOL=3001)< M13> #IF(#TOOL=1002,OR#TOOL=2002,OR#TOOL=3002)< M23> #IF(#TOOL=1003,OR#TOOL=2003,OR#TOOL=3003)< M33> #IF(#TOOL=1004,OR#TOOL=2004,OR#TOOL=3004)< M43> #IF(#TOOL=1012,OR#TOOL=2012)<#EVAL(#U8=23) M13> #IF(#TOOL=1013,OR#TOOL=2013)<#EVAL(#U8=33) M13> #IF(#TOOL=1014,OR#TOOL=2014)<#EVAL(#U8=43) M13> #IF(#TOOL=1023,OR#TOOL=2023)<#EVAL(#U8=33) M23> #IF(#TOOL=1024,OR#TOOL=2024)<#EVAL(#U8=43) M23> #IF(#TOOL=1034,OR#TOOL=2034)<#EVAL(#U8=43) M33> #IF(#TOOL=1123,OR#TOOL=2123)<#EVAL(#U8=23)#EVAL(#U7=33) M13> #IF(#TOOL=1000,OR#TOOL=2000)<#EVAL(#U8=23)#EVAL(#U7=33)#EVAL(#U2=43) M13> #IF(#U8=23)< M23> #IF(#U8=33)< M33> #IF(#U8=43)< M43> #IF(#U7=33)< M33> #IF(#U2=43)< M43> #EVAL(#U2=0) #EVAL(#U7=0) #EVAL(#U8=0) M#U0 G91 G17 Y0.0 G90 #EVAL(#U1=#U0) M93 G#U9< G43 H#LOFF> Z#ZPOS S#SPEED F#FEED @END G00 M92 M95 G90 X#XPOS Y#YPOS M30 #OFFBLK @STPROF < #ABSI>< #MOV>< X#XPOS>< Y#YPOS>< Z#ZPOS> #IF(#TOOL=1001,OR#TOOL=2001,OR#TOOL=3001)< M11> #IF(#TOOL=1002,OR#TOOL=2002,OR#TOOL=3002)< M21> #IF(#TOOL=1003,OR#TOOL=2003,OR#TOOL=3003)< M31> #IF(#TOOL=1004,OR#TOOL=2004,OR#TOOL=3004)< M41> #IF(#TOOL=1012,OR#TOOL=2012)<#EVAL(#U8=21) M11> #IF(#TOOL=1013,OR#TOOL=2013)<#EVAL(#U8=31) M11> #IF(#TOOL=1014,OR#TOOL=2014)<#EVAL(#U8=41) M11> #IF(#TOOL=1023,OR#TOOL=2023)<#EVAL(#U8=31) M21> #IF(#TOOL=1024,OR#TOOL=2024)<#EVAL(#U8=41) M21> #IF(#TOOL=1034,OR#TOOL=2034)<#EVAL(#U8=41) M31> #IF(#TOOL=1123,OR#TOOL=2123)<#EVAL(#U8=21)#EVAL(#U7=31) M11> #IF(#TOOL=1000,OR#TOOL=2000)< M80> #IF(#U8=21)< M21> #IF(#U8=31)< M31> #IF(#U8=41)< M41> #IF(#U7=31)< M31> #EVAL(#U7=0) #EVAL(#U8=0) @ENDPROF < #DCOMP> < #MOV>< Z#ZPOS> @RAP < #ABSI>< #MOV>< X#XPOS>< Y#YPOS> @LINE < #DCOMP>< D#DOFF>< #MOV>< X#XPOS>< Y#YPOS>< Z#ZPOS>< F#FEED> @ARC < #DCOMP>< D#DOFF> #MOV X#XPOS Y#YPOS I#XCTR J#YCTR< F#FEED> @ZCLRMV < #ABSI><< #MOV> Z#ZPOS> @ZCHKMV << #MOV> Z#ZPOS> @ZDPTHMV << #MOV> Z#ZPOS> @DWELL G04 X#DWELL @FXD1 #EVAL(#ZDPTH=#ZDPTH+.1) #FXD< X#XPOS>< Y#YPOS>< Z#ZDPTH>< F#FEED> G00 Z#ZPOS @FXD2 < #ABSI>< X#XPOS>< Y#YPOS>< Z#ZDPTH>< Z#ZCHK>< F#FEED> @FXD3 < #ABSI>< X#XPOS>< Y#YPOS>< Z#ZDPTH>< Z#ZCHK>< F#FEED> @FXD4 < #ABSI>< X#XPOS>< Y#YPOS>< Z#ZDPTH>< Z#ZCHK>< F#FEED> @SPEEDS 1000,1 2000,2 3000,3 4000,4 5000,5 6000,6 7000,7 8000,8 9000,9 10000,10 11000,11 12000,12 13000,13 14000,14 15000,15 16000,16 17000,17 18000,18 @