最前面のテキストを塗り／線の色で1文字ずつ交互に塗るAppleScript

せっかく塗りや線の設定があるのだからそれを利用できないかと思い書いてみました。

使い方

あらかじめ塗り分けたい色で塗りと線を設定します。

このようなテキストがある場合、後から入力したテキストが対象になります。

スクリプト実行後はこのように塗り分けられます。

コード

(*
    最前面のテキストに対し、塗り／線の色で1文字ずつ交互に塗るスクリプト
        1文字目から奇数番目を塗りの色
        2文字目から偶数番目を線の色

    2020-07-13
*)



tell application "Adobe Illustrator"
    tell document 1

        set fillColor to default fill color
        set strokeColor to default stroke color

        set celectText to every page item

        tell celectText's item 1
            repeat with i from 1 to count of (contents as string)

                tell character i
                    if i mod 2 is 1 then
                        set fill color to fillColor
                    else
                        set fill color to strokeColor
                    end if
                end tell

            end repeat
        end tell
    end tell
end tell