hello sometimes i try to speed up things

everybody knows how to face-cut and input program zero

please check this :
... manual mode : put face-cut tool above the material
... automatic mode : program select + play
... open the door : if face is not clean, push cycle-start again

program will read tool position, cut a face, reposition for a next cut at a predefined width, and declare Z origin / that's all-inclusive, 3-in-1

- requires less keystrokes
- faster than common-methods
- noex + ctr + system variables + M02
- it uses G97; if you wish for G96, consider also M61, etc
- it reads&uses tool nose radius, but without compensation codes
- i don't use the "wear" field; if you wish to use it, then VTWO* is needed
- positioning is done in feed, not in rapid, so to avoid shocks caused by fast servos
- works on random material diameter and face position, because it reads the tool position
- to cover a wide range of diameters&materials, declare some generic values ( eq 750rpm 0.15mm/rot ) : even if specs are not high, it is still faster to run this "generic" program then operating in MDI; for fast adjustments, use the potentiometers
- tested on osp300 / kindly

Code:


    G50 S2000


    NOEX   V1 = 900000      ( n - rpm, o / min )
    NOEX   V2 = 0.789       ( f - feed, mm / o )
    NOEX   V3 = 0.50        ( z step      )
    NOEX LINK = 1           ( turret post )


  ( * )
 
    T + LINK * 101(01) ( M66 ) G97 S + V1 M42 M03 M08 G00 X + VSIOX - VTOFX [ LINK ] Z + VSIOZ - VTOFZ [ LINK ] M63
    G04 F0.345         ( be sure that there is coolant flow over the cutting edge, before feeding begins )

    NOEX V4 = VSIOX
    NOEX V5 = VNSRX [ LINK ]


    G01 X - 2   * V5   F + V2  G95
    G91 Z + 0.3
    G90 X + V4         F2500   G94 M05 M09 M63
    G91 Z - 0.3 - V3   F100


    NOEX VSZOZ = VSZOZ + VSIOZ + V3


M02