Rotate InterMapper Maps AppleScript (was RE: [IM-Talk] Notifications Request/Revamp)

[Mark Persiko]

Hi Bill-

Once I saved your AppleScript as an application and launched it to keep
it running in the background, it worked!  Thanks so much!  

Mark P.

- Mark C. Persiko, Network Engineer
- IT Division, Boulder Valley Public Schools

-----Original Message-----
From: InterMapper-Talk@list.dartware.com
[mailto:[EMAIL PROTECTED] On Behalf Of William W.
Fisher
Sent: Friday, May 06, 2005 4:39 PM
To: InterMapper Discussion
Subject: Re: [IM-Talk] Notifications Request/Revamp

On May 6, 2005, at 4:28 PM, Mark Persiko wrote:

> I need to rotate my map windows on one screen.  I am running 
> InterMapper
> Console 4.3b2 on Mac OS X 10.3.9.  The AppleScript for rotating maps
> only works with the traditional InterMapper, and requires Classic OS 9
> to run.  I tested the script with Script Editor in OS X, but it fails 
> on
> a class object error.

Mark:

This script seems to work in Mac OS X 10.3.9 after you click the 
"Enable access for assistive devices" in the Universal Access system 
preference pane.

Bill Fisher
Dartware, LLC


property gWindowIndex : 0

on idle
        -- Click on the menu item for each Map window listed in
InterMapper 
Console's "Window" menu.
        -- Every 10 seconds click on a different menu item to bring that

window to the front.

        tell application "InterMapper Console" to activate
        tell application "System Events"
                tell process "InterMapper Console"
                        set windowCount to (count of menu items of menu
"Window" of menu bar 
1) - 8
                        if windowCount > 0 then
                                if gWindowIndex >= windowCount then
                                        set gWindowIndex to 0
                                end if
                                click menu item (9 + gWindowIndex) of
menu "Window" of menu bar 1
                                set gWindowIndex to gWindowIndex + 1
                        end if
                end tell
        end tell
        return 10 -- rotate every 10 seconds
end idle


____________________________________________________________________
List archives: 
http://www.mail-archive.com/intermapper-talk%40list.dartware.com/
To unsubscribe: send email to: [EMAIL PROTECTED]



____________________________________________________________________
List archives: http://www.mail-archive.com/intermapper-talk%40list.dartware.com/
To unsubscribe: send email to: [EMAIL PROTECTED]