%
%%% |Upload
%
% start the upload to cloud sequence
%
% check for upload busy
%
_Cluq.Active _Clup.Xact nonzero or
{
}
{
%
% do the basic tack and product generating and gathering of files
%
%%% *tackmakr
%
% ready to upload this xact, initiate upload chain
%
 "AurU.gif" !Clup.Filer
 _Xact !Clup.Xact
 "Uploading" *shootern
} ifelse