%
% Xpan assemble macro scope view
%
% stack: series-ordinal
%
% cycle all offact Stills\Micros_S*.txt
%
% find the Scope.Series with 0 value, this is zero origin starting the series
%
!Xpan.Scan
0 !counter
"Stills\" offact
empty
{
 "Micros_S*.txt" nextof ?
 empty !Scope.Series
 filing exec
 _Scope.Series any?
 {
  zero
  {
   _Xpan.Scan _counter eq
   {
%
% this is the desired series
%
    true ?
   }
   {
%
% this is not the series
%
   } ifelse
   +:counter
  }
  {
%
% part of series being skipped
%
  } ifelse
 } if
} loop
%
% stack: stills-path xpan-file
%