*通信の機能をさらに…。 [#j60a6185]
-ページ: [[罪罰改造掲示板]]
-投稿者: [[水神]]
-優先順位: 普通
-状態: 完了
-カテゴリー: こんなのが欲しい♪
-投稿日: 2004-05-11 (火) 01:08:41
-バージョン:
**メッセージ [#mea9971d]
前kukuru様が言っておられました、送信したログも見れる機能、大変便利だと感じていますが、件数が増えてくるにしたがって、誰に送信したのかわからなくなってきています・・・送信先の名前も表示できるようになったら、かなり便利だと思います。
----
-自分のとこで動いている通信です。多分このままいけると思うんですけど、どうでしょうか -- [[あくあ]] &new{2004-05-15 (土) 19:33:37};
# ログを展開
open(IN,"$logfile") || &error("Open Error : $logfile");
local $log_last_flag=0;
my $camp_flag = $camp_info[$DAT{'camp'}][0];
while (<IN>) {
$log_last_flag++;
local($date,$nm,$camp,$com,$sogo,$addr,$host,$agent,$time2,$myid) = split(/<>/);
if($nm eq $DAT{'nm'} || $myid eq $DAT{'nm'} || $myid eq $camp_info[$DAT{'camp'}][0]){
if($myid eq $DAT{'nm'}){
$nm = qq|To:$myid From:$nm|; # 自分宛
}elsif($nm eq $DAT{'nm'}){
$nm = qq|To:$myid From:$nm|; # 自分の送信
}else{
$nm = qq|To:$myid From:$nm|; # その他
}
$nm = qq|$nm<small>[$sogo_p[$sogo]]</small>| if($sogo);
($mv_mode eq 'mv') ? $com =~ s/ハァト/<font color="pink">\&\#63726<\/font>/g : $com =~ s/ハァト/<span class="f1">ゥ<\/span>/g ;
if($myid ne $DAT{'nm'}){
($mv_mode eq 'mv') ?
print qq|$nm:$com [$camp_info[$camp][0] $date]<br>\n|:
print qq|<span style="color:silver">$nm <span class="date">[ $camp_info[$camp][0] $date ]</span><br>$com </span><hr>\n|;
}else{
($mv_mode eq 'mv') ?
print qq|$nm:$com [$camp_info[$camp][0] $date]<br>\n|:
print qq|<span style="color:$camp_info[$camp][1]">$nm <span class="date">[ $camp_info[$camp][0] $date ]</span><br>$com </span><hr>\n|;
}
last if $log_last_flag > $log_last;
}
}
close(IN);
-できました! ありがとうございますm(_ _)m -- [[水神]] &new{2004-05-17 (月) 19:27:27};
-何故か皆が無所属で送られて来ます・・・どうすればいいでしょうか↓にアップしましたんで修正お願いします。 -- [[スポンサ−]] &new{2004-05-18 (火) 08:01:52};
$in{'nm'} = "$camp_info[$tocamp][0]";
$DAT{'nm'} ="$DAT{'nm'}($camp_info[$DAT{'camp'}][0])";
}
else{
$tocamp=$DAT{'camp'}; # 追加
local @tdat;
-1行だけなのでファイルを修正してみてください
-上の追加修正は、他国へ一括送信のバグですので、不具合が出た場合のみ適用してください -- [[あくあ]] &new{2004-05-18 (火) 23:40:16};
-できますよw 色を変えれば普通に戻ります -- [[嘩遁]] &new{2004-05-22 (土) 10:11:28};
-自分の送信がシルバーになるのがとても良いのですが、他人の自国一括もシルバーになってしまいます。自分の送信のみシルバーにできませんか? -- [[えあとん]] &new{2006-12-17 (日) 06:27:26};
-すみません、確か仕様だったと思います。メリットとデメリットを考えて妥協した結果かと思います; -- [[あくあ]] &new{2006-12-28 (木) 22:55:51};
#comment