Re: Folder Actions Part 2 - Sweets & Sour
Re: Folder Actions Part 2 - Sweets & Sour
- Subject: Re: Folder Actions Part 2 - Sweets & Sour
- From: Andy Wylie <email@hidden>
- Date: Sat, 11 Aug 2001 02:32:43 +1200
on 10/8/01 6:12 AM, Mr Tea at email@hidden wrote:
>
This from Andy Wylie - dateline 9/8/01 12.07 pm:
>
>
> Mr Greg's Akua can contort popups every which way with it's 'reposition
>
> window'
>
>
Hmm. Not OMM, apparently. When I use this command the target window gets
>
repositioned to an imaginary monitor suspended just below my ceiling. More
>
specifically, it seemed that any window I threw this command at, popup or
>
otherwise, ended up at (-60, -5274), so I had to press my face real close to
>
the screen and squint up under the top edge just to see it :-)
>
Try this transcription of Jolly's broken 'tell block abuse' record glued
together in a different sequence and played @ 33 1/3 rpm...
try
set aWind to (choose from list (get name of windows of application
"Finder") with prompt "time to blow")
if result = false then return
tell application "Finder"
activate
set {x, y, xx, yy} to reposition window aWind
set oldTitle to aWind
repeat 3 times
repeat 10 times
reposition window aWind to {x, y, xx, yy} titled "out"
set aWind to "out"
set {x, y, xx, yy} to {x - 1, y + 1, xx + 1, yy - 1}
end repeat
repeat 10 times
reposition window aWind to {x, y, xx, yy} titled "in"
set aWind to "in"
set {x, y, xx, yy} to {x + 1, y - 1, xx - 1, yy + 1}
end repeat
end repeat
repeat 3 times
reposition window aWind with collapsing
set {x, y, xx, yy} to {x + 1, y - 1, xx - 1, yy + 1}
reposition window aWind without collapsing
end repeat
reposition window aWind titled oldTitle
end tell
on error
say "no blow"
end try
_____________________________
check out
http://homepage1.nifty.com/ton_b
_____________________________ Andy