warden/early-roguelike
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Import UltraRogue from the Roguelike Restoration Project (r1490)

Browse source
This commit is contained in:
John "Elwin" Edwards 2017-01-31 19:56:04 -05:00
parent c346921c68
commit 11c74c273d
59 changed files with 42044 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

207
urogue/armor.c Normal file
View file

@ -0,0 +1,207 @@
/*
armor.c - functions for dealing with armor
UltraRogue: The Ultimate Adventure in the Dungeons of Doom
Copyright (C) 1985, 1986, 1992, 1993, 1995 Herb Chong
All rights reserved.
Based on "Advanced Rogue"
Copyright (C) 1984, 1985 Michael Morgan, Ken Dalka
All rights reserved.
Based on "Rogue: Exploring the Dungeons of Doom"
Copyright (C) 1980, 1981 Michael Toy, Ken Arnold and Glenn Wichman
All rights reserved.
See the file LICENSE.TXT for full copyright and licensing information.
*/
#include "rogue.h"
/*
wear()
The player wants to wear something, so let him/her put it on.
*/
void
wear(void)
{
struct object *obj;
if (cur_armor != NULL)
{
msg("You are already wearing some.");
after = FALSE;
return;
}
/* What does player want to wear? */
if ((obj = get_object(pack, "wear", ARMOR, NULL)) == NULL)
return;
wear_ok(&player, obj, MESSAGE);
waste_time();
cur_armor = obj;
obj->o_flags |= ISKNOW;
msg("You are now wearing %s.", inv_name(obj, TRUE));
return;
}
/*
take_off()
Get the armor off of the players back
*/
void
take_off(void)
{
struct object *obj;
if ((obj = cur_armor) == NULL)
{
msg("You aren't wearing armor!");
return;
}
if (!dropcheck(cur_armor))
return;
msg("You were wearing %c%c) %s.", ARMOR, print_letters[get_ident(obj)],
inv_name(obj, LOWERCASE));
cur_armor = NULL;
if (on(player, STUMBLER))
{
msg("Your foot feels a lot better now.");
turn_off(player, STUMBLER);
}
}
/*
wear_ok()
enforce player class armor restrictions
*/
int
wear_ok(struct thing *wearee, struct object *obj, int print_message)
{
int which = obj->o_which;
int ret_val = TRUE;
int class_type = wearee->t_ctype;
if (obj->o_type != ARMOR)
return(FALSE);
else
switch (class_type)
{
case C_MAGICIAN: /* cannot wear metal */
case C_ILLUSION:
switch (which)
{
case RING_MAIL:
case SCALE_MAIL:
case PADDED_ARMOR:
case CHAIN_MAIL:
case BRIGANDINE:
case SPLINT_MAIL:
case GOOD_CHAIN:
case PLATE_MAIL:
case PLATE_ARMOR:
ret_val = FALSE;
break;
default:
break;
}
case C_THIEF: /* cannot clank around */
case C_ASSASIN:
case C_NINJA:
switch (which)
{
case CHAIN_MAIL:
case BRIGANDINE:
case SPLINT_MAIL:
case GOOD_CHAIN:
case PLATE_MAIL:
case PLATE_ARMOR:
ret_val = FALSE;
break;
default:
break;
}
case C_CLERIC: /* cannot wear plate */
case C_DRUID:
switch (which)
{
case PLATE_MAIL:
case PLATE_ARMOR:
case MITHRIL:
ret_val = FALSE;
break;
default:
break;
}
case C_FIGHTER: /* wear anything */
case C_RANGER:
break;
case C_PALADIN: /* cannot wear common stuff */
switch (which)
{
case SOFT_LEATHER:
case CUIRBOLILLI:
case HEAVY_LEATHER:
case STUDDED_LEATHER:
case PADDED_ARMOR:
case BRIGANDINE:
ret_val = FALSE;
break;
default:
break;
}
case C_MONSTER:
break;
default: /* Unknown class */
debug("Unknown class %d.", class_type);
break;
}
if (ret_val == FALSE && print_message == MESSAGE)
switch (class_type)
{
case C_MAGICIAN:
case C_ILLUSION:
msg("You cannot regenerate spell points while wearing that!");
break;
case C_THIEF:
case C_ASSASIN:
case C_NINJA:
msg("Don't expect to be stealthy while wearing that!");
break;
case C_CLERIC:
case C_DRUID:
case C_PALADIN:
msg("Your god strongly disapproves of your wearing that!");
break;
case C_FIGHTER:
case C_RANGER:
case C_MONSTER:
break;
}
return(ret_val);
}