home *** CD-ROM | disk | FTP | other *** search
/ AMIGA PD 1 / AMIGA-PD-1.iso / Meeting_Pearls_II / SetAttributesDir / Pearls / disk / SetAttributes
Text File  |  1995-03-09  |  2KB  |  72 lines
  1. .k ScriptDir/A
  2. Failat 21
  3. Protect "CD-ROM" "RWED"
  4. FileNote "CD-ROM" ""
  5. CD "CD-ROM"
  6. Assign ScriptDir<$$>.3: "<ScriptDir>"
  7. Execute "ScriptDir<$$>.3:CD-ROM/SetAttributes" "ScriptDir<$$>.3:CD-ROM"
  8. CD /
  9. Protect "Disk" "RWED"
  10. FileNote "Disk" ""
  11. CD "Disk"
  12. Assign ScriptDir<$$>.3: "<ScriptDir>"
  13. Execute "ScriptDir<$$>.3:Disk/SetAttributes" "ScriptDir<$$>.3:Disk"
  14. CD /
  15. Protect "DiskMon" "RWED"
  16. FileNote "DiskMon" ""
  17. CD "DiskMon"
  18. Assign ScriptDir<$$>.3: "<ScriptDir>"
  19. Execute "ScriptDir<$$>.3:DiskMon/SetAttributes" "ScriptDir<$$>.3:DiskMon"
  20. CD /
  21. Protect "File" "RWED"
  22. FileNote "File" ""
  23. CD "File"
  24. Assign ScriptDir<$$>.3: "<ScriptDir>"
  25. Execute "ScriptDir<$$>.3:File/SetAttributes" "ScriptDir<$$>.3:File"
  26. CD /
  27. Protect "HardDisk" "RWED"
  28. FileNote "HardDisk" ""
  29. CD "HardDisk"
  30. Assign ScriptDir<$$>.3: "<ScriptDir>"
  31. Execute "ScriptDir<$$>.3:HardDisk/SetAttributes" "ScriptDir<$$>.3:HardDisk"
  32. CD /
  33. Protect "Misc" "RWED"
  34. FileNote "Misc" ""
  35. CD "Misc"
  36. Assign ScriptDir<$$>.3: "<ScriptDir>"
  37. Execute "ScriptDir<$$>.3:Misc/SetAttributes" "ScriptDir<$$>.3:Misc"
  38. CD /
  39. Protect "Salv" "RWED"
  40. FileNote "Salv" ""
  41. CD "Salv"
  42. Assign ScriptDir<$$>.3: "<ScriptDir>"
  43. Execute "ScriptDir<$$>.3:Salv/SetAttributes" "ScriptDir<$$>.3:Salv"
  44. CD /
  45. Protect "SCSI" "RWED"
  46. FileNote "SCSI" ""
  47. CD "SCSI"
  48. Assign ScriptDir<$$>.3: "<ScriptDir>"
  49. Execute "ScriptDir<$$>.3:SCSI/SetAttributes" "ScriptDir<$$>.3:SCSI"
  50. CD /
  51. Protect "Admin" "RWD"
  52. FileNote "Admin" ""
  53. Protect "Admin.info" "RWD"
  54. FileNote "Admin.info" ""
  55. Protect "CD-ROM.info" "RWD"
  56. FileNote "CD-ROM.info" ""
  57. Protect "Disk.info" "RWD"
  58. FileNote "Disk.info" ""
  59. Protect "DiskMon.info" "RWD"
  60. FileNote "DiskMon.info" ""
  61. Protect "File.info" "RWD"
  62. FileNote "File.info" ""
  63. Protect "HardDisk.info" "RWD"
  64. FileNote "HardDisk.info" ""
  65. Protect "Misc.info" "RWD"
  66. FileNote "Misc.info" ""
  67. Protect "Salv.info" "RWD"
  68. FileNote "Salv.info" ""
  69. Protect "SCSI.info" "RWD"
  70. FileNote "SCSI.info" ""
  71. Assign ScriptDir<$$>.3:
  72.