home *** CD-ROM | disk | FTP | other *** search
/ Everyones Internet / EV1NET.ISO / mac / DATA / 1047.scp < prev    next >
Encoding:
Text File  |  1999-03-08  |  943 b   |  71 lines  |  [TEXT/ttxt]
  1. !
  2. @ANSWER
  3. @HANGUP
  4. EXIT 0
  5. !
  6. @ORIGINATE
  7. !
  8. CHRDELAY 1
  9. !
  10. @LABEL 10
  11. MATCHCLR
  12. MATCHSTR 1 11 "Username: "
  13. MATCHREAD 300
  14. NOTE "Connect script couldn't match \34Username: \34" 3
  15. JUMP 99
  16. !
  17. @LABEL 11
  18. IFSTR 11 12 "<Guest>"
  19. IFSTR 11 12 ""
  20. PAUSE 1
  21. WRITE "^u\13"
  22. JUMP 13
  23. !
  24. @LABEL 12
  25. ASK 0 "Please enter name: "
  26. WRITE "^*\13"
  27. !
  28. @LABEL 13
  29. MATCHCLR
  30. MATCHSTR 1 14 "Password: "
  31. MATCHREAD 300
  32. NOTE "Connect script couldn't match \34Password: \34" 3
  33. JUMP 99
  34. !
  35. @LABEL 14
  36. IFSTR 12 15 ""
  37. PAUSE 1
  38. WRITE "^p\13"
  39. JUMP 16
  40. !
  41. @LABEL 15
  42. ASK 1 "Please enter password: "
  43. WRITE "^*\13"
  44. !
  45. @LABEL 16
  46. MATCHCLR
  47. MATCHSTR 1 17 ".net>"
  48. MATCHREAD 300
  49. NOTE "Connect script couldn't match \34.net>\34" 3
  50. JUMP 99
  51. !
  52. @LABEL 17
  53. PAUSE 1
  54. WRITE "ppp\13"
  55. JUMP 90
  56. !
  57. @LABEL 18
  58. MATCHCLR
  59. MATCHSTR 1 90 " system.\13\10\13\10"
  60. MATCHREAD 300
  61. NOTE "Connect script couldn't match \34 system.\13\10\13\10\34" 3
  62. JUMP 99
  63. !
  64. @LABEL 90
  65. PAUSE 1
  66. EXIT 0
  67. !
  68. @LABEL 99
  69. PAUSE 60
  70. EXIT -6002 "Connection script failed."
  71.