// for formatted_string
#include "menu.h"

void display_mutations(void);

void display_mutations();

formatted_string describe_mutations();

const char* troll_claw_descrip[4] = {
    "You have claws for hands.",
    "You have sharp claws for hands.",
    "You have very sharp claws for hands.",
    "Your claws are sharper than steel."
};

void display_mutations(void)

formatted_string describe_mutations()

    int i;
    int j = 0;

    std::string result;
    bool have_any = false;

    const int num_lines = get_number_of_lines(); 

#ifdef DOS_TERM
    char buffer[4800];

    // center title
    int i;
    i = 39 - strlen(mut_title) / 2;
    if (i<0) i=0;

    window(1, 1, 80, 25);
    gettext(1, 1, 80, 25, buffer);
#endif

    result += std::string(i, ' ');
    result += "<white>";
    result += mut_title;
    result += "</white>" EOL EOL;

    clrscr();
    textcolor(WHITE);

    result += "<lightblue>"; // inborn abilities and weirdness

    // center title
    i = 40 - strlen(mut_title) / 2;
    if (i<1) i=1;
    gotoxy(i, 1);
    cprintf(mut_title);
    gotoxy(1,3);
    textcolor(LIGHTBLUE);  //textcolor for inborn abilities and weirdness

        cprintf("You revert to your normal form in water." EOL);
        j++;

        result += "You revert to your normal form in water." EOL;
        have_any = true;

	cprintf("You can see invisible." EOL);
	cprintf("You cover the ground extremely quickly." EOL);
	j += 2;

        result += "You can see invisible." EOL;
        result += "You cover the ground extremely quickly." EOL;
        have_any = true;

	    cprintf("You cover the ground quickly." EOL);

            result += "You cover the ground quickly." EOL;

	    cprintf("You cover the ground extremely quickly." EOL);
	j++;

	    result += "You cover the ground extremely quickly." EOL;
        have_any = true;

            cprintf("You can spit poison." EOL);

            result += "You can spit poison." EOL;

            cprintf("You can exhale a cloud of poison." EOL);

            result += "<lightred>You can exhale a cloud of poison.</lightred>" EOL;

        cprintf("Your system is immune to poisons." EOL);
        cprintf("You can see invisible." EOL);

        result += "Your system is immune to poisons." EOL;
        result += "You can see invisible." EOL;

        cprintf("%s" EOL, naga_speed_descrip[you.mutation[MUT_FAST]]);
        j += 4;

        if ( you.mutation[MUT_FAST] )
            result += "<lightred>";
        result += naga_speed_descrip[you.mutation[MUT_FAST]];
        if ( you.mutation[MUT_FAST] )
            result += "</lightred>";
        result += EOL;
        have_any = true;

        cprintf("You can sense your surroundings." EOL);
        j++;

        result += "You can sense your surroundings." EOL;
        have_any = true;

        cprintf("Your body regenerates quickly." EOL);
        switch ( you.mutation[MUT_CLAWS] ) {
        case 0:
            cprintf("You have claws for hands." EOL);
            break;
        case 1:
            cprintf("You have sharp claws for hands." EOL);
            break;
        case 2:
            cprintf("You have very sharp claws for hands." EOL);
            break;
        case 3:
            // literally true
            cprintf("Your claws are sharper than steel." EOL);
            break;
        default:
            break;
        }
        j += 2;

        result += "Your body regenerates quickly." EOL;
        if ( you.mutation[MUT_CLAWS] )
            result += "<lightred>";
        result += troll_claw_descrip[you.mutation[MUT_CLAWS]];
        if ( you.mutation[MUT_CLAWS] )
            result += "</lightred";
        result += EOL;
        have_any = true;

        cprintf("Your body is rotting away." EOL);
        cprintf("You are carnivorous." EOL);
        j += 2;

        result += "Your body is rotting away." EOL;
        result += "You are carnivorous." EOL;
        have_any = true;

        cprintf("You are carnivorous." EOL);
        j++;

        result += "You are carnivorous." EOL;
        have_any = true;

            cprintf("You are very charming." EOL);
            j++;

            result += "You are very charming." EOL;
            have_any = true;

            cprintf("You can fly");
            cprintf((you.experience_level > 14) ? " continuously." EOL : "."
                    EOL);
            j++;

            result += "You can fly";
            if (you.experience_level > 14)
                result += " continuously";
            result += "." EOL;
            have_any = true;

        cprintf("You are");
        cprintf((you.experience_level > 25) ? " very strongly" :
                ((you.experience_level > 12) ? " strongly" : ""));
        cprintf(" in touch with the powers of death." EOL);
        j++;

        result += "You are";
        if (you.experience_level > 25)
            result += " very strongly";
        else if (you.experience_level > 12)
            result += " strongly";
        result += " in touch with the powers of death." EOL;

        {
            cprintf("You can restore your body by infusing magical energy." EOL);
            j++;
        }

            result += "You can restore your body by infusing magical energy." EOL;
        have_any = true;

            cprintf("You are resistant to poison." EOL);
            cprintf("You can breathe poison." EOL);
            j += 2;

            result += "You are resistant to poison." EOL;
            result += "You can breathe poison." EOL;
            have_any = true;

            cprintf("You can breathe fire." EOL);
            j++;

            result += "You can breathe fire." EOL;
            have_any = true;

            cprintf("You are resistant to fire." EOL);
            j++;

            result += "You are resistant to fire." EOL;
            have_any = true;

            cprintf("You can breathe frost." EOL);
            j++;

            result += "You can breathe frost." EOL;
            have_any = true;

            cprintf("You are resistant to cold." EOL);
            j++;

            result += "You are resistant to cold." EOL;
            have_any = true;

            cprintf("You can breathe lightning." EOL);
            j++;

            result += "You can breathe lightning." EOL;
            have_any = true;

            cprintf("You are resistant to lightning." EOL);
            j++;

            result += "You are resistant to lightning." EOL;
            have_any = true;

            cprintf("You can spit acid." EOL);
            cprintf("You are resistant to acid." EOL);
            j += 2;

            result += "You can spit acid." EOL;
            result += "You are resistant to acid." EOL;
            have_any = true;

            cprintf("You can breathe power." EOL);
            j++;

            result += "You can breathe power." EOL;
            have_any = true;

            cprintf("You can breathe sticky flames." EOL);
            j++;

            result += "You can breathe sticky flames." EOL;
            have_any = true;

            cprintf("You can breathe steam." EOL);
            j++;

            result += "You can breathe steam." EOL;
            have_any = true;

    
    result += "</lightcyan>";

            have_any = true;

            j++;
            textcolor(LIGHTGREY);
            if (j > num_lines - 4)
            {
                gotoxy( 1, num_lines - 1 );
                cprintf("-more-");

                if (getch() == 0)
                    getch();

            // mutation is actually a demonic power
            if (you.demon_pow[i] != 0)
                // enhanced by mutation
                if ( you.demon_pow[i] < you.mutation[i] )
                    result += "<lightred>";
                else
                    result += "<red>";

                clrscr();

            result += mutation_name(i);

                // center title
                int x = 40 - strlen(mut_title) / 2;
                if (x < 1) 
                    x = 1;
                gotoxy(x, 1);
                textcolor(WHITE);
                cprintf(mut_title);
                textcolor(LIGHTGREY);
                gotoxy(1,3);
                j = 1;
            }
            /* mutation is actually a demonic power */

                textcolor(RED);
            /* same as above, but power is enhanced by mutation */
            if (you.demon_pow[i] != 0 && you.demon_pow[i] < you.mutation[i])
                textcolor(LIGHTRED);

                if ( you.demon_pow[i] < you.mutation[i] )
                    result += "</lightred>";
                else
                    result += "</red>";

            cprintf( mutation_name( i ) );
            cprintf(EOL);

            result += EOL;

    if (j == 0)
        cprintf( "You are not a mutant." EOL );

    if (!have_any)
        result +=  "You are not a mutant." EOL;
    return formatted_string::parse_string(result);
}
void display_mutations()
{
#ifdef DOS_TERM
    char buffer[4800];
    window(1, 1, 80, 25);
    gettext(1, 1, 80, 25, buffer);
#endif

    clrscr();
    gotoxy(1,1);
    describe_mutations().display();
    

    return;
}                               // end display_mutations()

}

        text += "";

        text += "           Mutations & Other Weirdness";
        text += "\n";
        for (int j = 0; j < 100; j++)
        {
            if (you.mutation[j])
            {
                if (you.demon_pow[j] > 0)
                    text += "* ";
                text += mutation_name(j);
                text += "\n";
            }
        }

        text += describe_mutations();
        text += "\n\n";

    text += "\n\n";