Posted at


More than 1 year has passed since last update.



property _delaySecondsForLaunch : 10

property _leftMovieFilePath : "/Users/test/Downloads/bbb_sunflower_2160p_60fps_normal.mp4"
property _rightMovieFilePath : "/Users/test/Downloads/bbb_sunflower_1080p_60fps_normal.mp4"

set msg to "Launching Players ... "
display dialog msg giving up after _delaySecondsForLaunch

(* check screen size *)
tell application "Finder"
set {x0, y0, screenWidth, screenHeight} to get bounds of window of desktop
end tell
-- display dialog "screen width: " & screenWidth & " / screen height: " & screenHeight with title "Screen Size"

(* open movies *)
tell application "QuickTime Player"

open _leftMovieFilePath
delay 1

open _rightMovieFilePath
delay 1
tell every document
set looping to true -- set loop
end tell
end tell

(* Move right QuickTime Player to right display *)
tell application "System Events" to tell process "QuickTime Player"
tell window 1
set position to {screenWidth / 2, 0}
delay 3
end tell
end tell

(* play movies *)
tell application "QuickTime Player"
present every document -- set fullscreen
play every document -- play!
end tell


テスト環境はQuickTime Player 10.4 on MacOS 10.12.5(Sierra)。

簡単にできると思ったら、どうやらMacOS 10.10(Mavericks)以降からQuikcTime APIの内部仕様が変わったらしく、 set bounds が効かなくてハマった。