applescript でkindle for mac の自動ページめくり

こんな感じで自動再生できる.Automatorだとうまくできなかった.

repeat with p from 1 to 110
    set pstr to p
    set pstr to text -3 thru -1 of ("00" & pstr)
    tell application "Kindle"
        activate
        tell application "System Events"
            delay 1
                key code 123
            -- ページ送り (カーソルキー)
        end tell
    end tell
end repeat