//    ----------------------------------------
//    
//    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.
//    ----------------------------------------

@COMMENTS
 
	Machine:		DYNAPATH 2400 MILL

    Control:    	2400

@START
#ONBLK START INS 01
 TOOL   1
  TD=#TLWD
 SETUP >ZCXYU
 SP= #SPEED RPM
@TOOLCHG
 Z>CMAX
< #RFEED>
 GO X#XPOS
    Y#YPOS
 SPINDLE  OFF
 TOOL  #TOOL
  TD=#TLWD
 SP= #SPEED RPM
@END 
 Z>CMAX
 SPINDLE  OFF
 END NEWPART
#OFFBLK
@STPROF
< #RFEED>
 GO X#XPOS
    Y#YPOS
@ENDPROF
 Z>C
@RAP
< #RFEED>
<#EXC#MOV#OR X#XPOS>
<<#MOV>#ELSE<   > Y#YPOS>
@LINE
#RESET(#MOV)
< F XYZ =#FEED >
<<#MOV> X#XPOS>
<<#MOV>#ELSE<   > Y#YPOS>
<<#MOV>#ELSE<   > Z#ZPOS>
@ARC
< F XYZ =#FEED >
 ZERO AT
    X#XCTR
    Y#YCTR
 GR A#TANG
 >REF COODS
#UPDATE(#XPOS,#YPOS)
@ZCLRMV
 Z>C
@ZCHKMV
< GO Z#ZPOS>
@ZDPTHMV
< F XYZ =#FEED >
< GO Z#ZPOS>
@FXD1
< F XYZ =#FEED >
< DRIL PECK=00
  ZH=#ZCHK
  ZD=#ZDPTH>
  X =#XPOS
  Y =#YPOS
@FXD2
< F XYZ =#FEED >
< DRIL PECK=00
  ZH=#ZCHK
  ZD=#ZDPTH>
  X =#XPOS
  Y =#YPOS
@FXD3
< F XYZ =#FEED >
< DRIL PECK=00
  ZH=#ZCHK
  ZD=#ZDPTH>
  X =#XPOS
  Y =#YPOS
@FXD4
< F XYZ =#FEED >
< DRIL PECK=00
  ZH=#ZCHK
  ZD=#ZDPTH>
  X =#XPOS
  Y =#YPOS
@FXD5
< F XYZ =#FEED >
< DRIL PECK=#FMT(#PECK,F2.0)
  ZH=#ZCHK
  ZD=#ZDPTH>
  X =#XPOS
  Y =#YPOS
@DWELL
 DWELL     #DWELL
@