act_obj.c File Reference

#include <sys/types.h>
#include <sys/time.h>
#include <stdio.h>
#include <string.h>
#include <stdlib.h>
#include "merc.h"
#include "interp.h"

Include dependency graph for act_obj.c:

Go to the source code of this file.

Defines
#define	CD   CHAR_DATA
#define	OD   OBJ_DATA
Functions
OD *get_obj_keeper	args ((CHAR_DATA *ch, CHAR_DATA *keeper, char *argument))
void obj_to_keeper	args ((OBJ_DATA *obj, CHAR_DATA *ch))
int get_cost	args ((CHAR_DATA *keeper, OBJ_DATA *obj, bool fBuy))
CD *find_keeper	args ((CHAR_DATA *ch))
void wear_obj	args ((CHAR_DATA *ch, OBJ_DATA *obj, bool fReplace))
bool remove_obj	args ((CHAR_DATA *ch, int iWear, bool fReplace))
bool	can_loot (CHAR_DATA *ch, OBJ_DATA *obj)
void	do_brandish (CHAR_DATA *ch, char *argument)
void	do_buy (CHAR_DATA *ch, char *argument)
void	do_drink (CHAR_DATA *ch, char *argument)
void	do_drop (CHAR_DATA *ch, char *argument)
void	do_eat (CHAR_DATA *ch, char *argument)
void	do_envenom (CHAR_DATA *ch, char *argument)
void	do_fill (CHAR_DATA *ch, char *argument)
void	do_get (CHAR_DATA *ch, char *argument)
void	do_give (CHAR_DATA *ch, char *argument)
void	do_list (CHAR_DATA *ch, char *argument)
void	do_pour (CHAR_DATA *ch, char *argument)
void	do_put (CHAR_DATA *ch, char *argument)
void	do_quaff (CHAR_DATA *ch, char *argument)
void	do_recite (CHAR_DATA *ch, char *argument)
void	do_remove (CHAR_DATA *ch, char *argument)
void	do_sacrifice (CHAR_DATA *ch, char *argument)
void	do_second (CHAR_DATA *ch, char *argument)
void	do_sell (CHAR_DATA *ch, char *argument)
void	do_steal (CHAR_DATA *ch, char *argument)
void	do_value (CHAR_DATA *ch, char *argument)
void	do_wear (CHAR_DATA *ch, char *argument)
void	do_zap (CHAR_DATA *ch, char *argument)
CHAR_DATA *	find_keeper (CHAR_DATA *ch)
int	get_cost (CHAR_DATA *keeper, OBJ_DATA *obj, bool fBuy)
void	get_obj (CHAR_DATA *ch, OBJ_DATA *obj, OBJ_DATA *container)
OBJ_DATA *	get_obj_keeper (CHAR_DATA *ch, CHAR_DATA *keeper, char *argument)
void	obj_to_keeper (OBJ_DATA *obj, CHAR_DATA *ch)
bool	remove_obj (CHAR_DATA *ch, int iWear, bool fReplace)
void	wear_obj (CHAR_DATA *ch, OBJ_DATA *obj, bool fReplace)

---

Define Documentation

#define CD   CHAR_DATA

Definition at line 46 of file act_obj.c.

#define OD   OBJ_DATA

Definition at line 47 of file act_obj.c.

---

Function Documentation

OD* get_obj_keeper args (  (CHAR_DATA *ch, CHAR_DATA *keeper, char *argument)   )

void obj_to_keeper args (  (OBJ_DATA *obj, CHAR_DATA *ch)   )

int get_cost args (  (CHAR_DATA *keeper, OBJ_DATA *obj, bool fBuy)   )

CD* find_keeper args (  (CHAR_DATA *ch)   )

void wear_obj args (  (CHAR_DATA *ch, OBJ_DATA *obj, bool fReplace)   )

bool remove_obj args (  (CHAR_DATA *ch, int iWear, bool fReplace)   )

bool can_loot (  CHAR_DATA *  ch, OBJ_DATA *  obj )

Definition at line 61 of file act_obj.c. References char_list, FALSE, IS_IMMORTAL, IS_NPC, is_same_group(), IS_SET, char_data::name, char_data::next, PLR_CANLOOT, str_cmp(), and TRUE. Referenced by do_get(), get_obj(), mobile_update(), and spec_janitor(). { CHAR_DATA *owner, *wch; if (IS_IMMORTAL (ch)) return TRUE; if (!obj->owner || obj->owner == NULL) return TRUE; owner = NULL; for (wch = char_list; wch != NULL; wch = wch->next) if (!str_cmp (wch->name, obj->owner)) owner = wch; if (owner == NULL) return TRUE; if (!str_cmp (ch->name, owner->name)) return TRUE; if (!IS_NPC (owner) && IS_SET (owner->act, PLR_CANLOOT)) return TRUE; if (is_same_group (ch, owner)) return TRUE; return FALSE; }

