/*
extract files from indicated zip items in the focus area
*/
%
% stack: inflow-search
%
*zipinifo
false !Zip.Exiter
empty
_Zip.Outflow
{
 seq121 File.PrevDirOf
%
% stack: srch-dir prev-dir
%
 isnull ?

 _Zip.Inflow &"_Extract.txt" exec$
 
} loop
filing)