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

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