Modules supplied:
console_player, enemy.

Init:
start_planet() - Which planet to start on. Map layout known.
start_fleet() - Fleet to start with.

TF Battle:
[join_silent()]
show_battle()*
pause()*
[perform_battle()]
show_results()*
while (b_or_c)
  show_battle()*
  battle_commands()* <- Withdraw etc.
  [perform_battle()]
  show_results()* <- Computer player stores results.

Planet attack:
while (b_or_c && !conq && !break_off)
  show_attack()*
  battle_attack() <- Does split-up, join etc.
  pause() <- Defending player
  if (!break_off)
    if (#fleets_with_b_or_c > 1)
      select_tf()
    if (#enemy_planets > 1)
      select_planet()
    [perform_battle()]
  show_results()*

Investment:
while (balance > 0)
  invest(planet)

Movement:
movement()