Set Microsoft Lync status using AppleScript

gistfile1.applescript

--
tell application "Microsoft Lync"
    activate
end tell

tell application "System Events"
	tell process "Microsoft Lync"
		tell menu bar 1
			tell menu bar item "Status"
				tell menu "Status"
					click menu item "Available"
				end tell
			end tell
		end tell
		set value of text field 1 of window "Microsoft Lync" to "Custom Status"
	end tell
end tell