842: $log2 .="<form action=$script method=$method name=ore_>\n"; 843: $log2 .="<td align=center valign=middle>\n" if($mv_mode eq 'pc'); 844: $log2 .="<input type=hidden name=id value=\"$id_p\">\n"; 845: $log2 .="<input type=hidden name=pw value=\"$pw_p\">\n"; 846: 847: if($rank*$sol_lv>=8000) { 848: 849: $log2 .="<select name=cmd size=1><option value=1>攻撃陣形</option><option value=2>防御陣形</option><option value=3>突撃陣形</option><option value=4>一騎打ち</option><option value=10>逃走</option>\n"; 850: $log2 .="</select>"; 851: 852:}else{ 853: 854: $log2 .="<select name=cmd size=1><option value=1>攻撃陣形</option><option value=2>防御陣形</option><option value=3>突撃陣形</option><option value=10>逃走</option>\n"; 855: $log2 .="</select>"; 856: if($tsol<1||$sol<1){ 857: $log2 .="<input type=hidden name=cmd value=-1>\n"; 858: }elsif($tm==50){ 859: $log2 .="<select name=cmd size=1><option value=10>嫌だ</option><option value=20>了承</option>\n"; 860: $log2 .="</select>"; 861: }elsif($tm==60){ 862: $log2 .="<input type=hidden name=cmd value=-1>\n"; 863: }elsif($tm==70){ 864: &spell_sp; 865: }elsif($tm<1){ 866: $log2 .="<select name=cmd size=1><option value=1>攻撃陣形</option><option value=2>防御陣形</option><option value=3>突撃陣形</option><option value=10>逃走</option>\n"; 867: $log2 .="</select>";#------------- ここから 868: 869:if ($tm<1 && $cmd==4) { 870: 871: $tm=50; 872: $cmd=20; 873: 874:} 875:#------------- ここまで 876: 877:if($tm==50){ 878: 879: } 880: $log2 .="<br>";#テーブルずれ修正 881: $log2 .="<input type=submit $button1 value=\"NEXT!\">$td_end</form>\n";#テーブル追加</tr></table> 882:}