cfirchatは、NishinoRinさんという方が書かれた、irchatに色を付けたり、ボールド体や斜体、それから色付き文字等に対応できるelispソフトです。使い方もそう難しいものではなく、ファイルの先頭をよく読めばすぐ使えるものなのですが、いつの間にかインターネット上からcfirchatが消えてしまっていました。とりあえず自分のHDDに入ってたものをサーバに置いといたのですが、検索エンジンにも引っかからないようですので、こうして固定したページを置いておくことにしました。
1次配布元が行方不明ですので、以下のURIに置いておきます。
書く程の事はありませんが、一応。
(setq cfirchat-keywords-default
'(
;; mymsg
((black) (cfirchat-mymsg-regexp))
;; system
((DarkRed) ("^[0-9][0-9]:[0-9][0-9] \\([^><(= \t\n].*\\)$" 1))
;; system-mode
((DarkRed bold)
("^[0-9][0-9]:[0-9][0-9] New mode for [%#]\\S + set by \\S +: \\(.*\\)$" 1)
("^[0-9][0-9]:[0-9][0-9] New topic on [%#]\\S + set by \\S +: \\(.*\\)$" 1)
("^[0-9][0-9]:[0-9][0-9] Topic for [%#]\\S +\\( ([0-9]+ users)\\)?: \\(.*\\)$" 2))
;; server message
((DarkRed) ("^[0-9][0-9]:[0-9][0-9] \\(\\*\\*\\* .*\\)$" 1))
;; priv
((DarkRed) ("^[0-9][0-9]:[0-9][0-9] \\(=[^= \t\n]+=\\)" 1))
;; URL
((tomato bold underline) (cfirchat-url-regexp))
;; time
((DodgerBlue3 bold) ("^\\([0-9][0-9]:[0-9][0-9]\\) " 1))
;; nick
((black)
("^[0-9][0-9]:[0-9][0-9] \\(<[^>< \t\n]+>\\) " 1)
("^[0-9][0-9]:[0-9][0-9] \\(([^)( \t\n]+)\\) " 1))
))
(require 'cfirchat)
これは私が使ってるcfirchatの配色設定です。~/.irchat_vars.elの頭に書き込んであります。色の名前は/etc/X11/rgb.txtを参考にして付けました。配色以外ではcfirchatを使ってないので、他の設定は残念ながらありません。
上の設定を適用すると、以下のようになります。背景色の設定は~/.XresourceでDarkGrayにしてあります。