@ECHO OFF
rem                                                            MWCALLED.BAT
CLS
ECHO .
ECHO .
ECHO .
ECHO .
ECHO .
ECHO .
ECHO .
ECHO .
ECHO .
ECHO .
ECHO .
ECHO .                    Installing.    Please wait....
IF NOT EXIST MWCALLED.BAT GOTO BADSTART
if NOT "%1" == "53412" GOTO instruct
rem CHECK FOR BAD SOURCE PATH
IF NOT "%4" == "1" IF NOT "%4" == "2" IF NOT EXIST %2%4\CON GOTO BADFROM
IF "%4" == "1" IF NOT EXIST %2\CON GOTO BADFROM
IF "%4" == "2" IF NOT EXIST %2\CON GOTO BADFROM
rem CHECK FOR BAD DESTINATION DRIVE
IF NOT EXIST %5\CON GOTO BADTO
rem
rem  make the destination sub if necessary, AND GO TO DEST PATH
rem
%5
CD\
IF "%6" == "Y" IF NOT EXIST %5%7\CON MD %7
IF "%6" == "Y" CD %7
rem
rem  make the DATA sub
rem
IF "%6" == "Y" IF NOT EXIST %5%7\DATA\CON MD DATA
IF NOT "%6" == "Y" IF NOT EXIST %5\DATA\CON MD DATA
rem
rem  copy all files to DEST if necessary
rem  prompt for second disk if necessary
rem  copy .HIS files
rem
IF "%3" == "Y" IF "%6" == "N" GOTO COBOFLOP
IF "%3" == "N" IF "%6" == "Y" GOTO COBOSUBS
IF "%3" == "Y" IF "%6" == "Y" GOTO COFLTOHD
IF "%3" == "N" IF "%6" == "N" GOTO COHDTOFL
GOTO FINITO

:COBOFLOP
rem  if both floppies
COPY %2*.HIS %5\DATA\*.HIS > NUL
IF "%2" == "%5" COPY %5mwinstal.bat %2ok.xxx > NUL
IF "%2" == "%5" GOTO FINITO
COPY %2*.* %5*.* > NUL
IF "%4" == "2" GOTO DISKTWO
COPY %5mwinstal.bat %2ok.xxx > NUL
GOTO FINITO
:RETURN1
COPY %2*.* %5*.* >NUL
COPY %5mwinstal.bat %2ok.xxx > NUL
GOTO FINITO

:COBOSUBS
rem  if both subs
COPY %2%4\*.HIS %5%7\DATA\*.HIS > NUL
IF "%2%4" == "%5%7" COPY %5%7\mwinstal.bat %2%4\ok.xxx > NUL
IF "%2%4" == "%5%7" GOTO FINITO
COPY %2%4\*.* %5%7\*.* > NUL
COPY %5%7\mwinstal.bat %2%4\ok.xxx > NUL
GOTO FINITO

:COFLTOHD
rem  if from flop to hard, copy
COPY %2*.HIS %5%7\DATA\*.HIS > NUL
COPY %2*.* %5%7\*.* > NUL
IF "%4" == "2" GOTO DISKTWO
COPY %5%7\mwinstal.bat %2ok.xxx > NUL
GOTO FINITO
:RETURN2
COPY %2*.* %5%7\*.* > NUL
COPY %5%7\mwinstal.bat %2ok.xxx > NUL
GOTO FINITO

:COHDTOFL
rem  if from hard to flop, copy
COPY %2%4\*.HIS %5\DATA\*.HIS > NUL
COPY %2%4\*.* %5*.* > NUL
COPY %5mwinstal.bat %2%4\ok.xxx > NUL
GOTO FINITO

:FINITO
GOTO THEEND
 ÿÿ
