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

 
Output of file : GEKXDL.T contained in archive : ZMSCRIP.ZIP
echo "gekxdl.t GEnie browse/download script Rev Jul 30 91"
:: This Pro-YAM/ZCOMM script downloads a file after it is listed by
:: the GEnie browse or download menu choices with XMODEM (OverThruster).
:: Enable this with:
:: set f3 "@set s5 xx; source %lib/gekxdl.t"
:: set f8 "@set s5 x; source %lib/gekxdl.t"
:: set f9 "@set s5 xxxx; source %lib/gekxdl.t"
:: Then at the selection, F3 (zmodem) F8 (xmodem) F9 Hayes FAST
:: Be sure to try different values for the O parameter (OverThruster)
::
if "!h^Number:" echo "Can't find Number"; return
ss y "(Name: )(.*)"
setc s0 "\L%z2"
echo "File name is %s0"
ss yf "(Bytes: )(.*)"
ss yf "(Bytes: )(.*)"
put "d\r"
pat 1 "eceive file"
pat 2c "3. YMODEM"
pat 3 "Which item"
pat 4c "4. ZMODEM"
pat 5i "Enter # or to skip"
wait -f20
if %s5>3 pat; put "5\r"; rf -y; return
estimate z2
if 4 put "4\r"; pat; ena -yZ; return : Let AutoDownload do it
if f%s0 echo "%s0 Exists: No Action taken."; put "\r"; return
if 1 goto xmodem : No protocol choice menu
if 2 put "3\r"
else goto xmoch
pat 3 "file!"
wait -f20
pat
if %s5>1 pat; rb -y; return
pO30; if S>2400 pO1000
pat; rb -yo; return

xmoch: put "2\r" : Select XMODEM-1k d/l
wait -f20
xmodem: pat
if %s5>1 rc -y "%s0"; goto rr
ro -y "%s0"
rr: pat; pat 1i "RETURN>"
wait -f15
put "\r"; pat; return


  3 Responses to “Category : Communication (modem) tools and utilities
Archive   : ZMSCRIP.ZIP
Filename : GEKXDL.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/