home *** CD-ROM | disk | FTP | other *** search
/ Really Useful CD 1 / ReallyUsefulCD1.iso / extras / graphics / _drawstrip / _run < prev    next >
Encoding:
Text File  |  1991-03-17  |  384 b   |  13 lines
  1. | DrawStrip
  2. if "<System$Path>" = "" then Error 0 System resources cannot be found
  3. if "<Font$Prefix>" = "" then Error 0 Fonts cannot be found 
  4.  
  5. | Usethe next 2 lines if you want to set the fontsize
  6. | copy MemAlloc into !System.modules first
  7. |RMEnsure MemAlloc 0 System:modules.MemAlloc
  8. |Fontsize 128
  9.  
  10. WimpSlot -min 48K -max 48K
  11. IconSprites <Obey$Dir>.!Sprites
  12. Run <Obey$Dir>.!RunImage
  13.