Reply To: Script to set fill and overprint of all images in named layer?

Sipping from here and there I put together this one (in AppleScript), in case someone ever finds it useful:

tell application “Adobe InDesign CC 2017”
tell document 1
try
set theImages to all graphics of layer “C”
repeat with thisImage in theImages
set the properties of thisImage to {fill color:swatch “C=100 M=0 Y=0 K=0”}
end repeat
end try
try
set theImages to all graphics of layer “M”
repeat with thisImage in theImages
set the properties of thisImage to {fill color:swatch “C=0 M=100 Y=0 K=0”, overprint fill:true}
end repeat
end try
try
set theImages to all graphics of layer “Y”
repeat with thisImage in theImages
set the properties of thisImage to {fill color:swatch “C=0 M=0 Y=100 K=0”, overprint fill:true}
end repeat
end try
end tell
end tell