home *** CD-ROM | disk | FTP | other *** search
- ;; **********************************************************************
- ;; * *
- ;; * Installer for 3D Home Architect demo. Script by C. Bohn 4/14/94 *
- ;; * *
- ;; **********************************************************************
- SetDefaultBitmap off
- ShowWindow Maximize
- SetCustomControls off
- SetBackdrop off
- SetBackgroundColor 255 255 255 255 255 255
- SetTopLineTo "3D Home Architect Demo Installation"
- SetScreenAttrTo BlackOnWhite ;; no effect!!!
- SetPopupAttrTo BlackOnWhite
- SetAttentionAttrTo RedOnWhite
- SetReplacementInquiry off
- QueFiles to ShadowDirectory
- 3dhademo.bmp
- EndQueFiles
- GetQuedFiles Quietly
- SetReplacementInquiry on
- LoadBitMap 1 ShadowDirectory\3dhademo.bmp
- ShowBitMap 1
- Dialog
- Welcome to the installer for the 3D Home Architect Demo. If at
- any time you wish to cancel the installation, press the Esc key.
- EndDialog
- :DirInq
- DetermineInstallationDirectory C:\3DHADEMO 4000000 DisallowInadequate
- If Escaped
- Goto DirInq
- EndIf
- QueFileGroup 1 to [InstallationDirectory]
- GetQuedFiles
- BuildProgramGroup "3D Home Architect" 3DHOME.GRP
- [INSTALLATIONDIRECTORY]\3dhademo.exe "3D Home Architect demo" [INSTALLATIONDIRECTORY]\3dhademo.exe
- [INSTALLATIONDIRECTORY]\readme.wri "Read Me" [INSTALLATIONDIRECTORY]\readme.wri
- EndBuildProgramGroup
- DeleteFiles from ShadowDirectory Quietly
- 3dhademo.bmp
- EndDeleteFiles
- Dialog
- Installation complete!
- EndDialog
-