Here is the call graph for this function:

void do_brandish (  CHAR_DATA *  ch, char *  argument )

Definition at line 2102 of file act_obj.c. References act, bug(), check_improve(), extract_obj(), FALSE, get_eq_char(), get_skill(), gsn_staves, char_data::in_room, IS_NPC, ITEM_STAFF, obj_data::item_type, obj_data::level, MAX_SKILL, char_data::next_in_room, number_percent(), obj_cast_spell(), room_index_data::people, PULSE_VIOLENCE, send_to_char(), skill_table, skill_type::spell_fun, TAR_CHAR_DEFENSIVE, TAR_CHAR_OFFENSIVE, TAR_CHAR_SELF, TAR_IGNORE, TO_CHAR, TO_ROOM, TRUE, obj_data::value, WAIT_STATE, and WEAR_HOLD. { CHAR_DATA *vch; CHAR_DATA *vch_next; OBJ_DATA *staff; int sn; if ((staff = get_eq_char (ch, WEAR_HOLD)) == NULL) { send_to_char ("You hold nothing in your hand.\n\r", ch); return; } if (staff->item_type != ITEM_STAFF) { send_to_char ("You can brandish only with a staff.\n\r", ch); return; } if ((sn = staff->value[3]) < 0 || sn >= MAX_SKILL || skill_table[sn].spell_fun == 0) { bug ("Do_brandish: bad sn %d.", sn); return; } WAIT_STATE (ch, 2 * PULSE_VIOLENCE); if (staff->value[2] > 0) { act ("$n brandishes $p.", ch, staff, NULL, TO_ROOM); act ("You brandish $p.", ch, staff, NULL, TO_CHAR); if (ch->level < staff->level || number_percent () >= 20 + get_skill (ch, gsn_staves) * 4 / 5) { act ("You fail to invoke $p.", ch, staff, NULL, TO_CHAR); act ("...and nothing happens.", ch, NULL, NULL, TO_ROOM); check_improve (ch, gsn_staves, FALSE, 2); } else for (vch = ch->in_room->people; vch; vch = vch_next) { vch_next = vch->next_in_room; switch (skill_table[sn].target) { default: bug ("Do_brandish: bad target for sn %d.", sn); return; case TAR_IGNORE: if (vch != ch) continue; break; case TAR_CHAR_OFFENSIVE: if (IS_NPC (ch) ? IS_NPC (vch) : !IS_NPC (vch)) continue; break; case TAR_CHAR_DEFENSIVE: if (IS_NPC (ch) ? !IS_NPC (vch) : IS_NPC (vch)) continue; break; case TAR_CHAR_SELF: if (vch != ch) continue; break; } obj_cast_spell (staff->value[3], staff->value[0], ch, vch, NULL); check_improve (ch, gsn_staves, TRUE, 2); } } if (--staff->value[2] <= 0) { act ("$n's $p blazes bright and is gone.", ch, staff, NULL, TO_ROOM); act ("Your $p blazes bright and is gone.", ch, staff, NULL, TO_CHAR); extract_obj (staff); } return; }

Here is the call graph for this function:

void do_buy (  CHAR_DATA *  ch, char *  argument )

