ECHO OFF
CLS
BREAK ON
IF ZZ == %1ZZ goto RI
ECHO DBATE006.BAT  Copyright 1991, Applied Foresight, Inc.
REM Note %1 should only be PRN, COM1, COM2, LPT1, or LPT2.
REM DBATE006.BAT, when ran with a parameter, is executed by the magazine.
GOTO CHK

:LOGON
ECHO Some files are missing.
ECHO Use a good disk & try again.
PAUSE
GOTO END

:CHK
FOR %%f IN (DBATE006.OLD DBATE006.NEW DBATE006.HDR) DO IF NOT EXIST %%f GOTO LOGON

:GO
ECHO TWO COPIES OF THE SUBSCRIPTION FORM ARE PRINTED FOR YOUR CONVENIENCE
ECHO ... 
COPY DBATE006.HDR+DBATE006.OLD+DBATE006.NEW %1
ECHO >%1
COPY DBATE006.HDR+DBATE006.OLD+DBATE006.NEW %1
ECHO >%1
GOTO END

:RI
CLS
INQUIRY Answer 'Y' if you have a Color Monitor; 'N' otherwise.
if errorlevel 1 copy *.col *.cfg
if not errorlevel 1 copy *.bw *.cfg
ECHO Loading Software & Magazine ...
IRIS DBATE006.PGE
:END