電子書籍アプリ自動スクリーンショットApple Script解説

--変数設定
global waitSeconds
global appName
set waitSeconds to 0.5 --スクリーンショットのタイミングが合わない場合は秒数を調整する。
set appName to "Kindle" --ここにはアプリケーション名を記述してください。SafariとかKindxとか

-- OSVersinon確認 10.14 Mojaveより前のOSでは使えません。
set OSVer to do shell script "sw_vers -productVersion| cut -d '.' -f 1-2"
set nOSVer to OSVer as number
if nOSVer < 10.14 then
	display alert "このスクリプトはMojave以降のOSでしか使えません。"
	process_end()
end if
--スクリーンショット回数の指定ダイアログ表示
display dialog "範囲指定と保存先設定は済んでいますか？" & return & "" & return & "範囲指定:点線エリアを調整します。" & return & "保存先:画面右下のオプションから保存先を指定します。" & return & "最後に右下のパネルをxで閉じるか「取り込む」を押します。" buttons {"はい", "設定", "終了"} default answer "はい" with title "選択範囲設定確認Step0"
set confirmPattern to button returned of result
if confirmPattern = "終了" then
	process_end()
end if
if confirmPattern = "設定" then
	screenshottoolopen()
end if
--スクリーンショット回数の指定ダイアログ表示
display dialog "スクショする回数を入力してください。" default answer "5" with title "自動スクショStep1"
set screenShotNumber to text returned of result
--電子書籍のページ方向の指定ダイアログ表示(右開きなのか左開きなのか)
display dialog "右開き？左開き？" buttons {"左", "右"} default button 2 with title "自動スクショStep2"
set btn to button returned of result


repeat with p from 1 to screenShotNumber
	tell application appName
		activate
		tell application "System Events"
			delay waitSeconds
			shot_screenshot() of me --撮影
			--ページ送り処理
			if btn = "右" then
				--key code 123
				keystroke (ASCII character 29) -- ページ右送り
			else --左
				--key code 124
				keystroke (ASCII character 28) -- ページ左送り
			end if
			delay waitSeconds
		end tell
	end tell
end repeat

tell me
	activate
	display alert "処理が終了しました。"
end tell


--Mac ScreenShotツールでスクリーンショット取得
--このツールはMojave以降で使えます。
on shot_screenshot()
	delay 1
	tell application "System Events"
		key code 23 using {command down, shift down}
		delay waitSeconds
		key code 76
	end tell
	delay 1
end shot_screenshot
--設定のためにScreenShotToolを起動する。
on screenshottoolopen()
	tell application appName
		activate
		tell application "System Events"
			key code 23 using {command down, shift down}
		end tell
	end tell
end screenshottoolopen
on process_end()
	error number -128
end process_end

set waitSeconds to 0.5 --スクリーンショットのタイミングが合わない場合は秒数を調整する。
set appName to "Kindle" --ここにはアプリケーション名を記述してください。SafariとかKindxとか

-- OSVersinon確認 10.14 Mojaveより前のOSでは使えません。
set OSVer to do shell script "sw_vers -productVersion| cut -d '.' -f 1-2"
set nOSVer to OSVer as number
if nOSVer < 10.14 then
	display alert "このスクリプトはMojave以降のOSでしか使えません。"
	process_end()
end if

--スクリーンショット回数の指定ダイアログ表示
display dialog "スクショする回数を入力してください。" default answer "5" with title "自動スクショStep1"
set screenShotNumber to text returned of result
--電子書籍のページ方向の指定ダイアログ表示(右開きなのか左開きなのか)
display dialog "右開き？左開き？" buttons {"左", "右"} default button 2 with title "自動スクショStep2"
set btn to button returned of result

repeat with p from 1 to screenShotNumber
	tell application appName
		activate
		tell application "System Events"
			delay waitSeconds
			shot_screenshot() of me --撮影
			--ページ送り処理
			if btn = "右" then
				--key code 123
				keystroke (ASCII character 29) -- ページ右送り
			else --左
				--key code 124
				keystroke (ASCII character 28) -- ページ左送り
			end if
			delay waitSeconds
		end tell
	end tell
end repeat

--このツールはMojave以降で使えます。
on shot_screenshot()
	delay 1
	tell application "System Events"
		key code 23 using {command down, shift down}
		delay waitSeconds
		key code 76
	end tell
	delay 1
end shot_screenshot

--設定のためにScreenShotToolを起動する。
on screenshottoolopen()
	tell application appName
		activate
		tell application "System Events"
			key code 23 using {command down, shift down}
		end tell
	end tell
end screenshottoolopen