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

//4/28/88
//FICEP Model: LP.P703.2S   3 Punch / 1 Drill Combination
//with Ceptrol Model: FC. P200.20 Control

@START
#IF(#TOOL=21)<#EVAL(#XPOFF=18.1496)>
#IF(#TOOL=22)<#EVAL(#XPOFF=15)>
#IF(#TOOL=23)<#EVAL(#XPOFF=11.8504)>
#IF(#TOOL=30)<#EVAL(#XPOFF=.7086)>
#EVAL(#V7=0)
#EVAL(#V8=0)
T01
#FILE
G71,G00
MT#FMT(#V1,T2.0)
TK#V2
QT#FMT(#V3,T3.0)
XP#V4
XP#V5
T0
@END
T0
X0 Y30, M32
X0 Y30, M33
M21
M88
M30
AAA%%%
@TOOLCHG
#IF(#TOOL=21)<#EVAL(#XPOFF=18.1496+#V8)>
#IF(#TOOL=22)<#EVAL(#XPOFF=15+#V8)>
#IF(#TOOL=23)<#EVAL(#XPOFF=11.8504+#V8)>
#IF(#TOOL=30)<#EVAL(#XPOFF=.7086+#V8)>
#IF(#V7=1)<#EXIT>
#IF(#TOOL=30)<T#TOOL,TS31,DN#TLDIA>
#IF(#TOOL=30)<#EVAL(#V7=1)>
@RAP
T#TOOL,X#XPOS Y#YPOS,#PUNCH
@REPO
#IF(#XSET<0)<#EVAL(#XSET=ABS(#XSET))>
#IF(#TOOL=21)<#EVAL(#XPOFF=#XPOS-18.1496)>
#IF(#TOOL=22)<#EVAL(#XPOFF=#XPOS-15)>
#IF(#TOOL=23)<#EVAL(#XPOFF=#XPOS-11.8504)>
#IF(#TOOL=30)<#EVAL(#XPOS=#XPOS-.7086)>
X#XPOS Y#YPOS
M32,M25,M21
#EVAL(#V9=#YPOS+.23622)
X#XPOS Y#V9
#EVAL(#XPOS=0)
X#XPOS Y#V9
X#XPOS Y#YPOS
#EVAL(#V8=(#XSET*-1)+.015748)
M22,M26,M33
@