'****** DUKE3d (teaser) DISK INSTALL

SHELL 
"intro"

BACKGROUND 112    ' 63 display cyan colored background (see color chart in docs)

LANGUAGE ENGLISH

BORDER 1            ' 1 = single line borders. 2 = double, 0 = no border

TELESCOPE OFF       ' turn off "exploding" or telescoping windows
                    ' this will make the window instantly appear
SHADOW ON

'***************************************************************************
WINOPEN 18 2 95     
"         The DUKE 3D D.C. (Teaser)       "
"           INSTALLATION PROGRAM          "
""
""

PAUSE 100
WINUPDATE +4 +4 94
"Distributed By WizardWorks Group Inc."  ' 94 yellow text, 14 characters across, 3 rows 
                               ' down from the upper left hand corner of window.
PAUSE 50                  ' 1/2 second delay between words
WINUPDATE +16 +5 95
" Version 1.0 "

PAUSE 200                 ' 2 second delay

TELESCOPE ON       

'*************************************************************************** 
:FILGHT_SIMULATOR_DIRECTORY_PROMPT
EXIST c:\duke3d\duke3d.exe
JUMP.NO DUKE3D_NOT_FOUND

'*************************************************************************** 
'  Prompt for the drive to install to:
:INSTALL_NOW

WINOPEN 9 2 95     
"          Thanks for trying the first level of         " 
"                 'Duke It Out In D.C.'                 "
""
"              By Sunstorm Interactive Inc.             "
PAUSE 200

EXIST c:\duke3d\tiles014.art
JUMP.YES WHERE_TO_PUT_BACKUP

WINOPEN 29 11 95     
"   Unpacking files ..............   "

SHADOW OFF

UNPACK teaser.pak 34 15 112 34 15 79

COPY c:\tiles014.art   c:\duke3d\ 34 15 112
JUMP.FAIL FILE_CREATION_ERROR
COPY c:\whthouse.map   c:\duke3d\ 34 15 112
JUMP.FAIL FILE_CREATION_ERROR
COPY c:\playdc.bat     c:\duke3d\ 34 15 112
JUMP.FAIL FILE_CREATION_ERROR

PAUSE 200                 ' 2 second delay

WINOPEN 29 11 47     
"   Finishing the installation ......  "

DELETE c:\tiles014.art    34 15 112
DELETE c:\whthouse.map    34 15 112
DELETE c:\playdc.bat      34 15 112

'*************************************************************************** 
:CONCLUDE

PAUSE 100                 ' 2 second delay

SHADOW ON

WINOPEN 10 20 31
""
" Would you like to view the README.TXT file Y or N "
""
ASK 63 21
JUMP.YES VIEW_README

:TECHSUPPORT
WINOPEN 3 2 95
"Thanks for trying the first level of our 'Duke It Out In D.C.' episode. "
""
"   To Play:    Switch to the SAME directory where your Duke Nukem 3D "
"               game is installed and simply run the 'playdc.bat' file! "
""
"   To Order:   1-800-229-2714 or 612-559-5301"
""
" TECHNICAL Support can be obtained in the following ways"
""
" Mail           WizardWorks Technical Support"
"                2300 Berkshire Lane N."
"                Minneapolis, MN 55441 USA"
""
" Phone/Fax      9:00 AM - 5:00 PM Central Standard Time Monday-Friday "
"                Phone  612-559-5301 or Fax 612-577-0631"
""
" Web Site       http://www.wizworks.com"
" 24 Hour BBS    612-559-6197"
""
" e-mail         support@wizworks.com"
"" 
"               < Push the ENTER key to return to DOS >" 

WAIT 50 70

JUMP OK_DONE

'*************************************************************************** 
:DUKE3D_NOT_FOUND
TELESCOPE OFF
SHADOW ON
WINOPEN 5 5 31
" THE INSTALLATION PROGRAM FAILED TO FIND DUKE NUKEM 3D. "
""
" Please enter the letter of the DRIVE where your copy of DUKE3D "
" is located, or push ESC to quit the installation. "
""
DRIVE C 28 11 31 15 29 14 79

WINOPEN 5 8 31
" Please enter the DIRECTORY where your copy of DUKE3D "
" is located. (8 characters or less)"
""
PATH DUKE3D 10 12 31 15 29 16 79

EXIST ~1~2\duke3d.exe
JUMP.YES INSTALL_NOW_CUSTOM

JUMP DUKE3D_NOT_FOUND

'*************************************************************************** 
'  Prompt for the drive to install to :
:INSTALL_NOW_CUSTOM

WINOPEN 9 2 95     
"          Thanks for trying the first level of         " 
"                 'Duke It Out In D.C.'                 "
""
"              By Sunstorm Interactive Inc.             "
PAUSE 200

EXIST ~1~2\tiles014.art
JUMP.YES BACKUP_JUST_INCASE

WINOPEN 29 11 95     
"   Copying the files ..............   "

SHADOW OFF

UNPACK teaser.pak 34 15 112 34 15 79

COPY c:\tiles014.art   ~1~2\ 34 15 112
JUMP.FAIL FILE_CREATION_ERROR
COPY c:\whthouse.map   ~1~2\ 34 15 112
JUMP.FAIL FILE_CREATION_ERROR
COPY c:\playdc.bat     ~1~2\ 34 15 112
JUMP.FAIL FILE_CREATION_ERROR

PAUSE 200                 ' 2 second delay

WINOPEN 29 11 47     
"   Finishing the installation ......  "

DELETE c:\tiles014.art    34 15 112
DELETE c:\whthouse.map    34 15 112
DELETE c:\playdc.bat      34 15 112

JUMP CONCLUDE

'*************************************************************************** 
:BACKUP_JUST_INCASE

MD c:\tempdc

COPY ~1~2\tiles014.art   c:\tempdc\ 34 15 112
JUMP.FAIL FILE_CREATION_ERROR
COPY ~1~2\whthouse.map   c:\tempdc\ 34 15 112
JUMP.FAIL FILE_CREATION_ERROR
COPY ~1~2\playdc.bat     c:\tempdc\ 34 15 112
JUMP.FAIL FILE_CREATION_ERROR

UNPACK teaser.pak 34 15 112 34 15 79

:CUSTOM_WHERE_TO_PUT_BACKUP
WINOPEN 5 5 31
" A previous copy of TILES014.ART was found. "
""
" We will put this other file in another location so that DUKE D.C."
" can be loaded. "
""
" Please enter the letter of the DRIVE where you want this other file "
" to be copied or push ESC to quit the installation. "
""
DRIVE C 28 14 31 15 29 14 79

WINOPEN 5 14 31
" Now enter the DIRECTORY where you want the other copy "
" of TILES014.ART to be located.  (8 characters or less)"
PATH DUKE3D\OTHERART 10 17 31 15 29 16 79

'since i can't check for the existance of a directory path, just a file
'in the path then i will do it this way.
EXIST ~1~2\tiles014.art
JUMP.YES CUSTOM_SHOULD_I_OVERWRITE_FILE

:CUSTOM_SKIP_MD
MD ~1~2

WINCLOSE
WINCLOSE

WINOPEN 29 11 95     
"   Copying the files ..............   "

COPY c:\tempdc\tiles014.art   ~1~2\ 34 15 112
JUMP.FAIL FILE_CREATION_ERROR
COPY c:\tempdc\whthouse.map   ~1~2\ 34 15 112
JUMP.FAIL FILE_CREATION_ERROR
COPY c:\tempdc\playdc.bat     ~1~2\ 34 15 112
JUMP.FAIL FILE_CREATION_ERROR

PAUSE 200                 ' 2 second delay

WINOPEN 29 11 47     
"   Finishing the installation ......  "

DELETE c:\tempdc\tiles014.art    34 15 112
DELETE c:\tempdc\whthouse.map    34 15 112
DELETE c:\tempdc\playdc.bat      34 15 112

RD c:\tempdc

JUMP CONCLUDE



'*************************************************************************** 
:WHERE_TO_PUT_BACKUP
WINOPEN 5 5 31
" A previous copy of TILES014.ART was found. "
""
" We will put this other file in another location so that DUKE D.C."
" can be loaded. "
""
" Please enter the letter of the DRIVE where you want this other file "
" to be copied or push ESC to quit the installation. "
""
DRIVE C 28 14 31 15 29 14 79

WINOPEN 5 14 31
" Now enter the DIRECTORY where you want the other copy "
" of TILES014.ART to be located.  (8 characters or less)"
PATH DUKE3D\OTHERART 10 17 31 15 29 16 79

'since i can't check for the existance of a directory path, just a file
'in the path then i will do it this way.
EXIST ~1~2\tiles014.art
JUMP.YES SHOULD_I_OVERWRITE_FILE

:SKIP_MD
MD ~1~2
MD ~1~2\tempdc

WINCLOSE
WINCLOSE

WINOPEN 29 11 95     
"   Unpacking files ..............   "

SHADOW OFF

UNPACK teaser.pak 34 15 112 34 15 79

COPY ~1~2\tiles014.art   ~1~2\tempdc\ 34 15 112
JUMP.FAIL FILE_CREATION_ERROR
COPY ~1~2\whthouse.map   ~1~2\tempdc\ 34 15 112
JUMP.FAIL FILE_CREATION_ERROR
COPY ~1~2\playdc.bat     ~1~2\tempdc\ 34 15 112
JUMP.FAIL FILE_CREATION_ERROR

COPY c:\duke3d\tiles014.art   ~1~2 34 15 112
JUMP.FAIL FILE_CREATION_ERROR
COPY c:\duke3d\whthouse.map   ~1~2 34 15 112
JUMP.FAIL FILE_CREATION_ERROR
COPY c:\duke3d\playdc.bat     ~1~2 34 15 112
JUMP.FAIL FILE_CREATION_ERROR

COPY ~1~2\tempdc\tiles014.art   c:\duke3d\ 34 15 112
JUMP.FAIL FILE_CREATION_ERROR
COPY ~1~2\tempdc\whthouse.map   c:\duke3d\ 34 15 112
JUMP.FAIL FILE_CREATION_ERROR
COPY ~1~2\tempdc\playdc.bat     c:\duke3d\ 34 15 112
JUMP.FAIL FILE_CREATION_ERROR

PAUSE 200                 ' 2 second delay

WINOPEN 29 11 47     
"   Finishing the installation ......  "

DELETE ~1~2\tempdc\tiles014.art    34 15 112
DELETE ~1~2\tempdc\whthouse.map    34 15 112
DELETE ~1~2\tempdc\playdc.bat      34 15 112

RD ~1~2\tempdc

JUMP CONCLUDE


'*************************************************************************** 
:FILE_CREATION_ERROR
WINCLOSE
WINOPEN 5 14 31
" Could not copy file. "
""
" Push the Enter key to try again. "
WAIT 16 64

WINCLOSE
JUMP WHERE_TO_PUT_BACKUP


'*************************************************************************** 
:SHOULD_I_OVERWRITE_FILE
WINOPEN 5 14 31
" Files of the same name were found in this directory. "
" Push Y to overwrite or N to enter another directory path. " 
ASK 65 16
JUMP.YES SKIP_MD

JUMP WHERE_TO_PUT_BACKUP

'*************************************************************************** 
:CUSTOM_SHOULD_I_OVERWRITE_FILE
WINOPEN 5 14 31
" Files of the same name were found in this directory. "
" Push Y to overwrite or N to enter another directory path. " 
ASK 65 16
JUMP.YES CUSTOM_SKIP_MD

JUMP CUSTOM_WHERE_TO_PUT_BACKUP


'*************************************************************************** 
:VIEW_README
VIEW readme.txt 79 31

JUMP TECHSUPPORT

'*************************************************************************** 
:OK_DONE
END
