home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
RISC DISC 1
/
RISC_DISC_1.iso
/
commercial
/
4mation
/
dinodemo
/
!DinoDemo
/
!Run
< prev
next >
Wrap
Text File
|
1993-10-11
|
2KB
|
52 lines
| !DinoDemo
| Version 1.00
|
Set UseDinoDemo1 0
If "<Obey$Dir>" = "ADFS::DinoDemo2.$.!DinoDemo" Then Set UseDinoDemo1 1
If "<Obey$Dir>" = "adfs::DinoDemo2.$.!DinoDemo" Then Set UseDinoDemo1 1
If "<Obey$Dir>" = "ADFS::DinoDemo3.$.!DinoDemo" Then Set UseDinoDemo1 1
If "<Obey$Dir>" = "adfs::DinoDemo3.$.!DinoDemo" Then Set UseDinoDemo1 1
If "<Obey$Dir>" = "ADFS::DinoDemo4.$.!DinoDemo" Then Set UseDinoDemo1 1
If "<Obey$Dir>" = "adfs::DinoDemo4.$.!DinoDemo" Then Set UseDinoDemo1 1
If "<UseDinoDemo1>" = "1" Then Set DinoDemo$Dir ADFS::DinoDemo1.!DinoDemo Else Set DinoDemo$Dir <Obey$Dir>
Unset UseDinoDemo1
|
Set DinoDemoData$Dir <DinoDemo$Dir>
|
IconSprites <Obey$Dir>.!Sprites
|
RMEnsure BorderUtils 0 RMEnsure WindowManager 3.17 RMLoad <DinoDemo$Dir>.BorderUtil
|
if "<System$Path>" = "" Then Run ADFS::DinoDemo1.!System
if "<System$Path>" = "" then Error 0 System resources cannot be found
|
if "<Font$Path>" = "" Then Run ADFS::DinoDemo1.!Fonts
|
RMEnsure ColourTrans 0.51 RMLoad System:Modules.Colours
RMEnsure ColourTrans 0.51 Error You need ColourTrans 0.51 or later
|
set clib$flag 0
RMensure SharedClibrary 3.75 set clib$flag 1
RMensure SharedClibrary 0 set clib$flag 0
if "<clib$flag>"="1" then Error !!! Old shared C library !!! An old version of the shared C library (clib) is resident in memory.
unset clib$flag
|
| Install the shared C library (clib)
| -----------------------------------
|
RMensure SharedClibrary 3.75 RMload System:modules.clib
RMensure SharedClibrary 3.75 Error You need at least version 3.75 of the shared C library
|
| Install the floating point emulator
| -----------------------------------
|
RMensure FPEmulator 2.80 RMload System:modules.FPEmulator
RMensure FPEmulator 2.80 Error You need at least version 2.80 of the floating point emulator
|
|
| Grab extra memory for resources
Wimpslot -min 400K -max 400K
|
Wimpslot -min 256K -max 256K
Run <DinoDemo$Dir>.!RunImage %*0