echo off
cls
echo Installing GUITAR MASTER on %1 drive...
if %1 '=='  goto NOPARM
if not exist %1\NUL goto SYNTAX
if not exist INSTALL.BAT goto NODRIVE
if exist %1\SPARTAN\GM\GM.EXE goto UPDATE
if exist %1\SPARTAN\GM\GM.PRO goto UPDATE
:NEW
echo New installation...
if not exist %1\SPARTAN\NUL mkdir %1\SPARTAN
if not exist %1\SPARTAN\GM\NUL mkdir %1\SPARTAN\GM
if exist GM.EXE copy GM.EXE %1\SPARTAN\GM\GM.EXE
if exist GMDEMO.EXE copy GMDEMO.EXE %1\SPARTAN\GM\GMDEMO.EXE
if exist GM.BAT copy GM.BAT %1\SPARTAN\GM.BAT
if exist GMDEMO.BAT copy GMDEMO.BAT %1\SPARTAN\GMDEMO.BAT
goto OTHER
:UPDATE
echo Update installation...
if exist %1\SPARTAN\GM\GM.EXE copy %1\SPARTAN\GM\GM.EXE %1\SPARTAN\GM\GM-OLD.EXE
if exist %1\SPARTAN\GM\GM.PRO copy %1\SPARTAN\GM\GM.PRO %1\SPARTAN\GM\GM-OLD.PRO
if exist GM.EXE copy GM.EXE %1\SPARTAN\GM\GM.EXE
if exist GMDEMO.EXE copy GMDEMO.EXE %1\SPARTAN\GM\GMDEMO.EXE
if exist GM.BAT copy GM.BAT %1\SPARTAN\GM.BAT
if exist GMDEMO.BAT copy GMDEMO.BAT %1\SPARTAN\GMDEMO.BAT
:OTHER
if exist GMDEMO.MFF   copy GMDEMO.MFF   %1\SPARTAN\GM
if exist C-SCALES.MFF copy C-SCALES.MFF %1\SPARTAN\GM
if exist C-CHORDS.MFF copy C-CHORDS.MFF %1\SPARTAN\GM
if exist E-MAJ.FB     copy E-MAJ.FB     %1\SPARTAN\GM
if exist E-MIN.FB     copy E-MIN.FB     %1\SPARTAN\GM
if exist E-7TH.FB     copy E-7TH.FB     %1\SPARTAN\GM
copy GM.HLP                             %1\SPARTAN\GM
:PROFILE
if exist %1\SPARTAN\GM\GM.PRO echo WARNING***Old profile GM.PRO copied to GM-OLD.PRO...
if %2 '=='     goto GETVIDEO
if %2 == color goto COLOR
if %2 == Color goto COLOR
if %2 == COLOR goto COLOR
goto MONO
:GETVIDEO
getvideo
if errorlevel 1 goto COLOR
if errorlevel 0 goto MONO
goto MONO
:COLOR
echo Installing COLOR profile...
copy GM.PRO %1\SPARTAN\GM\GM.PRO
goto SUCCESS
:MONO
echo Installing MONOCHROME profile...
copy GMMONO.PRO %1\SPARTAN\GM\GM.PRO
goto SUCCESS
:SUCCESS
echo Installation successful...
%1
cd \SPARTAN
goto DONE
:NOPARM
echo Installation failed...(Must specify drive letter)
goto DONE
:NODRIVE
echo Installation failed...(Must make installation drive the current drive)
goto DONE
:SYNTAX
echo Installation failed...(Invalid drive letter?  Specify letter and colon)
goto DONE
:DONE