home *** CD-ROM | disk | FTP | other *** search
/ RISC DISC 2 / RISC_DISC_2.iso / _riscdisc2 / resources / _arcfs / _boot next >
Encoding:
Text File  |  1995-09-13  |  1.4 KB  |  38 lines

  1. | !Boot File 0.73 for ArcFS version 0.73, ArcFSFiler version 0.73
  2. | Written by M.Smith 1st April 1995
  3. |
  4. | This is not P.D., but may be copied subject to conditions
  5. | in the Licence file.
  6. |
  7. | Note - This Filing System is read only
  8. | Use the commercial read/write ArcFS to create archives.
  9. |
  10. Set ArcFS$Dir <Obey$Dir>
  11. IconSprites <ArcFS$Dir>.!Sprites
  12. |
  13. Set File$Type_FE4 DOS
  14. Set File$Type_DDC Archive
  15. Set File$Type_3FB ArcFSArc
  16. |
  17. Set Alias$@RunType_DDC Run <ArcFS$Dir>.!Run %%*0
  18. Set Alias$@RunType_3FB Run <ArcFS$Dir>.!Run %%*0
  19. IF "Magazine$Disc" = "-noboot" Then Obey
  20. IF "<ArcFS$Dir>" <> "ADFS::AUNov95.$.!ArcFS" Then Obey
  21. RMEnsure UtilityModule 3.00 Obey
  22. Filer_CloseDir ADFS::AUNov95.$
  23. Set ArcFSResources$Dir arcfs#Resources:$
  24. Set ArcFSFiler$Path Resources:$.Resources.ArcFSFiler. 
  25. Set Alias$OSSpec RMEns. ArcFSMemMan 1.30 RMLoad <ArcFS$Dir>.MemManDyn
  26. RMEns. UtilityModule 3.50 Set Alias$OSSpec RMEns. ArcFSMemMan 1.10 RMLoad <ArcFS$Dir>.MemManRMA
  27. OSSpec
  28. RMEns. ArcFS 0.73 Run <ArcFS$Dir>.ArcFS
  29. OpenArc. <ArcFS$Dir>.Resources
  30. Set Alias$OSSpec RMEns. ImageFSFix 0.11 RMLoad <ArcFSResources$Dir>.ImageFSFix
  31. RMEns. UtilityModule 3.00 Set Alias$OSSpec RMEns. ResourceFS 0.01 RMLoad <ArcFSResources$Dir>.ResourceFS
  32. OSSpec
  33. Unset Alias$OSSpec
  34. RMEns. ArcFSFiler 0.73 RMLoad <ArcFSResources$Dir>.ArcFSFiler
  35. CloseArc. Resources
  36. Filer_OpenDir ADFS::AUNov95.$
  37. | This file has been innoculated against the Extend Virus
  38. ||ΓΏ