switches to presentation mode off

Presentation_Mode_off

# Script to switch on again all needed applications after the presentation
# 
# Latest update: October 27, 2014
# work.smart.and.be.remarkable@gmail.com
# www.helmuthauser.com


set question to display dialog "Ready to switch off presenation mode?" buttons {"Yes", "Cancel"} default button 1
set answer to button returned of question

if answer is equal to "Yes" then
	
	tell application "Dropbox" to activate
	tell application "OmniFocus" to activate
	tell application "TextExpander" to activate
	tell application "nvALT" to activate
	tell application "Mail" to activate
	tell application "HazelHelper" to activate
	
	# switch off
	tell application "Caffeine" to quit
	
	# unmuted
	set volume without output muted
	
end if