$log .= "$cmp[$camp] の国家\予\算が $zy 上昇した。<br>\n"; } # 移籍履歴 $ch[2]=$ch[1]; # 前々回の仕官先 $ch[1]=$camp; # 前回の仕官先 $camp = $cmd; #レベルによる仕官時のマイナス値 }elsif(($cmd==$ch[1] && $cmd>0) || ($cmd==$ch[2] && $cmd>0)){ $log .= qq|前回(<span style="color:$color[$ch[1]]">$cmp[$ch[1]]</span>)、前々回(<span style="color:$color[$ch[2]]">$cmp[$ch[2]]</span>)に所属した国には仕官できません<br>|; $tm = $cmd = 0; $type=''; &call_main_st; }elsif($lv < $clv){ $log .= "仕官はレベル $clv からです。<br>まずは修行で己を鍛えてください。<br>\n"; |