home *** CD-ROM | disk | FTP | other *** search
/ RBBS in a Box Volume 1 #2 / RBBS_vol1_no2.iso / 001z / source.scr < prev    next >
Text File  |  1989-03-01  |  2KB  |  77 lines
  1. ;LINKED SCRIPT FOR THE SOURCE VIA TELENET;
  2. ;LINK IT TO YOUR QMODEM PHONE DIRECTORY ENTRY FOR ANY
  3. ;TELENET PHONE NUMBER(S).
  4.  
  5. ;USE YOUR WORD PROCESSOR TO EDIT THIS FILE TO INCLUDE
  6. ;  [1] Your Source connect# for Telenet
  7. ;  [2] Your Source account#
  8. ;  [3] Your Source password
  9. ;  [4] Any Source command(s)
  10.  
  11. ;COMMENTS ARE PREDEDED BY A PERIOD & REFER TO THE NEXT COMMAND LINE
  12.  
  13. ;Display message on-screen only
  14. NOTE ** LOGON TO THE SOURCE VIA TELENET **
  15.  
  16. ;The next line says to WAITFOR 60 seconds before halting script
  17. TIMEOUT 60
  18.  
  19. ;Set key parameters for The Source
  20. ;TURNON XON/XOFF
  21. TURNOFF ECHO LINEFEED
  22.  
  23. ;Call Telenet;
  24. ;phone number, bps, comm parameters depend on directory entry #
  25. ;for local #s, contact Telenet at 800-336-0437 or 703-442-2200
  26.  
  27. ;Telenet 'logon' is two CRs
  28. SEND "^M^M"
  29.  
  30. ;Wait for Telenet to request terminal type
  31. WAITFOR "TERMINAL="
  32.  
  33. ;Reply with D1 (all other terminal types add useless nulls
  34. SEND "D1^M"
  35.  
  36. ;Wait for Telenet to request host service ID
  37. WAITFOR "@"
  38.  
  39. ;Reply with your Source connect ID for Telenet
  40. ;[1] Refer to your Source new member kit for exact ID
  41. SEND "C 301162^M"
  42.  
  43. ;Wait for The Source to request your logon
  44. WAITFOR "Connected to THE SOURCE"
  45. WAITFOR "> "
  46.  
  47. ;[2] Send your Source Account# followed by CR
  48. SEND "ID usrid^M"
  49.  
  50. ;Wait for The Source to request your password
  51. WAITFOR "Password?"
  52.  
  53. ;[3] Send your password; include control characters if required
  54. SEND "password^M"
  55.  
  56. ;Wait for The Source to Request your input
  57. WAITFOR "Enter item number or Help: "
  58.  
  59. ;Eliminate Menus, go to the Source Command Mode
  60. ;SEND "Q{"
  61.  
  62. ;Wait for The Source to Request your input
  63. ;WAITFOR "-> "
  64.  
  65. ;Prevent CHAT if you wish to avoid interruptions
  66. ;SEND "CHAT -OFF{"
  67.  
  68. ;Wait for The Source to Request your input
  69. ;WAITFOR "-> "
  70.  
  71. ;[4] Send any Source command, such as:
  72. ;    MAIL READ UNREAD{ or MENU{ or POST SCAN IBM{
  73. ;SEND "MAIL READ{"
  74.  
  75. ;Discontinue script processing; return control to keyboard
  76. RETURN
  77.