home *** CD-ROM | disk | FTP | other *** search
/ AMIGA PD 1 / AMIGA-PD-1.iso / Meeting_Pearls_II / SetAttributesDir / Pearls / disk / Salv / SetAttributes
Text File  |  1995-03-09  |  1KB  |  36 lines

  1. .k ScriptDir/A
  2. Failat 21
  3. Protect "UnDel" "RWED"
  4. FileNote "UnDel" ""
  5. CD "UnDel"
  6. Assign ScriptDir<$$>.4: "<ScriptDir>"
  7. Execute "ScriptDir<$$>.4:UnDel/SetAttributes" "ScriptDir<$$>.4:UnDel"
  8. CD /
  9. Protect "UnDel.info" "RWD"
  10. FileNote "UnDel.info" ""
  11. Protect "DiskSalv2.info" "RWD"
  12. FileNote "DiskSalv2.info" ""
  13. Protect "DiskSalv2" "RWED"
  14. FileNote "DiskSalv2" ""
  15. CD "DiskSalv2"
  16. Assign ScriptDir<$$>.4: "<ScriptDir>"
  17. Execute "ScriptDir<$$>.4:DiskSalv2/SetAttributes" "ScriptDir<$$>.4:DiskSalv2"
  18. CD /
  19. Protect "UnDelete" "RWED"
  20. FileNote "UnDelete" ""
  21. CD "UnDelete"
  22. Assign ScriptDir<$$>.4: "<ScriptDir>"
  23. Execute "ScriptDir<$$>.4:UnDelete/SetAttributes" "ScriptDir<$$>.4:UnDelete"
  24. CD /
  25. Protect "UnDelete.info" "RWD"
  26. FileNote "UnDelete.info" ""
  27. Protect "ARestaure" "RWED"
  28. FileNote "ARestaure" ""
  29. CD "ARestaure"
  30. Assign ScriptDir<$$>.4: "<ScriptDir>"
  31. Execute "ScriptDir<$$>.4:ARestaure/SetAttributes" "ScriptDir<$$>.4:ARestaure"
  32. CD /
  33. Protect "ARestaure.info" "RWD"
  34. FileNote "ARestaure.info" ""
  35. Assign ScriptDir<$$>.4:
  36.