Personal Computer World 1995 January/pcw-0195.iso/demos/simon/install.dat

Text File | 1994-12-31 | 5KB | 172 lines

/*
 *      FILE:Install.dat
 *
 *      DESC:
 *           Simon The Sorcerer Installer
 *
 *
 */

@DefineProject
    @Name           = "Simon the Sorcerer (The Demo)"
    @Version        = "1.00"
    @Subdir         = "SIDEMO"
    @OutDrive    = C
@EndProject

@DefineVars
    @Integer @CopyGame =0
    @Integer @SizeNeeded =2000000
    @Integer @Temp =0
@EndVars


@Display
    @Cls

    @MoveCStr(2,20,95,"╔═══════════════════════════════╗")
    @MoveCStr(3,20,95,"║ Simon the Sorcerer (The Demo) ║")
    @MoveCStr(4,20,95,"╚═══════════════════════════════╝")
    @MoveCStr(5,22, 0,"                                 ")
    @MoveCStr(3,53,0,"  ")
    @MoveCStr(4,53,0,"  ")
    @Move(6,0)

    This program will install @Name onto
    your computer.

    You may press the [Esc] key at any time to abort the installation.
    INSTALL will ask you several questions before installing the
    software to your hard drive.

@Pause
@EndDisplay

 @GetOutDrive @LocalWindow(14,36)
    @Suppress A
    @Suppress B
    @Cls

    @MoveCStr(2,20,95,"╔═══════════════════════════════╗")
    @MoveCStr(3,20,95,"║ Simon the Sorcerer (The Demo) ║")
    @MoveCStr(4,20,95,"╚═══════════════════════════════╝")
    @MoveCStr(5,22, 0,"                                 ")
    @MoveCStr(3,53,0,"  ")
    @MoveCStr(4,53,0,"  ")
    @Move(6,0)

    On which disk drive do you wish to install
    @Name


@EndOutDrive

@GetSubdir
    @Cls
    @MoveCStr(2,20,95,"╔═══════════════════════════════╗")
    @MoveCStr(3,20,95,"║ Simon the Sorcerer (The Demo) ║")
    @MoveCStr(4,20,95,"╚═══════════════════════════════╝")
    @MoveCStr(5,22, 0,"                                 ")
    @MoveCStr(3,53,0,"  ")
    @MoveCStr(4,53,0,"  ")
    @Move(6,0)

    @Name will now be installed to
    @Subdir subdirectory. To change the name of the subdirectory
    type the new name in the space below. To accept the current
    name press [Enter]

         @Prompt = "Which subdirectory ([Enter] = @Subdir)"
@EndSubdir


@FlushOptions()


@If(@DiskFree(@OutDrive)>@SizeNeeded)
@GetOption @LocalWindow(9,65)
       @Option 1="Yes"
       @Option 2="No"

    @Cls
    @MoveCStr(2,20,95,"╔═══════════════════════════════╗")
    @MoveCStr(3,20,95,"║ Simon the Sorcerer (The Demo) ║")
    @MoveCStr(4,20,95,"╚═══════════════════════════════╝")
    @MoveCStr(5,22, 0,"                                 ")
    @MoveCStr(3,53,0,"  ")
    @MoveCStr(4,53,0,"  ")
    @Move(6,0)

    Do you wish to copy the game file to your hard disk?



  (It will take up approx 1.2 MB but will improve performance.)

@EndOption
    @If(1[=@Option) @CopyGame = 1
    @EndIf
@EndIf

@DefineDisk @Label="Disk 1"
    @If(@CopyGame)
        @File DEMOS\SIMON\SIMON.GME @Out SIMON.GME
    @EndIf
    @File DEMOS\SIMON\EFFECTS.VOC @Out EFFECTS.VOC
    @File DISK.ID @Out SAVES\\DISK.ID
    @File DEMOS\SIMON\MT_FM.IBK @Out MT_FM.IBK
    @File DEMOS\SIMON\RUNVGA.EXE @Out RUNVGA.EXE
    @File DEMOS\SIMON\SETD.SND @Out SETD.SND
    @File DEMOS\SIMON\SETUP.EXE @Out SETUP.EXE
    @File DEMOS\SIMON\TBLLIST @Out TBLLIST
    @File DEMOS\SIMON\STRIPPED.TXT @Out STRIPPED.TXT
    @File DEMOS\SIMON\GAMEPC @Out GAMEPC
    @File DEMOS\SIMON\ICON.DAT @Out ICON.DAT
    @File DEMOS\SIMON\MT_FM.IBK @Out MT_FM.IBK
    @BeginLib DRIVERS.RED
        @File ADLIBG.COM @Size 5536
        @File SBLASTER.COM @Size 4560
        @File SBCLONE.COM @Size 4576
        @File SBPRO.COM @Size 4704
        @File SOURCE.COM @Size 3424
        @File PAUDIO.COM @Size 5376
        @File GF166.COM @Size 5504
        @File LSIZE.COM @Size 3328
        @File SB16.COM @Size 4544
        @File PAS16.COM @Size 5440
        @File TANSLTL.COM @Size 3200
    @EndLib
@EndDisk

@Finish
    @ChDrive @OutDrive
    @ChDir "@Subdir"
    @Write("Simon.Bat","wt","@@Echo Off\n")
    @Write(,,"if not exist Soundrv.Com echo Please run SETUP to setup your sound card for digital sound effects and music.\n")
    @Write(,,"if not exist Soundrv.Com goto end\n")
    @Write(,,"Soundrv\n")
    @Write(,,"Runvga /@OutDrive /0 @StartupDrive:\\@StartupDir\\simon.voc ")
    @Write(,,"effects.voc ")
    @If(!@CopyGame)
    @Write(,,"@StartupDrive:\\@StartupDir\\")
    @EndIf
    @Write(,,"simon.gme\n")
    @Write(,,"Soundrv u\n")
    @Write(,,":end\n")
    @Copy("Simon.bat","SimonBat");
    @Spawn("SETUP")

    @Cls
    @If(@Spawn()==0)
    @Name has been successfully installed
    and setup for your computer. Please type 'SIMON' to play the game.

    @Else
    @Name has been installed but not setup
    for your computer. Please type 'SETUP' to setup the digital sounds
    and music.

    @EndIf
    @Pause
@EndFinish