home *** CD-ROM | disk | FTP | other *** search
/ Acorn User 1 / AU_CD1.iso / demos / a_to_i / blinds / !Blinds / !Run < prev    next >
Text File  |  1995-01-18  |  750b  |  15 lines
  1. | !Blinds V1.06 (18-Jan-1995)
  2. | © Quantum Software
  3. | Written by Alisdair Jørgensen
  4. | Documentation by Stuart Halliday
  5. | Serial Number 12345678
  6. If "<Blinds$Loaded>" = "Yes" Then Set Blinds$Load <Obey$Dir>.Default
  7. If "<Blinds$Loaded>" = "" Then Set Blinds$Dir <Obey$Dir>
  8. IconSprites <Blinds$Dir>.!Sprites
  9. Set Blinds$IconDragged_3FB *Copy |||<Filename> |<Filename>.|||<Leafname> A~C~DF~LNQ~R~S~V
  10. RMEnsure UtilityModule 3.10 Error 0 You need RISC OS 3.10 or later to run !Blinds.
  11. If "<Wimp$ScrapDir>" = "" Then Error 0 I haven't seen !Scrap. Please open a directory display with this application and try again.
  12. If "<Blinds$Icon>" = "" Then Set Blinds$Icon On
  13. WimpSlot -min 128K -max 128K
  14. If "<Blinds$Loaded>" = "" Then Basic -quit <Blinds$Dir>.!RunImage
  15.