Applescript 切换屏幕自动机脚本

Applescript 切换屏幕自动机脚本,applescript,fullscreen,osx-mavericks,Applescript,Fullscreen,Osx Mavericks,我经常发现我的mac电脑(在办公室里有两个屏幕)并不总是记得关闭应用程序的屏幕。我有时还想切换应用程序的屏幕,例如使用启动栏,所以我开始搜索并复制一个苹果脚本,但它不能正常工作 如果一个应用程序是全屏模式,脚本只会更改应用程序的画布-Safari页面-而不是整个应用程序,所以我决定检查状态,然后退出“全屏”,然后切换。这导致了问题,脚本退出全屏,在第二次尝试时,屏幕被切换…我是一个新手,所以我不知道该怎么做了 在小牛队工作 # by kg # Version 1.0 # Date: Do. 20

我经常发现我的mac电脑(在办公室里有两个屏幕)并不总是记得关闭应用程序的屏幕。我有时还想切换应用程序的屏幕,例如使用启动栏,所以我开始搜索并复制一个苹果脚本,但它不能正常工作

如果一个应用程序是全屏模式,脚本只会更改应用程序的画布-Safari页面-而不是整个应用程序,所以我决定检查状态,然后退出“全屏”,然后切换。这导致了问题,脚本退出全屏,在第二次尝试时,屏幕被切换…我是一个新手,所以我不知道该怎么做了

在小牛队工作

# by kg
# Version 1.0
# Date: Do. 20. März, 2014
# isFullscreen and toggleFullscreen from http://stackoverflow.com/questions/8215501/applescript-use-lion-fullscreen
set leftScreen to {-1440, 0}
set rightScreen to {0, 0}
set wasFullScreen to false




set myParam to isFullScreen()
if myParam is equal to true then
    toggleFullScreen()
    set wasFullScreen to true
end if
log "end if 1 - toggle fullscreen to little"
changepos()
if wasFullScreen is equal to true then
    toggleFullScreen()
end if
log "end if 2 - toggle fullscreen state to old"


on changepos()
    tell application "System Events"
        set theName to name of the first process whose frontmost is true
        set winPos to get position of first window of application process theName
        log "habe position von Fenster von " & theName & winPos
        --display dialog "na supa"
        if (item 1 of winPos is greater than or equal to "0") then
            set position of first window of application process theName to {-1440, 0}
            --display dialog "left screen"
        else
            set position of first window of application process theName to {0, 0}
            --display dialog "right screen"
        end if
    end tell
    --display dialog "aus"
    return true
end changepos

on isFullScreen()
    tell application "System Events"
        try
            tell front window of (first process whose frontmost is true)
                return get value of attribute "AXFullScreen"
            end tell
        end try
    end tell
    return false
end isFullScreen

on toggleFullScreen()
    set isFullScreenAfter to false
    tell application "System Events"
        try
            tell front window of (first process whose frontmost is true)
                set isFullScreen to get value of attribute "AXFullScreen"
                set isFullScreenAfter to not isFullScreen
                set value of attribute "AXFullScreen" to isFullScreenAfter
            end tell
        end try
    end tell
    return isFullScreenAfter
end toggleFullScreen

好吧,我无法在applescript中找到一个方法,但我发现一个名为的应用程序非常整洁。它可以在屏幕之间切换,为您做更多的事情

干杯。公斤