Applescript gurus please help - re Bluetooth mose freeze

Question

Quite a number of people are experiencing problems with a Bluetooth mouse freezing in Leopard. (see eg thread 6108612)
One fix that works for me is to use a USB mouse to turn Bluetooth off and turn it on again. This seems to reconnect the Bluetooth mouse.
Until a fix is found for this problem, one quick solution would be to run a short Applescript command to turn off bluetooth then turn it on again, and attach this to a keystroke combo in Quicksilver (for example). This way a simple keystroke would fix the disconnect.
My problem is, being very new to Apple, I don't know enough to write such a script.
The psuedo code might look something like:
Open System preferences
Goto Bluetooth prefs
Turn off Bluetooth
Turn on Bluetooth
Exit
Could one of the Applescript sages out there please help?
TIA.
DN

Answer 1

I'm not at all a script gur as you you'll see from my script which is half-backed but it works for me.
In order for it to work the bluetooth button should be showing in the menu bar.
here is my script.
tell application "System Events" to tell the front menu bar of process "SystemUIServer"
tell menu bar item 1
click
tell 2nd menu item of front menu
click
end tell
end tell
end tell
tell application "System Events" to tell the front menu bar of process "SystemUIServer"
tell menu bar item 1
click
tell 2nd menu item of front menu
click
end tell
end tell
end tell
This script will only work if the bluetooth is the first item in the menu bar on the left side. It is on my computer (the last is spotlight) and I think that's always true. Otherwise one needs to adjust the value "1" in the above script. A better way would be to make the script cycle through menu items till it finds the bluetooth button but I'm too lazy to figure out how to do that.