罪罰外交/同盟国には戦争を行えない

$v=$cmd;
if($camp<$v){
   $v1=$camp;
   $v2=$v;
} elsif($camp>$v) {
   $v1=$v;
   $v2=$camp;
} else {
   $v1="";
   $v2="";
}

 if($v==$camp){
    $log .= "自国には攻め込めません<br>\n";
    $tm = $cmd = 0;
    $type='';
    &call_main_st;
 }elsif($cfs[$v1.$v2]==1){
    $log .= "同盟中の$cmp[$v]には、攻め込めません<br>\nまず、同盟を破棄してください<br>\n";
    $tm=$cmd=0;
    $type='';
    &call_main_st;