home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Archive Magazine 1996
/
ARCHIVE_96.iso
/
discs
/
shareware
/
share_45
/
grabmenu
/
!GrabMenu
/
!Run
< prev
next >
Wrap
Text File
|
1992-05-15
|
766b
|
25 lines
| Run file for GrabMenu
|
Set GrabMenu$Dir <Obey$Dir>
IconSprites <Obey$Dir>.!Sprites
If "<System$Path>"="" Then Error System resources cannot be found
Set Old$CAsm 0
RMEnsure CAssembler 0 Set Old$CAsm 1
RMEnsure CAssembler 0.03 Set Old$CAsm 0
If <Old$CAsm> Then Error An old version of the CAssembler is resident
UnSet Old$CAsm
RMEnsure CAssembler 0.03 RMLoad <GrabMenu$Dir>.CAssembler
RMEnsure CAssembler 0.03 Error CAssembler module not found or too old
RMEnsure InterfaceManager 1.30 RMLoad <GrabMenu$Dir>.Interface
RMEnsure InterfaceManager 1.30 Error Interface module not found or too old
| Need this much once loaded resources
WimpSlot -Min 96K -Max 96K
| But only this much for the program proper
WimpSlot -Min 64K -Max 64K
/<GrabMenu$Dir>.!RunImage