home *** CD-ROM | disk | FTP | other *** search
/ DP Tool Club 31 / CDASC_31_1996_juillet_aout.iso / internet / nt16301.zip / NEOSOFT.TX_ / NEOSOFT.TX
Text File  |  1995-05-02  |  567b  |  26 lines
  1. # Script to Login to Internet Provider (Dialup Shell Account)
  2. count 5
  3. loop:
  4.     if !count
  5.         hangup
  6.         display "^M^JAborting Script, Maximum count exceeded^M^J"
  7.         abort
  8.     endif
  9.     expect 10 "login:"
  10.     if !expect
  11.         hangup
  12.         redial
  13.         goto loop
  14.     endif
  15. # This Service Provider expects a system name for the first login,
  16. # the the login and password values for that system.
  17. output "starbase^M"
  18. expect 10 "login:"
  19. output "zkrr01^M"
  20. sleep 1
  21. password
  22. expect 15 "Password:"
  23. output "^P^M"
  24. sleep 2
  25. output "^M"
  26.