ゆの in PostScript その2

PostScript

せっかくの PostScript なんだから、やっぱり画像で表示した方がいいかな、と思ったので、PostScript viewer などで見られるようにしてみた。あと、文字だけでは寂しいので、顔の絵もつけて華やかにしたり。

%!PS
gsave
    4 dict begin
        /GothicBBB-Medium-EUC-H findfont 16 scalefont setfont % 文字コードが EUC-JP の場合
        /X{
            true
            {
                (365)show
                currentfile 80 string readline pop
                1 1 index length 1 sub getinterval show
            }
            {(ひだまり)show}
            count{exch}repeat ifelse
        } def
        /{
            (スケッチ)show
        }def
        /_{
            cvx exec
        }def

        gsave
            1 dict begin
                /showpage {} def
                0 -20 translate % 位置を調節して
                0.125 0.125 scale % サイズを調節して
                (tiger.ps)run % お好きな PostScript 画像をお貼りください
            end
        grestore
        80 30 moveto

        X / _ / X < 来週も見てくださいね!

        showpage
    end
grestore

解説してみる

続きを読む