%
% process the ven/sht directory for incoming jpg files
%
% find a jpeg that is beyond the current mark
%
% stack: src-dir latest-jpg-file
%
0 !counter
{
%
% stack: [ . . . ] cam-dir seed
%
 "*.jpg" !wilder
 nextfile ?
"^%^%^%" log)(
%
% create the xact folder for the incoming image
%
 *camrincm
%
% stack: image-incom-data
%
% add the venue/shooter info for shooter snaps
%
% also applies to incoming MMS, these values
% are derived from incoming message text,
% combined with the implied venue attribute of their Twilio number
% this is why it was placed in the incoming ven/shoot folder originally
%
 "Shooter.Venue" sval
 "Shooter.Number" sval

 dup _Xact text ofcur write

%
% full description of incoming file saved
%
 "incoming" text!xact

/*
%
% update the incoming marker, prevents
% images from repeating through incoming
%
 empty
 "Camera.Latest" sval
 "Xact.Last" sval
 "_camera_" chuuter & text!conn
*/

 +counter 3 gt ?
} loop