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