home *** CD-ROM | disk | FTP | other *** search
/ Shareware Gold 1 / The_Golden_ROM_Series_-_Shareware_Gold_Volume_1_Number_11_-_SK_89-301_-_1989.iso / LIB022 / CIS.SCR next >
Text File  |  1988-01-01  |  2KB  |  53 lines
  1.      ;
  2.      ; Linked script for CompuServe Information Service (CIS)
  3.      ;   via CIS's own network.
  4.      ; Link this to phone directory entries for CIS phone numbers.
  5.      ;
  6.      ; NOTE: This script assumes that you have set your terminal
  7.      ; options on CIS (see CIS main menu) at 8 bits, no parity, 1 stop
  8.      ; bit. If not, this script may NOT work for you!  Your QMODEM
  9.      ; settings should be the same.  ALSO: Be sure to use XMODEM
  10.      ; RELAXED protocol if you download CIS files!
  11.      ;
  12.      ; USE YOUR WORD PROCESSOR TO EDIT THIS FILE TO INCLUDE
  13.      ;
  14.      ;         [1] Your CIS account#
  15.      ;         [2] Your CIS password
  16.      ;         [3] Any CIS command(s)
  17.      ;
  18.  
  19.  
  20. NOTE ** LOGON TO COMPUSERVE **     ; Display message on-screen only
  21.  
  22. TIMEOUT 60                         ; Wait 60 seconds before halting script
  23.  
  24. TURNOFF ECHO LINEFEED              ; Set key parameters for CIS
  25.  
  26. ;---------------------------------------------------------------------------;
  27. ; Call CIS; phone number, bps, comm parameters depend on directory entry #. ;
  28. ; For local #s, contact CIS at 800-848-8990 or 614-457-8650                 ;
  29. ;---------------------------------------------------------------------------;
  30.  
  31. DELAY 1000                         ; Pause 1 second
  32. SEND  '^C'                         ; Send ^C
  33.  
  34. WAITFOR ":"                        ; Wait for CIS to request your account#
  35.  
  36. SEND "~~12345,1234{"               ; [1] Pause 1 second,
  37.                                    ; then reply with your account#
  38.  
  39. WAITFOR "Password:"                ; Wait for CIS to request your password
  40.  
  41. SEND "~~FAKE-PASSWORD{"            ; [2] Pause 1 second,
  42.                                    ; then reply with your CIS password
  43.  
  44. WAITFOR "!"                        ; Wait for CIS to Request your input
  45.  
  46. SEND "~~GO PCS-131{"               ; [3] Pause for 1 second,
  47.                                    ; then send any CIS command, such as:
  48.                                    ;     GO PCS-131 (IBM PRO-SIG)
  49.                                    ; -or-
  50.                                    ;     GO PCS-129 (IBM NOVICE SIG)
  51.  
  52. RETURN                             ; return control to keyboard
  53.