home *** CD-ROM | disk | FTP | other *** search
/ ARM Club 1 / ARM_CLUB_CD.iso / contents / apps / archive / progs / caifs / !CAIFS_!Run < prev    next >
Encoding:
Text File  |  1992-04-04  |  632 b   |  18 lines
  1. | !Run for CAIFS Filer
  2. | By Daniel Oram
  3. If "<CAIFS$Dir>" = "" THEN Set CAIFS$Running "No"
  4. Set CAIFS$Dir <Obey$Dir>
  5. If CAIFS$Running = "Yes" THEN ERROR "Only one copy of the CAIFS filer should be running at any one time"
  6. Set S$S "No"
  7. RMEnsure CAIFS 1.44 Set S$S "Yes"
  8. If S$S="No" THEN ERROR "The read/write CAIFS module is currently loaded, use read/write filer."
  9. UnSet S$S
  10. RMEnsure CAIFS 0.44 RMLoad <CAIFS$Dir>.CAIFS
  11. FixRMA 0
  12. RMEnsure AutoArchive 0.01 RMLoad <CAIFS$Dir>.Program.AutoCr
  13. SpritesOn
  14. IconSprites <CAIFS$Dir>.Program.Sprites
  15. IconSprites <CAIFS$Dir>.!Sprites
  16. WimpSlot -min 32K -max 32K
  17. Run <CAIFS$Dir>.Program.!Filer %*0
  18.