home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Simtel MSDOS 1992 December
/
simtel1292_SIMTEL_1292_Walnut_Creek.iso
/
msdos
/
qmodem
/
allscrpt.arc
/
NEWGENIE.SCR
< prev
next >
Wrap
Text File
|
1987-10-17
|
2KB
|
50 lines
.YOU **MUST** USE YOUR EDITOR OR WORD PROCESSOR TO:
. [1] Include YOUR account# and password
. [2] Optionally remove the period in front of TURNON CAPTURE
.NOTE: Tie this linked script to your QMODEM phone directory entry for
.GEnie. Your communication parameters should be 7-E-1. If you are using
.QMODEM 2.0A or higher (3/1/86), QMODEM will automatically switch to 8-N-1
.(and back) for XMODEM downloads.
.Set WAITFOR timer to 60 seconds (300 baud may need longer;
.on failure (i.e. expected prompt not received), goto label FAILED:
TIMEOUT 60 FAILED
NOTE ** 3 bells ring when GEnie is ready for your command **
.Provide your own echo, use xon/xoff, and turn off linefeeds.
TURNON XON/XOFF
TURNOFF LINEFEED ECHO
.Send the three H's with pauses and CR to establish 'handshake' with GENIE
SEND '~H~H~H'
.Wait for the first GENIE prompt
WAITFOR 'U#='
.[1] Pause, then send Your Account# & Password.
.Be sure to use 'X' as the (new) first letter of your account#
SEND '~XJM12345,PASSWORD{'
.[2] NOTE: For automatic CAPTURE (text only, not downloads), specify a
.capture file in QINSTALL, then REMOVE the period in front of the next line.
.TURNON CAPTURE
.Wait for the main GEnie prompt
WAITFOR '<H>elp?'
.SUCCESS! Beep 3x, discontinue script, return control to your keyboard:
BEEP 400
BEEP 400
BEEP 400
RETURN
.In case of failure (TIMEOUT)...
FAILED:
NOTE ** Logon to GEnie failed -- EDIT SCRIPT OR TRY LATER **
BEEP 400
BEEP 200
HANGUP
RETURN