slideshow.applescript

--タイトル取得からの〜
tell application "Preview"
	set n to name of window 1
	--Window名から全体のページ数と現在のページ数をパースする
	--それを監視しながらめくっていく
end tell

--全画面化
tell application "Preview" to activate
tell application "System Events"
	keystroke "f" using {control down, command down}
	delay 3
end tell

--ページめくり
tell application "Preview" to activate
repeat 10 times
	tell application "System Events"
		key code 125
	end tell
	delay 3
end repeat