home *** CD-ROM | disk | FTP | other *** search
/ The Datafile PD-CD 2 / DATAFILE_PDCD2.iso / commercial / poster / _poster / _run < prev    next >
Encoding:
Text File  |  1992-11-02  |  1.7 KB  |  52 lines
  1. | !Poster
  2. | Version 1.60
  3. |
  4. <Obey$Dir>.IconSprDiy <Obey$Dir>.!Sprites
  5. |IconSprites <Obey$Dir>.!Sprites
  6. if "<System$Path>" = "" then Error 0 System resources cannot be found
  7. |
  8. RMEnsure ColourTrans 0.52 RMLoad System:Modules.Colours
  9. RMEnsure ColourTrans 0.52 Error You need ColourTrans 0.52 or later
  10. |
  11. set clib$flag 0
  12. RMensure SharedClibrary 3.75 set clib$flag 1
  13. RMensure SharedClibrary 0 set clib$flag 0
  14. if "<clib$flag>"="1" then Error !!! Old shared C library !!! An old version of the shared C library (clib) is resident in memory.
  15. unset clib$flag
  16. |  
  17. | Install the shared C library (clib)
  18. | -----------------------------------
  19. |
  20. RMensure SharedClibrary 3.75 RMload System:modules.clib
  21. RMensure SharedClibrary 3.75 Error You need at least version 3.75 of the shared C library
  22. |
  23. | Install the floating point emulator
  24. | -----------------------------------
  25. |
  26. RMensure FPEmulator 2.80 RMload System:modules.FPEmulator
  27. RMensure FPEmulator 2.80 Error You need at least version 2.80 of the floating point emulator
  28. |
  29. | Grab extra memory for resources
  30. Wimpslot -min 520K -max 520K
  31. |
  32. Set Alias$@RunType_CC3 Run <Obey$Dir>.!Run %%*0
  33. Set Alias$@PrintType_CC3 Run <Obey$Dir>.!Run -Print %%*0
  34. Set File$Type_CC3 Poster
  35. |
  36. Set File$Type_C4B CmprDraw
  37. Set Alias$@RunType_C4B Run <Obey$Dir>.!Run %%*0
  38. Set Alias$@PrintType_C4B Run <Obey$Dir>.!Run -Print %%*0
  39. |
  40. | If Poster being run then make it the default drawfile editor
  41. Set Alias$@RunType_AFF Run <Obey$Dir>.!Run %%*0
  42. Set Alias$@PrintType_AFF Run <Obey$Dir>.!Run -Print %%*0
  43. Set File$Type_AFF DrawFile
  44. |
  45. If "<Poster$BorderPrefix>" = "" Then SetMacro Poster$BorderPath <Poster$BorderPrefix>.
  46. If "<Poster$BorderPrefix>" = "" Then Set Poster$BorderPrefix <Obey$Dir>
  47. |
  48. Set Poster$Dir <Obey$Dir>
  49. Wimpslot -min 448K -max 448K
  50. |
  51. Run <Poster$Dir>.!RunImage %*0
  52.