Definition at line 2655 of file act_obj.c. References act, char_data::act, ACT_PET, add_follower(), AFF_CHARM, char_data::affected_by, bug(), can_carry_n(), can_carry_w(), can_see_obj(), char_to_room(), check_improve(), char_data::comm, COMM_NOCHANNELS, COMM_NOSHOUT, COMM_NOTELL, obj_data::cost, create_mobile(), create_object(), deduct_cost(), char_data::description, obj_data::extra_flags, find_keeper(), free_string(), get_char_room(), get_cost(), get_obj_keeper(), get_obj_number(), get_obj_weight(), get_room_index(), get_skill(), char_data::gold, gsn_haggle, char_data::in_room, IS_NPC, IS_OBJ_STAT, IS_SET, ITEM_HAD_TIMER, ITEM_INVENTORY, ITEM_SELL_EXTRACT, char_data::leader, char_data::level, MAX_INPUT_LENGTH, MAX_STRING_LENGTH, mult_argument(), char_data::name, obj_data::next_content, number_percent(), obj_from_char(), obj_to_char(), one_argument(), char_data::pet, obj_data::pIndexData, char_data::pIndexData, REMOVE_BIT, char_data::reply, ROOM_PET_SHOP, send_to_char(), SET_BIT, obj_data::short_descr, char_data::silver, smash_tilde(), str_cmp(), str_dup(), obj_data::timer, TO_CHAR, TO_ROOM, TO_VICT, and TRUE. { char buf[MAX_STRING_LENGTH]; int cost, roll; if (argument[0] == '\0') { send_to_char ("Buy what?\n\r", ch); return; } if (IS_SET (ch->in_room->room_flags, ROOM_PET_SHOP)) { char arg[MAX_INPUT_LENGTH]; char buf[MAX_STRING_LENGTH]; CHAR_DATA *pet; ROOM_INDEX_DATA *pRoomIndexNext; ROOM_INDEX_DATA *in_room; smash_tilde (argument); if (IS_NPC (ch)) return; argument = one_argument (argument, arg); /* hack to make new thalos pets work */ if (ch->in_room->vnum == 9621) pRoomIndexNext = get_room_index (9706); else pRoomIndexNext = get_room_index (ch->in_room->vnum + 1); if (pRoomIndexNext == NULL) { bug ("Do_buy: bad pet shop at vnum %d.", ch->in_room->vnum); send_to_char ("Sorry, you can't buy that here.\n\r", ch); return; } in_room = ch->in_room; ch->in_room = pRoomIndexNext; pet = get_char_room (ch, arg); ch->in_room = in_room; if (pet == NULL || !IS_SET (pet->act, ACT_PET)) { send_to_char ("Sorry, you can't buy that here.\n\r", ch); return; } if (ch->pet != NULL) { send_to_char ("You already own a pet.\n\r", ch); return; } cost = 10 * pet->level * pet->level; if ((ch->silver + 100 * ch->gold) < cost) { send_to_char ("You can't afford it.\n\r", ch); return; } if (ch->level < pet->level) { send_to_char ("You're not powerful enough to master this pet.\n\r", ch); return; } /* haggle */ roll = number_percent (); if (roll < get_skill (ch, gsn_haggle)) { cost -= cost / 2 * roll / 100; sprintf (buf, "You haggle the price down to %d coins.\n\r", cost); send_to_char (buf, ch); check_improve (ch, gsn_haggle, TRUE, 4); } deduct_cost (ch, cost); pet = create_mobile (pet->pIndexData); SET_BIT (pet->act, ACT_PET); SET_BIT (pet->affected_by, AFF_CHARM); pet->comm = COMM_NOTELL | COMM_NOSHOUT | COMM_NOCHANNELS; argument = one_argument (argument, arg); if (arg[0] != '\0') { sprintf (buf, "%s %s", pet->name, arg); free_string (pet->name); pet->name = str_dup (buf); } sprintf (buf, "%sA neck tag says 'I belong to %s'.\n\r", pet->description, ch->name); free_string (pet->description); pet->description = str_dup (buf); char_to_room (pet, ch->in_room); add_follower (pet, ch); pet->leader = ch; ch->pet = pet; send_to_char ("Enjoy your pet.\n\r", ch); act ("$n bought $N as a pet.", ch, NULL, pet, TO_ROOM); return; } else { CHAR_DATA *keeper; OBJ_DATA *obj, *t_obj; char arg[MAX_INPUT_LENGTH]; int number, count = 1; if ((keeper = find_keeper (ch)) == NULL) return; number = mult_argument (argument, arg); obj = get_obj_keeper (ch, keeper, arg); cost = get_cost (keeper, obj, TRUE); if (number < 1 || number > 99) { act ("$n tells you 'Get real!", keeper, NULL, ch, TO_VICT); return; } if (cost <= 0 || !can_see_obj (ch, obj)) { act ("$n tells you 'I don't sell that -- try 'list''.", keeper, NULL, ch, TO_VICT); ch->reply = keeper; return; } if (!IS_OBJ_STAT (obj, ITEM_INVENTORY)) { for (t_obj = obj->next_content; count < number && t_obj != NULL; t_obj = t_obj->next_content) { if (t_obj->pIndexData == obj->pIndexData && !str_cmp (t_obj->short_descr, obj->short_descr)) count++; else break; } if (count < number) { act ("$n tells you 'I don't have that many in stock.", keeper, NULL, ch, TO_VICT); ch->reply = keeper; return; } } if ((ch->silver + ch->gold * 100) < cost * number) { if (number > 1) act ("$n tells you 'You can't afford to buy that many.", keeper, obj, ch, TO_VICT); else act ("$n tells you 'You can't afford to buy $p'.", keeper, obj, ch, TO_VICT); ch->reply = keeper; return; } if (obj->level > ch->level) { act ("$n tells you 'You can't use $p yet'.", keeper, obj, ch, TO_VICT); ch->reply = keeper; return; } if (ch->carry_number + number * get_obj_number (obj) > can_carry_n (ch)) { send_to_char ("You can't carry that many items.\n\r", ch); return; } if (ch->carry_weight + number * get_obj_weight (obj) > can_carry_w (ch)) { send_to_char ("You can't carry that much weight.\n\r", ch); return; } /* haggle */ roll = number_percent (); if (!IS_OBJ_STAT (obj, ITEM_SELL_EXTRACT) && roll < get_skill (ch, gsn_haggle)) { cost -= obj->cost / 2 * roll / 100; act ("You haggle with $N.", ch, NULL, keeper, TO_CHAR); check_improve (ch, gsn_haggle, TRUE, 4); } if (number > 1) { sprintf (buf, "$n buys $p[%d].", number); act (buf, ch, obj, NULL, TO_ROOM); sprintf (buf, "You buy $p[%d] for %d silver.", number, cost * number); act (buf, ch, obj, NULL, TO_CHAR); } else { act ("$n buys $p.", ch, obj, NULL, TO_ROOM); sprintf (buf, "You buy $p for %d silver.", cost); act (buf, ch, obj, NULL, TO_CHAR); } deduct_cost (ch, cost * number); keeper->gold += cost * number / 100; keeper->silver += cost * number - (cost * number / 100) * 100; for (count = 0; count < number; count++) { if (IS_SET (obj->extra_flags, ITEM_INVENTORY)) t_obj = create_object (obj->pIndexData, obj->level); else { t_obj = obj; obj = obj->next_content; obj_from_char (t_obj); } if (t_obj->timer > 0 && !IS_OBJ_STAT (t_obj, ITEM_HAD_TIMER)) t_obj->timer = 0; REMOVE_BIT (t_obj->extra_flags, ITEM_HAD_TIMER); obj_to_char (t_obj, ch); if (cost < t_obj->cost) t_obj->cost = cost; } } }

