戦争と平和 ２６

（第２ラウンド）

隣接するG19ヘックスよりダヴー、スールトのひきいる１４兵力が援軍として参戦。

フランス軍は合計２２兵力で大勢側となる。

ロシア軍は１１兵力が踏みとどまっている。

戦力比２：１。

2d6=6、リーダー修正＋１、士気修正＋１、地形修正＋２。修正後の目は１０。

戦闘結果は大勢側「１」、小勢側「D3」。

（ナポレオン、ランヌ、ダヴー、スールトとそろったフランス軍）

フランス軍は２兵力を失う。

ロシア軍は５兵力を失い、撤退。

フランス軍はこれを追撃しない。

リーダー負傷チェックは１０人全員セーフ。

ここで余力（オーストリア軍の主力10兵力、ロシア軍の主力６兵力）を残しながらオーストリア・ロシア連合軍は投了とする。

戦争と平和 ２５

オーストリア・ロシア連合軍はI18ヘックスからH18ヘックスへの攻撃を宣言した。

（第１ラウンド）

連合軍が大勢側で２３兵力、フランス軍が小勢側で９兵力。戦力比は２：１。

連合軍の構成はロシア軍（士気２）がオーストリア軍（士気１）より多いので士気２。

２D6＝４。

リーダー修正−１、士気修正０、地形修正−２で修正後の目は２（１以下の目は無い）。

連合軍は「D1」で２兵力を失い、士気−１。戦闘につかった士気値が２だったためロシア軍の兵力を損害に宛てなければならない。

ロシア軍−１兵力、オーストリア軍−１兵力とした。

オーストリア軍は士気が０となり撤退。ロシア軍のみは戦場に踏みとどまる。

フランス軍の損害は１兵力。

フラッグ ２

【実行画面】

アクションゲームの実行結果は写真ではうまく伝わらないだろうが、何回か連続して（WAIT150を実行せずに）表示された。

これはプログラムが間違っているからで、たとえば４行目、乱数Cが「赤上」で赤い旗が下がっている状態（RF=０）のとき、「赤上げて」と表示して赤い旗が上がっている状態（RF=1）にする。そのため次の５行目で乱数Cが「赤上」赤い旗が上がっている状態と判定して「赤下げないで」をそのまま続けて表示してしまう。

そこでIF文の並びをこのように直してみた。

【プログラム】

結果、正しく実行されるようになった。