_Cond.ReqCnt zeronull +
dup !Cond.ReqCnt
2 gt
{
%
% latency count reached
%
 0 !Cond.ReqCnt
%
% get the next request if any
%
 _Arching.Tell &"requests" *webrespn
%
% stack: web-response
%
 hexresp
%%% dup logs
 any?
 {
%
% request exists, the response is a filespec
% get the prefix and remainder of supplied file
%
  filename noext "_" slice
%
% check if this is phone verification request
%
  second "Verf" eq$
  {
%
% is a phosend phone verification request
% discard prefix, get the phone numbers
%
   *cndarqty
%
% stack: tph-out-file
%
% get the cphone Numbers file info
%
   *cndarqtx
%
% stack: tph-out-file tph-status
%
   second write
   textover
  }
  {
%
% check if this is panel K phone verification request
%
   second "Verk" eq$
   {
%
% is a panel K colab phone verification request
% discard prefix, get the phone number
%
    pop2nd
    "_" slice

    !verf
    !tphone
    _Arching.Phosend !cphone
%
% identify the cphone and cphone/tphone folders
%
    empty ofgate
    &_cphone folder( !cfolder
    &_tphone folder
    !ctfolder
%
% write the bllow flag
%
    _ctfolder &"bllow.aax"
dup logs
%
% stack: tph-out-file
%
    _verf
%
% stack: tph-out-file tph-status
%
    second write
    textover
   }
   {
%
% normal non-Verf, non-Verk request format
% there is no prefix, just the cphone and tphone
%
% stack: cphone tphone
%
    !tphone
    !cphone

%
% identify the cphone and cphone/tphone folders
%
    empty ofgate
    &_cphone folder( !cfolder
    &_tphone folder
    !ctfolder
%
% get the allow flag
%
    _ctfolder &"allow.txt"
dup logs
    exists
    {
%
% allow flag exists
%
% send the link to access file transfer area
%
"The link you requested for file sharing is: "
&"https://phosend.com/panel.html?cphone=" &_cphone
&"&tphone=" &_tphone
_tphone
"2702009855" !Cond.Sms
*cndaxmit

    }
    {
%
% allow flag does not exist
%
    } ifelse
   } ifelse
  } ifelse

 } if

}
{
%
% only process with latency count reached
%
} ifelse