home *** CD-ROM | disk | FTP | other *** search
/ ProfitPress Mega CDROM2 …eeware (MSDOS)(1992)(Eng) / ProfitPress-MegaCDROM2.B6I / BBS / NETMAIL / FT4A_IBM.ZIP / FIDO11.SCR < prev    next >
Encoding:
Text File  |  1988-02-05  |  365 b   |  19 lines
  1. ;
  2. ;This does an automatic login to a Fido version 11; this is
  3. ;does the "whack return" thing necessary for autobaud BBSs,
  4. ;then invokes the Fido12 script.
  5. ;Tom Jennings 4 Feb 88
  6. ;
  7.     &A= 10
  8. :whack
  9.     output "\r "
  10.     if "\r" gotit
  11.     delay 50
  12.     sub 1
  13.     jnz whack
  14.     message "No response to whacking return"
  15.     return 1
  16. :gotit
  17.     call fido12 "&1" "&2" "&3"
  18.     return
  19.