echo off
cls
if %2x==x goto NODRIVE
echo All disk drive designations must end with colons. For instance, drive C is
echo designated as "C:", not "C". Make absolutely sure that you have designated
echo your hard disk correctly.
echo .
echo If your hard disk is not "%2", then press Control-C to abort; otherwise,
pause
echo off
cls
echo Installing TickleX onto your hard disk requires 1.5MB of free disk space.
echo If you're not SURE that much is free, press Control-C to abort; otherwise,
pause
echo off
cls
%2
cd\
md MANAGEX
cls
cd\MANAGEX
if not exist M-JOURN.LBF goto SKIPBACK
echo If you're a registered user, please ensure that you have a reliable backup
echo of your current TickleX data.    You should keep this backup indefinitely.
echo If you don't have such a backup, press Control-C and make it; otherwise,
pause
:SKIPBACK
if exist ticklex.com erase ticklex.com
if exist editx.com erase editx.com
cls
if exist upgrd.exe erase upgrd.exe
copy %1*.*
if exist t7.hlp erase t?.hlp
cls
echo just a minute...
if exist lb-rate.dat rename lb-*.dat lb-*.lbf
if exist m-group.dat rename m-gr*.dat m-gr*.lbf
if exist recur.dat rename r*.dat r*.lbf
if exist recoff.daf rename recoff.daf recoff.lbf
if exist incexpns.dat rename incexpns.dat incexpns.lbf
if exist printdoc.bat erase printdoc.bat
if exist export.exe erase export.exe
if exist manual erase manual.*
if exist help erase help
if exist messages erase messages
if exist blankcal erase blank*
if exist alarm.dat erase alar*.da*
if exist ticklex.exe erase ticklex.*
if exist sample.lbt erase sample*.??t
if exist printers.lbf erase printers.lbf
if exist pc-beep.exe erase pc-beep.exe
if exist m--journ.lbf rename tx.bat txold.bat
cls
if not exist m-journ.lbf goto EXTRACT
echo                              VERY IMPORTANT
echo .
echo .
echo Now,  some program files will be extracted from an archive.   Before each
echo file is extracted,  a check will be made to see whether a similarly named
echo one already exists on your hard disk.  If so, you'll be asked whether you
echo wish to overwrite it with a new copy.
echo .
echo              ALWAYS ANSWER "NO" (BY PRESSSING THE "N" KEY).
echo .
echo .
pause
cls
:EXTRACT
tklx
erase tklx.exe
ticklex u %2 ~1
ticklex i ~1
ticklex t cities
rem echo off
cls
if exist 1sttime.fyl erase 1sttime.fyl
if exist m-journ.lbf goto NOTFIRST
ticklex p
ticklex w
ticklex m
:NOTFIRST
rem echo off
cls
echo      To use TickleX, go to the MANAGEX directory on drive %2 and enter
echo "TX xxx" (where xxx are your initials).  For example, if your initials
echo were ABC, you would enter "TX ABC" (without the quotes) to use TickleX.
echo .
echo .
pause
goto END
:NODRIVE
cls
echo .
echo      You must designate BOTH the SOURCE diskette and the HARD disk
echo .
echo example:  B:INSTALL B: C:   will install TICKLEX from drive B to drive C:
echo .
echo            PLEASE TRY AGAIN
:END