%
% every cutter operation complete
%

_Cton.Root &".js" dup ofcton dup tuck exch ofcut
"markut" log)(
copyfile
/*
"c:\___Work\xfer\" &_Cton.Root &".js"
copyfile
*/ /* pop */
dup fileroot "_" left$ &".js" ofxone
"marker" log)(
copyfile

 "ycut.cmd" ofapp quoter
 &" " _Cton.Root "_" left$ &
 &" " &_Arching.ServLock
"exitline" log)(
 ^"cmd /C "
 *runsnorm