\n"; } print "
";
+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
この部分を以下のように変更して下さい
+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
EOM
open(MAIN,"$message_file");
@mesfile =
▼【全員へのメッセージ】\表\示件数$max_gyo2件
";
$hit=0;$i=1;
foreach(@mesfile){
($pid,$hid,$hname,$hmessage,$hhname,$htime) = split(/<>/);
if($pid eq "ffadventure"){
if($max_gyo2 < $i) { last; }
print "
$hnameさん<\/b><\/a>>「$hmessage」($htime)
\n";
$hit=1;$i++;
}
}
if(!$hit){ print "
参加者全員宛てのメッセージはありません\n"; }
print"
";
print"
▼【あなたへのメッセージ】\表\示件数$max_gyo件
";
$hit=0;$i=1;
foreach(@mesfile){
($pid,$hid,$hname,$hmessage,$hhname,$htime) = split(/<>/);
if($kid eq "$pid"){
if($max_gyo < $i) { last; }
print "
$hnameさん<\/b><\/a>>「$hmessage」($htime)
\n";
$hit=1;$i++;
}elsif($kid eq "$hid"){
print "
>$hhnameさんへ「$hmessage」($htime)
\n";
}
}
if(!$hit){ print "
$knameさん宛てのメッセージはありません\n"; }
print"
";
+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
全員メッセージと個人メッセージをわけてすっきりさせてみました
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
今回のユーザー用のスクリプトには
鶏さん
[http://www2.tkcity.net/~iland/ ]
のアイデアが多く使われています!ありがとうございました!!
質問や意見、要望等、かなり(笑)お待ちしています!!
できれば設置したサイト等を掲示板に書き込んでくれると嬉しいです
配布サイト
http://www.yamabuki.sakura.ne.jp/~darkrose/cgi/potya/
再配布:【RCIF.NET】
星を守りし者
http://www.rcif.net/
ぽちゃさんのサイトで絶対に質問しないようにお願いいたします
質問がある場合は下記掲示板へ
質問掲示板:http://bbs.rcif.net/?id=q_a