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

//11/02/89
//Machine Type:	Miyano Horizontal Lathe
//Control Type:	FANUC 10T

@START
%
#FILE(#S1)
#ONBLK T#TOOL
 G50 S4000
#IF(#SPEED<>0)< #SPMODE S#SPEED #SPNDL>
#NEXTPT
#IF(#SPEED=0)<#UPDATE(#XPOS)>
#RESET(#MOV)

@TOOLCHG
 #MOV X#XPOS Z#ZPOS <#SPOFF>
< #SPOFF>#IF(#SPEED=0)< M05>
 M01
 T#TOOL
 G50 S4000
#IF(#SPEED<>0)< #SPMODE S#SPEED #SPNDL>
#NEXTPT
#RESET(#MOV)

@END
 M09
 M05
 M30
#OFFBLK%

@STPROF
#RESET(#FXD)
< #MOV>< #DCOMP>< X#XPOS>< Z#ZPOS>< T#TOFF#IF(#SPEED<>0)< M08>>

@RAP
#RESET(#FXD)
< #MOV>< #DCOMP>< X#XPOS>< Z#ZPOS>< T#TOFF#IF(#SPEED<>0)< M08>>

@LINE
#RESET(#FXD)
< #MOV>< #DCOMP>< X#XPOS>< Z#ZPOS>< S#SPEED>< F#FEED>

@ARC
#RESET(#FXD)
< #MOV>< #DCOMP>< X#XPOS>< Z#ZPOS>< R#ARAD>< S#SPEED>< F#FEED>

@FXD1
 G76 X#XPASS Z#ZPASS< I#XOV> K#V1 D#FMT(#V2,T1.4) F#FTHRD A60

@FXD2
< G00< X#XPOS> Z#ZPOS>
< #FXD>< X#XPASS>< Z#ZPASS>< F#FEED>

@FXD3
< G00 X#XPOS <Z#ZPOS>>
< #FXD>< X#XPASS>< Z#ZPASS>< F#FEED>

@FXD4
#IF(#SPNDL=1)<#EVAL(#SPNDL=2)>#ELSE<#EVAL(#SPNDL=1)>
 G32 Z#ZPASS F#FEED M05
 G32 Z#ZPOS F#FEED #SPNDL

@FXD5
 G74 Z#ZPASS K#PECK F#FEED

@G04
 G04 U#DWELL#EVAL(#TIME=#DWELL/60)

@M00
< #MOV>< X#XPOS>< Z#ZPOS>
 M00

@M01
< #MOV>< X#XPOS>< Z#ZPOS>
 M01

@M08
< #MOV>< X#XPOS>< Z#ZPOS>
 M08

@M09
< #MOV>< X#XPOS>< Z#ZPOS>
 M09

@M12
< #MOV>< X#XPOS>< Z#ZPOS>
 M12

@M18
< #MOV>< X#XPOS>< Z#ZPOS>
 M18

@M19
< #MOV>< X#XPOS>< Z#ZPOS>
 M19

@M23
< #MOV>< X#XPOS>< Z#ZPOS>
 M23

@M24
< #MOV>< X#XPOS>< Z#ZPOS>
 M24

@M25
< #MOV>< X#XPOS>< Z#ZPOS>
 M25

@M26
< #MOV>< X#XPOS>< Z#ZPOS>
 M26

@M27
< #MOV>< X#XPOS>< Z#ZPOS>
 M27

@M28
< #MOV>< X#XPOS>< Z#ZPOS>
 M28

@M29
< #MOV>< X#XPOS>< Z#ZPOS>
 M29

@M32
< #MOV>< X#XPOS>< Z#ZPOS>
 M32

@M33
< #MOV>< X#XPOS>< Z#ZPOS>
 M33

@M35
< #MOV>< X#XPOS>< Z#ZPOS>
 M35

@M36
< #MOV>< X#XPOS>< Z#ZPOS>
 M36

@M60
< #MOV>< X#XPOS>< Z#ZPOS>
 M60

@M61
< #MOV>< X#XPOS>< Z#ZPOS>
 M61

@M62
< #MOV>< X#XPOS>< Z#ZPOS>
 M62

@M63
< #MOV>< X#XPOS>< Z#ZPOS>
 M63

@M64
< #MOV>< X#XPOS>< Z#ZPOS>
 M64

@M65
< #MOV>< X#XPOS>< Z#ZPOS>
 M65

@M66
< #MOV>< X#XPOS>< Z#ZPOS>
 M66

@M67
< #MOV>< X#XPOS>< Z#ZPOS>
 M67

@M68
< #MOV>< X#XPOS>< Z#ZPOS>
 M68
@