home *** CD-ROM | disk | FTP | other *** search
/ Archive Magazine 1995 / ARCHIVE95.iso / discs / shareware / share_39 / graph_draw / !GraphDraw / !Run < prev    next >
Text File  |  1994-01-16  |  1KB  |  42 lines
  1. | > !GraphDraw.!Run
  2. |
  3. | Run file for GraphDraw
  4. |
  5. | by Chris Johnson
  6. |
  7. RMEnsure UtilityModule 3.10 Error This application is only suitable for use with RISC OS 3.10 or later versions
  8. |
  9. IconSprites <Obey$Dir>.!Sprites
  10. Set Alias$@RunType_7F3 /<Obey$Dir>.!Run %%*0
  11. Set File$Type_7F3 GraphFile
  12. |
  13. | Find path to file
  14. Set GraphDraw$Dir <Obey$Dir>
  15. |
  16. If "<Font$Prefix>"="" Then Error You need to double click on !Fonts before running this application
  17. |
  18. set temp$flag 1
  19. RMEnsure ABCLibrary 0 set temp$flag 0
  20. RMensure ABCLibrary 4.00 if "<temp$flag>" = "1" Then Error 0 Old ABCLib installed Else RMLoad <Obey$Dir>.modules.ABCLib
  21. RMensure ABCLibrary 4.00 Error You need the ABClibrary ver 4.00 or later installed
  22. |
  23. RMensure FontMenu 0 RMLoad <Obey$Dir>.modules.FontMenu
  24. RMensure FontMenu 0 Error You need the FontMenu module installed
  25. |
  26. set temp$flag 1
  27. RMEnsure CJWimpUtil 0 set temp$flag 0
  28. RMEnsure CJWimpUtil 0.12 if "<temp$flag>" = "1" Then Error 0 Old CJWimpUtil module installed Else RMLoad <Obey$Dir>.modules.cjWimpUtil
  29. RMEnsure CJWimpUtil 0.12 Error You need the CJWimpUtil module installed
  30. |
  31. set temp$flag 1
  32. RMEnsure CJdrawUtil 0 set temp$flag 0
  33. RMEnsure CJdrawUtil 0.11 if "<temp$flag>" = "1" Then Error 0 Old CJdrawUtil installed Else RMLoad <Obey$Dir>.modules.cjdrawUtil
  34. RMEnsure CJdrawUtil 0.11 Error You need the CJdrawUtil module installed
  35. unset temp$flag
  36. |
  37. | Check memory allocation
  38. WimpSlot -min 352K -max 352K
  39. |
  40. | Now start program
  41. Run <GraphDraw$Dir>.!RunImage %*0
  42.