#401
define block move rapid
if ( swa )
"( ======== )"
TPN ToolPathName ; " )"
#
"( ToolPath Time" ;
tpt ToolPathTime ;
secs ( Word{tpt} % 60 ) ;
mins ( Word{tpt} - Word{secs} / 60 % 60 ) ;
hrs ( Word{tpt} / 60 - Word{mins} / 60 ) ; act ( Word{act} + Word{tpt} ) ;
%h Word{hrs} ; %m Word{mins} ; %s Word{secs} ; " )"
#
if ( Word{act} > Word{tpt} )
"( Accumulative Time " ;
secs ( Word{act} % 60 ) ;
mins ( Word{act} - Word{secs} / 60 % 60 ) ;
hrs ( Word{act} / 60 - Word{mins} / 60 ) ;
%h Word{hrs} ; %m Word{mins} ; %s Word{secs} ; " )"
end if
"( ======== )"
unset swa
end if
N ; G1 ; G2 ; G4 ; G5 ; G6 ; x coord ; y coord ; z coord ;
elevation axis ; tool length ; spindle ; M1 ; M2
end define
#427
define block move linear
if ( swa )
"( ======== )"
TPN ToolPathName ; " )"
#
"( ToolPath Time" ;
tpt ToolPathTime ;
secs ( Word{tpt} % 60 ) ;
mins ( Word{tpt} - Word{secs} / 60 % 60 ) ;
hrs ( Word{tpt} / 60 - Word{mins} / 60 ) ; act ( Word{act} + Word{tpt} ) ;
%h Word{hrs} ; %m Word{mins} ; %s Word{secs} ; " )"
#
if ( Word{act} > Word{tpt} )
"( Accumulative Time " ;
secs ( Word{act} % 60 ) ;
mins ( Word{act} - Word{secs} / 60 % 60 ) ;
hrs ( Word{act} / 60 - Word{mins} / 60 ) ;
%h Word{hrs} ; %m Word{mins} ; %s Word{secs} ; " )"
end if
"( ======== )"
unset swa
end if
N ; G1 ; G2 ; x coord ; y coord ; z coord ;
elevation axis ; tool length ; spindle ; feedrate ; M1 ; M2
end define