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

//7/10/88
//Charmille
//Control: Robofil 552

@START
%(#DATE  SM4 FILE #FILE.SH2  CHARMILLE ROBOFIl)
#ONBLK G92 G70 X#XPOS Y#YPOS W#V8 H#V9
@STPROF 
#IF(#V1=1)< #MOV X#XPOS Y#YPOS>#ELSE<
 G00< X#XPOS>< Y#YPOS>>
#IF(#C0=1)<< #C0>#EVAL(#C0=0)>#ELSE<#EVAL(#C0=1)>
#IF(#C2=1)< #C2>
#IF(#C3=1)< #C3>
< #S1>
 G38 E#LOFF
@LINE
#IF(#DCOMP=0)< G39 #DCOMP A0.0< X#XPOS>< Y#YPOS>>#ELSE<
< #MOV>< #DCOMP#EXC D#DOFF>< X#XPOS>< Y#YPOS>< U#XOV> V#YOV>
@ARC
< #MOV>< X#XPOS>< Y#YPOS>< I#XCTR>< J#YCTR>
@END
 M02
@ENDPROF
#IF(#V2=1)<< G27>#EVAL(#V2=0)>
#IF(#C0=0)< #C0>
#IF(#C0=0)<#EVAL(#C0=1)>#ELSE<#EVAL(#C0=0)>
#EVAL(#V1=1)
@STOP
 M00
@OPSTOP
 M01
@CUT
#EVAL(#C0=0)
 #C0
#EVAL(#C0=1)