home *** CD-ROM | disk | FTP | other *** search
/ RISC DISC 1 / RISC_DISC_1.iso / pd_share / code / desklib / PopUps / !PopServer / !Run < prev    next >
Encoding:
Text File  |  1993-05-24  |  664 b   |  20 lines
  1. | !Run file for !PopServer
  2.  
  3. Set PopUpServer$Dir <Obey$Dir>
  4. IconSprites <PopUpServer$Dir>.!Sprites
  5. IconSprites <PopUpServer$Dir>.IconSprs
  6.  
  7. RMEnsure SharedCLibrary 3.75 RMLoad System:Modules.CLib
  8. RMEnsure SharedCLibrary 3.75 Error You'll need SharedCLibrary 3.75 or later to run me, I'm afraid
  9. RMEnsure PopUpManager 0.86 RMLoad <PopUpServer$Dir>.PopUpMangr
  10.  
  11. | Switch between RISC OS 3 and RISC OS 2 versions of the templates files...
  12. Set PopUpServer$Templates Template3
  13. Set Wimp$Vsn 3
  14. RMEnsure WindowManager 3.16 Set Wimp$Vsn 2
  15. IF "<Wimp$Vsn>" = "2" THEN Set PopUpServer$Templates Template2
  16. UnSet Wimp$Vsn
  17.  
  18. WimpSlot -min 32k -max 32k
  19. Run <PopUpServer$Dir>.!RunImage
  20.