罪罰改造板２/232

# 一騎打ちを一度しか申し込まない
# ./inc/ore_sub-wartime.cgi
# 変数：$p2p_flgをsystemに追加すること

$p2p_flg=0 if($b_v<1);                           # 追加
if($j>2 && $tm<10 && $cmd !=-1){
	my $l=int(rand(5)); 
	if($l==0 && $qz<$tlv && $p2p_flg==0){   # 修正
		$p2p_flg++;                   # 追加
		$tm=50;
		$log .="<p>なんと敵軍を指揮する $tnm から一騎討ちの申\し込みが！</p><p>どうしますか？</p>\n";