- 追加された行はこのように表示されます。
- 削除された行は
このように表示されます。
!!褌を借りた{{category TRPG支援チャット}}
一から創るのは力不足を感じて、おなじみKENTさんのKENT-WEBから comchat をベースにして改造してみた。
一から創るのは力不足を感じて、おなじみ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+)/ ;
へ書き換えてください。