# $log2 .= "<option value=3>突撃陣形</option>\n"; # 突撃陣形のコマンドの下に一騎討ちコマンドを追加 $log2 .= "<option value=4>一騎討ち</option>\n" if($sol>$tsol && $sol_lv>$tsol_lv); # コマンド番号1の上に4の一騎討ちコマンドを3行追加 }elsif($cmd==4){ $log .= qq|一騎打ちを挑んだ!!\n|; $tm=60; #}elsif($cmd==1){
-762行目あたり(戦争回数を追加している場合、ここらへん) }elsif($tm<1){ $log2 .="<select name=cmd size=1><option value=1>攻撃陣形</option><option value=2>防御陣形</option><option value=3>突撃陣形</option><option value=10>逃走</option>\n"; $log2 .= "<option value=4>一騎討ち</option>\n" if($sol>$tsol && $sol_lv>$tsol_lv); # これを追加 -546行目あたり(戦争回数を追加している場合、ここらへん) # ここから追加 }elsif($cmd==4){ $log .= qq|一騎打ちを挑んだ!!\n|; $tm=60; } # ここまで追加 $log .="<hr size=1 noshade>\n"; if($sol<1&&$tsol<1){ $log .="両軍ともに壊滅的損害を受け戦闘継続が不可能となりました<br>今回の作戦は引き分けです\n"; # ここを検索 |