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


CORREA A20/25  A20/35  BOSCH ALPHA 3/3 FA.RATHMANN    24.02.88   M.VIELER
                                          MODIFIZIERT 13.04.88   BIEDERMANN
----------------------------------------------------------------------------

@START
#ONBLK  G78 M5
 G17 S#SPEED #SPNDL 
 G4 H10 M16
#NEXTPT
 #MOV X#XPOS Y#YPOS
< G43 T#TOOL Z#ZPOS F1500>
#EVAL(#V1=1)
@TOOLCHG
 G44 Z-500. F1500
 G4 H20
 M5
 M0
 G17 S#SPEED #SPNDL
 G4 H10 M16
 #MOV X#XPOS Y#YPOS
< G43 T#TOOL Z#ZPOS F1500>
#EVAL(#V1=1)
@END
 G44 Z-500. F1500
M30 A1
#OFFBLK
@STPROF
#RESET( #FXD)
< #MOV>< X#XPOS Y#YPOS>
#EVAL(#V1=1)
@ENDPROF
< #DCOMP>< X#XPOS>< Y#YPOS>
@RAP
< G00>< X#XPOS>< Y#YPOS>
@LINE
#IF(#V1=1)<< #DCOMP T#LTOOL>< X#XPOS>< Y#YPOS>< Z#ZPOS>< F#FEED>>
#IF(#V1=0)<< #MOV>< #DCOMP>< X#XPOS>< Y#YPOS>< Z#ZPOS>< F#FEED>>
#EVAL(#V1=0)
@ARC
#EVAL(#V0=#ARAD*-1)
< #MOV>< X#XPOS<> Y#YPOS> Z#V0 < F#FEED>
#EVAL(#V1=0)
@ZCLRMV
< G00 Z#ZPOS>
@ZCHKMV
< G0 Z#ZPOS>
@ZDPTHMV
< #MOV>< Z#ZPOS>< F#FEED>
@FXD1
 G22 #FXD B0 X#XPOS Y#YPOS
@FXD2
 G22 #FXD B0 X#XPOS Y#YPOS
@FXD3
 G22 #FXD B0 X#XPOS Y#YPOS
@FXD4
 G22 #FXD B0 X#XPOS Y#YPOS
@FXD5
 G22 #FXD B0 X#XPOS Y#YPOS
@SPEEDS
40,1
50,2
63,3
80,4
100,5
125,6
160,7
200,8
250,9
315,10
400,11
500,12
630,13
800,14
1000,15
1250,16
1600,17
2000,18
@