home *** CD-ROM | disk | FTP | other *** search
- #
- # Get passed the micom
- #
- #debug ON
- login:
- REPLY "^M"
- REPLY "^M"
- REPLY "^M"
- WAIT "system? "
- REPLY "pollux^M"
- #
- # Then get Pollux
- #
- TIMEOUT 30
- WAIT "login:"
- IF TIMEOUT GOTO chkbrk
- TIMEOUT
- #debug OFF
- DELAY 1
- REPLY "papa^M"
- WAIT "Password:"
- REPLY "tricheco^M"
- WAIT "(micom) "
- REPLY "vt100^M"
- WAIT "pollux.usc.edu:papa(1)"
- #ECHO "^M^JLogged in!^M"
- #REPLY "rn^M"
- GOTO end
- #
- # Send break
- #
- chkbrk:
- #ON "hello" GOTO again
- #sbrk:
- #ECHO "sending break --^M^J "
- #GOTO sbrk
- #
- ON "(Y or N) " GOTO again
- sbrk:
- BREAK
- BREAK
- DELAY 1
- BREAK
- BREAK
- again:
- REPLY "y^M"
- GOTO login
- #******** 9 unread articles in comp.sys.amiga--read now? [ynq]
- REPLY "cd Zmodem^M"
- WAIT "):"
- #
- # Send a file with Ymodem batch
- #
- REPLY "ls^M"
- WAIT "):"
- PROTOCOL B
- REPLY "sb rbsb.c^M"
- WAIT "minutes"
- RECEIVE
- #
- # Capture a file
- #
- OPEN vd0:bogus
- REPLY "cat junk.c^M"
- WAIT "):"
- CLOSE
- REPLY "^M"
- WAIT "):"
- REPLY "logout^M"
- DELAY 1
- HANGUP
- end:
- # Done finished
-