%
% stack: ack-text
%
cr lf replall
dup !Sms.Sending

"<Type value=""Outgoing""/>"

exch

%
% stack: msg-xml-ins msg-body
%
%%% third term2
%%% _Sms.From -2 left
_Sked.Driver
%
% stack: msg-xml-ins msg-body phone-number
%
"outph" log)(
%
% twilio authorized output
%
% stack: msg-xml-ins msg-body phone-number
%
^"+1"
%
% send from original number
%
"+1" &_Sked.Sms

%
% stack: msg-xml-ins msg-body outgo-number dial-number
%
"http://phosend.com:8080/sendout?command=xmit&dialr="
exch -2 left &
&"&numbr="
exch -2 left &
&"&bodyr="
exch asc2hex &
pop2nd

%%% 4702906325&to=5594928743&text=41626364

*webrespn


/*
_Arching.TwiAcctAuth
%
% stack: msg-xml-ins msg-body outgo-number dial-number auth-code
%
@Comm
_Arching.TwiAcctSid @!AcctSid
@^MsgOut
*/

dup !MsgOut
_Sms.From -2 left &"_" basenow & &"_" _MsgOut 30 left asc2hex & &".log"
"log" connect
write