// ---------------------------------------- // // 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. // ---------------------------------------- HYPERTHERM BURNING MACHINE WITH A DANAPATH 5 CONTROL WRITTEN BY: MARK KILPATRICK, JNL IND., 12/12/89 VARIABLES USED: #V0=ABSOLUTE VALUE FOR I #V1=ABSOLUTE VALUE FOR J #U7=FEED RATE #V9=THICKNESS FOR SETTING AMPERAGE #U9=MATERIAL (10-COPPER) (11-BRASS) (12-COPPER SILICON) (13-COPPER NICKEL) (40-CARBON STEEL) (50-STANLESS STEEL) #U8=ANGLE (00,30) #S9=TYPE OF TOOL (P-PLASSA) (X-OXY) (M-PUNCH MARKER) #C0=0,PLASSA OFF (M21) #C0=1,PLASSA ON (M20) #C1=0,AUTO TORCH SELECT DISABLE (M27) #C1=1,AUTO TORCH SELECT ENABLE (M26) #U0=1,TLOP 1(PUNCH MARK) #U0=2,TLOP 2(TORCH) #U0=3,TLOP 3(SCRIBE) @START #EVAL(#C0=1) #EVAL(#C1=1) #ONBLKG92X0Y0 M60 #IF(#TLOP=2)#ELSE<#CALL(PX4000)> #IF(#U9=40,AND#U8=30)<#CALL(PP4030)> #IF(#U9=50,AND#U8=00)<#CALL(PP5000)> #IF(#U9=50,AND#U8=30)<#CALL(PP5030)> #IF(#U9=10,AND#U8=00)<#CALL(PP1000)> #IF(#U9=11,AND#U8=00)<#CALL(PP1100)> #IF(#U9=12,AND#U8=00)<#CALL(PP1200)> #IF(#U9=12,AND#U8=30)<#CALL(PP1230)> #IF(#U9=13,AND#U8=00)<#CALL(PP1300)> #IF(#U9=13,AND#U8=30)<#CALL(PP1330)> #C1 #EVAL(#C1=0)> #EVAL(#U0=#TLOP) #ABSI @TOOLCHG #EVAL(#C1=1) T00 #IF(#TLOP=2)#ELSE<#CALL(PX4000)> #IF(#U9=40,AND#U8=30)<#CALL(PP4030)> #IF(#U9=50,AND#U8=00)<#CALL(PP5000)> #IF(#U9=50,AND#U8=30)<#CALL(PP5030)> #IF(#U9=10,AND#U8=00)<#CALL(PP1000)> #IF(#U9=11,AND#U8=00)<#CALL(PP1100)> #IF(#U9=12,AND#U8=00)<#CALL(PP1200)> #IF(#U9=12,AND#U8=30)<#CALL(PP1230)> #IF(#U9=13,AND#U8=00)<#CALL(PP1300)> #IF(#U9=13,AND#U8=30)<#CALL(PP1330)>> #EVAL(#U0=#TLOP) @END #IF(#U0=2)<#C1> M30 #OFFBLK @STPROF #RESET(#DOFF) <#ABSI>#MOV <#DCOMPD#DOFF> #C0#EVAL(#C0=0) G01X#XPOSY#YPOSF#U70 #EVAL(#U1=0) @ENDPROF M52 <#DCOMPD00> #C0 #EVAL(#C0=1) #EVAL(#C1=0) @RAP <#ABSI><#MOV> @LINE #IF(#U1=0)<<#ABSI><#DCOMPD#DOFF>> #IF(#U1=1)<<#ABSI><#DCOMPD#DOFF><#MOV>> @ARC #EVAL(#V0=ABS(#XCTR)) #EVAL(#V1=ABS(#YCTR)) <#ABSI><#DCOMPD#DOFF><#MOV>I#V0J#V1 #EVAL(#U1=1) @DWELL G04F#DWELL #RESET(#U7) @PP4000 #IF(#V9=.125)<#EVAL(#DOFF=06)#EVAL(#U7=190) M41 M36 M33 M32> #IF(#V9=.188)<#EVAL(#DOFF=06)#EVAL(#U7=170) M41 M36 M33 M32> #IF(#V9=.250)<#EVAL(#DOFF=08)#EVAL(#U7=135) M41 M36 M35 M33 M32> #IF(#V9=.313)<#EVAL(#DOFF=08)#EVAL(#U7=125) M41 M36 M35 M34> #IF(#V9=.375)<#EVAL(#DOFF=09)#EVAL(#U7=112) M42 M36 M35 M34> #IF(#V9=.406)<#EVAL(#DOFF=09)#EVAL(#U7=106) M42 M36 M35 M34> #IF(#V9=.438)<#EVAL(#DOFF=08)#EVAL(#U7=103) M42 M37> #IF(#V9=.5)<#EVAL(#DOFF=09)#EVAL(#U7=102) M42 M37 M35> #IF(#V9=.625)<#EVAL(#DOFF=09)#EVAL(#U7=85) M43 M37 M35 M32> #IF(#V9=.75)<#EVAL(#DOFF=11)#EVAL(#U7=69) M44 M37 M35 M32> #IF(#V9=.875)<#EVAL(#DOFF=11)#EVAL(#U7=61) M46 M37 M35 M34> #IF(#V9=1)<#EVAL(#DOFF=11)#EVAL(#U7=48) M45 M37 M35 M34> #IF(#V9=1.125)<#EVAL(#DOFF=13)#EVAL(#U7=55) M47 M37 M36 M33> #IF(#V9=1.25)<#EVAL(#DOFF=13)#EVAL(#U7=50) M47 M37 M36 M35> #IF(#V9=1.375)<#EVAL(#DOFF=13)#EVAL(#U7=44) M48 M37 M36 M35> #IF(#V9=1.5)<#EVAL(#DOFF=13)#EVAL(#U7=41) M49 M37 M36 M35> @PP4030 #IF(#V9=.25)<#EVAL(#DOFF=10)#EVAL(#U7=123) M44 M37> #IF(#V9=.313)<#EVAL(#DOFF=06)#EVAL(#U7=115) M44 M37> #IF(#V9=.375)<#EVAL(#DOFF=06)#EVAL(#U7=105) M45 M37> #IF(#V9=.406)<#EVAL(#DOFF=06)#EVAL(#U7=99) M44 M37> #IF(#V9=.438)<#EVAL(#DOFF=06)#EVAL(#U7=92) M46 M37> #IF(#V9=.468)<#EVAL(#DOFF=04)#EVAL(#U7=83) M45 M37 M35 M33> #IF(#V9=.5)<#EVAL(#DOFF=04)#EVAL(#U7=83) M45 M37 M35 M33> #IF(#V9=.532)<#EVAL(#DOFF=04)#EVAL(#U7=78) M45 M37 M35 M33> #IF(#V9=.563)<#EVAL(#DOFF=04)#EVAL(#U7=74) M46 M37 M36> #IF(#V9=.625)<#EVAL(#DOFF=04)#EVAL(#U7=68) M46 M37 M36> #IF(#V9=.75)<#EVAL(#DOFF=04)#EVAL(#U7=55) M47 M37 M36> @PX4000 #IF(#V9=.125)<#EVAL(#DOFF=03)#EVAL(#U7=30)> #IF(#V9=.188)<#EVAL(#DOFF=03)#EVAL(#U7=28)> #IF(#V9=.25)<#EVAL(#DOFF=03)#EVAL(#U7=28)> #IF(#V9=.313)<#EVAL(#DOFF=03)#EVAL(#U7=28)> #IF(#V9=.375)<#EVAL(#DOFF=04)#EVAL(#U7=27)> #IF(#V9=.438)<#EVAL(#DOFF=04)#EVAL(#U7=27)> #IF(#V9=.5)<#EVAL(#DOFF=06)#EVAL(#U7=25)> #IF(#V9=.625)<#EVAL(#DOFF=06)#EVAL(#U7=25)> #IF(#V9=.75)<#EVAL(#DOFF=06)#EVAL(#U7=23)> #IF(#V9=.875)<#EVAL(#DOFF=06)#EVAL(#U7=23)> #IF(#V9=1)<#EVAL(#DOFF=06)#EVAL(#U7=22)> #IF(#V9=1.125)<#EVAL(#DOFF=06)#EVAL(#U7=22)> #IF(#V9=1.25)<#EVAL(#DOFF=06)#EVAL(#U7=18)> #IF(#V9=1.375)<#EVAL(#DOFF=06)#EVAL(#U7=18)> #IF(#V9=1.5)<#EVAL(#DOFF=07)#EVAL(#U7=17)> #IF(#V9=1.625)<#EVAL(#DOFF=07)#EVAL(#U7=17)> #IF(#V9=1.75)<#EVAL(#DOFF=07)#EVAL(#U7=17)> #IF(#V9=2)<#EVAL(#DOFF=07)#EVAL(#U7=16)> #IF(#V9=2.25)<#EVAL(#DOFF=07)#EVAL(#U7=16)> #IF(#V9=2.5)<#EVAL(#DOFF=07)#EVAL(#U7=16)> #IF(#V9=2.75)<#EVAL(#DOFF=07)#EVAL(#U7=14)> #IF(#V9=3)<#EVAL(#DOFF=09)#EVAL(#U7=14)> #IF(#V9=3.25)<#EVAL(#DOFF=09)#EVAL(#U7=12)> #IF(#V9=3.5)<#EVAL(#DOFF=09)#EVAL(#U7=12)> #IF(#V9=3.75)<#EVAL(#DOFF=09)#EVAL(#U7=12)> #IF(#V9=4)<#EVAL(#DOFF=09)#EVAL(#U7=11)> #IF(#V9=4.25)<#EVAL(#DOFF=09)#EVAL(#U7=11)> #IF(#V9=4.5)<#EVAL(#DOFF=09)#EVAL(#U7=11)> #IF(#V9=4.75)<#EVAL(#DOFF=09)#EVAL(#U7=11)> #IF(#V9=5)<#EVAL(#DOFF=09)#EVAL(#U7=10)> #IF(#V9=5.25)<#EVAL(#DOFF=09)#EVAL(#U7=10)> #IF(#V9=5.5)<#EVAL(#DOFF=09)#EVAL(#U7=10)> #IF(#V9=5.75)<#EVAL(#DOFF=09)#EVAL(#U7=10)> #IF(#V9=6)<#EVAL(#DOFF=09)#EVAL(#U7=09)> @PP5000 #IF(#V9=.188)<#EVAL(#DOFF=06)#EVAL(#U7=175) M40 M36 M33 M32> #IF(#V9=.25)<#EVAL(#DOFF=08)#EVAL(#U7=150) M41 M36 M35 M33> #IF(#V9=.313)<#EVAL(#DOFF=08)#EVAL(#U7=140) M41 M36 M35 M34> #IF(#V9=.375)<#EVAL(#DOFF=09)#EVAL(#U7=125) M42 M36 M35 M34> #IF(#V9=.438)<#EVAL(#DOFF=09)#EVAL(#U7=115) M42 M37> #IF(#V9=.5)<#EVAL(#DOFF=09)#EVAL(#U7=105) M43 M34 M33 M32> #IF(#V9=.563)<#EVAL(#DOFF=09)#EVAL(#U7=100) M43 M34 M33 M32> #IF(#V9=.625)<#EVAL(#DOFF=09)#EVAL(#U7=85) M44 M37 M35 M32> #IF(#V9=.75)<#EVAL(#DOFF=11)#EVAL(#U7=75) M44 M37 M35> #IF(#V9=.875)<#EVAL(#DOFF=11)#EVAL(#U7=68) M45 M37 M35 M32> #IF(#V9=1)<#EVAL(#DOFF=11)#EVAL(#U7=60) M45 M37 M35 M33 M32> #IF(#V9=1.125)<#EVAL(#DOFF=12)#EVAL(#U7=50) M45 M37 M35 M33 M32> #IF(#V9=1.25)<#EVAL(#DOFF=13)#EVAL(#U7=40) M46 M37 M35 M33 M32> #IF(#V9=1.375)<#EVAL(#DOFF=13)#EVAL(#U7=35) M46 M37 M35 M34> #IF(#V9=1.5)<#EVAL(#DOFF=13)#EVAL(#U7=30) M46 M37 M35 M34> #IF(#V9=1.75)<#EVAL(#DOFF=14)#EVAL(#U7=48) M48 M37 M36 M33 M32> @PP5030 #IF(#V9=.188)<#EVAL(#DOFF=01)#EVAL(#U7=130) M44 M37> #IF(#V9=.25)<#EVAL(#DOFF=06)#EVAL(#U7=130) M44 M37> #IF(#V9=.313)<#EVAL(#DOFF=06)#EVAL(#U7=120) M44 M37> #IF(#V9=.375)<#EVAL(#DOFF=06)#EVAL(#U7=110) M45 M37> #IF(#V9=.406)<#EVAL(#DOFF=06)#EVAL(#U7=105) M45 M37> #IF(#V9=.438)<#EVAL(#DOFF=06)#EVAL(#U7=100) M46 M37> #IF(#V9=.468)<#EVAL(#DOFF=06)#EVAL(#U7=93) M46 M37> #IF(#V9=.5)<#EVAL(#DOFF=06)#EVAL(#U7=85) M46 M37> #IF(#V9=.563)<#EVAL(#DOFF=06)#EVAL(#U7=85) M44 M37 M33 M32> #IF(#V9=.625)<#EVAL(#DOFF=06)#EVAL(#U7=75) M44 M37 M35 M32> #IF(#V9=.75)<#EVAL(#DOFF=06)#EVAL(#U7=65) M45 M37 M35 M34> #IF(#V9=.875)<#EVAL(#DOFF=06)#EVAL(#U7=60) M45 M37 M36> #IF(#V9=1)<#EVAL(#DOFF=06)#EVAL(#U7=50) M45 M37 M36> #IF(#V9=1.125)<#EVAL(#DOFF=06)#EVAL(#U7=40) M45 M37 M36> #IF(#V9=1.25)<#EVAL(#DOFF=06)#EVAL(#U7=30) M45 M37 M36> @PP1000 #IF(#V9=.125)<#EVAL(#DOFF=06)#EVAL(#U7=140) M41 M36 M33> #IF(#V9=.188)<#EVAL(#DOFF=06)#EVAL(#U7=110) M41 M36 M33 M32> #IF(#V9=.166)<#EVAL(#DOFF=06)#EVAL(#U7=85) M41 M36 M35 M34> @PP1100 #IF(#V9=.125)<#EVAL(#DOFF=06)#EVAL(#U7=120) M41 M36 M33 M32> #IF(#V9=.188)<#EVAL(#DOFF=06)#EVAL(#U7=105) M41 M36 M33 M32> #IF(#V9=.25)<#EVAL(#DOFF=09)#EVAL(#U7=85) M41 M36 M35 M33> @PP1200 #IF(#V9=.125)<#EVAL(#DOFF=06)#EVAL(#U7=183) M41 M36 M33 M32> #IF(#V9=.148)<#EVAL(#DOFF=06)#EVAL(#U7=167) M41 M36 M33 M32> #IF(#V9=.188)<#EVAL(#DOFF=06)#EVAL(#U7=150) M42 M36 M33 M32> #IF(#V9=.25)<#EVAL(#DOFF=09)#EVAL(#U7=90) M41 M36 M35> #IF(#V9=.280)<#EVAL(#DOFF=09)#EVAL(#U7=87) M42 M36 M35 M32> #IF(#V9=.313)<#EVAL(#DOFF=09)#EVAL(#U7=82) M42 M36 M35 M33> #IF(#V9=.375)<#EVAL(#DOFF=09)#EVAL(#U7=70) M42 M36 M35 M33 M32> #IF(#V9=.438)<#EVAL(#DOFF=10)#EVAL(#U7=60) M43 M37> #IF(#V9=.5)<#EVAL(#DOFF=11)#EVAL(#U7=55) M44 M37 M34> #IF(#V9=.563)<#EVAL(#DOFF=11)#EVAL(#U7=50) M44 M37 M35 M32> #IF(#V9=.625)<#EVAL(#DOFF=11)#EVAL(#U7=45) M44 M37 M35 M32> #IF(#V9=.75)<#EVAL(#DOFF=11)#EVAL(#U7=40) M45 M37 M35 M33 M32> #IF(#V9=.875)<#EVAL(#DOFF=11)#EVAL(#U7=37) M45 M37 M35 M33 M32> #IF(#V9=1)<#EVAL(#DOFF=11)#EVAL(#U7=32) M45 M37 M36> @PP1230 #IF(#V9=.25)<#EVAL(#DOFF=04)#EVAL(#U7=78) M44 M36 M33 M32> #IF(#V9=.280)<#EVAL(#DOFF=02)#EVAL(#U7=72) M45 M36 M33 M32> #IF(#V9=.313)<#EVAL(#DOFF=08)#EVAL(#U7=68) M45 M36 M35> #IF(#V9=.375)<#EVAL(#DOFF=08)#EVAL(#U7=62) M45 M36 M35> @PP1300 #IF(#V9=.125)<#EVAL(#DOFF=06)#EVAL(#U7=190) M40 M36 M33 M32> #IF(#V9=.188)<#EVAL(#DOFF=06)#EVAL(#U7=160) M40 M36 M33 M32> #IF(#V9=.25)<#EVAL(#DOFF=09)#EVAL(#U7=125) M42 M36 M35 M33> #IF(#V9=.375)<#EVAL(#DOFF=09)#EVAL(#U7=95) M43 M37> @PP1330 #IF(#V9=.25)<#EVAL(#DOFF=08)#EVAL(#U7=112) M45 M36 M35 M34> #IF(#V9=.375)<#EVAL(#DOFF=06)#EVAL(#U7=91) M45 M37 M32> @