home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
3D Madness! Companion CD
/
3DMADNESS.iso
/
windemos
/
vreality
/
vsoftcd.inf
< prev
Wrap
INI File
|
1994-07-05
|
6KB
|
172 lines
SetDefaultBitmap Off
SetTopLineTo INSTALLING VISUAL REALITY CD DEMO (Press Esc to exit)
PopUp Welcome to Visual Reality's CD Tour
SetMouseCursor Wait
CopyFiles from [InstallFromDrive]:\WINDEMOS\VREALITY to ShadowDirectory Quietly
VRLOGO.BMP
EndCopyFiles
SetMouseCursor Arrow
LoadBitMap 1 ShadowDirectory\VRLOGO.BMP @xy(0,0)
ShowBitMap 1 ShadowDirectory\VRLOGO.BMP @xy(0,0)
ShowWindow Maximized
;; ******************System Config Evaluation *************************
;; Check Drives available
If DriveIsPresent C
[YesOrNo1] := Y
[Number1] := FreeSpaceOnDrive C
Else
[YesOrNo1] := N
EndIf
If DriveIsPresent D
If FreeSpaceOnDrive D > 0
[YesOrNo2] := Y
[Number2] := FreeSpaceOnDrive D
EndIf
Else
[YesOrNo2] := N
EndIf
;; Check which drive is the CD ROM
[String1] := [InstallFromDrive]
Dialog PressAKey UseHeader "VISUAL REALITY CD DEMO"
Your system configuration is as follows:
Fixed Drive C available: [YesOrNo1]
Fixed Drive D available: [YesOrNo2]
CD ROM Drive is: [String1]
EndDialog
;; ********************Selective Install menu ****************************
[Point1]
[InstallationDirectory] := c:\vsoft
GetMenuChoice
Install No Sound Demo
;Select here for Windows systems without MCI audio capability
Install Audio files onto your system hard drive
;Select here for optimum performance
Install and use Audio from the CD ROM
;Select here for high speed CD ROMS or to use minimal installation
Cancel Installation
;Select here to do nothing and exit
EndGetMenuChoice
InCase Choice is
= 1: DetermineInstallationDrive 1000000 RequireFixed
[InstallationDirectory] := InstallationDrive:\vsoft
CreateDirectoryIfNecessary [InstallationDirectory]
;; *****************************************
SetMouseCursor Wait
CopyFiles from [InstallFromDrive]:\vsoft to [InstallationDirectory] Quietly
*.iw
*.pth
EndCopyFiles
SetMouseCursor Arrow
;; *****************************************
[String9] := vsoft01.iw
Do WIN_mods
= 2: DetermineInstallationDrive 15000000 RequireFixed
[InstallationDirectory] := InstallationDrive:\vsoft
CreateDirectoryIfNecessary [InstallationDirectory]
CreateDirectoryIfNecessary [InstallationDirectory]\wav
;; *****************************************
SetMouseCursor Wait
CopyFiles from [InstallFromDrive]:\vsoft\wav to [InstallationDirectory]\wav Quietly
*.wav
EndCopyFiles
CopyFiles from [InstallFromDrive]:\vsoft to [InstallationDirectory] Quietly
*.iw
*.pth
EndCopyFiles
SetMouseCursor Arrow
;; *****************************************
If [InstallationDirectory] = c:\vsoft
[String9] := vsoft02.iw
EndIf
If [InstallationDirectory] = d:\vsoft
[String9] := vsoft03.iw
EndIf
Do WIN_mods
= 3: DetermineInstallationDrive 1000000 RequireFixed
[InstallationDirectory] := InstallationDrive:\vsoft
CreateDirectoryIfNecessary [InstallationDirectory]
;; *****************************************
SetMouseCursor Wait
CopyFiles from [InstallFromDrive]:\vsoft to [InstallationDirectory] Quietly
*.iw
*.pth
EndCopyFiles
SetMouseCursor Arrow
;; *****************************************
[String9] := vsoft.iw
Do WIN_mods
= 4: Do ByeNow
EndInCase
Do ByeNow
;; *******************************************************************************
Procedure WIN_mods
BuildProgramGroup "Visual Reality CD Demo" VREALITY.GRP {Replace}
[InstallFromDrive]:\vsoft\hscrt.exe [InstallFromDrive]:\vsoft\[String9] "Visual Reality CD Demo"
EndBuildProgramGroup
SetMouseCursor Wait
CopyFiles from [InstallFromDrive]:\vsoft to [WindowsDirectory]\system Quietly
mciaap.drv
aaplay.dll
aavga.dll
EndCopyFiles
SetMouseCursor Arrow
SetModifyModeTo Modify
ModifyTextFile [WindowsDirectory]\win.ini Quietly NoBackup
InSection [MCI extensions]
AddOrChangeLineWith (flc,=,) as "flc=animation1" at end
AddOrChangeLineWith (fli,=,) as "fli=animation1" at end
EndModifyTextFile
ModifyTextFile [WindowsDirectory]\system.ini Quietly NoBackup
InSection [MCI]
AddOrChangeLineWith (Animation1,=,) as "Animation1=mciaap.drv" at end
EndModifyTextFile
ModifyTextFile [WindowsDirectory]\win.ini Quietly NoBackup
AddOrChangeLineWith ([IconAuthor],,) as "[IconAuthor]" at end
EndModifyTextFile
ModifyTextFile [WindowsDirectory]\win.ini Quietly NoBackup
InSection [IconAuthor]
AddOrChangeLineWith (BreakKey,=,) as "BreakKey=Esc" at end
EndModifyTextFile
SetCompletionStatusTo Finished
EndProcedure
Procedure ByeNow
Dialog PressAKey UseHeader "INSTALLATION COMPLETE"
Thank You.
EndDialog
Dialog PressAKey UseHeader "FOR INFORMATION ABOUT VISUAL REALITY"
Contact Visual Software
EndDialog
SoLong Quietly
EndProcedure
endscript