%%% "startammgnums" log)(
<
|Numbers
"+12702009855" !Arching.TwiNumberF		% PHOSEND
"+12702009855" !Arching.TwiNumberE		% PHOSEND
"+12702009855" !Arching.TwiNumberD		% PHOSEND
"+14702906370" !Arching.TwiNumberC		% TME
"+14702906327" !Arching.TwiNumberB		% TMP
"+14702906325" !Arching.TwiNumberA		% TMN
  _Arching.TwiNumberA !Arching.TwiCommand

|Out
  upper
  <
%
% the number of twilio slots
%
  |? 3				% excludes D E F for PhoSend
  |B _Arching.TwiNumberB
  |C _Arching.TwiNumberC
%%%  |D _Arching.TwiNumberD
%%%  |E _Arching.TwiNumberE
  |2 _Arching.TwiNumberB
  |3 _Arching.TwiNumberC
%%%  |4 _Arching.TwiNumberD
%%%  |5 _Arching.TwiNumberE
  > not { _Arching.TwiNumberA } if

|Psched
_Arching.Stype
%%% "pschedstype" log)(
<
|A
% matches prodoper.js
 *slidrprd
|B
% matches prodrper.js
 *slidrrrd
|C
% matches prodpper.js
 *slidrqrd
> not
{

} if

|Mode
%
% this is the A or any other sms number not shown directly
% Twi    Ptype  Itype Ttype Vtype Atype   Stype  Applic
% twil    templ     letter Opt Prod letmode prods nomer
%
  upper
  <
//Modes
  |A "Dolphin-None"    "L" "P" 1 "Normal"  "B" "Lettering"
  |B "Blank-None"      "M" "P" 6 "Normal"  "B" "Builder"
  |C "Blank-None"      "M" "P" 6 "Mosaic"  "B" "Mosaic"
  |D "Blank-None"      "M" "P" 6 "PhoSend" "B" "PhoSend"
  |E "Dolphin-None"    "L" "P" 1 "FirstOf" "A" "Lettering"
  |F "Blank-None"      "M" "P" 6 "PhoSend" "B" "PhoSend"
//Modes
  > not
  {
%
% this is the A or any other sms number not shown directly
%   twil templ      letter Opt Prod letmode  products   nomer
%
%  |A
      "Dolphin-None" "L"   "P"  1   "Normal"   "B"    "Lettering"
  } if
% application nomer
  !Arching.Applic
% product schedule
  !Arching.Stype
% # lettering type
  !Arching.Atype
% original photo product
  !Arching.Vtype
% options type
  !Arching.Ttype
% lettering or mms
  !Arching.Itype
% default template
  !Arching.Ptype

"Happy Valentines Day"
  !Arching.Ctype

|Mtext
 *aamgtext

|Server
 *aamgserv

> pop
%%% "endaamgnums" log)(