Return to daemons.c CVS log

Up to [Research Unix] / researchv10no / games / rogue

Annotation of researchv10no/games/rogue/daemons.c, revision 1.1

1.1     ! root        1: /*
        !             2:  * All the daemon and fuse functions are in here
        !             3:  *
        !             4:  * @(#)daemons.c       3.7 (Berkeley) 6/15/81
        !             5:  */
        !             6: 
        !             7: #include <curses.h>
        !             8: #include "rogue.h"
        !             9: 
        !            10: /*
        !            11:  * doctor:
        !            12:  *     A healing daemon that restors hit points after rest
        !            13:  */
        !            14: 
        !            15: doctor()
        !            16: {
        !            17:     register int lv, ohp;
        !            18: 
        !            19:     lv = pstats.s_lvl;
        !            20:     ohp = pstats.s_hpt;
        !            21:     quiet++;
        !            22:     if (lv < 8)
        !            23:     {
        !            24:        if (quiet > 20 - lv*2)
        !            25:            pstats.s_hpt++;
        !            26:     }
        !            27:     else
        !            28:        if (quiet >= 3)
        !            29:            pstats.s_hpt += rnd(lv - 7)+1;
        !            30:     if (ISRING(LEFT, R_REGEN))
        !            31:        pstats.s_hpt++;
        !            32:     if (ISRING(RIGHT, R_REGEN))
        !            33:        pstats.s_hpt++;
        !            34:     if (ohp != pstats.s_hpt)
        !            35:     {
        !            36:        if (pstats.s_hpt > max_hp)
        !            37:            pstats.s_hpt = max_hp;
        !            38:        quiet = 0;
        !            39:     }
        !            40: }
        !            41: 
        !            42: /*
        !            43:  * Swander:
        !            44:  *     Called when it is time to start rolling for wandering monsters
        !            45:  */
        !            46: 
        !            47: swander()
        !            48: {
        !            49:     daemon(rollwand, 0, BEFORE);
        !            50: }
        !            51: 
        !            52: /*
        !            53:  * rollwand:
        !            54:  *     Called to roll to see if a wandering monster starts up
        !            55:  */
        !            56: 
        !            57: rollwand()
        !            58: {
        !            59:     static int between = 0;
        !            60: 
        !            61:     if (++between >= 4)
        !            62:     {
        !            63:        if (roll(1, 6) == 4)
        !            64:        {
        !            65:            wanderer();
        !            66:            kill_daemon(rollwand);
        !            67:            fuse(swander, 0, WANDERTIME, BEFORE);
        !            68:        }
        !            69:        between = 0;
        !            70:     }
        !            71: }
        !            72: 
        !            73: /*
        !            74:  * unconfuse:
        !            75:  *     Release the poor player from his confusion
        !            76:  */
        !            77: 
        !            78: unconfuse()
        !            79: {
        !            80:     player.t_flags &= ~ISHUH;
        !            81:     msg("You feel less confused now");
        !            82: }
        !            83: 
        !            84: 
        !            85: /*
        !            86:  * unsee:
        !            87:  *     He lost his see invisible power
        !            88:  */
        !            89: 
        !            90: unsee()
        !            91: {
        !            92:     player.t_flags &= ~CANSEE;
        !            93: }
        !            94: 
        !            95: /*
        !            96:  * sight:
        !            97:  *     He gets his sight back
        !            98:  */
        !            99: 
        !           100: sight()
        !           101: {
        !           102:     if (on(player, ISBLIND))
        !           103:     {
        !           104:        extinguish(sight);
        !           105:        player.t_flags &= ~ISBLIND;
        !           106:        light(&hero);
        !           107:        msg("The veil of darkness lifts");
        !           108:     }
        !           109: }
        !           110: 
        !           111: /*
        !           112:  * nohaste:
        !           113:  *     End the hasting
        !           114:  */
        !           115: 
        !           116: nohaste()
        !           117: {
        !           118:     player.t_flags &= ~ISHASTE;
        !           119:     msg("You feel yourself slowing down.");
        !           120: }
        !           121: 
        !           122: /*
        !           123:  * digest the hero's food
        !           124:  */
        !           125: stomach()
        !           126: {
        !           127:     register int oldfood;
        !           128: 
        !           129:     if (food_left <= 0)
        !           130:     {
        !           131:        /*
        !           132:         * the hero is fainting
        !           133:         */
        !           134:        if (no_command || rnd(100) > 20)
        !           135:            return;
        !           136:        no_command = rnd(8)+4;
        !           137:        if (!terse)
        !           138:            addmsg("You feel too weak from lack of food.  ");
        !           139:        msg("You faint");
        !           140:        running = FALSE;
        !           141:        count = 0;
        !           142:        hungry_state = 3;
        !           143:     }
        !           144:     else
        !           145:     {
        !           146:        oldfood = food_left;
        !           147:        food_left -= ring_eat(LEFT) + ring_eat(RIGHT) + 1 - amulet;
        !           148: 
        !           149:        if (food_left < MORETIME && oldfood >= MORETIME)
        !           150:        {
        !           151:            msg("You are starting to feel weak");
        !           152:            hungry_state = 2;
        !           153:        }
        !           154:        else if (food_left < 2 * MORETIME && oldfood >= 2 * MORETIME)
        !           155:        {
        !           156:            if (!terse)
        !           157:                msg("You are starting to get hungry");
        !           158:            else
        !           159:                msg("Getting hungry");
        !           160:            hungry_state = 1;
        !           161:        }
        !           162:     }
        !           163: }

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.