Category : Batch File Utilities - mostly for DOS
Archive   : ABFS.ZIP
Filename : INSTALL.BAT

@Echo Off
cls
set drive=%1
set path1=%2
set srce=%3
if .%drive%==. set drive=C:
if .%path1%==. set path1=\
if .%srce%==. set srce=a:
if .%0==.install.mkdir goto mkdir
if .%0==.install.path goto path
if .%0==.install.unzip goto unzip
Echo About to Unpack the Advanced Batch File Seminar Distribution Disk
Echo ÿ
Echo INSTALL %1 %2 %3 was Specified
Echo ÿ
Ask Can I Install My Files In "%drive%%path1%ADVBAT" (Y/n)
if errorlevel 1 goto nono
:Mkdir
Echo Creating Directories: %drive%%path1%ADVBAT etc.
@echo on
MD %drive%%path1%ADVBAT
MD %drive%%path1%ADVBAT\UTIL
MD %drive%%path1%ADVBAT\DOC
@echo on
set pf=%drive%%path1%ADVBAT
:path
set opath=%path%
echo ÿ
echo Current PATH %opath%
echo ADVBAT PATH %pf%;%pf%\util;
echo ÿ
Ask May I Prefix My PATH to Yours Now (Y/n)
if errorlevel 1 goto unzip
path %pf%;%pf%\util;%opath%
echo ÿ
:unzip
PATH
echo ÿ
Echo Unpacking Files ... Patience Please!
pkunzip %srce%\abatchsm.ju0 %pf%\util *.com *.exe
pkunzip %srce%\abatchsm.ju0 %pf%\doc *.doc *.pas *.asm
pkunzip %srce%\abatchsm.ju0 %pf% warning readme.1st *.bat *.txt *.hlp *.me
goto omega
:nono
cls
Echo ÿ
Echo To install the distribution disk to a path other than C:\ADVBAT, or
Echo to specify a source drive other than A:, proceed as follows:
Echo ÿ
Echo INSTALL {Drive:} {Path} {Source Drive}
Echo ÿ
Echo Note:
Echo ÿ
Echo {Drive} and {Source Drive} must be "C:", "A:" etc., not just "C" or "A".
Echo ÿ
Echo {Path} must end with a "\". Use "\BAT\" not "\BAT" etc.
Echo ÿ
Echo {Drive}, {Path} and {Source Drive} must be separated blank(s)!
Echo ÿ
Echo ÿ
goto omega2
:omega
echo ÿ
Echo Installation Complete. Type INTRO to Begin the Seminar
echo ÿ
CD C:\ADVBAT
C:
:omega2
Prompt $P==$G
set drive=
set path1=
set pf=