Die ASC Mega 2/ASC-Mega2-CD-ROM.iso/SPIELE/MECHWAR2/INSTALL.DAT

INSTALL Professional project | 1994-01-23 | 15.4 KB | 642 lines

@DefineProject
    @Name="Mechwarrior 2: Demo Disk Ver 2"
    @Version="2.00"
    @OutDrive=C
    @Subdir="\\MW2DEMO"
    @InDiskBell=1
@EndProject

@ChDrive @InDrive
// @ChDir "@InDir"

@DefineVars
    @Integer @Pass =((!@Exists("@InDrive:\\DISK.ID"))*2)
@EndVars

@SetOption(1)
@TextFile="ITXT.eng"

@DefineVars
    @Integer @ExtraMem =(@EMMTotal)
    @QString @MADECmd ="MADE"
    @QString @FileBase ="DRIVERS"
    @QString @MW2Base ="MW2DEMO"
    @Integer @PRJM =3 //3MEG for demo
    @Integer @OtherM =0
    @QString @Args =""
    @Drive   @CDDrive =@InDrive     // CD-ROM drive, if any
    @Integer @CDDriveI =@Eval(@CDDrive-A)   // (0=A, ..., 26=Z)
    @QString @OutDir =""
    @QString @ST0  =@Text("None")
    @QString @SF0  ="NUL"
    @QString @ST1  ="Creative Labs SoundBlaster"
    @QString @SF1  ="SBLASTER"
    @QString @ST2  ="@ST1 Pro"
    @QString @SF2  ="SBPRO"
    @QString @ST3  =@Text("SBclone")
    @QString @SF3  ="SBCLONE"
    @QString @ST4  ="Disney SoundSource"
    @QString @SF4  ="SOURCE"
    @QString @ST5  ="Tandy SL/TL & Sensation"
    @QString @SF5  ="TANSLTL"
    @QString @ST6  ="ProAudio Spectrum"
    @QString @SF6  ="PAUDIO"
    @QString @ST7  ="@ST6 16"
    @QString @SF7  ="PAS16"
    @QString @ST8  ="Covox Speech Thing"
    @QString @SF8  ="CVXSND"
    @QString @ST9  ="Windows Sound System"
    @QString @SF9  ="SNDSYS"
    @QString @ST10 ="@ST1 16"
    @QString @SF10 =@SF2
    @QString @ST11 ="Logitech SoundMan"
    @QString @SF11 =@SF7
    @QString @ST12 ="Advanced Gravis UltraSound"
    @QString @SF12 ="GF166"
    @QString @ST13 =@Text("AdLibG")
    @QString @SF13 ="ADLIBG"
    @QString @ST14  ="LifeSize Enhancer"
    @QString @SF14  ="LSIZE"
    @QString @SndDrvs ="@SF0=@ST0:@SF1=@ST1:@SF2=@ST2:@SF3=@ST3:@SF4=@ST4:@SF5=@ST5:@SF6=@ST6:@SF7=@ST7:@SF8=@ST8:@SF9=@ST9:@SF10=@ST10:@SF11=@ST11:@SF12=@ST12:@SF13=@ST13:@SF14=@ST14"
    @QString @SndDrv =""
    @Integer @SndDrvI =0
    @QString @MT0 =@Text("None")
    @QString @MF0 ="NUL"
    @QString @MT1 =@Text("AdLib")
    @QString @MF1 ="ADLIB"
    @QString @MT2 =@ST13
    @QString @MF2 =@SF13
    @QString @MT3 =@ST1
    @QString @MF3 =@MF1
    @QString @MT4 =@ST2
    @QString @MF4 =@MF1
    @QString @MT5 =@Text("PCspkr")
    @QString @MF5 ="PCSPKR"
    @QString @MT6 ="Roland LAPC-I synthesizer"
    @QString @MF6 ="MT32MPU"
    @QString @MT7 ="Roland MPU-401 MIDI"
    @QString @MF7 =@MF6
    @QString @MT8 ="Roland MT-32 synthesizer"
    @QString @MF8 =@MF6
    @QString @MT9 =@ST10
    @QString @MF9 =@MF1
    @QString @MT10 =@ST12
    @QString @MF10 ="GF1MIDI"
    @QString @MT11 =@ST6
    @QString @MF11 =@MF1
    @QString @MT12 =@ST3
    @QString @MF12 =@MF1
    @QString @MT13 =@ST11
    @QString @MF13 =@MF1
    @QString @MT14 ="@ST10 MIDI"
    @QString @MF14 ="SB16MPU"
    @QString @MusDrvs ="@MF0=@MT0:@MF1=@MT1:@MF2=@MT2:@MF3=@MT3:@MF4=@MT4:@MF5=@MT5:@MF6=@MT6:@MF7=@MT7:@MF8=@MT8:@MF9=@MT9:@MF10=@MT10:@MF11=@MT11:@MF12=@MT12:@MF13=@MT13:@MF14=@MT14"
    @QString @MusDrv =""
    @Integer @MusDrvI =0
    @Integer @IOAddr =0
    @QString @IOAddrQS =""
    @Integer @IRQ =0
    @QString @IRQQS =""
    @Integer @DMA =0
    @QString @DMAQS =""
    @QString @LH =""
    @Integer @TmpI1 =0
    @Integer @TmpI2 =0
    @Integer @TmpI3 =0
    @QString @TmpQS =""
    @QString @tmpQX =""
    @Drive   @TmpDr =A
    @Dir     @TmpDi ="\\"
    @QString @HexDig ="0123456789ABCDEF0123456789abcdef"
    @Integer @JustIn =1
    @Integer @AutoDetect =0
    @Integer @Joystick
    @Integer @Mouse
    @Integer @Cyberman
    @Integer @FCS
    @Integer @WCS
    @Integer @Rudders
    @Integer @CfgWord
