home *** CD-ROM | disk | FTP | other *** search
/ CD-ROM Magazin 1996 March / CD_03_96.BIN / direct / qsockpro.qip / TOUCHNET.MPS < prev    next >
Text File  |  1996-02-14  |  1KB  |  54 lines
  1. # TouchNET PPP/SLIP login script
  2.  
  3. # Set variables
  4. String username
  5. String password
  6. String framing
  7.  
  8. Trace off
  9.  
  10. SetTimeout      60
  11.  
  12. CfgGetValue "Username" username
  13. if result = 0 then
  14.      print "Warning, no username entered"
  15.      else
  16.      print "Username set to ["; username; "]"
  17. endif
  18.  
  19. CfgGetValue "Password" password
  20. if result = 0 then
  21.      GetPassword "Enter your password" password
  22.      if result = 0 then
  23.           print "Warning! No password set"
  24.      else
  25.           print "Password set"
  26.      endif
  27. endif
  28.  
  29. CfgGetValue "Framing" framing
  30. if result = 0 then
  31.      print "Can't read 'Framing' setting from QDECK.INI"
  32. endif
  33.  
  34. CommWaitFor     "ogin:"
  35. CommSend        username
  36. CommSend        "%r"
  37.  
  38. CommWaitFor     "assword:"
  39. CommSend        password
  40. CommSend        "%r"
  41.  
  42. CommWaitFor "mode enabled"
  43.  
  44. if framing = "MPSLIP" then
  45.         print ""
  46.         print "Framing is set to SLIP..."
  47.     else
  48.         print ""
  49.         print "Framing is set to PPP..."
  50. endif
  51.  
  52. end
  53.  
  54.