home *** CD-ROM | disk | FTP | other *** search
- ;
- ; Script for grabbing new messages from Paragon systems
- ; Must be executed from phonebook, or 'DIAL' command
- ; line must be inserted as well as password.
- ;
- ; Paragon message download utility must have been configured
- ; with Xmodem-1K protocol and ZOO archiving format.
- ; (perform one download / grab before using script)
- ;
- when "More? [Y/n/c] " send "N"
- when "No messages taken. Aborting..." goto Scan
- when "[D]ownload [Q]uit [V]iew: " send "\n"
- when "waiting messages now?" send "N\w^C"
- when "Press return..." send "\n"
- when "bulletin number (Q to Quit): " send "Q\n"
-
- converse "to enter the BBS" "!^C\w^C"
- converse "if no account): " "Firstname Lastname\n"
- converse "Password: " "\p\n\w^C\w^C"
-
- ;Get the messages...
- converse "(? for menu): " "M;D\n^C"
- converse "Reconfigue? [y/N] " "N"
- converse "counters? [Y/n] " "Y\w\w\w\w^C"
- converse "Base to grab messages from: " "A\n"
- converse "Grab more? [y/N] " "N"
- converse "[S]tart: " "S\n"
- download "ram:messages.zoo", Y
-
- Scan: ;Scan for new files
- converse "" "^C"
- converse "New message area: " "Q\n^C"
- converse "(? for menu): " "F;N\n"
- capture "ram:files" ;Save in file
- wait "File library: "
- capture off
- send "Q\n^C"
-
- ;Log off!
- converse "(? for menu): " "G\n"
- converse "Logoff? [Y/n] " "Y"
- converse "Leave feedback? [y/N] " "N"
- wait "NO CARRIER"
- cd "ram:"
- cli "zoo -e ram:messages.zoo"
- message "\nEnd of script.\n"
-