1

ボリュームキーの機能を複製しようとしていますが、applescript で. 私はそれを機能させることはできません。音量を上げるボタンは音量を最大にし、音量を下げるボタンは同じことを行います。私が間違っていることを知っている人はいますか?私のコードは次のとおりです。

-- increase volume

on increaseVolumeHandler_(sender)
    tell application "finder"
    set theOutput to output volume of (get volume settings)
    set volume output volume (theOutput + 6.25)
    end tell
    do shell script "afplay /System/Library/Sounds/Pop.aiff"
end increaseVolumeHandler_

-- decrease volume

on decreaseVolumeHandler_(sender)
    tell application "finder"
    set theOutput to output volume of (get volume settings)
    set volume output volume (theOutput - 6.25)
    end tell
    do shell script "afplay /System/Library/Sounds/Pop.aiff"
end decreaseVolumeHandler_
4

1 に答える 1