ゆの in PostScript その2 - 週1でも日記せっかくの 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 dic
