home *** CD-ROM | disk | FTP | other *** search
/ The Datafile PD-CD 5 / DATAFILE_PDCD5.iso / education / a / locus / !Locus / !Run < prev    next >
Text File  |  1996-12-23  |  1KB  |  31 lines
  1. | !Run Obey file for Locus Application
  2. Set Locus$Dir <Obey$Dir>
  3. Set LocusDat$Dir <Locus$Dir>.Resources.Data
  4. Set LocusMod$Dir <Locus$Dir>.Resources.Modules
  5. Set Locus$BasicFile <Obey$Dir>.!Locus
  6. Set Loc$File ""
  7. Set File$Type_dfe CSV
  8. Set File$Type_c7d SID
  9. Set File$Type_142 LocFile
  10. If "%0"<>"" then Set Loc$File %0
  11. Set Alias$@RunType_142 Run <Locus$Dir>.!Run %%*0
  12. IconSprites <Obey$Dir>.!Sprites
  13. Set Dummy$Path <Run$Path>,<Obey$Dir>.Resources.
  14. Run Dummy:ResFind Locus
  15. Unset Dummy$Path
  16. WimpSlot -min 600K -max 600K
  17. |Load any modules required now
  18. |RMEnsure InterfaceManager 2.00 RMLoad <LocusMod$Dir>.Interface
  19. |RMEnsure InterfaceManager 2.00 Error Couldn't load Interface module
  20. RMEnsure MenuUtils 0.11 RMLoad <LocusMod$Dir>.MenuUtils
  21. RMEnsure MenuUtils 0.11 Error 0 Error Couldn't load MenuUtils Module
  22. RMEnsure MessageTrans 0.06 RMLoad <LocusMod$Dir>.MsgTrans
  23. RMEnsure MessageTrans 0.06 Error Couldn't load MsgTrans Module
  24. RMEnsure DrawFile 1.01 RMLoad <LocusMod$Dir>.DrawFile
  25. RMEnsure DrawFile 1.01 Error Couldn't load DrawFile Module
  26. RMEnsure FontMenu 1.16 RMLoad <LocusMod$Dir>.FontMenu
  27. RMEnsure FontMenu 1.16 Error Couldn't load FontMenu Module
  28. |And check that there is still enough memory!
  29. WimpSlot -min 600K -max 600K
  30. Run <Locus$Dir>.!Locus %*0
  31.