InDesign CS3 Drop Shadows
InDesign CS3 Drop Shadows
- Subject: InDesign CS3 Drop Shadows
- From: "Nielsen, Karen S. (Schmidt)" <email@hidden>
- Date: Tue, 4 Aug 2009 08:15:50 -0500
- Thread-topic: InDesign CS3 Drop Shadows
Hello-
I have the
following script to adjust the drop shadows on a page after it has been
rotated. The script runs fine on some macs and not on others. Either
it works or it doesn't move the shadow at all. All macs have the same
operating system (10.4.11) and the same versions of InDesign (5.0.2). The
only difference I can think of is that the macs it works on are Intel where the
others are power pc. Would that make a difference?
Any guidance
would be greatly appreciated!
Thanks,
Karen
tell
application "Adobe InDesign CS3"
activate
set rotateAngle to
display dialog "What rotation was applied to this page?" default answer ""
buttons {"Clockwise", "Counter-Clockwise"}
set rotateAngleAnswer to
text returned of rotateAngle
set directionButton to button returned of
rotateAngle
if directionButton is "Clockwise" then
set
rotateAngleAnswer to (-rotateAngleAnswer)
end if
set myPage to
name of active page of active window
tell active
document
tell page myPage
set dsList to
every item of all page items whose mode of drop shadow settings of transparency
settings is drop
set dsCount to count of items in
dsList
--set dsCount to count of every page
item
repeat with ds from 1 to
dsCount
--tell page item ds of
dsList
tell item ds of
dsList
tell transparency
settings
if drop shadow settings is true
then
set oldAngle to angle of drop
shadow settings
set newAngle to
(oldAngle + rotateAngleAnswer)
if
newAngle is greater than 180
then
set newAngle to (-(360 -
newAngle))
end
if
set properties of drop shadow
settings to {angle:newAngle}
--set
properties of drop shadow settings to {mode:drop, use global light:false,
angle:140, opacity:80.0, spread:20.0, blend mode:multiply, noise:5.0, x
offset:"1p", effect color:"Black"}
end
if
end tell
end
tell
end repeat
end tell
end
tell
end tell
---------------
Karen Nielsen
schmidt
print solutions that
deliver
ph | 507.775.7308
fx |
507.775.6655
FSC
Certified Printer
_______________________________________________
Do not post admin requests to the list. They will be ignored.
AppleScript-Users mailing list (email@hidden)
Help/Unsubscribe/Update your Subscription:
Archives: http://lists.apple.com/archives/applescript-users
This email sent to email@hidden