#include "intlong.h"
bit16 mode,disp_mode;
extern void display(bit16 dmode);
extern void combat_loop(void);
extern void inigraf(void);
extern void clear_image(void);
extern void panel(void);
extern void enter_galaxy(void);
extern void enter_solar(void);
extern void enter_planet(void);
extern void make_pirates(void);
extern startype stars[1050],*star_ptr;
extern planettype planets[10],*planet_ptr;
extern planettype moons[10],*moon_ptr;
extern bit16 kcf[];

void a_loop(void)
{
  display(disp_mode);
  switch(mode) {
    case 0:
        combat_loop();
        break;
  }
}

int main(int argc, char **argv)
{
  // int i;
  inigraf();
  clear_image();
  panel();
  enter_galaxy();
  star_ptr = stars;
  enter_solar();
  planet_ptr = planets;
  enter_planet();
  moon_ptr = moons;
  mode = 0;
  disp_mode = 0;
  make_pirates();
  do a_loop(); while(1);
}