Re: Code for a circle
Re: Code for a circle
- Subject: Re: Code for a circle
- From: Malcolm Fitzgerald <email@hidden>
- Date: Thu, 20 Mar 2003 08:44:19 +1100
I've been away for a week so I'm still catching up with the movers
and shakers on the list.
Paul's handlers all work beautifully but I wonder if there is a way
to generate the values using formulae. It seems to me that lists
could be obtained on the fly.
At 9:43 PM -0500 13/3/03, Paul Skinner wrote:
on NodWindow(w)
--The window will shake up and down three times.
set yvalues to {-5, -10, -14, -18, -21, -23, -25, -25, -25, -23,
-21, -18, -14, -10, -5, 0, 5, 10, 14, 18, 21, 23, 25, 25, 25, 23,
21, 18, 14, 10, 5, 0, -3, -6, -8, -11, -12, -14, -15, -15, -15, -14,
-12, -11, -8, -6, -3, 0, 3, 6, 8, 11, 12, 14, 15, 15, 15, 14, 12,
11, 8, 6, 3, 0, -2, -4, -6, -7, -8, -9, -10, -10, -10, -9, -8, -7,
-6, -4, -2, 0, 2, 4, 6, 7, 8, 9, 10, 10, 10, 9, 8, 7, 6, 4, 2, 0}
tell application "Finder"
activate
set {xPrime, yPrime} to position of w
repeat with i from 1 to length of yvalues
set position of window 1 to {(xPrime), yPrime
- (item i of yvalues)}
end repeat
set position of window 1 to {xPrime, yPrime}
end tell
end NodWindow
--
--
Malcolm Fitzgerald email@hidden
Database Manager
http://www.asauthors.org
The Australian Society of Authors ph: 02 93180877 fax: 02 93180530
_______________________________________________
applescript-users mailing list | email@hidden
Help/Unsubscribe/Archives:
http://www.lists.apple.com/mailman/listinfo/applescript-users
Do not post admin requests to the list. They will be ignored.