home *** CD-ROM | disk | FTP | other *** search
/ BBS in a Box 3 / BBS in a box - Trilogy III.iso / Files / Util / Q / QM-Link 2.0ß7 Folder / AppleLink.Script < prev    next >
Encoding:
Text File  |  1989-09-21  |  2.0 KB  |  68 lines  |  [TEXT/MACA]
  1. * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
  2. * Script for AppleLink hookup
  3. * ---------------------------------------------------------------------------
  4. * IN routine (do not change the label)
  5. * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
  6. :IN
  7. SUCCESS
  8. * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
  9. * LOGIN routine (do not change the label)
  10. * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
  11. :LOGIN
  12. PAUSE 4
  13. ALERT 1,IN10,U#=
  14. TYPE HHH^M
  15. PAUSE 10
  16. *
  17. :IN10
  18. PAUSE 1
  19. TYPE «Service»,«System»,«LogID»,!«LogID»,«password»;5.CE;MAC;«protocol»;NS^M
  20. ALERT 1,IN20,SYSTEM REA
  21. ALERT 2,FAIL,INVALID
  22. PAUSE 30
  23. FAIL
  24. :IN20
  25. SUCCESS
  26. *
  27. * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
  28. * CHANGEPASSWORD routine (do not change the label)
  29. * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
  30. :CHANGEPASSWORD
  31. GOTO FAIL
  32. *
  33. * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
  34. * LOGOFF routine (do not change the label)
  35. * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
  36. :LOGOFF
  37. TYPE k0001
  38. GOTO SUCC
  39. * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
  40. * RESET routine (do not change the label)
  41. * Get us back to the logon screen from as many states as possible
  42. * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
  43. :RESET
  44. GOTO FAIL
  45. *
  46. * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
  47. * BYE routine (do not change the label)
  48. * Any sign off routines that may be necessary go here
  49. * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
  50. :BYE
  51. GOTO SUCC
  52. *
  53. * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
  54. * OTHER STUFF
  55. * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
  56. :SUCC
  57. SUCCESS
  58. *
  59. :FAIL
  60. FAILURE
  61. :FAIL1
  62. * expired password
  63. FAILURE 1
  64. :FAIL2
  65. * bad password
  66. FAILURE 2
  67. * The End
  68.