1 #include "system/angband.h"
2 #include "effect-item.h"
3 #include "object/object-flavor.h"
4 #include "object/object-hook.h"
5 #include "object/object-broken.h"
6 #include "autopick/autopick.h"
7 #include "spell/spells-type.h"
8 #include "spell/spells3.h"
9 #include "object/tr-types.h"
10 #include "object/object-mark-types.h"
13 * @brief 汎用的なビーム/ボルト/ボール系によるアイテムオブジェクトへの効果処理 / Handle a beam/bolt/ball causing damage to a monster.
14 * @param caster_ptr プレーヤーへの参照ポインタ
15 * @param who 魔法を発動したモンスター(0ならばプレイヤー) / Index of "source" monster (zero for "player")
16 * @param r 効果半径(ビーム/ボルト = 0 / ボール = 1以上) / Radius of explosion (0 = beam/bolt, 1 to 9 = ball)
17 * @param y 目標Y座標 / Target y location (or location to travel "towards")
18 * @param x 目標X座標 / Target x location (or location to travel "towards")
19 * @param dam 基本威力 / Base damage roll to apply to affected monsters (or player)
20 * @param typ 効果属性 / Type of damage to apply to monsters (and objects)
21 * @return 何か一つでも効力があればTRUEを返す / TRUE if any "effects" of the projection were observed, else FALSE
23 bool affect_item(player_type *caster_ptr, MONSTER_IDX who, POSITION r, POSITION y, POSITION x, HIT_POINT dam, EFFECT_ID typ)
25 grid_type *g_ptr = &caster_ptr->current_floor_ptr->grid_array[y][x];
27 bool is_item_affected = FALSE;
28 bool known = player_has_los_bold(caster_ptr, y, x);
30 dam = (dam + r) / (r + 1);
31 OBJECT_IDX next_o_idx = 0;
32 for (OBJECT_IDX this_o_idx = g_ptr->o_idx; this_o_idx != 0; this_o_idx = next_o_idx)
34 object_type *o_ptr = &caster_ptr->current_floor_ptr->o_list[this_o_idx];
37 concptr note_kill = NULL;
41 bool plural = (o_ptr->number > 1);
43 next_o_idx = o_ptr->next_o_idx;
44 BIT_FLAGS flags[TR_FLAG_SIZE];
45 object_flags(o_ptr, flags);
46 bool is_artifact = object_is_artifact(o_ptr);
51 if (hates_acid(o_ptr))
54 note_kill = _("融けてしまった!", (plural ? " melt!" : " melts!"));
55 if (have_flag(flags, TR_IGNORE_ACID)) ignore = TRUE;
62 if (hates_elec(o_ptr))
65 note_kill = _("壊れてしまった!", (plural ? " are destroyed!" : " is destroyed!"));
66 if (have_flag(flags, TR_IGNORE_ELEC)) ignore = TRUE;
73 if (hates_fire(o_ptr))
76 note_kill = _("燃えてしまった!", (plural ? " burn up!" : " burns up!"));
77 if (have_flag(flags, TR_IGNORE_FIRE)) ignore = TRUE;
84 if (hates_cold(o_ptr))
86 note_kill = _("砕け散ってしまった!", (plural ? " shatter!" : " shatters!"));
88 if (have_flag(flags, TR_IGNORE_COLD)) ignore = TRUE;
95 if (hates_fire(o_ptr))
98 note_kill = _("燃えてしまった!", (plural ? " burn up!" : " burns up!"));
99 if (have_flag(flags, TR_IGNORE_FIRE)) ignore = TRUE;
102 if (hates_elec(o_ptr))
106 note_kill = _("壊れてしまった!", (plural ? " are destroyed!" : " is destroyed!"));
107 if (have_flag(flags, TR_IGNORE_ELEC)) ignore = TRUE;
114 if (hates_fire(o_ptr))
117 note_kill = _("燃えてしまった!", (plural ? " burn up!" : " burns up!"));
118 if (have_flag(flags, TR_IGNORE_FIRE)) ignore = TRUE;
121 if (hates_cold(o_ptr))
125 note_kill = _("砕け散ってしまった!", (plural ? " shatter!" : " shatters!"));
126 if (have_flag(flags, TR_IGNORE_COLD)) ignore = TRUE;
136 if (hates_cold(o_ptr))
138 note_kill = _("砕け散ってしまった!", (plural ? " shatter!" : " shatters!"));
149 note_kill = _("壊れてしまった!", (plural ? " are destroyed!" : " is destroyed!"));
152 case GF_DISINTEGRATE:
155 note_kill = _("蒸発してしまった!", (plural ? " evaporate!" : " evaporates!"));
161 note_kill = _("壊れてしまった!", (plural ? " are destroyed!" : " is destroyed!"));
162 if (have_flag(flags, TR_RES_CHAOS)) ignore = TRUE;
163 else if ((o_ptr->tval == TV_SCROLL) && (o_ptr->sval == SV_SCROLL_CHAOS)) ignore = TRUE;
169 if (object_is_cursed(o_ptr))
172 note_kill = _("壊れてしまった!", (plural ? " are destroyed!" : " is destroyed!"));
179 identify_item(caster_ptr, o_ptr);
180 autopick_alter_item(caster_ptr, (-this_o_idx), FALSE);
186 if (o_ptr->tval != TV_CHEST) break;
187 if (o_ptr->pval <= 0) break;
189 o_ptr->pval = (0 - o_ptr->pval);
191 if (known && (o_ptr->marked & OM_FOUND))
193 msg_print(_("カチッと音がした!", "Click!"));
194 is_item_affected = TRUE;
201 if (o_ptr->tval != TV_CORPSE) break;
204 if (!who || is_pet(&caster_ptr->current_floor_ptr->m_list[who]))
205 mode |= PM_FORCE_PET;
207 for (int i = 0; i < o_ptr->number; i++)
209 if (((o_ptr->sval == SV_CORPSE) && (randint1(100) > 80)) ||
210 ((o_ptr->sval == SV_SKELETON) && (randint1(100) > 60)))
214 note_kill = _("灰になった。", (plural ? " become dust." : " becomes dust."));
219 else if (summon_named_creature(caster_ptr, who, y, x, o_ptr->pval, mode))
221 note_kill = _("生き返った。", " revived.");
225 note_kill = _("灰になった。", (plural ? " become dust." : " becomes dust."));
230 is_item_affected = TRUE;
235 if (!do_kill) continue;
237 GAME_TEXT o_name[MAX_NLEN];
238 if (known && (o_ptr->marked & OM_FOUND))
240 is_item_affected = TRUE;
241 object_desc(caster_ptr, o_name, o_ptr, (OD_OMIT_PREFIX | OD_NAME_ONLY));
244 if ((is_artifact || ignore))
246 if (known && (o_ptr->marked & OM_FOUND))
247 msg_format(_("%sは影響を受けない!", (plural ? "The %s are unaffected!" : "The %s is unaffected!")), o_name);
252 if (known && (o_ptr->marked & OM_FOUND) && note_kill)
253 msg_format(_("%sは%s", "The %s%s"), o_name, note_kill);
255 KIND_OBJECT_IDX k_idx = o_ptr->k_idx;
256 bool is_potion = object_is_potion(o_ptr);
257 delete_object_idx(caster_ptr, this_o_idx);
259 (void)potion_smash_effect(caster_ptr, who, y, x, k_idx);
261 lite_spot(caster_ptr, y, x);
264 return is_item_affected;