home *** CD-ROM | disk | FTP | other *** search
/ RISC DISC 1 / RISC_DISC_1.iso / pd_share / code / desklib / PopUps / !PopUpTest / !Run < prev    next >
Encoding:
Text File  |  1993-05-16  |  225 b   |  8 lines
  1. Set PopUpTest$Path <Obey$Dir>.
  2.  
  3. if "<PopUpServer$Dir>" = "" then error 1 PopUp Server (!PopServer) application has not been seen by the filer
  4.  
  5. IconSprites PopUpTest:!Sprites
  6. WimpSlot -min 32k -max 32k
  7. Run PopUpTest:!RunImage
  8.