Skip to content

Instantly share code, notes, and snippets.

@vrybas

vrybas/end.scpt

Forked from nclark/end.scpt
Created August 15, 2012 02:56
Show Gist options
  • Save vrybas/3355255 to your computer and use it in GitHub Desktop.
Save vrybas/3355255 to your computer and use it in GitHub Desktop.
Download ZIP
applescripts for pomodoro.app
Raw
end.scpt
tell application "Finder"
if (name of every application process) contains "Skype" then
tell application "Skype"
send command "SET USERSTATUS ONLINE" script name "pomodoro"
send command "SET PROFILE MOOD_TEXT " script name "pomodoro"
end tell
end if
end tell
tell application "Twitter" to activate
tell application "Notify" to activate
tell application "Messages"
set status to available
end tell
tell application "System Events"
tell process "Notification Center"
key down option
click first menu bar's first menu bar item
key up option
end tell
end tell
Raw
every_1_min.scpt
tell application "Finder"
if (name of every application process) contains "Skype" then
tell application "Skype"
send command "SET PROFILE MOOD_TEXT Available in $time minutes" script name "pomodoro"
end tell
end if
end tell
tell application "Messages"
set status message to "Busy. Available in $time min. Leave a message"
end tell
Raw
interrupt.scpt
tell application "Finder"
if (name of every application process) contains "Skype" then
tell application "Skype"
send command "SET USERSTATUS ONLINE" script name "pomodoro"
send command "SET PROFILE MOOD_TEXT " script name "pomodoro"
end tell
end if
end tell
tell application "Messages"
set status to available
end tell
tell application "System Events"
tell process "Notification Center"
key down option
click first menu bar's first menu bar item
key up option
end tell
end tell
Raw
reset.scpt
tell application "Finder"
if (name of every application process) contains "Skype" then
tell application "Skype"
send command "SET USERSTATUS ONLINE" script name "pomodoro"
send command "SET PROFILE MOOD_TEXT " script name "pomodoro"
end tell
end if
end tell
tell application "Twitter" to activate
tell application "Notify" to activate
tell application "Messages"
set status to available
end tell
tell application "System Events"
tell process "Notification Center"
key down option
click first menu bar's first menu bar item
key up option
end tell
end tell
Raw
start.scpt
tell application "Finder"
if (name of every application process) contains "Skype" then
tell application "Skype"
send command "SET USERSTATUS DND" script name "pomodoro"
send command "SET PROFILE MOOD_TEXT Available in 25 minutes" script name "pomodoro"
end tell
tell application "System Events"
set visible of process "Skype" to false
end tell
end if
end tell
tell application "Twitter" to quit
tell application "Notify" to quit
tell application "Messages"
set status to away
set status message to "Busy. Available in $duration min. Leave a message"
end tell
tell application "System Events"
tell process "Notification Center"
key down option
click first menu bar's first menu bar item
key up option
end tell
end tell
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment