home *** CD-ROM | disk | FTP | other *** search
/ The Datafile PD-CD 4 / DATAFILE_PDCD4.iso / utilities / utilsd / evntshell / Demos / !FontPick / !Run < prev    next >
Encoding:
Text File  |  1995-10-14  |  874 b   |  21 lines
  1. | !Run Obey file for FontPick Application
  2. Set FontPick$Dir <Obey$Dir>
  3. Set FontPick$BasicFile <Obey$Dir>.!FontPick
  4. IF "<EvntShell$Path>"="" THEN ERROR 0 Shell resources not found
  5. IconSprites <Obey$Dir>.!Sprites
  6. WimpSlot -min 288K -max 288K
  7. |Load any modules required now
  8. RMEnsure InterfaceManager 2.00 RMLoad <EvntShell$Path>Interface
  9. RMEnsure InterfaceManager 2.00 Error Couldn't load Interface module
  10. RMEnsure MenuUtils 0.11 RMLoad <EvntShell$Path>MenuUtils
  11. RMEnsure MenuUtils 0.11 Error 0 Error Couldn't load MenuUtils Module
  12. RMEnsure MessageTrans 0.06 RMLoad <EvntShell$Path>MsgTrans
  13. RMEnsure MessageTrans 0.06 Error Couldn't load MsgTrans Module
  14.  
  15. RMEnsure FontMenu 1.16 RMLoad <EvntShell$Path>FontMenu
  16. RMEnsure FontMenu 1.16 Error Couldn't load FontMenu Module
  17.  
  18. |And check that there is still enough memory!
  19. WimpSlot -min 288K -max 288K
  20. Run <FontPick$Dir>.!FontPick %*0
  21.