home *** CD-ROM | disk | FTP | other *** search
/ The Datafile PD-CD 3 / PDCD_3.iso / comms / u2 / !U2 / !Run < prev    next >
Text File  |  1993-04-24  |  685b  |  23 lines

  1. |
  2. |  !Run file for !U2 v2.00 and greater
  3. |
  4. If "<Wimp$Scrap>"="" Then Error Scrap directory not found.
  5. If "<System$Dir>"="" Then Error System directory not found.
  6. |
  7. RMEnsure SharedCLibrary 3.50 RMLoad System:Modules.Clib
  8. RMEnsure SharedCLibrary 3.50 Error You need Clib 3.50 or later
  9. |
  10. If "<U2$Running>"<>"" Then Error !U2 already running.
  11. |
  12. Set File$Type_00d Decoded
  13. Set File$Type_00e Encoded
  14. Set File$Type_7FE UUEncode
  15. Set U2$Dir <Obey$Dir>
  16. SetMacro Alias$@RunType_00E If "<U2$Running>"="" Then Run <U2$Dir>.!Run %%*0
  17. SetMacro Alias$@RunType_7FE If "<U2$Running>"="" Then Run <U2$Dir>.!Run %%*0
  18. |
  19. WimpSlot -min 64k -max 128k
  20. IconSprites <U2$Dir>.!Sprites
  21. |
  22. Run <U2$Dir>.!RunImage %*0
  23.