1 #include "effect/effect-item.h"
2 #include "autopick/autopick.h"
3 #include "floor/floor-object.h"
4 #include "monster-floor/monster-generator.h"
5 #include "monster/monster-info.h"
6 #include "monster-floor/place-monster-types.h"
7 #include "object-enchant/tr-types.h"
8 #include "object/object-broken.h"
9 #include "object/object-flags.h"
10 #include "object/object-flavor.h"
11 #include "object/object-hook.h"
12 #include "object/object-mark-types.h"
13 #include "perception/object-perception.h"
14 #include "spell/spells-type.h"
15 #include "spell/spells3.h"
16 #include "sv-definition/sv-other-types.h"
17 #include "sv-definition/sv-scroll-types.h"
20 * @brief 汎用的なビーム/ボルト/ボール系によるアイテムオブジェクトへの効果処理 / Handle a beam/bolt/ball causing damage to a monster.
21 * @param caster_ptr プレーヤーへの参照ポインタ
22 * @param who 魔法を発動したモンスター(0ならばプレイヤー) / Index of "source" monster (zero for "player")
23 * @param r 効果半径(ビーム/ボルト = 0 / ボール = 1以上) / Radius of explosion (0 = beam/bolt, 1 to 9 = ball)
24 * @param y 目標Y座標 / Target y location (or location to travel "towards")
25 * @param x 目標X座標 / Target x location (or location to travel "towards")
26 * @param dam 基本威力 / Base damage roll to apply to affected monsters (or player)
27 * @param typ 効果属性 / Type of damage to apply to monsters (and objects)
28 * @return 何か一つでも効力があればTRUEを返す / TRUE if any "effects" of the projection were observed, else FALSE
30 bool affect_item(player_type *caster_ptr, MONSTER_IDX who, POSITION r, POSITION y, POSITION x, HIT_POINT dam, EFFECT_ID typ)
32 grid_type *g_ptr = &caster_ptr->current_floor_ptr->grid_array[y][x];
34 bool is_item_affected = FALSE;
35 bool known = player_has_los_bold(caster_ptr, y, x);
37 dam = (dam + r) / (r + 1);
38 OBJECT_IDX next_o_idx = 0;
39 for (OBJECT_IDX this_o_idx = g_ptr->o_idx; this_o_idx != 0; this_o_idx = next_o_idx)
41 object_type *o_ptr = &caster_ptr->current_floor_ptr->o_list[this_o_idx];
44 concptr note_kill = NULL;
48 bool plural = (o_ptr->number > 1);
50 next_o_idx = o_ptr->next_o_idx;
51 BIT_FLAGS flags[TR_FLAG_SIZE];
52 object_flags(o_ptr, flags);
53 bool is_artifact = object_is_artifact(o_ptr);
58 if (hates_acid(o_ptr))
61 note_kill = _("融けてしまった!", (plural ? " melt!" : " melts!"));
62 if (have_flag(flags, TR_IGNORE_ACID)) ignore = TRUE;
69 if (hates_elec(o_ptr))
72 note_kill = _("壊れてしまった!", (plural ? " are destroyed!" : " is destroyed!"));
73 if (have_flag(flags, TR_IGNORE_ELEC)) ignore = TRUE;
80 if (hates_fire(o_ptr))
83 note_kill = _("燃えてしまった!", (plural ? " burn up!" : " burns up!"));
84 if (have_flag(flags, TR_IGNORE_FIRE)) ignore = TRUE;
91 if (hates_cold(o_ptr))
93 note_kill = _("砕け散ってしまった!", (plural ? " shatter!" : " shatters!"));
95 if (have_flag(flags, TR_IGNORE_COLD)) ignore = TRUE;
102 if (hates_fire(o_ptr))
105 note_kill = _("燃えてしまった!", (plural ? " burn up!" : " burns up!"));
106 if (have_flag(flags, TR_IGNORE_FIRE)) ignore = TRUE;
109 if (hates_elec(o_ptr))
113 note_kill = _("壊れてしまった!", (plural ? " are destroyed!" : " is destroyed!"));
114 if (have_flag(flags, TR_IGNORE_ELEC)) ignore = TRUE;
121 if (hates_fire(o_ptr))
124 note_kill = _("燃えてしまった!", (plural ? " burn up!" : " burns up!"));
125 if (have_flag(flags, TR_IGNORE_FIRE)) ignore = TRUE;
128 if (hates_cold(o_ptr))
132 note_kill = _("砕け散ってしまった!", (plural ? " shatter!" : " shatters!"));
133 if (have_flag(flags, TR_IGNORE_COLD)) ignore = TRUE;
143 if (hates_cold(o_ptr))
145 note_kill = _("砕け散ってしまった!", (plural ? " shatter!" : " shatters!"));
156 note_kill = _("壊れてしまった!", (plural ? " are destroyed!" : " is destroyed!"));
159 case GF_DISINTEGRATE:
162 note_kill = _("蒸発してしまった!", (plural ? " evaporate!" : " evaporates!"));
168 note_kill = _("壊れてしまった!", (plural ? " are destroyed!" : " is destroyed!"));
169 if (have_flag(flags, TR_RES_CHAOS)) ignore = TRUE;
170 else if ((o_ptr->tval == TV_SCROLL) && (o_ptr->sval == SV_SCROLL_CHAOS)) ignore = TRUE;
176 if (object_is_cursed(o_ptr))
179 note_kill = _("壊れてしまった!", (plural ? " are destroyed!" : " is destroyed!"));
186 identify_item(caster_ptr, o_ptr);
187 autopick_alter_item(caster_ptr, (-this_o_idx), FALSE);
193 if (o_ptr->tval != TV_CHEST) break;
194 if (o_ptr->pval <= 0) break;
196 o_ptr->pval = (0 - o_ptr->pval);
198 if (known && (o_ptr->marked & OM_FOUND))
200 msg_print(_("カチッと音がした!", "Click!"));
201 is_item_affected = TRUE;
208 if (o_ptr->tval != TV_CORPSE) break;
211 if (!who || is_pet(&caster_ptr->current_floor_ptr->m_list[who]))
212 mode |= PM_FORCE_PET;
214 for (int i = 0; i < o_ptr->number; i++)
216 if (((o_ptr->sval == SV_CORPSE) && (randint1(100) > 80)) ||
217 ((o_ptr->sval == SV_SKELETON) && (randint1(100) > 60)))
221 note_kill = _("灰になった。", (plural ? " become dust." : " becomes dust."));
226 else if (summon_named_creature(caster_ptr, who, y, x, o_ptr->pval, mode))
228 note_kill = _("生き返った。", " revived.");
232 note_kill = _("灰になった。", (plural ? " become dust." : " becomes dust."));
237 is_item_affected = TRUE;
242 if (!do_kill) continue;
244 GAME_TEXT o_name[MAX_NLEN];
245 if (known && (o_ptr->marked & OM_FOUND))
247 is_item_affected = TRUE;
248 object_desc(caster_ptr, o_name, o_ptr, (OD_OMIT_PREFIX | OD_NAME_ONLY));
251 if ((is_artifact || ignore))
253 if (known && (o_ptr->marked & OM_FOUND))
254 msg_format(_("%sは影響を受けない!", (plural ? "The %s are unaffected!" : "The %s is unaffected!")), o_name);
259 if (known && (o_ptr->marked & OM_FOUND) && note_kill)
260 msg_format(_("%sは%s", "The %s%s"), o_name, note_kill);
262 KIND_OBJECT_IDX k_idx = o_ptr->k_idx;
263 bool is_potion = object_is_potion(o_ptr);
264 delete_object_idx(caster_ptr, this_o_idx);
266 (void)potion_smash_effect(caster_ptr, who, y, x, k_idx);
268 lite_spot(caster_ptr, y, x);
271 return is_item_affected;