Here is the call graph for this function:

void do_drink (  CHAR_DATA *  ch, char *  argument )

Definition at line 1263 of file act_obj.c. References act, AFF_POISON, affect_join(), APPLY_NONE, affect_data::bitvector, bug(), COND_DRUNK, COND_FULL, COND_HUNGER, COND_THIRST, room_index_data::contents, affect_data::duration, gain_condition(), get_obj_here(), gsn_poison, obj_data::in_room, IS_IMMORTAL, IS_NPC, ITEM_DRINK_CON, ITEM_FOUNTAIN, obj_data::item_type, affect_data::level, liq_type::liq_affect, liq_table, affect_data::location, MAX_INPUT_LENGTH, affect_data::modifier, obj_data::next_content, number_fuzzy(), one_argument(), send_to_char(), TO_AFFECTS, TO_CHAR, TO_ROOM, affect_data::type, UMIN, obj_data::value, and affect_data::where. { char arg[MAX_INPUT_LENGTH]; OBJ_DATA *obj; int amount; int liquid; one_argument (argument, arg); if (arg[0] == '\0') { for (obj = ch->in_room->contents; obj; obj = obj->next_content) { if (obj->item_type == ITEM_FOUNTAIN) break; } if (obj == NULL) { send_to_char ("Drink what?\n\r", ch); return; } } else { if ((obj = get_obj_here (ch, arg)) == NULL) { send_to_char ("You can't find it.\n\r", ch); return; } } if (!IS_NPC (ch) && ch->pcdata->condition[COND_DRUNK] > 10) { send_to_char ("You fail to reach your mouth. *Hic*\n\r", ch); return; } switch (obj->item_type) { default: send_to_char ("You can't drink from that.\n\r", ch); return; case ITEM_FOUNTAIN: if ((liquid = obj->value[2]) < 0) { bug ("Do_drink: bad liquid number %d.", liquid); liquid = obj->value[2] = 0; } amount = liq_table[liquid].liq_affect[4] * 3; break; case ITEM_DRINK_CON: if (obj->value[1] <= 0) { send_to_char ("It is already empty.\n\r", ch); return; } if ((liquid = obj->value[2]) < 0) { bug ("Do_drink: bad liquid number %d.", liquid); liquid = obj->value[2] = 0; } amount = liq_table[liquid].liq_affect[4]; amount = UMIN (amount, obj->value[1]); break; } if (!IS_NPC (ch) && !IS_IMMORTAL (ch) && ch->pcdata->condition[COND_FULL] > 45) { send_to_char ("You're too full to drink more.\n\r", ch); return; } act ("$n drinks $T from $p.", ch, obj, liq_table[liquid].liq_name, TO_ROOM); act ("You drink $T from $p.", ch, obj, liq_table[liquid].liq_name, TO_CHAR); gain_condition (ch, COND_DRUNK, amount * liq_table[liquid].liq_affect[COND_DRUNK] / 36); gain_condition (ch, COND_FULL, amount * liq_table[liquid].liq_affect[COND_FULL] / 4); gain_condition (ch, COND_THIRST, amount * liq_table[liquid].liq_affect[COND_THIRST] / 10); gain_condition (ch, COND_HUNGER, amount * liq_table[liquid].liq_affect[COND_HUNGER] / 2); if (!IS_NPC (ch) && ch->pcdata->condition[COND_DRUNK] > 10) send_to_char ("You feel drunk.\n\r", ch); if (!IS_NPC (ch) && ch->pcdata->condition[COND_FULL] > 40) send_to_char ("You are full.\n\r", ch); if (!IS_NPC (ch) && ch->pcdata->condition[COND_THIRST] > 40) send_to_char ("Your thirst is quenched.\n\r", ch); if (obj->value[3] != 0) { /* The drink was poisoned ! */ AFFECT_DATA af; act ("$n chokes and gags.", ch, NULL, NULL, TO_ROOM); send_to_char ("You choke and gag.\n\r", ch); af.where = TO_AFFECTS; af.type = gsn_poison; af.level = number_fuzzy (amount); af.duration = 3 * amount; af.location = APPLY_NONE; af.modifier = 0; af.bitvector = AFF_POISON; affect_join (ch, &af); } if (obj->value[0] > 0) obj->value[1] -= amount; return; }

