home *** CD-ROM | disk | FTP | other *** search
/ norge.freeshell.org (192.94.73.8) / 192.94.73.8.tar / 192.94.73.8 / pub / computers / pcjr / comm / FIDOTERM.LZH / FIDO12.SCR < prev    next >
Text File  |  1988-02-08  |  509b  |  31 lines
  1. ;
  2. ;This does an automatic login to a Fido version 12; this is
  3. ;the same as for Fido v11 except there is no "whack return".
  4. ;Tom Jennings 4 Feb 88
  5. ;
  6.     output "\r"
  7.     match "\r"
  8.     jerror dead
  9.     output "^C^C^C"
  10.     quiet 500
  11. :loop
  12.     output "^C\r"
  13.     match "FIRST name:" 3
  14.     jerror loop
  15.  
  16.     output "&1\r"
  17.     match "&1?" 3
  18.     jerror badname
  19.     jmp pwd
  20. :badname
  21.     output "N\r"
  22.     jmp loop
  23. :pwd
  24.     output "Y\r"
  25.     match "password"
  26.     output "&2\r"
  27.     match "\r"
  28.     output "\03"
  29.     message "Connected \& logged In"
  30. :dead
  31.