ALAN,
THE following 2 files are used together to perform mailrun's
Rick
p.s. The asteriks are used to just split the 2 files apart for this
     message.....don't include them in the files when running them.
                           
************************************************************************
REM          ****BATCH FILE FOR QWK/REP MAIL-RUNS***
REM          BE SURE TO EDIT DIRECTORIES AND WCECHO HOST LABEL
REM          TO MATCH YOUR SYSTEM'S NEEDS.
;
;
@ECHO ON
C:
CD\WILDCAT
WCECHO E H:FREEZONE
C:
CD\QMODEM
QMPRO /S=MAILRUN.SCR
C:
CD\WILDCAT
IF EXIST C:\WILDCAT\GATEWAY\QWKIN\FREEZONE.QWK WCECHO I H:FREEZONE
************************************************************************
                           
************************************************************************
;This is a script to make unattended mail runs from a BBS thru a batch file
;using Q-Modem Pro.  You will need to "customize" this script to suit your
;needs.  I would not recommend setting the redial limit more than 10 attempts
;otherwise, you will get an error "TOO MANY WHEN'S".  See the accompaning
;MAILRUN.DOC file for instructions and details.
;
;
TURNON      8_BIT
TURNOFF     LINEFEED
TURNOFF     NOISE
TURNOFF     MUSIC
TURNON      SCROLL
TURNOFF     PRINT
TURNOFF     ECHO
TURNOFF     SPLIT
TURNON      STATUSLN
TURNOFF     DOORWAY
STRING      QWKFILE REPFILE QWKPATH REPPATH TELNUM LIMIT
STRING      INITIAL DOOR XFER NAME HOSTNAME
ASSIGN      HOSTNAME     "THE BBS NAME HERE"        ;The BBS you want to call
ASSIGN      QWKFILE      MAILPACK.QWK               ;The name of .QWK packet
ASSIGN      REPFILE      MAILPACK.REP               ;The name of .REP packet
ASSIGN      QWKPATH      C:\WILDCAT\GATEWAY\QWKIN\  ;Your .QWK d/l Dir.
ASSIGN      REPPATH      C:\WILDCAT\GATEWAY\QWKOUT\ ;Your .REP u/l Dir.
ASSIGN      DOOR         T                          ;"T" for Transfer Mail
ASSIGN      XFER         Z                          ;Your d/l protocol
ASSIGN      NAME         "!BIG JOHNS PASSWORD"      ;Your name and password
ASSIGN      TELNUM       "ATDT 6192864505^M"        ;BBS phone number
ASSIGN      LIMIT        10                         ;# of times to re-dial
ASSIGN      INITIAL      "ATZ^M"                    ;Your modem init. string
SETCOMM     38400 8 NONE 1
;---------------------------- Initialize the Modem ----------------------
INIT:
SEND          "ATH^M"
DELAY          1000
ASSIGN         0 $LIMIT
CLRSCR
DISPLAY        "Initializing Modem ... "
DELAY          1000
SEND           "$INITIAL"
WAITFOR        "OK"
;----------------------------- Dial the Board ---------------------------
GETON:
WHEN           "BUSY"           AGAIN
WHEN           "NO CARRIER"     AGAIN
PAUSE          2000
DECR           0
IF             "$0" < "1"       GETOUT
TIMEOUT        60               GETON
CLRSCR
DISPLAYLN      "Attempting to connect with $HOSTNAME"
DISPLAYLN      "Dial attempts left are $0"
DISPLAYLN      "Dialing string: $TELNUM"
DELAY          100
SEND           "$TELNUM"
WAITFOR        "CONNECT"
GOTO           ONTHESYSTEM
AGAIN:
PAUSE          1000
SEND           "ATH1M^M"
PAUSE          5000
(Continued to next message)
---
 * QMPro 1.53 * Humans: The species that should have never seen sheep.
--- WILDMAIL!/WC v4.12 
---------------