home *** CD-ROM | disk | FTP | other *** search
/ Best Objectech Shareware Selections / UNTITLED.iso / boss / comm / misc / 005 / inet-on.scr < prev    next >
Encoding:
Text File  |  1991-09-19  |  1.9 KB  |  44 lines
  1. ;=| iNet/Datapac Logon Script v1.00 |=========================================;
  2. ;                                                                             ;
  3. ; Before using this script you must enter your iNet User ID/Password below    ;
  4. ; where indicated with <--.  You must also set up Intellicomm for use with    ;
  5. ; iNet.  See "LONG DISTANCE SERVICES" in the manual for details.              ;
  6. ;                                                                             ;
  7. ;=============================================================================;
  8.  
  9. send ".."                     ;two periods for 2400 baud
  10.  
  11. waitfor "DATAPAC" 30 ERROR    ;wait 30 seconds for DATAPAC prompt,
  12.                               ;jump to ERROR if not found
  13.  
  14. delay 10                      ;pause for 10/10ths (1 second)
  15. sendbif "G" "city"            ;send iNet address, as defined in the BIF
  16.  
  17. waitfor "Code d'usager:" 30 ERROR
  18. delay 10
  19. send "Your.ID"                ;<--  ENTER YOUR INET ID HERE (between the "")
  20.                               ;---------------------------------------------
  21. waitfor "de securite:" 30 ERROR
  22. delay 10
  23. send "Password"               ;<--  ENTER YOUR PASSWORD HERE (between the "")
  24.                               ;----------------------------------------------
  25. waitfor "press <CR>" 30 ERROR
  26. delay 10
  27. sendbif "G" "phn1"            ;phn1 (phone number 1) of the BIF should be
  28. send ""                       ;set up with the iNet address of the BBS (e.g.
  29.                               ;A CRS GA)
  30.  
  31. ;WHEN/WAITFOR work as a team to handle multiple prompts.
  32.  
  33. when                          ;clear all WHEN's
  34. when "your security" ERROR    ;password change... abort
  35. when "Unable to log" ERROR    ;can't logon to host
  36. when "did not accept" ERROR   
  37. waitfor "uter completed" 60 ERROR
  38.  
  39. exit     ;exit the script without an errorcode... signal all's well
  40.  
  41. ERROR:
  42.  hangup
  43.  exit 1  ;1 signals a problem... don't logon now
  44.