orz.ps |PostScript|

スラッシュドットで、アスキー・アート orz をコマンドとして実装するなら、どんな機能を持たせるか という話題が出た。

いくつもコメントがついたけど、面白かったのは PROGRESS BAR を表示させるというもの。引用すると、

コアダンプでも、デバッグ情報送信でも、こんなアニメーションを…

........orz
.......o.rz
......o..rz
.....o...rz
....o....rz
...o.....rz
..o......rz
.o.......rz
o........rz

そこで、アニメーション GIF を作ってみた。

ソースは PostScript。Perl や Ruby で書くのもいいけれど、こういうマニアックなのもいい?

%!PS-Adobe-3.0
%%BoundingBox: 0 0 100 20
%%Title: orz.ps
%%Creator: @aka
%%CreationDate: Thu May 19 23:06:30 2005
%%EndComments

64 dict begin

/dots 14 def
/Helvetica-Bold findfont 18 scalefont setfont

/orz {
  0 1 dots {
    /head exch def
    0 0 moveto
    dots head sub { (.) show } repeat
    (o) show
    head { (.) show } repeat
    (rz) show
    showpage
  } for
} def

orz

end
showpage
%%EOF

上のコードを orz.ps として保存し、convert コマンドにかけて出来上がり。

$ convert orz.ps orz.gif

首の長さは、変数 dots で変更できる。フォントは Helvetica-Bold、サイズは 18 ポイント。気に入らなければ、そこら辺をいじって自由に書き直されたし。

問題は、これがコマンドじゃないって所だな。