Return to armor.c CVS log

Up to [contributed] / early-roguelike / srogue

Annotation of early-roguelike/srogue/armor.c, Revision 1.1

1.1     ! rubenllo    1: /*
        !             2:  * This file contains misc functions for dealing with armor
        !             3:  *
        !             4:  * @(#)armor.c 9.0     (rdk)    7/17/84
        !             5:  *
        !             6:  * Super-Rogue
        !             7:  * Copyright (C) 1984 Robert D. Kindelberger
        !             8:  * All rights reserved.
        !             9:  *
        !            10:  * Based on "Rogue: Exploring the Dungeons of Doom"
        !            11:  * Copyright (C) 1980, 1981 Michael Toy, Ken Arnold and Glenn Wichman
        !            12:  * All rights reserved.
        !            13:  *
        !            14:  * See the file LICENSE.TXT for full copyright and licensing information.
        !            15:  */
        !            16:
        !            17: #include "rogue.h"
        !            18: #include "rogue.ext"
        !            19:
        !            20: /*
        !            21:  * wear:
        !            22:  *     The player wants to wear something, so let the hero try
        !            23:  */
        !            24: void
        !            25: wear(void)
        !            26: {
        !            27:        reg struct linked_list *item;
        !            28:        reg struct object *obj;
        !            29:
        !            30:        if (cur_armor != NULL) {
        !            31:                msg("You are already wearing some.");
        !            32:                after = FALSE;
        !            33:                return;
        !            34:        }
        !            35:        if ((item = get_item("wear", ARMOR)) == NULL)
        !            36:                return;
        !            37:        obj = OBJPTR(item);
        !            38:        if (obj->o_type != ARMOR) {
        !            39:                msg("You can't wear that.");
        !            40:                return;
        !            41:        }
        !            42:        waste_time();
        !            43:        msg("Wearing %s.", a_magic[obj->o_which].mi_name);
        !            44:        cur_armor = obj;
        !            45:        setoflg(obj,ISKNOW);
        !            46:        nochange = FALSE;
        !            47: }
        !            48:
        !            49:
        !            50: /*
        !            51:  * take_off:
        !            52:  *     Get the armor off of the players back
        !            53:  */
        !            54: void
        !            55: take_off(void)
        !            56: {
        !            57:        reg struct object *obj;
        !            58:
        !            59:        if ((obj = cur_armor) == NULL) {
        !            60:                msg("Not wearing any armor.");
        !            61:                return;
        !            62:        }
        !            63:        if (!dropcheck(cur_armor))
        !            64:                return;
        !            65:        cur_armor = NULL;
        !            66:        msg("Was wearing %c) %s",pack_char(obj),inv_name(obj,TRUE));
        !            67:        nochange = FALSE;
        !            68: }
        !            69:
        !            70: /*
        !            71:  * initarmor:
        !            72:  *             Initialize some armor.
        !            73:  */
        !            74: void
        !            75: initarmor(struct object *obj, int what)
        !            76: {
        !            77:        struct init_armor *iwa;
        !            78:        struct magic_item *mi;
        !            79:
        !            80:        obj->o_type = ARMOR;
        !            81:        obj->o_which = what;
        !            82:        iwa = &armors[what];
        !            83:        mi = &a_magic[what];
        !            84:        obj->o_vol = iwa->a_vol;
        !            85:        obj->o_ac = iwa->a_class;
        !            86:        obj->o_weight = iwa->a_wght;
        !            87:        obj->o_typname = things[TYP_ARMOR].mi_name;
        !            88: }
        !            89:
        !            90: /*
        !            91:  * hurt_armor:
        !            92:  *     Returns TRUE if armor is damaged
        !            93:  */
        !            94: bool
        !            95: hurt_armor(struct object *obj)
        !            96: {
        !            97:        reg int type, ac;
        !            98:
        !            99:        if (obj != NULL) {
        !           100:                if (o_on(obj, ISPROT) || (o_on(obj, ISBLESS) && rnd(100) < 10))
        !           101:                        return FALSE;
        !           102:                ac = obj->o_ac;
        !           103:                type = obj->o_which;
        !           104:                if (type != PADDED && type != LEATHER)
        !           105:                        if ((type == STUDDED && ac < 8) || (type != STUDDED && ac < 9))
        !           106:                                return TRUE;
        !           107:        }
        !           108:        return FALSE;
        !           109: }