powermate scripts

Fine Rotate Left

tell application "System Events"
	set frontmostProcess to name of first item of (processes whose frontmost is true)
	tell process frontmostProcess
		tell window 1
			set oldSize to get size
			-- change + to - for shrinking
			-- change 100 to 5 for fine-tune mode
			set newWidth to (item 1 of oldSize) - 5
			set size to {newWidth, item 2 of oldSize}
		end tell
	end tell
end tell

Fine Rotate Right

tell application "System Events"
	set frontmostProcess to name of first item of (processes whose frontmost is true)
	tell process frontmostProcess
		tell window 1
			set oldSize to get size
			-- change + to - for shrinking
			-- change 100 to 5 for fine-tune mode
			set newWidth to (item 1 of oldSize) + 5
			set size to {newWidth, item 2 of oldSize}
		end tell
	end tell
end tell

Long Press

tell the application "Finder" to sleep

Press

tell application "Alfred 2" to run trigger "screensaver" in workflow "com.dannydebelius.screensaverpause" with argument "test"

Rotate left

tell application "System Events"
	set frontmostProcess to name of first item of (processes whose frontmost is true)
	tell process frontmostProcess
		tell window 1
			set oldSize to get size
			-- change + to - for shrinking
			-- change 100 to 5 for fine-tune mode
			set newWidth to (item 1 of oldSize) - 50
			set size to {newWidth, item 2 of oldSize}
		end tell
	end tell
end tell

Rotate right

tell application "System Events"
	set frontmostProcess to name of first item of (processes whose frontmost is true)
	tell process frontmostProcess
		tell window 1
			set oldSize to get size
			-- change + to - for shrinking
			-- change 100 to 5 for fine-tune mode
			set newWidth to (item 1 of oldSize) + 50
			set size to {newWidth, item 2 of oldSize}
		end tell
	end tell
end tell