Return to eat.c CVS log

Up to [contributed] / early-roguelike / arogue7

Annotation of early-roguelike/arogue7/eat.c, Revision 1.1

1.1     ! rubenllo    1: /*
        !             2:  * eat.c  -  Functions for dealing with digestion
        !             3:  *
        !             4:  * Advanced Rogue
        !             5:  * Copyright (C) 1984, 1985, 1986 Michael Morgan, Ken Dalka and AT&T
        !             6:  * All rights reserved.
        !             7:  *
        !             8:  * Based on "Rogue: Exploring the Dungeons of Doom"
        !             9:  * Copyright (C) 1980, 1981 Michael Toy, Ken Arnold and Glenn Wichman
        !            10:  * All rights reserved.
        !            11:  *
        !            12:  * See the file LICENSE.TXT for full copyright and licensing information.
        !            13:  */
        !            14:
        !            15: #include "curses.h"
        !            16: #include "rogue.h"
        !            17:
        !            18: /*
        !            19:  * eat:
        !            20:  *     He wants to eat something, so let him try
        !            21:  */
        !            22:
        !            23: void
        !            24: eat(void)
        !            25: {
        !            26:     register struct linked_list *item;
        !            27:     int which;
        !            28:     unsigned long temp;
        !            29:
        !            30:     if (player.t_action != C_EAT) {
        !            31:        if ((item = get_item(pack, "eat", FOOD, FALSE, FALSE)) == NULL)
        !            32:            return;
        !            33:
        !            34:        player.t_using = item;  /* Remember what it is */
        !            35:        player.t_action = C_EAT;        /* We are eating */
        !            36:        which = (OBJPTR(item))->o_which;
        !            37:        player.t_no_move = max(foods[which].mi_food/100, 1) * movement(&player);
        !            38:        return;
        !            39:     }
        !            40:
        !            41:     /* We have waited our time, let's eat the food */
        !            42:     item = player.t_using;
        !            43:     player.t_using = NULL;
        !            44:     player.t_action = A_NIL;
        !            45:
        !            46:     which = (OBJPTR(item))->o_which;
        !            47:     if ((food_left += foods[which].mi_food) > STOMACHSIZE)
        !            48:        food_left = STOMACHSIZE;
        !            49:     del_pack(item);
        !            50:     if (hungry_state == F_SATIATED && food_left == STOMACHSIZE && rnd(4) == 1) {
        !            51:        pstats.s_hpt = 0;
        !            52:        msg ("You choke on all that food and die! -- More --");
        !            53:        wait_for(' ');
        !            54:        death(D_FOOD_CHOKE);
        !            55:     }
        !            56:     if (food_left >= STOMACHSIZE-MORETIME) {
        !            57:        hungry_state = F_SATIATED;
        !            58:        msg ("You have trouble getting all that food down.");
        !            59:        msg ("Your stomach feels like its about to burst!");
        !            60:     }
        !            61:     else {
        !            62:        hungry_state = F_OKAY;
        !            63:        switch (rnd(3)) {
        !            64:        case 0: msg("My, that was a yummy %s", foods[which].mi_name);
        !            65:        when 1: msg("Mmmm, that was a tasty %s", foods[which].mi_name);
        !            66:        when 2: msg("Wow, that was a scrumptious %s", foods[which].mi_name);
        !            67:        }
        !            68:     }
        !            69:     updpack(TRUE, &player);
        !            70:     switch(which) {
        !            71:     case E_WHORTLEBERRY:
        !            72:        add_abil[A_INTELLIGENCE](1);
        !            73:
        !            74:     when E_SWEETSOP:
        !            75:        add_abil[A_DEXTERITY](1);
        !            76:
        !            77:     when E_SOURSOP:
        !            78:        add_abil[A_STRENGTH](1);
        !            79:
        !            80:     when E_SAPODILLA:
        !            81:        add_abil[A_WISDOM](1);
        !            82:
        !            83:     when E_RAMBUTAN:
        !            84:        add_abil[A_CONSTITUTION](1);
        !            85:
        !            86:     when E_PEACH:
        !            87:        add_abil[A_CHARISMA](1);
        !            88:
        !            89:     when E_STRAWBERRY:
        !            90:        temp = pstats.s_exp/100;
        !            91:        pstats.s_exp += temp;
        !            92:        if (temp > 0)
        !            93:            msg("You feel slightly more experienced now");
        !            94:        check_level();
        !            95:
        !            96:     when E_PITANGA:
        !            97:        max_stats.s_hpt++;
        !            98:        pstats.s_hpt++;
        !            99:        if (terse)
        !           100:            msg("You feel a bit tougher now");
        !           101:        else
        !           102:            msg("You feel a bit tougher now. Go get 'em!");
        !           103:
        !           104:     when E_HAGBERRY:
        !           105:        pstats.s_arm--;
        !           106:        msg("Your skin feels more resilient now");
        !           107:
        !           108:     when E_DEWBERRY:
        !           109:        if (chant_time > 0) {
        !           110:            chant_time -= 50;
        !           111:            if (chant_time < 0)
        !           112:                chant_time = 0;
        !           113:            msg("You feel you have more chant ability");
        !           114:        }
        !           115:        if (pray_time > 0) {
        !           116:            pray_time -= 50;
        !           117:            if (pray_time < 0)
        !           118:                pray_time = 0;
        !           119:            msg("You feel you have more prayer ability");
        !           120:        }
        !           121:        if (spell_power > 0) {
        !           122:            spell_power -= 50;
        !           123:            if (spell_power < 0)
        !           124:                spell_power = 0;
        !           125:            msg("You feel you have more spell casting ability");
        !           126:        }
        !           127:
        !           128:     otherwise: /* all the foods don't have to do something */
        !           129:        break;
        !           130:     }
        !           131: }