home *** CD-ROM | disk | FTP | other *** search
/ The Datafile PD-CD 4 / DATAFILE_PDCD4.iso / utilities / utilst / texturgdn / !TexturGdn / !Run < prev    next >
Text File  |  1996-09-28  |  1KB  |  33 lines
  1. |
  2. | > !Run for !TextureGdn
  3. |
  4. Run <Obey$Dir>.Library.Utilities.Check
  5. |
  6. IF "<TextureGdnRunning$Flag>" <> "" THEN Error Texture Garden is already running
  7. |
  8. Unset TextureGdnRunning$Flag
  9. |
  10. RMEnsure ColourTrans 1.07 If "<System$Path>" = "" Then Error System resources could not be found (ColourTrans module required).
  11. RMEnsure ColourTrans 1.07 If "<System$Path>" <> "" Then RMLoad System:Modules.Colours
  12. RMEnsure ColourTrans 1.07 Error Please update your copy of !System to one containing ColourTrans (Colours) 1.07 or later
  13. |
  14. RMEnsure MessageTrans 0.06 If "<System$Path>" = "" Then Error System resources could not be found (MessageTrans module required).
  15. RMEnsure MessageTrans 0.06 If "<System$Path>" <> "" Then RMLoad System:Modules.MsgTrans
  16. RMEnsure MessageTrans 0.06 Error Please update your copy of !System to one containing MessageTrans (MsgTrans) 0.06 or later
  17. |
  18. RMEnsure SpriteExtend 0.46 Error Unable to find SpriteExtension Module 0.46 or later
  19. |
  20. If "<Wimp$Scrap>" = "" Then Error !Scrap needs to have been seen by the filer for this program to work properly.
  21. |
  22. IconSprites <Obey$Dir>.!Sprites
  23. |
  24. Set TextureGdn$Dir <Obey$Dir>
  25. Set TextureGdnRes$Dir <TextureGdn$Dir>.Resources
  26. Set TextureGdnPalette$Dir <TextureGdn$Dir>.Textures.Palette
  27. Set TextureGdnAnimation$Dir <TextureGdn$Dir>.Animations
  28. Set TextureGdnRMStore$Dir <TextureGdn$Dir>.RMStore
  29. Set TextureGdnChangeFSI$Mem 300
  30. |
  31. WimpSlot -min 224k -max 224k
  32. |
  33. Run <Obey$Dir>.!RunImage %0