@EndVars

@Display
    @MoveCStr(0,54,126,"╔════════════════╗")
    @MoveCStr(1,54,126,"║   ACTIVISION   ║")
    @MoveCStr(2,54,126,"╚════════════════╝")
    @MoveCStr(3,56,  0,"                  ")
    @MoveCStr(1,72,0,"  ")
    @MoveCStr(2,72,0,"  ")
    @MoveCStr(4,20,95,"╔═════════════════╗")
    @MoveCStr(5,20,95,"║  MECHWARRIOR 2  ║")
    @MoveCStr(6,20,95,"╚═════════════════╝")
    @MoveCStr(7,22, 0,"                   ")
    @MoveCStr(5,39,0,"  ")
    @MoveCStr(6,39,0,"  ")
    @Move(8,0)
    @If (!@Pass)
    @Text("HiNew", @Name)
    @Text("EscCmd")
    @Else
    @Text("HiOld", @Name)
    @EndIf

    @Pause
@EndDisplay

@If (@Pass)
    @OutDrive=@InDrive
    @Subdir="@GetCWD(@InDrive)"
    @OutDir="@OutDrive:\\@Subdir"
    @Goto ChooseConfig
@EndIf


ChooseDest:

@FlushOptions()

@TmpI1=@OtherM
@SetOption(61)
@TmpI1=(@TmpI1+@PRJM)

@GetOutDrive @LocalWindow(15,40)
    // @Suppress @InDrive // INSTALL only accepts A-Z after @Suppress
    @If (!@DirExists("A:")) @Suppress A @EndIf
    @If (!@DirExists("B:")) @Suppress B @EndIf
    @Cls

 @Text("ProdDrv?1", @Name)

 @Text("ProdDrv?2", "@TmpI1")

 @Text("ProdDrv?3")
 @Move(22,0)@Text("SelectCmds")@Move(0,0)
@EndOutDrive

@GetSubdir @Cls @LocalWindow(9,40)
    @Prompt=" @Text("Dir?") "

 @Text("ProdDir?", @Name)

 @Text("CreDir")
@EndSubdir

