%
% this is an SMS, no media, analyze for text content and source
/*
_Arching.Atype
"lettertype" log)(
<
|FirstOf
*/
 _Sms.From -2 left
"smsfrom" log)(
 !Shooter.Subject
%
% MMS_3524436787_20210502_140035_0_A_1_6_312048656C6C6F.jpg
% verf  subj   date   time seq twi prod sms-body
%
% this was an SMS
%
 _Sms.To -2 left !Shooter.Sms
 "Twid\MMS_"
 _Shooter.Subject
 dup !Subject
 &
 Time.Now Time.FullOrder &
 &"_"
 false !Shooter.ValidCap
%
% stack: new-mms-prefix
%
 *smsdecod

 *twiphsnd
 dup !Shooter.AdjCap

%
% stack: new-mms-prefix body-text
%
 *custxcap
%
% stack: new-mms-pefix adj-caption
%
 trim !Shooter.Caption

"shootem " &_Shooter.Tem &" " &_Msg.extra logs
 &_Shooter.Tem
 &"_"

 _Twi
%
% indicate no background with lower case twi route
%
 lower &
 &"_" &_Shooter.Color
 &"_" &_Shooter.ProdType
 &"_"
 _Shooter.Caption
 60 left

 _Fup.PhoSend
 {
  &" " &_Msg.xact &_Fup.PhoNum &"*"
 } if

 asc2hex & jpg ofconn
 -1 left ^"c"

/*--siphon--*/
/*
-1 left ^"x"
*/

 "Tem0.jpg" oftem exch copyfile

 _Fup.PhoSend
 {
 }
 {
  "Thanks for trying Text My Name
  We received your lettering request and will send you a custom Photo Creation shortly . . ."
"cvnm" log)(
  *twilrcvd
 } ifelse

/*
> not
{
 false !Shooter.ValidCap
%
% stack:
%
 *smsdecod
%
% stack: body-text
%
 *custxcap
%
% stack: adj-caption
%
 trim
 !Shooter.Caption
} if

*/