罪罰改造掲示板/86

$log2 .=qq|<form action="$script" method="$method" name="ore_">\n|;
$log2 .=qq|<td align="center" valign="middle">\n| if($mv_mode eq 'pc');
$log2 .=qq|<input type="hidden" name="id" value="$id">\n<input type="hidden" name="pw" value="$pw">\n|;
# if($thp<1||$hp<1){                                         # ←この２行を
# $log2 .=qq|<input type="hidden" name="cmd" value=-1>\n|;   # コメントアウト

if($thp<1){
   $log2 .=qq|<input type="hidden" name="cmd" value=1>\n|;
}elsif($hp<1){
   $log2 .=qq|<input type="hidden" name="cmd" value=-1>\n|;
}else{
   &spell_sp;
}
$log2 .=qq|<br>\n|;#テーブルずれ修正
$log2 .=qq|<input $button1 type="submit" value="NEXT！">$td_end</form>\n|;#テーブル追加</tr></table>