execstr
%%%   _Trak.File



/*
   noext !Sim.Msec
%
% remove live data point, history data point, and move txt to xtx
%
_Trak.Folder &"Live" folder !Trak.Live
_Sim.Msec telldate !Trak.Date

_Trak.Date dup Time.DateOrder !Trak.Hdate
Time.TimeOrder !Trak.Htime

_Trak.Hdate &_Trak.Htime ^_Trak.Live
text
 ".xtx" overext

_Trak.Folder &_Trak.Hdate folder &_Trak.Time text
 ".xtx" overext

*/

_Trak.File ".txt" reextend
exists
{
 _Trak.File ".txt" reextend
 _Trak.File ".yty" reextend
 copyfile
}
{
 _Trak.File ".xtx" reextend
 _Trak.File ".yty" reextend
 copyfile

} ifelse