tell application "System Preferences" activate set current pane to pane "com.apple.preference.energysaver" tell application "System Events" get properties tell process "System Preferences" tell window "Energy Saver" tell group 1 tell tab group 1 click radio button "Options" click pop up button 1 click menu item "Highest" of menu "OtherViews" of pop up button 1 try click button "Click the lock to make changes." of window  "Network" of process "System Preferences" of  application "System Events" end try end tell end tell end tell end tell end tell end tell ignoring application responses tell application "System Preferences" to quit display dialog "CPU Speed set to Highest" buttons {"Ok"} giving up after 2 end ignoring