home *** CD-ROM | disk | FTP | other *** search
/ Piper's Pit BBS/FTP: ibm 0020 - 0029 / ibm0020-0029 / ibm0028.tar / ibm0028 / PLINESYS.ZIP / PCMAGNET.CMD < prev    next >
Encoding:
Text File  |  1991-03-15  |  1016 b   |  49 lines
  1. *
  2. * PCMAGNET.CMD
  3. *
  4. * Use to automatically dial the PCMAGNET System.
  5. *
  6. *  Usage:  PCMAGNET ID# Password
  7. *
  8. * You can add this script to a phone book entry by putting:
  9. *
  10. * PCMAGNET NAMEofENTRY ID# Password
  11. *
  12. * and PereLine will automatically log on for you.  PereLine will not
  13. * dial the phone if the script is running because a phone book entry just
  14. * got dialed.  If you execute the script from the User Menu, then the 
  15. * entry will be dialed first.
  16. *
  17. * This script assumes that you have a phone book entry called PCMAGNET
  18. *
  19. *
  20.  
  21. Phone Dial PCMAGNET
  22.  
  23. * ^C causes CompuServe to Request ID
  24. '^C
  25.  
  26. * Tell them who we are ...
  27. * First WaitFor ID: which CompuServe uses to request an ID number.
  28. * Then WaitFor Password: and respond if one is passed in ...
  29. * In this case '&1' is the user ID number 
  30. * and          '&2' is the Password.
  31.  
  32. If "&1"
  33.     WaitFor String ID:
  34.     '&1
  35.     If "&2"
  36.         WaitFor String Password:
  37.         '&2
  38.     EndIf Password
  39. EndIf User ID
  40.  
  41. WaitFor String !
  42.  
  43. 'Go PCMAGNET
  44.  
  45.  
  46.  
  47.  
  48.  
  49.