activate application "SystemUIServer" tell application "System Events" tell process "SystemUIServer" set menu_descriptions to value of attribute "AXDescription" of menu bar items of menu bar 1 set found_iChat_menu to false repeat with i from 1 to length of menu_descriptions if item i of menu_descriptions is "iChat menu extra" then set found_iChat_menu to true exit repeat end if end repeat if found_iChat_menu is false then display dialog ("iChat menu is not enabled") buttons "OK" return end if tell menu bar item i of menu bar 1 click -- Change the word "Available" below to choose a different status. -- Other default choices are: -- "Current iTunes Track" -- "Away" -- If you have added custom status messages, you can -- select them in the same way tell menu item "Available" of front menu click end tell end tell end tell end tell