Applescript で Kinoppy を自動撮影テスト

何となく表題の行為を試してみた。別に何かに使うという訳でもなかったんだけどなんとか成功した。参考までにソースを貼っておこう。

AppleScript

set dd to display dialog "回数" default answer "2"
set dc to text returned of dd as integer
tell application "Kinoppy"
 activate
 delay 1
 tell application "System Events"
  tell application process "Kinoppy"
   try
    set _count to 1 as integer
    set tgt_file to "ssw" & (_count as string) & ".png"
    set _count to 2 as integer
    do shell script "screencapture ~/Desktop/cap/" & tgt_file
    repeat with i from 1 to dc
     delay 0.2
     keystroke (ASCII character 28) -- 左
     delay 0.2
     set tgt_file to "ssw" & (_count as string) & ".png"
     do shell script "screencapture ~/Desktop/cap/" & tgt_file
     -- ウィンドウを選択してチャプチャーし、上記のファイル名で出力。
     set _count to _count + 1
    end repeat
   on error
    display dialog "エラー"
    beep
   end try
  end tell
 end tell
end tell

※注意
実行前に Kinoppy を起動しておく。本棚は閉じてビューワを全面表示が望ましい。実行するとデスクトップ上の “cap” フォルダに保存される。予め作成しておく必要あり。起動時に表示されるダイアログには実行回数を入力。ページ数の半分程度で良い。エラー処理はほとんどしてない。かなり適当。
※参考URL

紀伊國屋書店Kinoppy
カテゴリ: ブック
価格: 無料