%
% download image file for shooter
%
% stack: shooter-num
%
!clun
%
% get the latest image file report, removing any earlier
%
_Clur.Venue &_clun &"-" &_Clur.Stamp &"_*.msg"
!wilder
empty !filer
_Clup.Storage
empty
{
 nextfile ?
 empty second ^4 read execstr
 any?
 {
  !filer pop
 } if
 deleting
} loop
filing)
%
% see if we encountered the text file for image
%
_filer any?
{
 !Clur.File
%
% proper report for image, start the image download
% remove prior download from download area
%
 _Clup.FileE &"\CurImg" jpeg ofconn del
 _Clup.FileE *cloudpre
 "___Clouder___" _filer replall
 "___After___" _clun &" *cloudfle" asc2hex replall
 *cloudsuf
 _Clup.FileW *cloudcdt
}
{
%
% no proper info for image received
%
 false !Cluq.Active
"&&&&&>>> Q" log#
} ifelse
%
% stack: 
%