:instruct
cls
ECHO .
ECHO .
ECHO .
ECHO .
ECHO .
ECHO .
ECHO .
ECHO .                   You should not run this .BAT program.
ECHO .                   ---
ECHO .
ECHO .
ECHO .                   This program is called by MWINSTAL.WKB
ECHO .                   which is called by MWINSTAL.BAT
ECHO .
ECHO .
ECHO .                   To install, type MWINSTAL and hit [Enter]
ECHO .
ECHO .
ECHO .
ECHO .
ECHO .
pause
GOTO THEEND

:badFROM
cls
ECHO .
ECHO .
ECHO .                                     *
ECHO .                              *      *      *
ECHO .                                *    *    *
ECHO .                                  *  *  *
ECHO .                           * * * * Error * * * *
ECHO .                                  *  *  *
ECHO .                                *    *    *
ECHO .                              *      *      *
ECHO .                                     *
ECHO .
ECHO .
ECHO .
ECHO .                       The Source Path does not exist.
ECHO .                       ------------------------------
ECHO .
ECHO .
ECHO .
ECHO .
ECHO .
PAUSE

GOTO THEEND

:badTO
cls
ECHO .
ECHO .
ECHO .                                      *
ECHO .                               *      *      *
ECHO .                                 *    *    *
ECHO .                                   *  *  *
ECHO .                            * * * * Error * * * *
ECHO .                                   *  *  *
ECHO .                                 *    *    *
ECHO .                               *      *      *
ECHO .                                      *
ECHO .
ECHO .
ECHO .
ECHO .                     The Destination Drive does not exist.
ECHO .                     ------------------------------------
ECHO .
ECHO .
ECHO .
ECHO .
ECHO .
PAUSE

GOTO THEEND

:disktwo
CLS
ECHO .
ECHO . 
ECHO . 
ECHO . 
ECHO . 
ECHO . 
ECHO . 
ECHO . 
ECHO . 
ECHO . 
ECHO .
ECHO .                         PLEASE INSERT DISK 2
ECHO .
ECHO .
ECHO .
ECHO .
ECHO .    Then,
ECHO .
PAUSE

IF NOT EXIST %2\DISK2.XXX Goto nodisk2
CLS
ECHO .
ECHO .
ECHO .
ECHO .
ECHO .
ECHO .
ECHO .
ECHO .
ECHO .
ECHO .
ECHO .
ECHO .                    Installing.    Please wait....
IF "%3" == "Y" IF "%6" == "N" GOTO RETURN1
IF "%3" == "Y" IF "%6" == "Y" GOTO RETURN2


:NODISK2
CLS
ECHO .
ECHO .                                      *
ECHO .                                 *    *    *
ECHO .                                   *  *  *
ECHO .                              * * * Error * * *
ECHO .                                   *  *  *
ECHO .                                 *    *    *
ECHO .                                      *
ECHO .
ECHO .              The file DISK2.XXX was not found on the floppy disk.
ECHO .              ---------------------------------------------------
ECHO .
ECHO .
ECHO .      If Disk 2 is in the drive, then you have a problem.
ECHO .             1.  Press Ctrl-C
ECHO .             2.  Add a file named DISK2.XXX to Disk 2.
ECHO .                 (it doesn't matter what the contents of the file are)
ECHO .             3.  Reissue the MWINSTAL command.
ECHO .
ECHO .
ECHO . If you neglected to insert Disk 2, do so now and
PAUSE

GOTO DISKTWO



:BADSTART
CLS
ECHO .
ECHO .
ECHO .
ECHO .                                      *
ECHO .                               *      *      *
ECHO .                                 *    *    *
ECHO .                                   *  *  *
ECHO .                            * * * * Error * * * *
ECHO .                                   *  *  *
ECHO .                                 *    *    *
ECHO .                               *      *      *
ECHO .                                      *
ECHO .
ECHO .
ECHO .            You must issue the MWINSTAL command from the drive and/or
ECHO .            subdirectory that contains the MATH WORKOUT files.
ECHO .            --------------------------------------------------
ECHO .
ECHO .
ECHO .
ECHO .
ECHO .
PAUSE

:THEEND