%
% determine if a new reg token is available for the shooter
%
_Clus.Active _Aamg.Pushing or
{
"&&--- S Push" &_Aamg.Pushing log#
 *camerplx
}
{
%
% see if a new reg token file exists
%
 "_xReg" textwild
 empty ofbin
 empty
 {
  nextfile ?
%
% a new reg token exists for this venue/shooter
% identify the listed reg token file
%
  empty !RegFile
  dup -2 left ^"_" ofbin exec$
  dup -5 left "." left$
  !Clus.Id
  _Clus.Id 2 right !Shooter.Number
  _RegFile any?
  {
%
% new reg token file valid, remove the prior reg download
% download the reg token file
%
   _Clup.RegD &"\CurReg.txt" ^_Clup.Storage del
   dup !Clus.File
   "_" right$/ "." left$ !Clus.Size
   _Clup.RegD *cloudpre
   "___Clouder___" _RegFile replall
   "*cameregr" *shootcld
   *cloudsuf
   _Clup.RegV *cloudbdt
   true !Clus.Active
"&&&&&<<< S" log#
   deleting
   true ?
  } if
 } loop
 filing)
} ifelse