%
% get the image information needed to build thumbnails
%
*xactninf
 "incoming.jpg" ofxact
 empty !Shooter.Alt
 !Shooter.Full

_Image.Gscreen
{
%
% copy the incoming to the input hotfolder for green screen
%
 _Camera.Greening
 {
  false
 }
 {
  "gi\*.*" oflocal delfiles
  "gs\*.*" oflocal delfiles
  _Shooter.Full
  "gi\incoming.jpg" oflocal
"incominggi" log)(
  copyfile
  "Greening" *shootern
  true !Camera.Greening
  0 !Camera.GreenCount
  true
 } ifelse
}
{
%
% insure building process does not hang up
%
 "Thumbing" *shootern
 *camertim

 *transact
 true
} ifelse
%
% stack: xact-exit
%