GUI()
tell application "QuickTime Player" to activate
tell application "System Events"
tell process "QuickTime Player"
click menu item "Enter Full Screen" of menu 1 of menu bar item "View" of menu bar 1
end tell
end tell
on GUI()
tell application "System Events"
if UI elements enabled then
else
repeat until UI elements enabled is true
beep
tell application "System Preferences"
activate
set current pane to pane "com.apple.preference.universalaccess"
end tell
tell application "Finder"
activate
display dialog "UI element scripting is not enabled. Please check \"Enable access for assistive devices\" Then click \"ok\""
end tell
end repeat
end if
end tell
end GUI