%
% process the ven/sht directory for incoming files
%
empty !Camera.Latest
0 !Xact.Last
%
% read the current incoming file marker
%
"_camera_" chuuter & text*conn
%
% find a jpeg or png that is beyond the current mark
%
chuuter &"\" ofincom
false !Camera.Ljpg
false !Camera.Lpng

_Camera.Latest
dup !Camera.LtstCur

*xactopdj

_counter positive !Camera.Ljpg
_Camera.Latest !Camera.LtstJpg
pop _Camera.LtstCur

*xactopdk

_counter positive !Camera.Lpng
_Camera.Latest !Camera.LtstPng

filing)

_Camera.LtstPng _Camera.LtstJpg gt$
{
 _Camera.LtstPng
}
{
 _Camera.LtstJpg
} ifelse
"xactopd" log)(
!Camera.Latest

_Camera.Ljpg _Camera.Lpng or
{
%
% update the incoming marker, prevents
% images from repeating through incoming
%
 empty
 "Camera.Latest" sval
 "Xact.Last" sval
 "_camera_" chuuter & text!conn

} if