戦国大名11

再編成フェイズ。

オリジナルのルールではこのとき手持ちの兵力を支配国に自由に配置することが出来る。つまり（ゲームのテクニックとして）費用を掛けずに移動することが出来る訳だ。

これをPCでやると、わざわざ全兵力の配置を入力するのが面倒くさいので、今回はこのルールを無視する。

先ずは勢力圏決定フェイズのプログラムを修正して、総石高を割り出す。部分支配であれば、石高×0.5、完全支配であれば石高×1で4か国の合計を出す。

兵力が総石高を上回っていた場合、1兵力につき金1を支払う。武将がいる国では1兵力につき金1を支払って徴兵を行うことが出来る。

ターン数を更新してメインルーチンの最初へ戻る。このとき10ターンが終わっていればゲームを終了する。

勢力圏決定フェイズのプログラムを修正。総石高が26であれば、4か国統一となり、ゲームを終了する。

これで一応、「戦国大名」のプログラムが完成した。後はテストプレイをして、さらにコンピューターの思考ルーチンを作ってみたい。

戦国大名10

修正。移動先を入力時、隣接以外には反応しないようにプログラムを書き加えた。

合戦フェイズのプログラムはシナリオ1「四国統一」ではほぼ使うことが無いので、後回しにする。同様に第2行軍フェイズ、第2合戦フェイズも後回しにする。

築城フェイズ。武将のいる国で金(10-武将の内政値)を支払えば城の規模を+5とすることが出来る。上限は30。

実行画面。最初の持ち金は20。土佐を部分支配。徴税で金+3。伊予へ兵力3を移動し、金-5。内政値3の長宗我部元親が伊予で築城し、金-7。結果、伊予の城は5、持ち金は11となる。

どうやら正常に作動しているようだ。

戦国大名9

移動サブルーチン。移動する兵力を入力、Aとする。隣接国の情報をBに代入して（配列変数に配列変数は入らないので）、国名を表示する。移動先を入力、Cとする。移動にかかる費用は兵力を5で割って端数を切り上げたものceil(a/5)となる。移動先が支配国外であればその5倍を支払う。

実行画面。不具合内容:移動した先が支配国外であってもさらに移動できてしまう。

修正。移動先が支配国外であればフラグEを立てる。メインルーチンでE=1であれば次のフェイズへ進む。

実行画面。土佐から伊予へ3兵力を移動し、金5を支払った。

どうやら正常に作動しているようだ。

戦国大名8

第1移動フェイズ。武将の率いる兵力は移動することができる。移動距離に制限は無いが、支配国から出たらそこから先へ進むことは出来ない。

オリジナルのルールでは移動距離に関係無く、支配国までの移動は兵力5を単位として金1、支配国外までの移動は金5が掛かる。例えば支配国外まで7兵力を移動した場合は金10というように。

今回はハウスルールとして、支配国までの移動は兵力5を単位として移動1国あたり金1、支配国外までの移動は金5が掛かるものとする。例えば支配2国を通過して支配国外まで7兵力を移動した場合は金14というように。

メインルーチンに「@フェイズ5」を追加。移動しない場合は「@フェイズ6」へ進む。移動する場合は「@移動」サブルーチンへ飛ぶ。停止するまで同じ手順をくりかえすため、「@フェイズ5」へ戻る。

戦国大名7

徴税フェイズ。完全支配の国からは額面どおりの石高、部分支配の国からは石高の半分が徴税できる。オリジナルのルールには「重税」があるが、今回は省略する。

服従工作フェイズ。武将の存在する国で、サイコロを1こ振り、その「威信」以下の数値であれば、中立勢力が1段階下がる（5低下する）。

実行画面。土佐の中立勢力は「10,0」である。長宗我部元親（威信2）は服従工作をした。サイコロの目は2で成功。土佐の中立勢力は「5,0」となった。

どうやら正常に作動しているようだ。

追記。実行後の表示を修正した。