Category : Communication (modem) tools and utilities
Archive   : ZMSCRIP.ZIP
Filename : PLXUPL.T

Output of file : PLXUPL.T contained in archive : ZMSCRIP.ZIP
:: Script to upload messages to Compuserve's EasyPlex Electronic mail.
:: Assumes the "Prompt" option (not menu) Easyplex option has been set.
:: Message files have the addressee in the first line, Subject in 2nd.
:: Message files are stored in file names starting with 000 without extension
:: Error recovery has not been extensively tested.
open -!g %item
set s0 ""
while "L<4&&!%s0" grab s0
ss s0 ">[mM][cC]|([0-9][0-9]*,[0-9][0-9]*)"
if !%z0 echoc "Bad Address: %s0"; goto foox
grab s1
if !t goto foox
put "\25g easy\r"
pat; pat 1 " COMpose, "; pat 2 "lex!"
pat 6 "Enter choice number !"
pat 7c "is unavailable"
pat 8c "Press to continue: " "\025\r"
pat 9 "Enter correction "
pat 10 "% EasyPlex is temporarily unav"
wait -F40
if 7 goto fini
if 10 goto foobar
if n goto foobar
put "\25com\r"
pat 1 "done";
wait -f20
if !1 goto foobar
if dP ena -r
else ena -p
wait -f1 : let echoes stop already.
if "%s1>31" putv s1; putw "\r"; set s1 "Possible Duplicate Message"
t -gx!G : file is uploaded here, low level FC
if du putw "\r --- Uploaded %t\r"
if jremote,tel put "(Uploaded via Telenet)\r"
put "\25/ex\r";
pat 1 "Send to"
wait -f20
if !1 goto foobar
put "\025%s0\r"
pat 1 "Subject:";
pat 2 " Invalid User ID:"
wait -f20
while "c&&2&&L<3" put "\025%s0\r" wait -f20
if !1 goto foobar
put "\025%s1\r"
echoc "File %item To: %s0 Sb: %s1"
pat 3 "Your name:"
pat 1 "correct";
pat 5c "YES or NO" "\25YES\r"
wait -f20
if 3 put "\25Chuck Forsberg\rY\r"; wait -f20
if !1 goto foobar
put "\25Y\r"
pat 1 " COMpose, ";
wait -f20
if "!1&&!2" goto foobar
if !dv "!%mv %item Z%item.tmp"
if dv "!%rename %item Z%item.tmp"
echoc "File Uploaded: %item moved to Z%item.tmp"
ena -tG!p
pat 1 OK; pat 2 TOP
put "\25mic\r"
wait -f20; if !1 put "mic\r"; wait -f20
foobar: put \3
wait -f5
putw "\25t\r"
putw "\25mic\r"
if "h% EasyPlex is temporarily unav" goto fini
ena -tG!p
foox: echoc "Moving %item to Y%item.tmp"
echoc "File Not Accpeted"
if !dv "!%mv %item Y%item.tmp"
if dv "!%rename %item Y%item.tmp"
fini: ena -gtG!p
nolog closetx

  3 Responses to “Category : Communication (modem) tools and utilities
Archive   : ZMSCRIP.ZIP
Filename : PLXUPL.T

  1. Very nice! Thank you for this wonderful archive. I wonder why I found it only now. Long live the BBS file archives!

  2. This is so awesome! 😀 I’d be cool if you could download an entire archive of this at once, though.

  3. But one thing that puzzles me is the “mtswslnkmcjklsdlsbdmMICROSOFT” string. There is an article about it here. It is definitely worth a read: