home *** CD-ROM | disk | FTP | other *** search
- Window 1 1 80 25
- BackgroundColor 0
- ClearScreen
-
- :Start
- DefaultPath \hexxagon
- ProgramName HEXX_SW
- DiskSpaceRequired 750000 ; Minimum amount of space needed to install
-
- $╔═════════════════════════════════════════════════════════════════════════════╗
- $║ Software Creations BBS (ASP) - (508) 365-2359 ║
- $║ "Home Of The AUTHORS" ║
- $║ "Specializing in the Development & Distribution of Shareware" ║
- $╚═════════════════════════════════════════════════════════════════════════════╝
- $
- Window 18 6 80 25
- gotoxy 1 1
- $╔═════════════════════════════════════╗
- $║ HEXXAGON Installation Program ║
- $╠═════════════════════════════════════╣
- $║ This program will install: ║
- $║ - HEXXAGON Program Version 2.0 ║
- $╚═════════════════════════════════════╝
- Window 1 6 80 25
- gotoxy 1 8
- GetYesNo Y Do you wish to continue installation
- Switch UserInput
- goto Abort ; User is quiting installation
-
- ClearScreen
- Window 12 6 80 25 ; Center the Disk display
- IdentifyDrives
- Window 1 6 80 25
- gotoxy 1 18
- GetDestinationDrive
- GetDestinationPath
- Window 1 1 80 25
- BackgroundColor 0
- ClearScreen
- $
- $Installing "HEXXAGON" to %ddrv%dpath...
- $
- %ddrv
- chdir %dpath
- %sdrv
- exists hexx_sw.exe
- switch ErrorLevel
- goto Abort ; File not found
- %ddrv
- %sdrvhexx_sw.exe
- %sdrv
- goto ExitGood
-
- :Abort
- $
- $Installation aborted.
- $
- goto Exit
-
- :ExitGood
- %ddrv
- Window 1 1 80 25
- ClearScreen
- Window 20 11 80 25 ; Put message in center of screen
- GotoXY 1 1
- $╔════════════════════════════════════╗
- $║ Installation was successful. ║
- $║ Type HEXX to run. ║
- $╚════════════════════════════════════╝
- :Exit
-
-