1. 放到/Library/Scripts里,例如用Spark设置快捷键全局启动
2. 把这些代码放到spark里面,让spark来执行速度会非常快,比放在系统里会快很多
Move Window Left.scpt:
tell application "System Events"
set _everyProcess to every process
repeat with n from 1 to count of _everyProcess
set _frontMost to frontmost of item n of _everyProcess
if _frontMost is true then set _frontMostApp to process n
end repeat
set _windowOne to window 1 of _frontMostApp
set pos to position of _windowOne
set y to item 2 of pos
set position of _windowOne to {0, y}
end tell
Move Window Right.scpt:
--set _screenWidth to 1440 -- Change this number to your screen width
tell application "Finder"
set _b to bounds of window of desktop
set _screenWidth to item 3 of _b
end tell
tell application "System Events"
set _everyProcess to every process
repeat with n from 1 to count of _everyProcess
set _frontMost to frontmost of item n of _everyProcess
if _frontMost is true then set _frontMostApp to process n
end repeat
set _windowOne to window 1 of _frontMostApp
set pos to position of _windowOne
set y to item 2 of pos
set _size to size of _windowOne
set _width to item 1 of _size
set position of _windowOne to {_screenWidth - _width, y}
end tell