%
% in the process of uploading blocks
% see if device is in Fill mode
%
_Msg.Status _Devc.Filling and
_Msg.Status _Devc.Filled and
or nonzero
{
%
% device is now being filled with uploaded data
%
 "UpFinish" true 1000 50000 *machisat
 ind)
 "Upload:Upload;Off" ind@
 "Upload:ToDev;Quick" ind@
 "Upload:DoneTo;Dim" ind@
 ind(
}
{
%
%
%
} ifelse