home *** CD-ROM | disk | FTP | other *** search
/ The Datafile PD-CD 3 / PDCD_3.iso / utilities / utilst / wordcount / !WordCount / !Run next >
Text File  |  1995-01-27  |  1KB  |  28 lines
  1. | >!Run
  2. | ——————————————————————————————————————————————————————————————————————————
  3. |   WordCount                                   Version 1.00 (29 Mar 1994)
  4. | ——————————————————————————————————————————————————————————————————————————
  5. |       This application is © 1994 James Freeman. All Rights Reserved.
  6.  
  7. RMEnsure UtilityModule 3.10 Error This application is only suitable for use with RISC OS 3.10 or later versions
  8. |
  9. Set WordCount$Dir <Obey$Dir>
  10. IconSprites <WordCount$Dir>.!Sprites
  11. IconSprites <WordCount$Dir>.Resources.Pointers
  12. |
  13. | Can't load a new version of FontWindow while old version is active..
  14. |
  15. UnSet FontWindow$Flag
  16. RMEnsure FontWindow 0.00 Set FontWindow$Flag X
  17. RMEnsure FontWindow 1.22 If "<FontWindow$Flag>" <> "X" Then Filer_OpenDir <WordCount$Dir>.Resources
  18. RMEnsure FontWindow 1.22 If "<FontWindow$Flag>" <> "X" Then Error The version of FontWindow you are using is too old. Please use the version supplied with WordCount instead: the filer window containing it has been opened.
  19. UnSet FontWindow$Flag
  20. |
  21. | ..otherwise we can use the usual two RMEnsure lines:
  22. |
  23. RMEnsure FontWindow 1.22 RMLoad <WordCount$Dir>.Resources.FontWindow
  24. RMEnsure FontWindow 1.22 Error WordCount needs FontWindow version 1.22 or later
  25. |
  26. WimpSlot -min 48K -max 48K
  27. Run <WordCount$Dir>.!RunImage -Fonts 3 -MenuFont Trinity.Bold.Italic %*0
  28.