!!褌を借りた{{category TRPG支援チャット}}
一から創るのは力不足を感じて、おなじみKENTさんの[KENT-WEB|http://kent-web.com/]から comchat をベースにして改造してみた。
弄ったのは、init.cgiで、書き加えたのは↓

 # 改変 by 泰司
 my ( $a,$b,$c,$d,$i) ;
 $_ = $val ;
 $a = m/(\d)[d|D](\d+)/ ;
 
 if ($a!=0){
   $b="";
   $d=0; 
   for ($i=0;$i<$1;++$i){
     if($i>0){ $b = "$b + "; }
     $c = int(rand($2) + 1) ;
     $d += $c;
     $b = "$b ( $c )";
   }
   $val = "$d = $b $val" ;
 }

メッセージに"3d6" と入れるとコメントの冒頭に降った場合の値が追加表示される。
"+"および"-"の増減はまだ非対応です。
発動キーは数字の間に小文字の"d"にして、大文字の"D"はスルーさせました。両方で実行したい場合は
 $a = m/(\d)d(\d+)/ ;
と、なっているのを
 $a = m/(\d)[d|D](\d+)/ ;
へ書き換えてください。