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

 
Output of file : BAUD2.T contained in archive : ZMSCRIP.ZIP
set home "/host"; cd; ena -d; pS10
if "m" echo "Characters Received from Modem"
if "!m" echo "NO characters received from Modem"
if "!c" echo "NO Carrier Detect from Modem"
if "c" echo "Carrier Detect from Modem"
pat
pat 1l "CONNECT\r\n"; pat 2l "NO CARRIER"
pat 5l "CONNECT 1200"; pat 6l "CONNECT 2400"
pat 10l "ONLINE 300"; pat 12l "NO CARRIER"
pat 15l "ONLINE 1200"; pat 16l "ONLINE 2400"
pat 17l "CONNECT FAST"; pat 18l "CONNECT 300"
pat 19l "CONNECT 9600"; pat 20l "CT 14400"
pe-15 : abend if 15 errors received
wait -EF40; dis -E
if "!c" echo "No Carrier Detect from Modem"
if "hCONNECT" sets s9 "%t %y"; ss y "[0-9]+"; estimate 0 z0
if iMODEM,hst.t if "h[ /]REL|ARQ|CONTROL" dis -d; handshake on; return
if "1||10|18" speed 300 z pw1024; goto chmnp
if "5||15" speed 1200 z pw3072; goto chmnp
if "6||16" speed 2400 z pw6144; goto chmnp
if iMODEM,hst.t if 19 speed 9600; z pw0; goto chmnp
if 19 z pw0; goto chmnp
if 17 pS60 z pw0; dis -d; return
if iMODEM,tb.t if n put "ATS50=0\r"; wait -F25; dis -E
if iMODEM,tb.t if 17 pS60 dis -d; return
o
kill
: create -+ rings; timestamp; nolog close
fail
chmnp:
if iMODEM,mm224e.t speed 9600 handshake on goto estr
if iMODEM,mmv32.t speed 19200 handshake on goto estr
echo "CHECKING FOR MNP"
while "!c&&L<8" echo "SLOW CD" sleep 2
dis -d
if "!h[ /]REL|ARQ" echo "NO MNP"; goto estr
if iMODEM,hst.t handshake on; goto estr

if "!iMODEM,tb.t" goto chmnp1
echo "Best not to mess with h/s for TB MNP"; return
pat 1 OK
mput "+++"; wait -f3
putw "ATS66=1\r"
putw "ATS51=5 S58=2 S68=2 \r"
speed 19200
putw "ATO\r"
handshake on
return
chmnp1: echo "MNP && UNSUPPORTED Modem Type"; return
estr: estimate 0 z0 :: record true baud rate
return

:: BAUD2.T Revised 5-3-91 For 17.78+
:: For Hayes compatible modem set for extended result messages
:: CONNECT FAST is used by the TELEBIT TrailBlazer modem
:: CONTROL is part of Hayes 9600 result code


  3 Responses to “Category : Communication (modem) tools and utilities
Archive   : ZMSCRIP.ZIP
Filename : BAUD2.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: http://www.os2museum.com/wp/mtswslnk/