Here is the call graph for this function:

void do_drop (  CHAR_DATA *  ch, char *  argument )

Definition at line 598 of file act_obj.c. References act, can_drop_obj(), can_see_obj(), room_index_data::contents, create_money(), extract_obj(), FALSE, get_obj_carry(), obj_data::in_room, is_name(), is_number(), IS_OBJ_STAT, ITEM_MELT_DROP, MAX_INPUT_LENGTH, obj_data::name, obj_data::next_content, obj_from_char(), obj_to_room(), OBJ_VNUM_COINS, OBJ_VNUM_GOLD_ONE, OBJ_VNUM_GOLD_SOME, OBJ_VNUM_SILVER_ONE, OBJ_VNUM_SILVER_SOME, one_argument(), obj_data::pIndexData, send_to_char(), str_cmp(), str_prefix(), TO_CHAR, TO_ROOM, TRUE, obj_data::value, obj_index_data::vnum, obj_data::wear_loc, and WEAR_NONE. { char arg[MAX_INPUT_LENGTH]; OBJ_DATA *obj; OBJ_DATA *obj_next; bool found; argument = one_argument (argument, arg); if (arg[0] == '\0') { send_to_char ("Drop what?\n\r", ch); return; } if (is_number (arg)) { /* 'drop NNNN coins' */ int amount, gold = 0, silver = 0; amount = atoi (arg); argument = one_argument (argument, arg); if (amount <= 0 || (str_cmp (arg, "coins") && str_cmp (arg, "coin") && str_cmp (arg, "gold") && str_cmp (arg, "silver"))) { send_to_char ("Sorry, you can't do that.\n\r", ch); return; } if (!str_cmp (arg, "coins") || !str_cmp (arg, "coin") || !str_cmp (arg, "silver")) { if (ch->silver < amount) { send_to_char ("You don't have that much silver.\n\r", ch); return; } ch->silver -= amount; silver = amount; } else { if (ch->gold < amount) { send_to_char ("You don't have that much gold.\n\r", ch); return; } ch->gold -= amount; gold = amount; } for (obj = ch->in_room->contents; obj != NULL; obj = obj_next) { obj_next = obj->next_content; switch (obj->pIndexData->vnum) { case OBJ_VNUM_SILVER_ONE: silver += 1; extract_obj (obj); break; case OBJ_VNUM_GOLD_ONE: gold += 1; extract_obj (obj); break; case OBJ_VNUM_SILVER_SOME: silver += obj->value[0]; extract_obj (obj); break; case OBJ_VNUM_GOLD_SOME: gold += obj->value[1]; extract_obj (obj); break; case OBJ_VNUM_COINS: silver += obj->value[0]; gold += obj->value[1]; extract_obj (obj); break; } } obj_to_room (create_money (gold, silver), ch->in_room); act ("$n drops some coins.", ch, NULL, NULL, TO_ROOM); send_to_char ("OK.\n\r", ch); return; } if (str_cmp (arg, "all") && str_prefix ("all.", arg)) { /* 'drop obj' */ if ((obj = get_obj_carry (ch, arg, ch)) == NULL) { send_to_char ("You do not have that item.\n\r", ch); return; } if (!can_drop_obj (ch, obj)) { send_to_char ("You can't let go of it.\n\r", ch); return; } obj_from_char (obj); obj_to_room (obj, ch->in_room); act ("$n drops $p.", ch, obj, NULL, TO_ROOM); act ("You drop $p.", ch, obj, NULL, TO_CHAR); if (IS_OBJ_STAT (obj, ITEM_MELT_DROP)) { act ("$p dissolves into smoke.", ch, obj, NULL, TO_ROOM); act ("$p dissolves into smoke.", ch, obj, NULL, TO_CHAR); extract_obj (obj); } } else { /* 'drop all' or 'drop all.obj' */ found = FALSE; for (obj = ch->carrying; obj != NULL; obj = obj_next) { obj_next = obj->next_content; if ((arg[3] == '\0' || is_name (&arg[4], obj->name)) && can_see_obj (ch, obj) && obj->wear_loc == WEAR_NONE && can_drop_obj (ch, obj)) { found = TRUE; obj_from_char (obj); obj_to_room (obj, ch->in_room); act ("$n drops $p.", ch, obj, NULL, TO_ROOM); act ("You drop $p.", ch, obj, NULL, TO_CHAR); if (IS_OBJ_STAT (obj, ITEM_MELT_DROP)) { act ("$p dissolves into smoke.", ch, obj, NULL, TO_ROOM); act ("$p dissolves into smoke.", ch, obj, NULL, TO_CHAR); extract_obj (obj); } } } if (!found) { if (arg[3] == '\0') act ("You are not carrying anything.", ch, NULL, arg, TO_CHAR); else act ("You are not carrying any $T.", ch, NULL, &arg[4], TO_CHAR); } } return; }

Here is the call graph for this function:

void do_eat (  CHAR_DATA *  ch, char *  argument )

Definition at line 1386 of file act_obj.c. References act, AFF_POISON, affect_join(), APPLY_NONE, affect_data::bitvector, COND_FULL, COND_HUNGER, obj_data::condition, affect_data::duration, extract_obj(), gain_condition(), get_obj_carry(), gsn_poison, IS_IMMORTAL, IS_NPC, ITEM_FOOD, ITEM_PILL, obj_data::item_type, affect_data::level, affect_data::location, MAX_INPUT_LENGTH, affect_data::modifier, number_fuzzy(), obj_cast_spell(), one_argument(), send_to_char(), TO_AFFECTS, TO_CHAR, TO_ROOM, affect_data::type, obj_data::value, and affect_data::where. { char arg[MAX_INPUT_LENGTH]; OBJ_DATA *obj; one_argument (argument, arg); if (arg[0] == '\0') { send_to_char ("Eat what?\n\r", ch); return; } if ((obj = get_obj_carry (ch, arg, ch)) == NULL) { send_to_char ("You do not have that item.\n\r", ch); return; } if (!IS_IMMORTAL (ch)) { if (obj->item_type != ITEM_FOOD && obj->item_type != ITEM_PILL) { send_to_char ("That's not edible.\n\r", ch); return; } if (!IS_NPC (ch) && ch->pcdata->condition[COND_FULL] > 40) { send_to_char ("You are too full to eat more.\n\r", ch); return; } } act ("$n eats $p.", ch, obj, NULL, TO_ROOM); act ("You eat $p.", ch, obj, NULL, TO_CHAR); switch (obj->item_type) { case ITEM_FOOD: if (!IS_NPC (ch)) { int condition; condition = ch->pcdata->condition[COND_HUNGER]; gain_condition (ch, COND_FULL, obj->value[0]); gain_condition (ch, COND_HUNGER, obj->value[1]); if (condition == 0 && ch->pcdata->condition[COND_HUNGER] > 0) send_to_char ("You are no longer hungry.\n\r", ch); else if (ch->pcdata->condition[COND_FULL] > 40) send_to_char ("You are full.\n\r", ch); } if (obj->value[3] != 0) { /* The food was poisoned! */ AFFECT_DATA af; act ("$n chokes and gags.", ch, 0, 0, TO_ROOM); send_to_char ("You choke and gag.\n\r", ch); af.where = TO_AFFECTS; af.type = gsn_poison; af.level = number_fuzzy (obj->value[0]); af.duration = 2 * obj->value[0]; af.location = APPLY_NONE; af.modifier = 0; af.bitvector = AFF_POISON; affect_join (ch, &af); } break; case ITEM_PILL: obj_cast_spell (obj->value[1], obj->value[0], ch, ch, NULL); obj_cast_spell (obj->value[2], obj->value[0], ch, ch, NULL); obj_cast_spell (obj->value[3], obj->value[0], ch, ch, NULL); break; } extract_obj (obj); return; }

Here is the call graph for this function:

void do_envenom (  CHAR_DATA *  ch, char *  argument )

Definition at line 951 of file act_obj.c. References act, affect_to_obj(), attack_table, affect_data::bitvector, check_improve(), DAM_BASH, attack_type::damage, affect_data::duration, FALSE, get_obj_list(), get_skill(), gsn_envenom, gsn_poison, IS_OBJ_STAT, IS_WEAPON_STAT, ITEM_BLESS, ITEM_BURN_PROOF, ITEM_DRINK_CON, ITEM_FOOD, obj_data::item_type, ITEM_WEAPON, affect_data::level, affect_data::location, affect_data::modifier, number_percent(), send_to_char(), skill_table, TO_CHAR, TO_ROOM, TO_WEAPON, TRUE, affect_data::type, obj_data::value, WAIT_STATE, WEAPON_FLAMING, WEAPON_FROST, WEAPON_POISON, WEAPON_SHARP, WEAPON_SHOCKING, WEAPON_VAMPIRIC, WEAPON_VORPAL, and affect_data::where. { OBJ_DATA *obj; AFFECT_DATA af; int percent, skill; /* find out what */ if (argument[0] == '\0') { send_to_char ("Envenom what item?\n\r", ch); return; } obj = get_obj_list (ch, argument, ch->carrying); if (obj == NULL) { send_to_char ("You don't have that item.\n\r", ch); return; } if ((skill = get_skill (ch, gsn_envenom)) < 1) { send_to_char ("Are you crazy? You'd poison yourself!\n\r", ch); return; } if (obj->item_type == ITEM_FOOD || obj->item_type == ITEM_DRINK_CON) { if (IS_OBJ_STAT (obj, ITEM_BLESS) || IS_OBJ_STAT (obj, ITEM_BURN_PROOF)) { act ("You fail to poison $p.", ch, obj, NULL, TO_CHAR); return; } if (number_percent () < skill) { /* success! */ act ("$n treats $p with deadly poison.", ch, obj, NULL, TO_ROOM); act ("You treat $p with deadly poison.", ch, obj, NULL, TO_CHAR); if (!obj->value[3]) { obj->value[3] = 1; check_improve (ch, gsn_envenom, TRUE, 4); } WAIT_STATE (ch, skill_table[gsn_envenom].beats); return; } act ("You fail to poison $p.", ch, obj, NULL, TO_CHAR); if (!obj->value[3]) check_improve (ch, gsn_envenom, FALSE, 4); WAIT_STATE (ch, skill_table[gsn_envenom].beats); return; } if (obj->item_type == ITEM_WEAPON) { if (IS_WEAPON_STAT (obj, WEAPON_FLAMING) || IS_WEAPON_STAT (obj, WEAPON_FROST) || IS_WEAPON_STAT (obj, WEAPON_VAMPIRIC) || IS_WEAPON_STAT (obj, WEAPON_SHARP) || IS_WEAPON_STAT (obj, WEAPON_VORPAL) || IS_WEAPON_STAT (obj, WEAPON_SHOCKING) || IS_OBJ_STAT (obj, ITEM_BLESS) || IS_OBJ_STAT (obj, ITEM_BURN_PROOF)) { act ("You can't seem to envenom $p.", ch, obj, NULL, TO_CHAR); return; } if (obj->value[3] < 0 || attack_table[obj->value[3]].damage == DAM_BASH) { send_to_char ("You can only envenom edged weapons.\n\r", ch); return; } if (IS_WEAPON_STAT (obj, WEAPON_POISON)) { act ("$p is already envenomed.", ch, obj, NULL, TO_CHAR); return; } percent = number_percent (); if (percent < skill) { af.where = TO_WEAPON; af.type = gsn_poison; af.level = ch->level * percent / 100; af.duration = ch->level / 2 * percent / 100; af.location = 0; af.modifier = 0; af.bitvector = WEAPON_POISON; affect_to_obj (obj, &af); act ("$n coats $p with deadly venom.", ch, obj, NULL, TO_ROOM); act ("You coat $p with venom.", ch, obj, NULL, TO_CHAR); check_improve (ch, gsn_envenom, TRUE, 3); WAIT_STATE (ch, skill_table[gsn_envenom].beats); return; } else { act ("You fail to envenom $p.", ch, obj, NULL, TO_CHAR); check_improve (ch, gsn_envenom, FALSE, 3); WAIT_STATE (ch, skill_table[gsn_envenom].beats); return; } } act ("You can't poison $p.", ch, obj, NULL, TO_CHAR); return; }

