Initial revision

git-svn-id: https://crawl-ref.svn.sourceforge.net/svnroot/crawl-ref/trunk@3 c06c8d41-db1a-0410-9941-cceddc491573

1 files changed, 539 insertions, 0 deletions

diff --git a/trunk/source/output.cc b/trunk/source/output.cc
new file mode 100644
index 0000000000..40f1738534
--- /dev/null
+++ b/trunk/source/output.cc
@@ -0,0 +1,539 @@
+/*
+ *  File:       output.cc
+ *  Summary:    Functions used to print player related info.
+ *  Written by: Linley Henzell
+ *
+ *  Change History (most recent first):
+ *
+ *      <2>      5/20/99        BWR             Efficiency changes for curses.
+ *      <1>      -/--/--        LRH             Created
+ */
+
+#include "AppHdr.h"
+#include "output.h"
+
+#include <stdlib.h>
+
+#ifdef DOS
+#include <conio.h>
+#endif
+
+#include "externs.h"
+
+#include "itemname.h"
+#include "ouch.h"
+#include "player.h"
+
+static int bad_ench_colour( int lvl, int orange, int red )
+{
+    if (lvl > red)
+        return (RED);
+    else if (lvl > orange)
+        return (LIGHTRED);
+
+    return (YELLOW);
+}
+
+static void dur_colour( int colour, bool running_out )
+{
+    if (running_out)
+        textcolor( colour );
+    else
+    {
+        switch (colour)
+        { 
+        case GREEN:     textcolor( LIGHTGREEN );        break;
+        case BLUE:      textcolor( LIGHTBLUE );         break;
+        case MAGENTA:   textcolor( LIGHTMAGENTA );      break;
+        case LIGHTGREY: textcolor( WHITE );             break;
+        }
+    }
+}
+
+void print_stats(void)
+{
+    textcolor(LIGHTGREY);
+
+    if (you.redraw_hit_points)
+    {
+        const int max_max_hp = you.hp_max + player_rotted();
+        const int hp_warn = MAXIMUM( 25, Options.hp_warning );
+        const int hp_attent = MAXIMUM( 10, Options.hp_attention );
+
+        gotoxy(44, 3);
+
+        if (you.hp <= (you.hp_max * hp_warn) / 100)
+            textcolor(RED);
+        else if (you.hp <= (you.hp_max * hp_attent) / 100)
+            textcolor(YELLOW);
+
+        cprintf( "%d", you.hp );
+
+        textcolor(LIGHTGREY);
+        cprintf( "/%d", you.hp_max );
+
+        if (max_max_hp != you.hp_max)
+            cprintf( " (%d)", max_max_hp );
+
+#ifdef LINUX
+        clear_to_end_of_line();
+#else
+        cprintf("        ");
+#endif
+
+        you.redraw_hit_points = 0;
+    }
+
+    if (you.redraw_magic_points)
+    {
+        gotoxy(47, 4);
+
+        cprintf( "%d/%d", you.magic_points, you.max_magic_points );
+
+#ifdef LINUX
+        clear_to_end_of_line();
+#else
+        cprintf("        ");
+#endif
+
+        you.redraw_magic_points = 0;
+    }
+
+    if (you.redraw_strength)
+    {
+        if (you.strength < 0)
+            you.strength = 0;
+        else if (you.strength > 72)
+            you.strength = 72;
+
+        if (you.max_strength > 72)
+            you.max_strength = 72;
+
+        gotoxy(45, 7);
+
+        if (you.might)
+            textcolor(LIGHTBLUE);  // no end of effect warning 
+        else if (you.strength < you.max_strength)
+            textcolor(YELLOW);
+
+        cprintf( "%d", you.strength );
+        textcolor(LIGHTGREY);
+
+        if (you.strength != you.max_strength)
+            cprintf( " (%d)", you.max_strength );
+        else
+            cprintf( "       " );
+
+        you.redraw_strength = 0;
+
+        if (you.strength < 1)
+            ouch(-9999, 0, KILLED_BY_WEAKNESS);
+
+        burden_change();
+    }
+
+    if (you.redraw_intelligence)
+    {
+        if (you.intel < 0)
+            you.intel = 0;
+        else if (you.intel > 72)
+            you.intel = 72;
+
+        if (you.max_intel > 72)
+            you.max_intel = 72;
+
+        gotoxy(45, 8);
+
+        if (you.intel < you.max_intel)
+            textcolor(YELLOW);
+
+        cprintf( "%d", you.intel );
+        textcolor(LIGHTGREY);
+
+        if (you.intel != you.max_intel)
+            cprintf( " (%d)", you.max_intel );
+        else
+            cprintf( "       " );
+
+        you.redraw_intelligence = 0;
+
+        if (you.intel < 1)
+            ouch(-9999, 0, KILLED_BY_STUPIDITY);
+    }
+
+    if (you.redraw_dexterity)
+    {
+        if (you.dex < 0)
+            you.dex = 0;
+        else if (you.dex > 72)
+            you.dex = 72;
+
+        if (you.max_dex > 72)
+            you.max_dex = 72;
+
+        gotoxy(45, 9);
+
+        if (you.dex < you.max_dex)
+            textcolor(YELLOW);
+
+        cprintf( "%d", you.dex );
+        textcolor(LIGHTGREY);
+
+        if (you.dex != you.max_dex)
+            cprintf( " (%d)", you.max_dex );
+        else
+            cprintf( "       " );
+
+        you.redraw_dexterity = 0;
+
+        if (you.dex < 1)
+            ouch(-9999, 0, KILLED_BY_CLUMSINESS);
+    }
+
+    if (you.redraw_armour_class)
+    {
+        gotoxy(44, 5);
+
+        if (you.duration[DUR_STONEMAIL])
+            dur_colour( BLUE, (you.duration[DUR_STONEMAIL] <= 6) );
+        else if (you.duration[DUR_ICY_ARMOUR] || you.duration[DUR_STONESKIN])
+            textcolor( LIGHTBLUE );  // no end of effect warning
+
+        cprintf( "%d  ", player_AC() );
+        textcolor( LIGHTGREY );
+
+        gotoxy(50, 5);
+
+        if (you.duration[DUR_CONDENSATION_SHIELD])      //jmf: added 24mar2000
+            textcolor( LIGHTBLUE );  // no end of effect warning
+
+        cprintf( "(%d) ", player_shield_class() );
+        textcolor( LIGHTGREY );
+
+        you.redraw_armour_class = 0;
+    }
+
+    if (you.redraw_evasion)
+    {
+        gotoxy(44, 6);
+
+        if (you.duration[DUR_FORESCRY])
+            textcolor(LIGHTBLUE);  // no end of effect warning
+
+        cprintf( "%d  ", player_evasion() );
+        textcolor(LIGHTGREY);
+
+        you.redraw_evasion = 0;
+    }
+
+    if (you.redraw_gold)
+    {
+        gotoxy(46, 10);
+        cprintf( "%d     ", you.gold );
+        you.redraw_gold = 0;
+    }
+
+    if (you.redraw_experience)
+    {
+        gotoxy(52, 11);
+
+#if DEBUG_DIAGNOSTICS
+        cprintf( "%d/%d  (%d/%d)", 
+                 you.experience_level, you.experience, 
+                 you.skill_cost_level, you.exp_available );
+#else
+        cprintf( "%d/%d  (%d)", 
+                 you.experience_level, you.experience, you.exp_available );
+#endif
+
+#ifdef LINUX
+        clear_to_end_of_line();
+#else
+        cprintf("   ");
+#endif
+        you.redraw_experience = 0;
+    }
+
+    if (you.wield_change)
+    {
+        gotoxy(40, 13);
+#ifdef LINUX
+        clear_to_end_of_line();
+#else
+        cprintf("                                       ");
+#endif
+
+        if (you.equip[EQ_WEAPON] != -1)
+        {
+            gotoxy(40, 13);
+            textcolor(you.inv[you.equip[EQ_WEAPON]].colour);
+
+            char str_pass[ ITEMNAME_SIZE ];
+            in_name( you.equip[EQ_WEAPON], DESC_INVENTORY, str_pass, Options.terse_hand );
+            str_pass[39] = '\0';
+
+            cprintf(str_pass);
+            textcolor(LIGHTGREY);
+        }
+        else
+        {
+            gotoxy(40, 13);
+
+            if (you.attribute[ATTR_TRANSFORMATION] == TRAN_BLADE_HANDS)
+            {
+                textcolor(RED);
+                cprintf("Blade Hands");
+                textcolor(LIGHTGREY);
+            }
+            else
+            {
+                textcolor(LIGHTGREY);
+                cprintf("Nothing wielded");
+            }
+        }
+        you.wield_change = false;
+    }
+
+    // The colour scheme for these flags is currently:
+    //
+    // - yellow, "orange", red      for bad conditions
+    // - light grey, white          for god based conditions
+    // - green, light green         for good conditions
+    // - blue, light blue           for good enchantments
+    // - magenta, light magenta     for "better" enchantments (deflect, fly)
+
+    if (you.redraw_status_flags & REDRAW_LINE_1_MASK)
+    {
+        gotoxy(40, 14);
+
+#ifdef LINUX
+        clear_to_end_of_line();
+#else
+        cprintf( "                                       " );
+        gotoxy(40, 14);
+#endif
+
+        switch (you.burden_state)
+        {
+        case BS_OVERLOADED:
+            textcolor( RED );
+            cprintf( "Overloaded " );
+            break;
+
+        case BS_ENCUMBERED:
+            textcolor( LIGHTRED );
+            cprintf( "Encumbered " );
+            break;
+
+        case BS_UNENCUMBERED:
+            break;
+        }
+
+        switch (you.hunger_state)
+        {
+        case HS_ENGORGED:
+            textcolor( LIGHTGREEN );
+            cprintf( "Engorged" );
+            break;
+
+        case HS_FULL:
+            textcolor( GREEN );
+            cprintf( "Full" );
+            break;
+
+        case HS_SATIATED:
+            break;
+
+        case HS_HUNGRY:
+            textcolor( YELLOW );
+            cprintf( "Hungry" );
+            break;
+
+        case HS_STARVING:
+            textcolor( RED );
+            cprintf( "Starving" );
+            break;
+        }
+
+        textcolor( LIGHTGREY );
+
+#if DEBUG_DIAGNOSTICS
+        // debug mode hunger-o-meter 
+        cprintf( " (%d:%d) ", you.hunger - you.old_hunger, you.hunger );
+#endif
+    }
+
+    if (you.redraw_status_flags & REDRAW_LINE_2_MASK)
+    {
+        gotoxy(40, 15);
+
+#ifdef LINUX
+        clear_to_end_of_line();
+#else
+        cprintf( "                                       " );
+        gotoxy(40, 15);
+#endif
+
+        // Max length of this line = 8 * 5 - 1 = 39
+
+        if (you.duration[DUR_PRAYER])
+        {
+            textcolor( WHITE );  // no end of effect warning
+            cprintf( "Pray " );
+        }
+
+        if (you.duration[DUR_REPEL_UNDEAD])
+        {
+            dur_colour( LIGHTGREY, (you.duration[DUR_REPEL_UNDEAD] <= 4) );
+            cprintf( "Holy " );
+        }
+
+        if (you.duration[DUR_DEFLECT_MISSILES])
+        {
+
+            dur_colour( MAGENTA, (you.duration[DUR_DEFLECT_MISSILES] <= 6) );
+            cprintf( "DMsl " );
+        }
+        else if (you.duration[DUR_REPEL_MISSILES])
+        {
+            dur_colour( BLUE, (you.duration[DUR_REPEL_MISSILES] <= 6) );
+            cprintf( "RMsl " );
+        }
+
+        if (you.duration[DUR_REGENERATION])
+        {
+            dur_colour( BLUE, (you.duration[DUR_REGENERATION] <= 6) );
+            cprintf( "Regen " );
+        }
+
+        if (you.duration[DUR_INSULATION])
+        {
+            dur_colour( BLUE, (you.duration[DUR_INSULATION] <= 6) );
+            cprintf( "Ins " );
+        }
+
+        if (player_is_levitating())
+        {
+            bool perm = (you.species == SP_KENKU && you.experience_level >= 15) 
+                        || (player_equip_ego_type( EQ_BOOTS, SPARM_LEVITATION ))
+                        || (you.attribute[ATTR_TRANSFORMATION] == TRAN_DRAGON);
+
+            if (wearing_amulet( AMU_CONTROLLED_FLIGHT ))
+            {
+                dur_colour( MAGENTA, (you.levitation <= 10 && !perm) );
+                cprintf( "Fly " );
+            }
+            else
+            {
+                dur_colour( BLUE, (you.levitation <= 10 && !perm) );
+                cprintf( "Lev " );
+            }
+        }
+
+        if (you.invis)
+        {
+            dur_colour( BLUE, (you.invis <= 6) );
+            cprintf( "Invis " );
+        }
+
+        // Perhaps this should be reversed to show when it can be used? 
+        // In that case, it should be probably be GREEN, and we'd have
+        // to check to see if the player does have a breath weapon. -- bwr
+        if (you.duration[DUR_BREATH_WEAPON])
+        {
+            textcolor( YELLOW );  // no warning
+            cprintf( "BWpn" );
+        }
+
+        textcolor( LIGHTGREY );
+    }
+
+    if (you.redraw_status_flags & REDRAW_LINE_3_MASK)
+    {
+        gotoxy(40, 16);
+
+#ifdef LINUX
+        clear_to_end_of_line();
+#else
+        cprintf( "                                       " );
+        gotoxy(40, 16);
+#endif
+        // Max length of this line = 7 * 5 + 3 - 1 = 37
+
+        // Note the usage of bad_ench_colour() correspond to levels that
+        // can be found in player.cc, ie those that the player can tell by 
+        // using the '@' command.  Things like confusion and sticky flame 
+        // hide their amounts and are thus always the same colour (so
+        // we're not really exposing any new information). --bwr
+        if (you.conf)
+        {
+            textcolor( RED );   // no different levels
+            cprintf( "Conf " );
+        }
+
+        if (you.duration[DUR_LIQUID_FLAMES])
+        {
+            textcolor( RED );   // no different levels
+            cprintf( "Fire " );
+        }
+
+        if (you.poison)
+        {
+            // We skip marking "quite" poisoned and instead mark the 
+            // levels where the rules for dealing poison damage change
+            // significantly.  See acr.cc for that code. -- bwr
+            textcolor( bad_ench_colour( you.poison, 5, 10 ) );
+            cprintf( "Pois " );
+        }
+
+        if (you.disease)
+        {
+            textcolor( bad_ench_colour( you.disease, 40, 120 ) );
+            cprintf( "Sick " );
+        }
+
+        if (you.rotting)
+        {
+            textcolor( bad_ench_colour( you.rotting, 4, 8 ) );
+            cprintf( "Rot " );
+        }
+
+        if (you.magic_contamination > 5)
+        {
+            textcolor( bad_ench_colour( you.magic_contamination, 15, 25 ) );
+            cprintf( "Glow " );
+        }
+
+        if (you.duration[DUR_SWIFTNESS])
+        {
+            dur_colour( BLUE, (you.duration[DUR_SWIFTNESS] <= 6) );
+            cprintf( "Swift " );
+        }
+
+        if (you.slow && !you.haste)
+        {
+            textcolor( RED );  // no end of effect warning
+            cprintf( "Slow" );
+        }
+        else if (you.haste && !you.slow)
+        {
+            dur_colour( BLUE, (you.haste <= 6) );
+            cprintf( "Fast" );
+        }
+
+        textcolor( LIGHTGREY );
+    }
+
+    you.redraw_status_flags = 0;
+
+#if DEBUG_DIAGNOSTICS
+    // debug mode GPS
+    gotoxy(40, 17);
+    cprintf( "Position (%2d,%2d)", you.x_pos, you.y_pos );
+#endif
+
+#ifdef LINUX
+    // get curses to redraw screen
+    update_screen();
+#endif
+}                               // end print_stats()