#include <stdio.h>
#include "defs.h"
#include "structs.h"
#include "vars.h"

print_col()
{
        int i; 
        boolean see;
        tplanet *pplanet;
        printf("olonies:");
        point(50,1);
        for ( i= 1 ; i<=nstars; i++ ) {
                pplanet=stars[i].first_planet;
                while ( pplanet != nil ) {
                        if ( (pplanet->team) == player ) {
                                putchar(i+'A'-1);
                see = true;
        if ( ((y_cursor > 21) && (x_cursor >= 50)) ||
            (y_cursor > 24) ) {
                pause();
                clear_field();
                point(50,1);
        };
        printf("%d:%2d                         ", pplanet->number, pplanet->psee_capacity);
        point(x_cursor + 5, y_cursor);
        x_cursor = x_cursor - 5;
        if ( pplanet->psee_capacity==0 )
                printf(" Decimated");
        else if ( (pplanet->team==none) && see )
                printf(" No colony");
        else if ( pplanet->team==player ) {
                printf("(%2d,/%3d)", pplanet->inhabitants, pplanet->iu);
                if ( pplanet->conquered )
                        printf("Con");
                else
                        printf("   ");
                if ( pplanet->mb!=0 )
                        printf("%2dmb", pplanet->mb);
                else
                        printf("    ");
                if ( pplanet->amb!=0 )
                        printf("%2damb", pplanet->amb);
        } 
        else if ( (pplanet->team==ENEMY) && see ) {
                printf("*EN*");
                if ( see && pplanet->conquered ) {
                        printf("Conquered");
                } 
                else
                        printf("   ");
                if ( pplanet->under_attack ) {
                        if ( pplanet->mb != 0 )
                                printf("%2dmb", pplanet->mb);
                        else
                                printf("    ");
                        if ( pplanet->amb != 0 )
                                printf("%2damb", pplanet->amb);
                };
        };
        point(x_cursor,y_cursor + 1);

                        };
                        pplanet=pplanet->next;
                };
        };
        clear_field();
        cle3r_left();
}



starsum()
{
        char iline[81];  
        int ind,i,value;  
        char strs;
        printf("tar summary:");
        cle3r_left();
        point(1,19);
        putchar(':');

        get_line(iline,&ind,true);
        get_token(iline,&ind,&value,&strs);
        point(50,1);
        if ( strs == ' ' ) {
                for ( i= 1 ; i<=nstars; i++ ) pr5nt_star(i);
        } 
        else {
                do {
                        i = strs-'A'+1;
                        pr5nt_star(i);
                        get_token(iline,&ind,&value,&strs);
                } 
                while (strs != ' ');
        };
        clear_field();
}

tfsum()
{
        int i, value;  
        char tfs;
        char iline[81];  
        int ind;
        printf("f summary :");
        get_line(iline,&ind,true);
        get_token(iline,&ind,&value,&tfs);
        point(50,1);
        if ( tfs==' ' ) {
                for ( i= 1 ; i<=26; i++ ) pr3nt_tf(i);
        } 
        else {
                do {
                        i = tfs - 'A' + 1;
                        pr3nt_tf(i);
                        get_token(iline,&ind,&value,&tfs);
                } 
                while (tfs != ' ');
        };
        clear_field();
        cle3r_left();
}