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

10/04/89
Machine Type:	Leadwell Horizontal Machining Center
Control Type:	Mitsubishi Meldas MO

@START
%
L#FILE
(T#TOOL #TDESC #TLCMT)
#ONBLK G80 G40 G44 G17
 M6 T#TOOL
 #SPNDL S#SPEED
 G54
 #ABSI G0 G43 X#XPOS Y#YPOS Z#ZPOS H#LOFF M8

@TOOLCHG
< #FXD> G28 G44 G91 Z0
#OFFBLK 
(T#TOOL #TDESC #TLCMT)
 
#ONBLK G80 G40 G44 G17
 M6 T#TOOL
 #SPNDL S#SPEED
 G54
 #ABSI G0 G43 X#XPOS Y#YPOS Z#ZPOS H#LOFF M8

@END
< #FXD> G28 G44 G91 X0 Y0 Z0
 M5 M9 M30%

@STPROF
< #ABSI>< #FXD>< #MOV>< X#XPOS>< Y#YPOS>< Z#ZPOS>

@ENDPROF
< #MOV Z#ZPOS>
< #DCOMP>
#RESET(#DOFF)

@RAP
< #ABSI>< #FXD>< #MOV>< X#XPOS>< Y#YPOS>< Z#ZPOS>

@LINE
< #MOV>< #DCOMP#EXC< D#DOFF>>< X#XPOS>< Y#YPOS>< Z#ZPOS>< F#FEED>

@ARC
#IF(#TANG=360,#OR#TANG=-360)
<< #MOV>< X#XPOS>< Y#YPOS>< I#XCTR>< J#YCTR>< F#FEED>>
#ELSE
<< #MOV>< X#XPOS>< Y#YPOS> R#ARAD< F#FEED>>

@ZCLRMV
< #ABSI>< #FXD><< #MOV> Z#ZPOS>

@ZCHKMV
< #FXD><< #MOV> Z#ZPOS>

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

@FXD1
< #ABSI>< #RTNLVL>< #FXD> X#XPOS Y#YPOS< Z#ZDPTH R#ZCHK>< F#FEED>

@FXD2
< #ABSI>< #RTNLVL>< #FXD> X#XPOS Y#YPOS< Z#ZDPTH R#ZCHK>< F#FEED>

@FXD3
< #ABSI>< #RTNLVL>< #FXD> X#XPOS Y#YPOS< Z#ZDPTH R#ZCHK>< F#FEED>

@FXD4
< #ABSI>< #RTNLVL>< #FXD> X#XPOS Y#YPOS< Z#ZDPTH R#ZCHK>< F#FEED>

@FXD5
#EVAL(#V0=#TLDIA/2)
< #ABSI>< #RTNLVL>< #FXD> X#XPOS Y#YPOS< Z#ZDPTH R#ZCHK Q#V0>< F#FEED>

@DWELL
 G4 P#DWELL
@