home *** CD-ROM | disk | FTP | other *** search
/ The Datafile PD-CD 4 / DATAFILE_PDCD4.iso / utilities / utilsd / evntshell / Demos / !Redraw2 / !Run < prev    next >
Encoding:
Text File  |  1994-03-27  |  900 b   |  22 lines
  1. |ForceCFS
  2. | !Run Obey file for Redraw2 Application
  3. Set Redraw2$Dir <Obey$Dir>
  4. Set Redraw2$BasicFile <Obey$Dir>.!Redraw2
  5. Set Alias$@RunType_FD1 Basic -quit |"%%0|" %%*1
  6. IF "<EvntShell$Path>"="" THEN ERROR 0 Shell resources not found
  7. |Change the next line if you are using a different
  8. |filetype number
  9. IconSprites <Obey$Dir>.!Sprites
  10. Run <Obey$Dir>.ChkSpr
  11. WimpSlot -min 150K -max 150K
  12. |Load any modules required now
  13. RMEnsure InterfaceManager 2.00 RMLoad <EvntShell$Path>Interface
  14. RMEnsure InterfaceManager 2.00 Error Couldn't load Interface module
  15. RMEnsure MenuUtils 0.11 RMLoad <EvntShell$Path>MenuUtils
  16. RMEnsure MenuUtils 0.11 Error 0 Error Couldn't load MenuUtils Module
  17. RMEnsure MessageTrans 0.06 RMLoad <EvntShell$Path>MsgTrans
  18. RMEnsure MessageTrans 0.06 Error Couldn't load MsgTrans Module
  19. |And check that there is still enough memory!
  20. WimpSlot -min 150K -max 150K
  21. Run <Redraw2$Dir>.!Redraw2 %*0
  22.