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