@OutDir="@OutDrive:\\@Subdir"
@If (@DirExists(@OutDir))
    @GetOption @Cls @LocalWindow(11,40)
 @Text("DirExist", @OutDir)

 @Text("NowWhat?")
        @If (@DirExists("@OutDir\\DRIVERS"))
            @Option 11="@Text("NewCfg")"
        @EndIf
        @Option 12="@Text("NewDrvOrDir")"
        @Option 13="@Text("Overwrite")"
        @Option 14="@Text("Abort")"
    @EndOption
    @If     (11[=@Option) @Goto ChooseConfig
    @ElseIf (12[=@Option) @Goto ChooseDest
    @ElseIf (14[=@Option) @Exit
    @EndIf
@EndIf

@TmpI2=(@DiskFree(@OutDrive)/1000000)
@If (@TmpI2<@TmpI1)
    @GetOption @Cls @LocalWindow(13,40)
    @Text("NotEnufDisk", @Name, "@TmpI1", "@OutDrive", "@Eval(@TmpI2+1)")

    @Text("NowWhat?")
    @Option 12="@Text("NewDrv")"
    @Option 13="@Text("TryToInstall")"
    @Option 14="@Text("Abort")"
    @EndOption

    @If     (12[=@Option) @Goto ChooseDest
    @ElseIf (14[=@Option) @Exit
    @EndIf
@EndIf

@MkDir(@OutDir)

@DefineDisk @Label="Disk #1"
    @File INSTALL.EXE
    @File INSTALL.DAT
    @File @TextFile
    @BeginLib @FileBase.RED
        @File *.* @Out DRIVERS\*.*
    @EndLib
    @BeginLib @MW2Base.RED
        @File *.* @Out *.*
    @EndLib

    @If (1 && @Exists("@InDrive:.\\READ.ME"))
        @File READ.ME
    @EndIf
@EndDisk

@Commit

@ChDrive @OutDrive
@ChDir "@Subdir"

ChooseConfig:

@FlushOptions
@FlushGroups

@TmpQS="@OutDir\\MW2.CFG"
@Write(@TmpQS, "ab", "")
@If (@Exists(@TmpQS) && @PeekF(@TmpQS, 0, 2)<2)
    //@PeekF(@TmpQS, 32, 1)
    //@CDDriveI=@PeekF(,, 1)
    @SetOption(20+@PeekF(,4, 2))
    @SetOption(40+@PeekF(,2, 2))
    //@If (@PeekF(,, 1)) @SetGroup(S) @EndIf
    //@If (@PeekF(,, 1)) @SetGroup(X) @EndIf
    @IOAddr=@PeekF(,10, 2)
    @IRQ=@PeekF(,12, 2)
    @DMA=@PeekF(,14, 2)
    //@If (@PeekF(,, 1)) @SetGroup(H) @EndIf
    @TmpQX="@OutDir\\MW2CTRL.CFG"
    @If (@Exists(@TmpQX))
        @Delete(@TmpQX)
    @EndIf
@Else
    @SetOption(65)
    @SetGroup(S)
    @If (@ExtraMem)
        @SetGroup(X)
        @SetGroup(H)
    @EndIf
@EndIf


InputConfig:

@If (!@JustIn)
    @FlushOptions
    @GetOption @Cls @LocalWindow(11,40)
 @Text("Snd?"):
        @Option 20="@ST0"
//              @Option 65="@Text("AutoDet")"
        @Option 21="@ST1"
        @Option 22="@ST2"
        @Option 30="@ST10"
        @Option 23="@ST3"
//              @Option 20="@ST0"
//              @Option 33="@ST13"
//              @Option 34="@ST14"
          //@Option 28="@ST8"
//              @Option 24="@ST4"
//              @Option 32="@ST12"
//              @Option 31="@ST11"
        @Option 26="@ST6"
        @Option 27="@ST7"
//              @Option 25="@ST5"
    @EndOption
@EndIf


@If (65[=@Option)
    @If (@DetectSoundCard(0))
        @SetOption(21)
        @IOAddr=@DetectSoundCard(1)
        @IRQ=@DetectSoundCard(2)
        @DMA=@DetectSoundCard(3)
        @SetOption(43)
    @Else   // Assume LifeSize
        @SetOption(20)
        @ClearOption(65)
        @SetOption(66)
    @EndIf
    @Pass=(@Pass& -2)
    @AutoDetect = 1
@EndIf


@SndDrvI=0
L2:
@If (@SndDrvI+20[!@Option)
    @SndDrvI =(@SndDrvI+1)
    @Goto L2
@EndIf


@SndDrv=@StrToken(@SndDrvs, @SndDrvI*2, ":=")
@SndDrv="DRIVERS\\@SndDrv"

@If (65[!@Option)
    @IOAddr=@PeekF("@OutDir\\@SndDrv.COM", 262, 2)
    @IRQ=@PeekF(,, 2)
    @DMA=@PeekF(,, 2)
@EndIf

@TmpI1=@IOAddr
@IOAddrQS=""
@If (!@TmpI1) @IOAddrQS="0" @EndIf
IOAD2H:
    @TmpI2=(@TmpI1 & 15)
    @TmpI1=(@TmpI1 / 16)
    @If (@TmpI1 + @TmpI2)
        @IOAddrQS="@StrMid(@HexDig, @TmpI2, 1)@IOAddrQS"
    @EndIf
    @If (@TmpI1) @Goto IOAD2H @EndIf
@If (@IOAddr==65535)
    @IOAddrQS=@Text("None")
@EndIf

@TmpI1=@IRQ
@IRQQS=""
@If (!@TmpI1) @IRQQS="0" @EndIf
IRQD2H:
    @TmpI2=(@TmpI1 & 15)
    @TmpI1=(@TmpI1 / 16)
    @If (@TmpI1 + @TmpI2)
        @IRQQS="@StrMid(@HexDig, @TmpI2, 1)@IRQQS"
    @EndIf
    @If (@TmpI1) @Goto IRQD2H @EndIf
@If (@IRQ==65535)
    @IRQQS=@Text("None")
@EndIf

@If (@JustIn==0 && @AutoDetect==0 && 20[!@Option)
    @If (@IOAddr!=65535)
        @GetString @IOAddrQS @Cls @Prompt=" @Text("Hex?") "
 @Text("IOA?"):

        @EndString
        @IOAddr=0
        @TmpI1=(-1)
        @Goto IOAH2D2
IOAH2D1:
        @IOAddr=(@IOAddr*16 + (@StrFind(@HexDig, @StrMid(@IOAddrQS, @TmpI1, 1)) & 15))
IOAH2D2:
        @TmpI1=(@TmpI1+1)
        @If (@TmpI1<@StrLen(@IOAddrQS)) @Goto IOAH2D1 @EndIf
        @IOAddr=(@IOAddr&65535)
    @EndIf

    @If (@IRQ!=65535)
        @GetString @IRQQS @Cls @Prompt=" @Text("Hex?") "
 @Text("IRQ?"):

        @EndString
        @IRQ=0
        @TmpI1=(-1)
        @Goto IRQH2D2
IRQH2D1:
        @IRQ=(@IRQ*16 + (@StrFind(@HexDig, @StrMid(@IRQQS, @TmpI1, 1)) & 15))
IRQH2D2:
        @TmpI1=(@TmpI1+1)
        @If (@TmpI1<@StrLen(@IRQQS)) @Goto IRQH2D1 @EndIf
        @IRQ=(@IRQ&65535)
    @EndIf

    @If (@DMA!=65535)
        @GetInteger @DMA @Cls @Prompt=" @Text("Dec?") "
 @Text("DMA?"):

        @EndInteger
        @DMA=(@DMA&65535)
    @EndIf
@EndIf

@DMAQS="@DMA"
@If (@DMA==65535)
    @DMAQS=@Text("None")
@EndIf

@If     (32[=@Option) @SetOption(50)
@ElseIf (33[=@Option) @SetOption(42)
@ElseIf ((!@JustIn) && 66[!@Option)
    @GetOption @Cls @LocalWindow(12,40)
 @Text("Mus?"):
        @Option 40="@MT0"
//              @Option 66="@Text("AutoDet")"
        @Option 43="@MT3"
        @Option 44="@MT4"
        @Option 49="@MT9"
          //@Option 54="@MT14"
        @Option 48="@MT8"
        @Option 47="@MT7"
//              @Option 46="@MT6"
        @Option 41="@MT1"
//              @Option 42="@MT2"
//              @Option 50="@MT10"
//              @Option 53="@MT13"
        @Option 51="@MT11"
        @Option 52="@MT12"
//              @Option 45="@MT5"
    @EndOption
@EndIf
@If (66[=@Option)
    @If (@DetectMusicDriver() == 1)
        @SetOption(41)
    @Else   // MT-32 and LAPC-I are detectable; MIDI isn't
        @SetOption(48)
    @EndIf
@EndIf

@MusDrvI=0
L3:
@If (@MusDrvI+40[!@Option)
   @MusDrvI =(@MusDrvI+1)
   @Goto L3
@EndIf


@If (!@JustIn)
    @GetGroups @Cls @CheckBox @LocalWindow(9,40)
    @Text("Controls?"):
        @Set J="@Text("Joystick?")"
        @Set M="@Text("Mouse?")"
        @Set C="@Text("Cyberman?")"
        @Set F="@Text("FCS?")"
        @Set W="@Text("WCS?")"
        @Set R="@Text("Rudder Pedals?")"
    @Move(22,0)@Text("CheckBoxCmds")@Move(0,0)
    @EndGroups
    @If (J[=@Group) @Joystick = 1 @Else @Joystick = 0 @Endif
    @If (M[=@Group) @Mouse = 1 @Else @Mouse = 0 @Endif
    @If (C[=@Group) @Cyberman = 1 @Else @Cyberman = 0 @Endif
    @If (F[=@Group) @FCS = 1 @Else @FCS = 0 @Endif
    @If (W[=@Group) @WCS = 1 @Else @WCS = 0 @Endif
    @If (R[=@Group) @Rudders = 1 @Else @Rudders = 0 @Endif
@Else
    @If (@Exists(@TmpQS))
        @Joystick=@PeekF(@TmpQS, 8, 2)
        @Mouse=@PeekF(,6, 2)
//              @Cyberman=@PeekF(,10, 2)
        @FCS=@PeekF(,16, 2)
        @WCS=@PeekF(,18, 2)
        @Rudders=@PeekF(,20, 2)
        @CfgWord=@PeekF(,22, 2)
        @If (@CfgWord & 128) //check for cyberman
            @Cyberman = 1
        @Endif
    @Endif
@EndIf


@If (24[=@Option || 33[=@Option)
    @ClearGroup(S)
@EndIf
/*
@If (!@ExtraMem)
    @ClearGroup(X)
    @ClearGroup(H)
@EndIf

@If (!@JustIn)
    @If ((24[!@Option && 33[!@Option) || @ExtraMem)
        @GetGroups @Cls @CheckBox @LocalWindow(9,40)
        @Text("Add?"):
        @If (24[!@Option && 33[!@Option)
            @Set S="@Text("Smooth?")"
        @EndIf
        @If (@ExtraMem)
            @Set X="@Text("EMS?")"
            @Set H="@Text("LoadHi?")"
        @EndIf
        @Move(22,0)@Text("CheckBoxCmds")@Move(0,0)
        @EndGroups
    @EndIf
@EndIf
*/

@CfgWord = 2 //set keyboard flag as default
@If (M[=@Group || @Mouse || C[=@Group || @Cyberman)
    @CfgWord = (@CfgWord | 1)
    @If (C[=@Group || @Cyberman) @CfgWord = (@CfgWord | 128) @Endif
@Endif
@If (J[=@Group || @Joystick || F[=@Group || @FCS)
    @CfgWord = (@CfgWord | 4)
    @If (F[=@Group || @FCS) @CfgWord = (@CfgWord | 16) @Endif
    @If (J[=@Group || @Joystick)    @CfgWord = (@CfgWord | 8) @Endif
@Endif
@If (R[=@Group || @Rudders)     @CfgWord = (@CfgWord | 32) @Endif
//@If (C[=@Group || @Cyberman) @CfgWord = (@CfgWord | 128) @Endif
@If (@MusDrvI)  @CfgWord = (@CfgWord | 256) @Endif
@If (@SndDrvI)  @CfgWord = (@CfgWord | 512) @Endif

//@Write(@TmpQS, "ab", "")
@PokeF(@TmpQS, 0, 2, 1)             // .CFG file version
//@PokeF(,, 1, @CDDriveI)
@PokeF(,, 2, @MusDrvI)
@PokeF(,, 2, @SndDrvI)
//@PokeF(,, 1, (S[=@Group))
//@PokeF(,, 1, (X[=@Group))
@PokeF(,, 2, @Mouse)
@PokeF(,, 2, @Joystick)
//@PokeF(,, 2, (C[=@Group))
@PokeF(,, 2, @IOAddr)
@PokeF(,, 2, @IRQ)
@PokeF(,, 2, @DMA)
@PokeF(,, 2, @FCS)
@PokeF(,, 2, @WCS)
@PokeF(,, 2, @Rudders)

@PokeF(,, 2, @CfgWord)          //write to shl_hardware
@PokeF(,31, 2, @CfgWord)        //write to sim_hardware
@PokeF(,39, 1, 0)                       // \0 to pathname for current dir
//@PokeF(,, 1, (H[=@Group))
//@PokeF(,, 1, (F[=@Group))
//@PokeF(,, 1, (W[=@Group))
//@PokeF(,, 1, (R[=@Group))

@PokeF("@OutDir\\@SndDrv.COM", 262, 2, @IOAddr)
@PokeF(,, 2, @IRQ)
@PokeF(,, 2, @DMA)

@GetOption @Cls @CheckBox @LocalWindow(20,40)
    @Name @Text("SysCfg")

    @Text("Snd"):@Move(3,40)@StrToken(@SndDrvs, @SndDrvI*2 + 1, ":=")
    @Text("IOA"):@Move(4,40)@IOAddrQS
    @Text("IRQ"):@Move(5,40)@IRQQS
    @Text("DMA"):@Move(6,40)@DMAQS
    @Text("Mus"):@Move(7,40)@StrToken(@MusDrvs, @MusDrvI*2 + 1, ":=")
    @Text("Joystick"):@Move(8,39)@If (J[=@Group || @Joystick) @Text("~Y") @Else @Text("~N") @EndIf @EndIf
    @Text("Mouse"):@Move(9,39)@If (M[=@Group || @Mouse) @Text("~Y") @Else @Text("~N") @EndIf @EndIf
    @Text("Cyberman"):@Move(10,39)@If (C[=@Group || @Cyberman) @Text("~Y") @Else @Text("~N") @EndIf @EndIf
    @Text("FCS"):@Move(11,39)@If (F[=@Group || @FCS) @Text("~Y") @Else @Text("~N") @EndIf @EndIf
    @Text("WCS"):@Move(12,39)@If (W[=@Group || @WCS) @Text("~Y") @Else @Text("~N") @EndIf @EndIf
    @Text("Rudders"):@Move(13,39)@If (R[=@Group || @Rudders) @Text("~Y") @Else @Text("~N") @EndIf @EndIf

    @Text("ToChg"):
               @OutDir\INSTALL

    @If (!(@Pass&1)) @SetOption(63) @EndIf @Option 63="@Text("Cfg?")"
    @Move(22,0)@Text("CheckBoxCmds")@Move(0,0)
@EndOption
@Pass=(@Pass|1)
@If (63[=@Option)
    @JustIn = 0
    @AutoDetect = 0
    @Goto InputConfig
@EndIf


@If (40[!@Option)
    @MusDrv=@StrToken(@MusDrvs, @MusDrvI*2, ":=")
    @Args="@Args -M:DRIVERS\\@MusDrv"
@EndIf
@If (S[=@Group)
    @Args="@Args -O"
@EndIf
@If (X[=@Group)
    @Args="@Args -X"
@EndIf
//@If (H[=@Group)
    @LH="LOADHIGH"
//@EndIf

@Write("MW2DEMO.BAT", "wt","@@echo off\n@OutDrive:\ncd \\@Subdir\n")
@If (@SndDrvI == 12)
    @Write(, "at",
        "@LH DRIVERS\\ULTRAMID -DDRIVERS\\ -M90 -NMT32.INI\n")
@EndIf
@Write(, "at",
    "@LH @SndDrv\n")
//@If (@SndDrvI == 6 || @SndDrvI == 7)
//      @Write(, "at",
//              "PAS set fm to 90\nPAS set pcm to 60\nPAS set vol to 60\n")
//@EndIf
@Write(, "at",
/*      "@MADECmd @FileBase @Args\n@SndDrv u\n") */
    "MW2SHELL\n@SndDrv u\n")
@If (@SndDrvI == 12)
    @Write(, "at",
        "DRIVERS\\ULTRAMID -F\necho.\n")
@EndIf

@TmpQS="@OutDir\\READ.ME"
@If (@Pass<2 && @Exists(@TmpQS))
    @GetOption @Cls @CheckBox @LocalWindow(10,40)

 @Text("README1", @Name)

 @Text("README2")
        @SetOption(64) @Option 64="@Text("VuREADME?")"
        @Move(22,0)@Text("CheckBoxCmds")@Move(0,0)
    @EndOption
    @If (64[=@Option) @Browse(@TmpQS) @EndIf
@EndIf

@Display @Cls
 @Text("Done", @Name)

 @Text("ToPlay"):

    @OutDir\MW2DEMO

 @Text("ToChg"):

    @OutDir\INSTALL

    @Pause
@EndDisplay

@Finish @Cls
@EndFinish