MS-DOS Graphical Installer

edited December 19 in Programming
Hello everyone!!!
I am making a baby-mode installer of DOS
This new generation... Doesn't realize the pain, sweat, blood and tears we put into installing MS-DOS, Fdisk, format, sys... Copy command.com c:...
Welp, the new generation won't suffer now because I'm making a graphical installer of MS-DOS.

@ECHO OFF

@ECHO OFF
CLS
ECHO =======================================
ECHO MS-DOS 4.01 Installation Program
ECHO =======================================
ECHO.

:ASKFDISK
ECHO Has FDISK already been performed
ECHO using the DOS installer diskette?
ECHO.
ECHO Type Y for Yes or N for No, then press ENTER:
SET /P FDISKDONE=

IF "%FDISKDONE%"=="N" GOTO DOFDISK
IF "%FDISKDONE%"=="Y" GOTO AFTERFDISK
ECHO Invalid choice.
GOTO ASKFDISK

:DOFDISK
CLS
ECHO Insert the MS-DOS installer diskette into drive A:
ECHO.
ECHO You will now be placed into FDISK.
ECHO Please:
ECHO 1. Create a Primary DOS Partition
ECHO 2. Use maximum available size
ECHO 3. Set the partition as active
ECHO.
ECHO The system will automatically restart.
ECHO After rebooting, run this program again.
ECHO.
PAUSE

A:\FDISK

ECHO System reboot

:AFTERFDISK
CLS
ECHO WARNING!
ECHO Formatting drive C: will erase ALL data.
ECHO.
ECHO Do you want to format drive C: now?
ECHO Type Y to format, or N to exit:
SET /P FORMATC=

IF "%FORMATC%"=="N" GOTO EXIT
IF "%FORMATC%"=="Y" GOTO DOFORMAT
ECHO Invalid choice.
GOTO AFTERFDISK

:DOFORMAT
CLS
ECHO Formatting drive C: and installing system files...
FORMAT C: /S
ECHO.
ECHO System files installed.
PAUSE

:ASKFOLDER
CLS
ECHO Enter the name of the folder for DOS files (example: DOS):
SET /P DOSDIR=

MD C:\%DOSDIR%
GOTO DISK1

:DISK1
CLS
ECHO Insert Diskette #1 into drive A:
PAUSE
COPY A:\*.* C:\%DOSDIR%
GOTO ASKCONT2

:ASKCONT2
ECHO.
ECHO Continue to Diskette #2?
ECHO Type Y to continue or N to exit:
SET /P CONT=
IF "%CONT%"=="Y" GOTO DISK2
IF "%CONT%"=="N" GOTO EXIT
GOTO ASKCONT2

:DISK2
CLS
ECHO Insert Diskette #2 into drive A:
PAUSE
COPY A:\*.* C:\%DOSDIR%
GOTO ASKCONT3

:ASKCONT3
ECHO.
ECHO Continue to Diskette #3?
ECHO Type Y to continue or N to exit:
SET /P CONT=
IF "%CONT%"=="Y" GOTO DISK3
IF "%CONT%"=="N" GOTO EXIT
GOTO ASKCONT3

:DISK3
CLS
ECHO Insert Diskette #3 into drive A:
PAUSE
COPY A:\*.* C:\%DOSDIR%
GOTO ASKCONT4

:ASKCONT4
ECHO.
ECHO Continue to Diskette #4?
ECHO Type Y to continue or N to exit:
SET /P CONT=
IF "%CONT%"=="Y" GOTO DISK4
IF "%CONT%"=="N" GOTO EXIT
GOTO ASKCONT4

:DISK4
CLS
ECHO Insert Diskette #4 into drive A:
PAUSE
COPY A:\*.* C:\%DOSDIR%
GOTO ASKCONT5

:ASKCONT5
ECHO.
ECHO Continue to Diskette #5?
ECHO Type Y to continue or N to exit:
SET /P CONT=
IF "%CONT%"=="Y" GOTO DISK5
IF "%CONT%"=="N" GOTO EXIT
GOTO ASKCONT5

:DISK5
CLS
ECHO Insert Diskette #5 into drive A:
PAUSE
COPY A:\*.* C:\%DOSDIR%
GOTO ASKCONT6

:ASKCONT6
ECHO.
ECHO Continue to Diskette #6?
ECHO Type Y to continue or N to exit:
SET /P CONT=
IF "%CONT%"=="Y" GOTO DISK6
IF "%CONT%"=="N" GOTO EXIT
GOTO ASKCONT6

:DISK6
CLS
ECHO Insert Diskette #6 into drive A:
PAUSE
COPY A:\*.* C:\%DOSDIR%
GOTO ASKCONT7

:ASKCONT7
ECHO.
ECHO Continue to Diskette #7?
ECHO Type Y to continue or N to exit:
SET /P CONT=
IF "%CONT%"=="Y" GOTO DISK7
IF "%CONT%"=="N" GOTO EXIT
GOTO ASKCONT7

:DISK7
CLS
ECHO Insert Diskette #7 into drive A:
PAUSE
COPY A:\*.* C:\%DOSDIR%
GOTO ASKCONT8

:ASKCONT8
ECHO.
ECHO Continue to Diskette #8?
ECHO Type Y to continue or N to exit:
SET /P CONT=
IF "%CONT%"=="Y" GOTO DISK8
IF "%CONT%"=="N" GOTO EXIT
GOTO ASKCONT8

:DISK8
CLS
ECHO Insert Diskette #8 into drive A:
PAUSE
COPY A:\*.* C:\%DOSDIR%

CLS
ECHO Diskette overload detected.
ECHO Maximum number of diskettes (8) reached.
PAUSE
GOTO EXIT

:EXIT
CLS
ECHO Program exited.
PAUSE


This is my code, can somebody help me put it into a 360k, 720k, 1.2m and 1.44m image, along with a 4.01 Command.com & autoexec.bat that automatically executes this Batch file?
Winimage somehow corrupts it and it doesn't boot.
Sign In or Register to comment.