2011年賀状

年賀状書いた。

%!
<< /PageSize [285 420] >> setpagedevice

/ellipse { % def
   /c 2 index def
   { % for
       /t exch def
       /r1 {rand 4 mod 2 div} def
       /r2 {rand 2 mod 2 div} def
       /r3 {rand 2 mod 2 div} def

       newpath
       gsave
         65 190 moveto
         /x 70 t cos mul def
         /y 220 t sin mul def
         x y rmoveto
         /xscale 2.0 t cos add 20 mul def
         /yscale 1.0 t cos add 30 mul def
         /FireFightBB findfont [xscale 20 20 yscale 0 0] makefont setfont
         (2011) true charpath clip

         newpath
         0 70 490 { % for
             /i exch def
             gsave
               100 190 translate
               70 setlinewidth
               r1 r2 r3 setrgbcolor
               .5 1 scale 0 0 i 70 add 0 360 arc stroke
             grestore
         } for
       grestore
   } for
} def

1 1 20 {
    /n exch def

    0 12 360 ellipse
    102 6 258 ellipse % for dense farside

    240 25 moveto
    /Georgia-Bold findfont 10 scalefont setfont
    n =string cvs show
    (/20) show
    showpage 
} for

書いたものの、肝心の年賀状がなかったので、とりあえずテスト印刷だけ。



今年はFire Fightというフォントを使わせていただきました。文字のレイアウトはあっさり決定したけど、色づけとフォント選びが悩ましかった。