home *** CD-ROM | disk | FTP | other *** search
/ Jason Aller Floppy Collection / 168.img / XTMK42-2.ZIP / X4XVI / NEWSNET.XTS < prev    next >
Encoding:
Text File  |  1990-03-06  |  865 b   |  77 lines
  1.  
  2. JUmp @C7
  3.  
  4.  
  5. LAbel TELENET
  6.  
  7. WHen "TELENET" JUmp WE_ARE_IN
  8. JUmp @SP
  9.  
  10. LAbel SP_300
  11. LAbel SP_1200 
  12. WAit Delay 10
  13. REply |
  14. JUmp SP_1200
  15.  
  16. LAbel SP_2400
  17. LAbel SP_4800
  18. LAbel SP_9600
  19. LAbel SP_19200
  20. WAit Delay 10
  21. REply "@"
  22. WAit Delay 10
  23. REply |
  24. JUmp SP_19200
  25.  
  26.  
  27. LAbel WE_ARE_IN
  28. WHen -
  29. WAit String "TERMINAL"
  30. REply D1|
  31. WAit For "@"
  32. REply C 21566|
  33. WAit String "connected"
  34. WAit Char ">"
  35. REply "ID "
  36. REply @C8
  37. REply |
  38. WAit String "Password"
  39. REply @C9
  40. REply |
  41. WAit Delay 5
  42. CLear
  43. MEssage
  44.  
  45. You're now logged in to Newsnet. 
  46.  
  47. .
  48. ALarm 3 Now
  49. ENd
  50.  
  51.  
  52. LAbel TYMNET
  53.  
  54. WAit Delay 40
  55. REply a
  56. WAit String "please log in"
  57. REply "NEWSNET"|
  58. WAit String "connected"
  59. WAit Char ">"
  60. REply "ID "
  61. REply @C8
  62. REply |
  63. WAit String "Password"
  64. REply @C9
  65. REply |
  66.  
  67. CLear
  68. MEssage
  69.  
  70. You're now logged into Newsnet.
  71.  
  72. .
  73.  
  74. ALarm 3 Now
  75. ENd       
  76.  
  77.