Here is the call graph for this function:

void do_fill (  CHAR_DATA *  ch, char *  argument )

Definition at line 1067 of file act_obj.c. References act, room_index_data::contents, FALSE, get_obj_carry(), obj_data::in_room, ITEM_DRINK_CON, ITEM_FOUNTAIN, obj_data::item_type, liq_table, MAX_INPUT_LENGTH, MAX_STRING_LENGTH, obj_data::next_content, one_argument(), send_to_char(), TO_CHAR, TO_ROOM, TRUE, and obj_data::value. { char arg[MAX_INPUT_LENGTH]; char buf[MAX_STRING_LENGTH]; OBJ_DATA *obj; OBJ_DATA *fountain; bool found; one_argument (argument, arg); if (arg[0] == '\0') { send_to_char ("Fill what?\n\r", ch); return; } if ((obj = get_obj_carry (ch, arg, ch)) == NULL) { send_to_char ("You do not have that item.\n\r", ch); return; } found = FALSE; for (fountain = ch->in_room->contents; fountain != NULL; fountain = fountain->next_content) { if (fountain->item_type == ITEM_FOUNTAIN) { found = TRUE; break; } } if (!found) { send_to_char ("There is no fountain here!\n\r", ch); return; } if (obj->item_type != ITEM_DRINK_CON) { send_to_char ("You can't fill that.\n\r", ch); return; } if (obj->value[1] != 0 && obj->value[2] != fountain->value[2]) { send_to_char ("There is already another liquid in it.\n\r", ch); return; } if (obj->value[1] >= obj->value[0]) { send_to_char ("Your container is full.\n\r", ch); return; } sprintf (buf, "You fill $p with %s from $P.", liq_table[fountain->value[2]].liq_name); act (buf, ch, obj, fountain, TO_CHAR); sprintf (buf, "$n fills $p with %s from $P.", liq_table[fountain->value[2]].liq_name); act (buf, ch, obj, fountain, TO_ROOM); obj->value[2] = fountain->value[2]; obj->value[1] = obj->value[0]; return; }

Here is the call graph for this function:

void do_get (  CHAR_DATA *  ch, char *  argument )

Definition at line 297 of file act_obj.c. References act, can_loot(), can_see_obj(), CONT_CLOSED, obj_data::contains, room_index_data::contents, FALSE, get_obj(), get_obj_here(), get_obj_list(), obj_data::in_room, IS_IMMORTAL, is_name(), IS_SET, ITEM_CONTAINER, ITEM_CORPSE_NPC, ITEM_CORPSE_PC, obj_data::item_type, MAX_INPUT_LENGTH, obj_data::name, obj_data::next_content, OBJ_VNUM_PIT, one_argument(), obj_data::pIndexData, send_to_char(), str_cmp(), str_prefix(), TO_CHAR, TRUE, obj_data::value, and obj_index_data::vnum. Referenced by damage(). { char arg1[MAX_INPUT_LENGTH]; char arg2[MAX_INPUT_LENGTH]; OBJ_DATA *obj; OBJ_DATA *obj_next; OBJ_DATA *container; bool found; argument = one_argument (argument, arg1); argument = one_argument (argument, arg2); if (!str_cmp (arg2, "from")) argument = one_argument (argument, arg2); /* Get type. */ if (arg1[0] == '\0') { send_to_char ("Get what?\n\r", ch); return; } if (arg2[0] == '\0') { if (str_cmp (arg1, "all") && str_prefix ("all.", arg1)) { /* 'get obj' */ obj = get_obj_list (ch, arg1, ch->in_room->contents); if (obj == NULL) { act ("I see no $T here.", ch, NULL, arg1, TO_CHAR); return; } get_obj (ch, obj, NULL); } else { /* 'get all' or 'get all.obj' */ found = FALSE; for (obj = ch->in_room->contents; obj != NULL; obj = obj_next) { obj_next = obj->next_content; if ((arg1[3] == '\0' || is_name (&arg1[4], obj->name)) && can_see_obj (ch, obj)) { found =