@COMMENTS
   ----------------------------------------
   
   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.
   ----------------------------------------

Machine: CORREA A20/25  A20/35
Control: BOSCH ALPHA 3/3
@

@DECLARE
//#OUTCND // outputs conditional status
//#OUTSEC // outputs @section names
//#OUTERR // outputs processing errors
//#OUTRPT // outputs an error report file
#DEC#pchk // profile checker
@

@START
#ONBLK  G78 M5
 G17 S#SPEED #SPNDL 
 G4 H10 M16
#NEXTPT
 #MOV X#XPOS Y#YPOS
< G43 T#TOOL Z#ZPOS F1500>
#EVAL(#pchk=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(#pchk=1)
@

@END
 G44 Z-500. F1500
M30 A1
#OFFBLK
@

@STPROF
#RESET( #FXD)
< #MOV>< X#XPOS Y#YPOS>
#EVAL(#pchk=1)
@

@ENDPROF
< #DCOMP>< X#XPOS>< Y#YPOS>
@

@RAP
< G00>< X#XPOS>< Y#YPOS>
@

@LINE
#IF(#pchk=1)<< #DCOMP T#LTOOL>< X#XPOS>< Y#YPOS>< Z#ZPOS>< F#FEED>>
#IF(#pchk=0)<< #MOV>< #DCOMP>< X#XPOS>< Y#YPOS>< Z#ZPOS>< F#FEED>>
#EVAL(#pchk=0)
@

@ARC
#EVAL(#V0=#ARAD*-1)
< #MOV>< X#XPOS<> Y#YPOS> Z#V0 < F#FEED>
#EVAL(#pchk=0)
@

@ZCLRMV
< G00 Z#ZPOS>
@

@ZCHKMV
< G0 Z#ZPOS>
@

@ZDPTHMV
< #MOV>< Z#ZPOS>< F#FEED>
@

@OP_DRL
 G22 #FXD B0 X#XPOS Y#YPOS
@

@OP_SPDRL
 G22 #FXD B0 X#XPOS Y#YPOS
@

@OP_TAP
 G22 #FXD B0 X#XPOS Y#YPOS
@

@OP_BORE
 G22 #FXD B0 X#XPOS Y#YPOS
@

@OP_PDRL
 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
@