*/
#include "angband.h"
+#include "cmd-pet.h"
+#include "trap.h"
+#include "object-curse.h"
+#include "player-damage.h"
+#include "monster-hook.h"
-/* ToDo: Make this global */
-#define HURT_CHANCE 16 /*!< 属性攻撃を受けた際に能力値低下を起こす確率(1/X) / 1/x chance of reducing stats (for elemental attacks) */
static int rakubadam_m; /*!< 振り落とされた際のダメージ量 */
static int rakubadam_p; /*!< 落馬した際のダメージ量 */
/*!
- * @brief モンスター魅了用セービングスロー共通部
+ * @brief モンスター魅了用セービングスロー共通部(汎用系)
* @param pow 魅了パワー
* @param m_ptr 対象モンスター
* @return 魅了に抵抗したらTRUE
{
monster_race *r_ptr = &r_info[m_ptr->r_idx];
- if(r_ptr->flagsr & RFR_RES_ALL || p_ptr->inside_arena) return TRUE;
+ if(p_ptr->inside_arena) return TRUE;
- pow += (adj_chr_chm[player_ptr->stat_ind[A_CHR]] - 1);
+ /* Memorize a flag */
+ if (r_ptr->flagsr & RFR_RES_ALL)
+ {
+ if (is_original_ap_and_seen(m_ptr)) r_ptr->r_flagsr |= (RFR_RES_ALL);
+ return TRUE;
+ }
+
+ if (r_ptr->flags3 & RF3_NO_CONF)
+ {
+ if (is_original_ap_and_seen(m_ptr)) r_ptr->r_flags3 |= (RF3_NO_CONF);
+ return TRUE;
+ }
+
+ if (r_ptr->flags1 & RF1_QUESTOR || m_ptr->mflag2 & MFLAG2_NOPET) return TRUE;
+ pow += (adj_chr_chm[player_ptr->stat_ind[A_CHR]] - 1);
if((r_ptr->flags1 & RF1_UNIQUE) || (r_ptr->flags7 & RF7_NAZGUL)) pow = pow * 2 / 3;
+ return (r_ptr->level > randint1((pow - 10) < 1 ? 1 : (pow - 10)) + 5);
+}
+
+/*!
+ * @brief モンスター服従用セービングスロー共通部(部族依存系)
+ * @param pow 服従パワー
+ * @param m_ptr 対象モンスター
+ * @return 服従に抵抗したらTRUE
+ */
+static bool_hack common_saving_throw_control(player_type *player_ptr, HIT_POINT pow, monster_type *m_ptr)
+{
+ monster_race *r_ptr = &r_info[m_ptr->r_idx];
+
+ if (p_ptr->inside_arena) return TRUE;
+
+ /* Memorize a flag */
+ if (r_ptr->flagsr & RFR_RES_ALL)
+ {
+ if (is_original_ap_and_seen(m_ptr)) r_ptr->r_flagsr |= (RFR_RES_ALL);
+ return TRUE;
+ }
+
+ if (r_ptr->flags1 & RF1_QUESTOR || m_ptr->mflag2 & MFLAG2_NOPET) return TRUE;
+
+ pow += adj_chr_chm[player_ptr->stat_ind[A_CHR]] - 1;
+ if ((r_ptr->flags1 & RF1_UNIQUE) || (r_ptr->flags7 & RF7_NAZGUL)) pow = pow * 2 / 3;
+ return (r_ptr->level > randint1((pow - 10) < 1 ? 1 : (pow - 10)) + 5);
+}
+
+/*!
+* @brief 一部ボルト魔法のビーム化確率を算出する / Prepare standard probability to become beam for fire_bolt_or_beam()
+* @return ビーム化確率(%)
+* @details
+* ハードコーティングによる実装が行われている。
+* メイジは(レベル)%、ハイメイジ、スペルマスターは(レベル)%、それ以外の職業は(レベル/2)%
+*/
+PERCENTAGE beam_chance(void)
+{
+ if (p_ptr->pclass == CLASS_MAGE)
+ return (PERCENTAGE)(p_ptr->lev);
+ if (p_ptr->pclass == CLASS_HIGH_MAGE || p_ptr->pclass == CLASS_SORCERER)
+ return (PERCENTAGE)(p_ptr->lev + 10);
- return (r_ptr->flags1 & RF1_QUESTOR) ||
- (r_ptr->flags3 & RF3_NO_CONF) ||
- (m_ptr->mflag2 & MFLAG2_NOPET) ||
- (r_ptr->level > randint1((pow - 10) < 1 ? 1 : (pow - 10)) + 5);
+ return (PERCENTAGE)(p_ptr->lev / 2);
}
+
/*!
* @brief 配置した鏡リストの次を取得する /
* Get another mirror. for SEEKER
{
int mirror_x[10], mirror_y[10]; /* 鏡はもっと少ない */
int mirror_num = 0; /* 鏡の数 */
- int x, y;
+ POSITION x, y;
int num;
for (x = 0; x < cur_wid; x++)
* @param max 色IDの最大値
* @return 選択した色ID
*/
-static byte mh_attr(int max)
+static TERM_COLOR mh_attr(int max)
{
switch (randint1(max))
{
* @param type 魔法属性
* @return 対応する色ID
*/
-static byte spell_color(int type)
+static TERM_COLOR spell_color(int type)
{
/* Check if A.B.'s new graphics should be used (rr9) */
if (streq(ANGBAND_GRAF, "new") || streq(ANGBAND_GRAF, "ne2"))
/* Normal tiles or ASCII */
else
{
- byte a;
- char c;
+ TERM_COLOR a;
+ SYMBOL_CODE c;
/* Lookup the default colors for this type */
cptr s = quark_str(gf_color[type]);
- /* Oops */
if (!s) return (TERM_WHITE);
/* Pick a random color */
* If the distance is not "one", we (may) return "*".
* </pre>
*/
-u16b bolt_pict(POSITION y, POSITION x, POSITION ny, POSITION nx, int typ)
+u16b bolt_pict(POSITION y, POSITION x, POSITION ny, POSITION nx, EFFECT_ID typ)
{
int base;
byte k;
- byte a;
- char c;
+ TERM_COLOR a;
+ SYMBOL_CODE c;
/* No motion (*) */
if ((ny == y) && (nx == x)) base = 0x30;
* uses fewer than "range" grids for the projection path, so the result
* of this function should never be compared directly to "range". Note
* that the initial grid (y1,x1) is never saved into the grid array, not
- * even if the initial grid is also the final grid. XXX XXX XXX
+ * even if the initial grid is also the final grid.
*
* The "flg" flags can be used to modify the behavior of this function.
*
* that the path should be "angled" slightly if needed to avoid any wall
* grids, allowing the player to "target" any grid which is in "view".
* This flag is non-trivial and has not yet been implemented, but could
- * perhaps make use of the "vinfo" array (above). XXX XXX XXX
+ * perhaps make use of the "vinfo" array (above).
*
* This function returns the number of grids (if any) in the path. This
* function will return zero if and only if (y1,x1) and (y2,x2) are equal.
*/
sint project_path(u16b *gp, POSITION range, POSITION y1, POSITION x1, POSITION y2, POSITION x2, BIT_FLAGS flg)
{
- int y, x;
+ POSITION y, x;
int n = 0;
int k = 0;
/* Absolute */
- int ay, ax;
+ POSITION ay, ax;
/* Offsets */
- int sy, sx;
+ POSITION sy, sx;
/* Fractions */
int frac;
*
* We return "TRUE" if the effect of the projection is "obvious".
*
- * XXX XXX XXX We also "see" grids which are "memorized", probably a hack
+ * We also "see" grids which are "memorized", probably a hack
*
- * XXX XXX XXX Perhaps we should affect doors?
+ * Perhaps we should affect doors?
* </pre>
*/
-static bool project_f(int who, int r, int y, int x, HIT_POINT dam, int typ)
+static bool project_f(MONSTER_IDX who, POSITION r, POSITION y, POSITION x, HIT_POINT dam, EFFECT_ID typ)
{
- cave_type *c_ptr = &cave[y][x];
- feature_type *f_ptr = &f_info[c_ptr->feat];
+ cave_type *c_ptr = &cave[y][x];
+ feature_type *f_ptr = &f_info[c_ptr->feat];
bool obvious = FALSE;
bool known = player_has_los_bold(y, x);
- /* XXX XXX XXX */
who = who ? who : 0;
/* Reduce damage by distance */
case GF_GRAVITY:
message = _("粉砕された", "was crushed."); break;
default:
- message = NULL;break;
+ message = NULL; break;
}
if (message)
{
if (!p_ptr->blind && player_has_los_bold(y, x))
{
c_ptr->info &= ~(CAVE_UNSAFE);
-
- /* Redraw */
lite_spot(y, x);
-
obvious = TRUE;
}
/* Check line of sight */
if (known)
{
- /* Message */
msg_print(_("まばゆい閃光が走った!", "There is a bright flash of light!"));
obvious = TRUE;
}
if (!p_ptr->blind && player_has_los_bold(y, x))
{
c_ptr->info &= ~(CAVE_UNSAFE);
-
- /* Redraw */
lite_spot(y, x);
-
obvious = TRUE;
}
feature_type *mimic_f_ptr = &f_info[get_feat_mimic(c_ptr)];
cave_alter_feat(y, x, FF_SPIKE);
-
c_ptr->mimic = old_mimic;
- /* Notice */
note_spot(y, x);
-
- /* Redraw */
lite_spot(y, x);
/* Check line of sight */
if (known && have_flag(mimic_f_ptr->flags, FF_OPEN))
{
- /* Message */
msg_format(_("%sに何かがつっかえて開かなくなった。", "The %s seems stuck."), f_name + mimic_f_ptr->name);
obvious = TRUE;
}
{
if (have_flag(f_ptr->flags, FF_HURT_ROCK))
{
- /* Message */
if (known && (c_ptr->info & (CAVE_MARK)))
{
msg_format(_("%sが溶けて泥になった!", "The %s turns into mud!"), f_name + f_info[get_feat_mimic(c_ptr)].name);
c_ptr->info |= CAVE_OBJECT;
c_ptr->mimic = feat_glyph;
- /* Notice */
note_spot(y, x);
- /* Redraw */
lite_spot(y, x);
break;
if (!(d_info[dungeon_type].flags1 & DF1_DARKNESS))
{
c_ptr->info |= (CAVE_GLOW);
-
- /* Notice */
note_spot(y, x);
-
- /* Redraw */
lite_spot(y, x);
-
update_local_illumination(y, x);
/* Observe */
/* Mega-Hack -- Update the monster in the affected grid */
/* This allows "spear of light" (etc) to work "correctly" */
- if (c_ptr->m_idx) update_mon(c_ptr->m_idx, FALSE);
+ if (c_ptr->m_idx) update_monster(c_ptr->m_idx, FALSE);
if (p_ptr->special_defense & NINJA_S_STEALTH)
{
/* Forget */
c_ptr->info &= ~(CAVE_MARK);
- /* Notice */
note_spot(y, x);
}
- /* Redraw */
lite_spot(y, x);
update_local_illumination(y, x);
- /* Notice */
if (player_can_see_bold(y, x)) obvious = TRUE;
/* Mega-Hack -- Update the monster in the affected grid */
/* This allows "spear of light" (etc) to work "correctly" */
- if (c_ptr->m_idx) update_mon(c_ptr->m_idx, FALSE);
+ if (c_ptr->m_idx) update_monster(c_ptr->m_idx, FALSE);
}
/* All done */
if (have_flag(f_ptr->flags, FF_GLASS) && !have_flag(f_ptr->flags, FF_PERMANENT) && (dam >= 50))
{
- /* Message */
if (known && (c_ptr->info & CAVE_MARK))
{
msg_format(_("%sが割れた!", "The %s was crashed!"), f_name + f_info[get_feat_mimic(c_ptr)].name);
if (have_flag(f_ptr->flags, FF_GLASS) && !have_flag(f_ptr->flags, FF_PERMANENT) && (dam >= 200))
{
- /* Message */
if (known && (c_ptr->info & CAVE_MARK))
{
msg_format(_("%sが割れた!", "The %s was crashed!"), f_name + f_info[get_feat_mimic(c_ptr)].name);
* Note that we determine if the player can "see" anything that happens
* by taking into account: blindness, line-of-sight, and illumination.
*
- * XXX XXX XXX We also "see" grids which are "memorized", probably a hack
+ * We also "see" grids which are "memorized", probably a hack
*
* We return "TRUE" if the effect of the projection is "obvious".
* </pre>
*/
-static bool project_o(MONSTER_IDX who, POSITION r, POSITION y, POSITION x, HIT_POINT dam, int typ)
+static bool project_o(MONSTER_IDX who, POSITION r, POSITION y, POSITION x, HIT_POINT dam, EFFECT_ID typ)
{
cave_type *c_ptr = &cave[y][x];
bool is_potion = FALSE;
- /* XXX XXX XXX */
who = who ? who : 0;
/* Reduce damage by distance */
/* Scan all objects in the grid */
for (this_o_idx = c_ptr->o_idx; this_o_idx; this_o_idx = next_o_idx)
{
- /* Acquire object */
object_type *o_ptr = &o_list[this_o_idx];
bool is_art = FALSE;
/* Identify */
object_known(o_ptr);
- /* Notice */
if (known && (o_ptr->marked & OM_FOUND))
{
msg_print(_("カチッと音がした!", "Click!"));
k_idx = o_ptr->k_idx;
is_potion = object_is_potion(o_ptr);
-
-
- /* Delete the object */
delete_object_idx(this_o_idx);
/* Potions produce effects when 'shattered' */
(void)potion_smash_effect(who, y, x, k_idx);
}
- /* Redraw */
lite_spot(y, x);
}
}
* </pre>
* <pre>
* Note that "polymorph" is dangerous, since a failure in "place_monster()"'
- * may result in a dereference of an invalid pointer. XXX XXX XXX
+ * may result in a dereference of an invalid pointer.
* </pre>
* <pre>
* Various messages are produced, and damage is applied.
* "flg" was added.
* </pre>
*/
-static bool project_m(MONSTER_IDX who, POSITION r, POSITION y, POSITION x, HIT_POINT dam, int typ, BIT_FLAGS flg, bool see_s_msg)
+static bool project_m(MONSTER_IDX who, POSITION r, POSITION y, POSITION x, HIT_POINT dam, EFFECT_ID typ, BIT_FLAGS flg, bool see_s_msg)
{
int tmp;
/* Get the monster possessive ("his"/"her"/"its") */
monster_desc(m_poss, m_ptr, MD_PRON_VISIBLE | MD_POSSESSIVE);
- if (p_ptr->riding && (c_ptr->m_idx == p_ptr->riding)) disturb(1, 1);
+ if (p_ptr->riding && (c_ptr->m_idx == p_ptr->riding)) disturb(TRUE, TRUE);
/* Analyze the damage type */
switch (typ)
}
else
{
- if ((dam > 29) && (randint1(100) < dam))
+ if (!common_saving_throw_charm(p_ptr, dam, m_ptr))
{
note = _("があなたに隷属した。", " is in your thrall!");
set_pet(m_ptr);
if (p_ptr->health_who == c_ptr->m_idx) p_ptr->redraw |= (PR_HEALTH);
if (p_ptr->riding == c_ptr->m_idx) p_ptr->redraw |= (PR_UHEALTH);
- /* Message */
note = _("は体力を回復したようだ。", " looks healthier.");
/* No "real" damage */
if (common_saving_throw_charm(p_ptr, dam, m_ptr))
{
- /* Memorize a flag */
- if (r_ptr->flagsr & RFR_RES_ALL)
- {
- if (is_original_ap_and_seen(m_ptr)) r_ptr->r_flagsr |= (RFR_RES_ALL);
- }
-
- if (r_ptr->flags3 & RF3_NO_CONF)
- {
- if (is_original_ap_and_seen(m_ptr)) r_ptr->r_flags3 |= (RF3_NO_CONF);
- }
-
/* Resist */
/* No obvious effect */
note = _("には効果がなかった。", " is unaffected.");
case GF_CONTROL_UNDEAD:
{
int vir;
- dam += (adj_chr_chm[p_ptr->stat_ind[A_CHR]] - 1);
if (seen) obvious = TRUE;
vir = virtue_number(V_UNLIFE);
dam -= p_ptr->virtues[vir-1]/20;
}
- if ((r_ptr->flagsr & RFR_RES_ALL) || p_ptr->inside_arena)
- {
- note = _("には効果がなかった。", " is unaffected.");
- dam = 0;
- if (is_original_ap_and_seen(m_ptr)) r_ptr->r_flagsr |= (RFR_RES_ALL);
- break;
- }
-
- if ((r_ptr->flags1 & RF1_UNIQUE) || (r_ptr->flags7 & RF7_NAZGUL))
- dam = dam * 2 / 3;
-
/* Attempt a saving throw */
- if ((r_ptr->flags1 & RF1_QUESTOR) ||
- (!(r_ptr->flags3 & RF3_UNDEAD)) ||
- (m_ptr->mflag2 & MFLAG2_NOPET) ||
- (r_ptr->level > randint1((dam - 10) < 1 ? 1 : (dam - 10)) + 10))
+ if (common_saving_throw_control(p_ptr, dam, m_ptr) ||
+ !(r_ptr->flags3 & RF3_UNDEAD))
{
/* No obvious effect */
note = _("には効果がなかった。", " is unaffected.");
case GF_CONTROL_DEMON:
{
int vir;
- dam += (adj_chr_chm[p_ptr->stat_ind[A_CHR]] - 1);
if (seen) obvious = TRUE;
vir = virtue_number(V_UNLIFE);
dam -= p_ptr->virtues[vir-1]/20;
}
- if ((r_ptr->flagsr & RFR_RES_ALL) || p_ptr->inside_arena)
- {
- note = _("には効果がなかった。", " is unaffected.");
- dam = 0;
- if (is_original_ap_and_seen(m_ptr)) r_ptr->r_flagsr |= (RFR_RES_ALL);
- break;
- }
-
- if ((r_ptr->flags1 & RF1_UNIQUE) || (r_ptr->flags7 & RF7_NAZGUL))
- dam = dam * 2 / 3;
-
/* Attempt a saving throw */
- if ((r_ptr->flags1 & RF1_QUESTOR) ||
- (!(r_ptr->flags3 & RF3_DEMON)) ||
- (m_ptr->mflag2 & MFLAG2_NOPET) ||
- (r_ptr->level > randint1((dam - 10) < 1 ? 1 : (dam - 10)) + 10))
+ if (common_saving_throw_control(p_ptr, dam, m_ptr) ||
+ !(r_ptr->flags3 & RF3_DEMON))
{
/* No obvious effect */
note = _("には効果がなかった。", " is unaffected.");
-
obvious = FALSE;
if (one_in_(4)) m_ptr->mflag2 |= MFLAG2_NOPET;
}
case GF_CONTROL_ANIMAL:
{
int vir;
- dam += (adj_chr_chm[p_ptr->stat_ind[A_CHR]] - 1);
-
if (seen) obvious = TRUE;
vir = virtue_number(V_NATURE);
dam -= p_ptr->virtues[vir-1]/20;
}
- if ((r_ptr->flagsr & RFR_RES_ALL) || p_ptr->inside_arena)
- {
- note = _("には効果がなかった。", " is unaffected.");
- dam = 0;
- if (is_original_ap_and_seen(m_ptr)) r_ptr->r_flagsr |= (RFR_RES_ALL);
- break;
- }
-
- if ((r_ptr->flags1 & RF1_UNIQUE) || (r_ptr->flags7 & RF7_NAZGUL))
- dam = dam * 2 / 3;
-
/* Attempt a saving throw */
- if ((r_ptr->flags1 & (RF1_QUESTOR)) ||
- (!(r_ptr->flags3 & (RF3_ANIMAL))) ||
- (m_ptr->mflag2 & MFLAG2_NOPET) ||
- (r_ptr->flags3 & (RF3_NO_CONF)) ||
- (r_ptr->level > randint1((dam - 10) < 1 ? 1 : (dam - 10)) + 10))
+ if (common_saving_throw_control(p_ptr, dam, m_ptr) ||
+ !(r_ptr->flags3 & RF3_ANIMAL))
{
- /* Memorize a flag */
- if (r_ptr->flags3 & (RF3_NO_CONF))
- {
- if (is_original_ap_and_seen(m_ptr)) r_ptr->r_flags3 |= (RF3_NO_CONF);
- }
-
/* Resist */
/* No obvious effect */
note = _("には効果がなかった。", " is unaffected.");
-
obvious = FALSE;
if (one_in_(4)) m_ptr->mflag2 |= MFLAG2_NOPET;
}
{
note = _("はなついた。", " is tamed!");
set_pet(m_ptr);
-
if (r_ptr->flags3 & RF3_ANIMAL)
chg_virtue(V_NATURE, 1);
}
}
/* Tame animal */
- case GF_CONTROL_LIVING:
+ case GF_CHARM_LIVING:
{
int vir;
- dam += (adj_chr_chm[p_ptr->stat_ind[A_CHR]] - 1);
vir = virtue_number(V_UNLIFE);
if (seen) obvious = TRUE;
dam -= p_ptr->virtues[vir-1]/20;
}
- if (r_ptr->flags3 & (RF3_NO_CONF)) dam -= 30;
- if (dam < 1) dam = 1;
msg_format(_("%sを見つめた。", "You stare into %s."), m_name);
- if ((r_ptr->flagsr & RFR_RES_ALL) || p_ptr->inside_arena)
- {
- note = _("には効果がなかった。", " is unaffected.");
- dam = 0;
- if (is_original_ap_and_seen(m_ptr)) r_ptr->r_flagsr |= (RFR_RES_ALL);
- break;
- }
-
- if ((r_ptr->flags1 & RF1_UNIQUE) || (r_ptr->flags7 & RF7_NAZGUL))
- dam = dam * 2 / 3;
/* Attempt a saving throw */
- if ((r_ptr->flags1 & (RF1_QUESTOR)) ||
- (m_ptr->mflag2 & MFLAG2_NOPET) ||
- !monster_living(r_ptr) ||
- ((r_ptr->level+10) > randint1(dam)))
+ if (common_saving_throw_charm(p_ptr, dam, m_ptr) ||
+ !monster_living(r_ptr))
{
/* Resist */
/* No obvious effect */
note = _("には効果がなかった。", " is unaffected.");
-
obvious = FALSE;
if (one_in_(4)) m_ptr->mflag2 |= MFLAG2_NOPET;
}
{
note = _("を支配した。", " is tamed!");
set_pet(m_ptr);
-
if (r_ptr->flags3 & RF3_ANIMAL)
chg_virtue(V_NATURE, 1);
}
if (!resists_tele)
{
- /* Obvious */
if (seen) obvious = TRUE;
/* Prepare to teleport */
/* Only affect undead */
if (r_ptr->flags3 & (RF3_UNDEAD))
{
- /* Obvious */
if (seen) obvious = TRUE;
/* Learn about type */
/* Only affect evil */
if (r_ptr->flags3 & (RF3_EVIL))
{
- /* Obvious */
if (seen) obvious = TRUE;
/* Learn about type */
skipped = TRUE;
break;
}
- /* Obvious */
if (seen) obvious = TRUE;
/* Apply some fear */
/* Only affect undead */
if (r_ptr->flags3 & (RF3_UNDEAD))
{
- /* Obvious */
if (seen) obvious = TRUE;
/* Learn about type */
if (is_original_ap_and_seen(m_ptr)) r_ptr->r_flags3 |= (RF3_UNDEAD);
- /* Message */
note = _("は身震いした。", " shudders.");
note_dies = _("はドロドロに溶けた!", " dissolves!");
}
/* Only affect evil */
if (r_ptr->flags3 & (RF3_EVIL))
{
- /* Obvious */
if (seen) obvious = TRUE;
/* Learn about type */
if (is_original_ap_and_seen(m_ptr)) r_ptr->r_flags3 |= (RF3_EVIL);
- /* Message */
note = _("は身震いした。", " shudders.");
note_dies = _("はドロドロに溶けた!", " dissolves!");
}
/* Only affect good */
if (r_ptr->flags3 & (RF3_GOOD))
{
- /* Obvious */
if (seen) obvious = TRUE;
/* Learn about type */
if (is_original_ap_and_seen(m_ptr)) r_ptr->r_flags3 |= (RF3_GOOD);
- /* Message */
note = _("は身震いした。", " shudders.");
note_dies = _("はドロドロに溶けた!", " dissolves!");
}
/* Only affect non-undead */
if (monster_living(r_ptr))
{
- /* Obvious */
if (seen) obvious = TRUE;
- /* Message */
note = _("は身震いした。", " shudders.");
note_dies = _("はドロドロに溶けた!", " dissolves!");
}
/* Only affect demons */
if (r_ptr->flags3 & (RF3_DEMON))
{
- /* Obvious */
if (seen) obvious = TRUE;
/* Learn about type */
if (is_original_ap_and_seen(m_ptr)) r_ptr->r_flags3 |= (RF3_DEMON);
- /* Message */
note = _("は身震いした。", " shudders.");
note_dies = _("はドロドロに溶けた!", " dissolves!");
}
dam = 0;
break;
}
- /* Obvious */
if (seen) obvious = TRUE;
- /* Message */
note = _("は身震いした。", " shudders.");
note_dies = _("はドロドロに溶けた!", " dissolves!");
break;
}
else
{
- /* Message */
msg_format(_("%sから精神エネルギーを吸いとった。", "You draw psychic energy from %s."), m_name);
(void)hp_player(dam);
}
case GF_MIND_BLAST:
{
if (seen) obvious = TRUE;
- /* Message */
if (!who) msg_format(_("%sをじっと睨んだ。", "You gaze intently at %s."), m_name);
if (r_ptr->flagsr & RFR_RES_ALL)
case GF_BRAIN_SMASH:
{
if (seen) obvious = TRUE;
- /* Message */
if (!who) msg_format(_("%sをじっと睨んだ。", "You gaze intently at %s."), m_name);
if (r_ptr->flagsr & RFR_RES_ALL)
case GF_CAUSE_1:
{
if (seen) obvious = TRUE;
- /* Message */
if (!who) msg_format(_("%sを指差して呪いをかけた。", "You point at %s and curse."), m_name);
if (r_ptr->flagsr & RFR_RES_ALL)
case GF_CAUSE_2:
{
if (seen) obvious = TRUE;
- /* Message */
if (!who) msg_format(_("%sを指差して恐ろしげに呪いをかけた。", "You point at %s and curse horribly."), m_name);
if (r_ptr->flagsr & RFR_RES_ALL)
case GF_CAUSE_3:
{
if (seen) obvious = TRUE;
- /* Message */
if (!who) msg_format(_("%sを指差し、恐ろしげに呪文を唱えた!", "You point at %s, incanting terribly!"), m_name);
if (r_ptr->flagsr & RFR_RES_ALL)
case GF_CAUSE_4:
{
if (seen) obvious = TRUE;
- /* Message */
if (!who)
msg_format(_("%sの秘孔を突いて、「お前は既に死んでいる」と叫んだ。",
"You point at %s, screaming the word, 'DIE!'."), m_name);
!(r_ptr->flagsr & (RFR_RES_SOUN | RFR_RES_WALL)) &&
!(r_ptr->flags3 & RF3_NO_STUN))
{
- /* Obvious */
if (seen) obvious = TRUE;
/* Get stunned */
!(r_ptr->flags3 & RF3_NO_CONF) &&
!(r_ptr->flagsr & RFR_EFF_RES_CHAO_MASK))
{
- /* Obvious */
if (seen) obvious = TRUE;
/* Already partially confused */
if (do_time)
{
- /* Obvious */
if (seen) obvious = TRUE;
if (do_time >= m_ptr->maxhp) do_time = m_ptr->maxhp - 1;
{
if (polymorph_monster(y, x))
{
- /* Obvious */
if (seen) obvious = TRUE;
/* Monster polymorphs */
/* Handle "teleport" */
if (do_dist)
{
- /* Obvious */
if (seen) obvious = TRUE;
- /* Message */
note = _("が消え去った!", " disappears!");
if (!who) chg_virtue(V_VALOUR, -1);
/* Generate treasure, etc */
monster_death(c_ptr->m_idx, FALSE);
- /* Delete the monster */
+
delete_monster_idx(c_ptr->m_idx);
if (sad)
/* Take note */
if ((fear || do_fear) && seen)
{
- /* Sound */
sound(SOUND_FLEE);
- /* Message */
msg_format(_("%^sは恐怖して逃げ出した!", "%^s flees in terror!"), m_name);
}
redraw_stuff();
}
- /* XXX XXX XXX Verify this code */
-
- /* Update the monster */
- if (m_ptr->r_idx) update_mon(c_ptr->m_idx, FALSE);
+ /* Verify this code */
+ if (m_ptr->r_idx) update_monster(c_ptr->m_idx, FALSE);
/* Redraw the monster grid */
lite_spot(y, x);
/* Update monster recall window */
if ((p_ptr->monster_race_idx == m_ptr->r_idx) && (seen || !m_ptr->r_idx))
{
- /* Window stuff */
p_ptr->window |= (PW_MONSTER);
}
{
object_type *q_ptr;
object_type forge;
-
- /* Get local object */
q_ptr = &forge;
/* Prepare to make a Blade of Chaos */
* We return "TRUE" if any "obvious" effects were observed. XXX XXX Actually,
* we just assume that the effects were obvious, for historical reasons.
*/
-static bool project_p(int who, cptr who_name, int r, POSITION y, POSITION x, HIT_POINT dam, int typ, BIT_FLAGS flg, int monspell)
+static bool project_p(MONSTER_IDX who, cptr who_name, int r, POSITION y, POSITION x, HIT_POINT dam, EFFECT_ID typ, BIT_FLAGS flg, int monspell)
{
int k = 0;
int rlev = 0;
project(0, 0, t_y, t_x, dam, typ, (PROJECT_STOP|PROJECT_KILL|PROJECT_REFLECTABLE), monspell);
- disturb(1, 1);
+ disturb(TRUE, TRUE);
return TRUE;
}
- /* XXX XXX XXX */
/* Limit maximum damage */
if (dam > 1600) dam = 1600;
p_ptr->redraw |= PR_MAP;
/* Update monsters */
p_ptr->update |= (PU_MONSTERS);
- /* Window stuff */
p_ptr->window |= (PW_OVERHEAD | PW_DUNGEON);
/* Redraw status bar */
/* Redraw mana */
p_ptr->redraw |= (PR_MANA);
- /* Window stuff */
p_ptr->window |= (PW_PLAYER);
p_ptr->window |= (PW_SPELL);
}
- /* Disturb */
- disturb(1, 1);
+ disturb(TRUE, TRUE);
if ((p_ptr->special_defense & NINJA_KAWARIMI) && dam && who && (who != p_ptr->riding))
/*
- * XXX XXX XXX
+ *
* Modified version of los() for calculation of disintegration balls.
* Disintegration effects are stopped by permanent walls.
*/
/*
* breath shape
*/
-void breath_shape(u16b *path_g, int dist, int *pgrids, POSITION *gx, POSITION *gy, POSITION *gm, POSITION *pgm_rad, POSITION rad, POSITION y1, POSITION x1, POSITION y2, POSITION x2, int typ)
+void breath_shape(u16b *path_g, int dist, int *pgrids, POSITION *gx, POSITION *gy, POSITION *gm, POSITION *pgm_rad, POSITION rad, POSITION y1, POSITION x1, POSITION y2, POSITION x2, EFFECT_ID typ)
{
POSITION by = y1;
POSITION bx = x1;
while (bdis <= mdis)
{
- int x, y;
+ POSITION x, y;
if ((0 < dist) && (path_n < dist))
{
- int ny = GRID_Y(path_g[path_n]);
- int nx = GRID_X(path_g[path_n]);
- int nd = distance(ny, nx, y1, x1);
+ POSITION ny = GRID_Y(path_g[path_n]);
+ POSITION nx = GRID_X(path_g[path_n]);
+ POSITION nd = distance(ny, nx, y1, x1);
/* Get next base point */
if (bdis >= nd)
* and "update_view()" and "update_monsters()" need to be called.
* </pre>
*/
-bool project(MONSTER_IDX who, POSITION rad, POSITION y, POSITION x, HIT_POINT dam, int typ, BIT_FLAGS flg, int monspell)
+bool project(MONSTER_IDX who, POSITION rad, POSITION y, POSITION x, HIT_POINT dam, EFFECT_ID typ, BIT_FLAGS flg, int monspell)
{
int i, t, dist;
rakubadam_m = 0;
/* Default target of monsterspell is player */
- monster_target_y=p_ptr->y;
- monster_target_x=p_ptr->x;
+ monster_target_y = p_ptr->y;
+ monster_target_x = p_ptr->x;
/* Hack -- Jump to target */
if (flg & (PROJECT_JUMP))
monster_desc(who_name, &m_list[who], MD_IGNORE_HALLU | MD_ASSUME_VISIBLE | MD_INDEF_VISIBLE);
}
- /* Oops */
else
{
x1 = x;
/* Calculate the projection path */
path_n = project_path(path_g, (project_length ? project_length : MAX_RANGE), y1, x1, y2, x2, flg);
-
- /* Hack -- Handle stuff */
handle_stuff();
/* Giga-Hack SEEKER & SUPER_RAY */
/* Player affected one monster (without "jumping") */
if (!who && (project_m_n == 1) && !jump)
{
- /* Location */
x = project_m_x;
y = project_m_y;
* @param dam ダメージ量
* @return 効果があったらTRUEを返す
*/
-bool binding_field( HIT_POINT dam )
+bool binding_field(HIT_POINT dam)
{
- int mirror_x[10],mirror_y[10]; /* 鏡はもっと少ない */
- int mirror_num=0; /* 鏡の数 */
- int x,y;
- int centersign;
- int x1,x2,y1,y2;
+ POSITION mirror_x[10], mirror_y[10]; /* 鏡はもっと少ない */
+ int mirror_num = 0; /* 鏡の数 */
+ POSITION x, y;
+ POSITION centersign;
+ POSITION x1, x2, y1, y2;
u16b p;
- int msec= delay_factor*delay_factor*delay_factor;
+ int msec = delay_factor*delay_factor*delay_factor;
/* 三角形の頂点 */
- int point_x[3];
- int point_y[3];
+ POSITION point_x[3];
+ POSITION point_y[3];
/* Default target of monsterspell is player */
- monster_target_y=p_ptr->y;
- monster_target_x=p_ptr->x;
+ monster_target_y = p_ptr->y;
+ monster_target_x = p_ptr->x;
- for( x=0 ; x < cur_wid ; x++ )
+ for (x = 0; x < cur_wid; x++)
{
- for( y=0 ; y < cur_hgt ; y++ )
+ for (y = 0; y < cur_hgt; y++)
{
- if( is_mirror_grid(&cave[y][x]) &&
- distance(p_ptr->y,p_ptr->x,y,x) <= MAX_RANGE &&
- distance(p_ptr->y,p_ptr->x,y,x) != 0 &&
- player_has_los_bold(y,x) &&
+ if (is_mirror_grid(&cave[y][x]) &&
+ distance(p_ptr->y, p_ptr->x, y, x) <= MAX_RANGE &&
+ distance(p_ptr->y, p_ptr->x, y, x) != 0 &&
+ player_has_los_bold(y, x) &&
projectable(p_ptr->y, p_ptr->x, y, x)
- ){
- mirror_y[mirror_num]=y;
- mirror_x[mirror_num]=x;
+ ) {
+ mirror_y[mirror_num] = y;
+ mirror_x[mirror_num] = x;
mirror_num++;
}
}
}
- if( mirror_num < 2 )return FALSE;
+ if (mirror_num < 2)return FALSE;
- point_x[0] = randint0( mirror_num );
+ point_x[0] = randint0(mirror_num);
do {
- point_x[1] = randint0( mirror_num );
- }
- while( point_x[0] == point_x[1] );
-
- point_y[0]=mirror_y[point_x[0]];
- point_x[0]=mirror_x[point_x[0]];
- point_y[1]=mirror_y[point_x[1]];
- point_x[1]=mirror_x[point_x[1]];
- point_y[2]=p_ptr->y;
- point_x[2]=p_ptr->x;
-
- x=point_x[0]+point_x[1]+point_x[2];
- y=point_y[0]+point_y[1]+point_y[2];
-
- centersign = (point_x[0]*3-x)*(point_y[1]*3-y)
- - (point_y[0]*3-y)*(point_x[1]*3-x);
- if( centersign == 0 )return FALSE;
-
+ point_x[1] = randint0(mirror_num);
+ } while (point_x[0] == point_x[1]);
+
+ point_y[0] = mirror_y[point_x[0]];
+ point_x[0] = mirror_x[point_x[0]];
+ point_y[1] = mirror_y[point_x[1]];
+ point_x[1] = mirror_x[point_x[1]];
+ point_y[2] = p_ptr->y;
+ point_x[2] = p_ptr->x;
+
+ x = point_x[0] + point_x[1] + point_x[2];
+ y = point_y[0] + point_y[1] + point_y[2];
+
+ centersign = (point_x[0] * 3 - x)*(point_y[1] * 3 - y)
+ - (point_y[0] * 3 - y)*(point_x[1] * 3 - x);
+ if (centersign == 0)return FALSE;
+
x1 = point_x[0] < point_x[1] ? point_x[0] : point_x[1];
x1 = x1 < point_x[2] ? x1 : point_x[2];
y1 = point_y[0] < point_y[1] ? point_y[0] : point_y[1];
y2 = point_y[0] > point_y[1] ? point_y[0] : point_y[1];
y2 = y2 > point_y[2] ? y2 : point_y[2];
- for( y=y1 ; y <=y2 ; y++ ){
- for( x=x1 ; x <=x2 ; x++ ){
- if( centersign*( (point_x[0]-x)*(point_y[1]-y)
- -(point_y[0]-y)*(point_x[1]-x)) >=0 &&
- centersign*( (point_x[1]-x)*(point_y[2]-y)
- -(point_y[1]-y)*(point_x[2]-x)) >=0 &&
- centersign*( (point_x[2]-x)*(point_y[0]-y)
- -(point_y[2]-y)*(point_x[0]-x)) >=0 )
+ for (y = y1; y <= y2; y++) {
+ for (x = x1; x <= x2; x++) {
+ if (centersign*((point_x[0] - x)*(point_y[1] - y)
+ - (point_y[0] - y)*(point_x[1] - x)) >= 0 &&
+ centersign*((point_x[1] - x)*(point_y[2] - y)
+ - (point_y[1] - y)*(point_x[2] - x)) >= 0 &&
+ centersign*((point_x[2] - x)*(point_y[0] - y)
+ - (point_y[2] - y)*(point_x[0] - x)) >= 0)
{
if (player_has_los_bold(y, x) && projectable(p_ptr->y, p_ptr->x, y, x)) {
/* Visual effects */
- if(!(p_ptr->blind)
- && panel_contains(y,x)){
- p = bolt_pict(y,x,y,x, GF_MANA );
- print_rel(PICT_C(p), PICT_A(p),y,x);
- move_cursor_relative(y, x);
- /*if (fresh_before)*/ Term_fresh();
- Term_xtra(TERM_XTRA_DELAY, msec);
+ if (!(p_ptr->blind)
+ && panel_contains(y, x)) {
+ p = bolt_pict(y, x, y, x, GF_MANA);
+ print_rel(PICT_C(p), PICT_A(p), y, x);
+ move_cursor_relative(y, x);
+ /*if (fresh_before)*/ Term_fresh();
+ Term_xtra(TERM_XTRA_DELAY, msec);
}
}
}
}
}
- for( y=y1 ; y <=y2 ; y++ ){
- for( x=x1 ; x <=x2 ; x++ ){
- if( centersign*( (point_x[0]-x)*(point_y[1]-y)
- -(point_y[0]-y)*(point_x[1]-x)) >=0 &&
- centersign*( (point_x[1]-x)*(point_y[2]-y)
- -(point_y[1]-y)*(point_x[2]-x)) >=0 &&
- centersign*( (point_x[2]-x)*(point_y[0]-y)
- -(point_y[2]-y)*(point_x[0]-x)) >=0 )
+ for (y = y1; y <= y2; y++) {
+ for (x = x1; x <= x2; x++) {
+ if (centersign*((point_x[0] - x)*(point_y[1] - y)
+ - (point_y[0] - y)*(point_x[1] - x)) >= 0 &&
+ centersign*((point_x[1] - x)*(point_y[2] - y)
+ - (point_y[1] - y)*(point_x[2] - x)) >= 0 &&
+ centersign*((point_x[2] - x)*(point_y[0] - y)
+ - (point_y[2] - y)*(point_x[0] - x)) >= 0)
{
if (player_has_los_bold(y, x) && projectable(p_ptr->y, p_ptr->x, y, x)) {
- (void)project_f(0,0,y,x,dam,GF_MANA);
+ (void)project_f(0, 0, y, x, dam, GF_MANA);
}
}
}
}
- for( y=y1 ; y <=y2 ; y++ ){
- for( x=x1 ; x <=x2 ; x++ ){
- if( centersign*( (point_x[0]-x)*(point_y[1]-y)
- -(point_y[0]-y)*(point_x[1]-x)) >=0 &&
- centersign*( (point_x[1]-x)*(point_y[2]-y)
- -(point_y[1]-y)*(point_x[2]-x)) >=0 &&
- centersign*( (point_x[2]-x)*(point_y[0]-y)
- -(point_y[2]-y)*(point_x[0]-x)) >=0 )
+ for (y = y1; y <= y2; y++) {
+ for (x = x1; x <= x2; x++) {
+ if (centersign*((point_x[0] - x)*(point_y[1] - y)
+ - (point_y[0] - y)*(point_x[1] - x)) >= 0 &&
+ centersign*((point_x[1] - x)*(point_y[2] - y)
+ - (point_y[1] - y)*(point_x[2] - x)) >= 0 &&
+ centersign*((point_x[2] - x)*(point_y[0] - y)
+ - (point_y[2] - y)*(point_x[0] - x)) >= 0)
{
if (player_has_los_bold(y, x) && projectable(p_ptr->y, p_ptr->x, y, x)) {
- (void)project_o(0,0,y,x,dam,GF_MANA);
+ (void)project_o(0, 0, y, x, dam, GF_MANA);
}
}
}
}
- for( y=y1 ; y <=y2 ; y++ ){
- for( x=x1 ; x <=x2 ; x++ ){
- if( centersign*( (point_x[0]-x)*(point_y[1]-y)
- -(point_y[0]-y)*(point_x[1]-x)) >=0 &&
- centersign*( (point_x[1]-x)*(point_y[2]-y)
- -(point_y[1]-y)*(point_x[2]-x)) >=0 &&
- centersign*( (point_x[2]-x)*(point_y[0]-y)
- -(point_y[2]-y)*(point_x[0]-x)) >=0 )
+ for (y = y1; y <= y2; y++) {
+ for (x = x1; x <= x2; x++) {
+ if (centersign*((point_x[0] - x)*(point_y[1] - y)
+ - (point_y[0] - y)*(point_x[1] - x)) >= 0 &&
+ centersign*((point_x[1] - x)*(point_y[2] - y)
+ - (point_y[1] - y)*(point_x[2] - x)) >= 0 &&
+ centersign*((point_x[2] - x)*(point_y[0] - y)
+ - (point_y[2] - y)*(point_x[0] - x)) >= 0)
{
if (player_has_los_bold(y, x) && projectable(p_ptr->y, p_ptr->x, y, x)) {
- (void)project_m(0,0,y,x,dam,GF_MANA,
- (PROJECT_GRID|PROJECT_ITEM|PROJECT_KILL|PROJECT_JUMP),TRUE);
+ (void)project_m(0, 0, y, x, dam, GF_MANA,
+ (PROJECT_GRID | PROJECT_ITEM | PROJECT_KILL | PROJECT_JUMP), TRUE);
}
}
}
}
- if( one_in_(7) ){
+ if (one_in_(7)) {
msg_print(_("鏡が結界に耐えきれず、壊れてしまった。", "The field broke a mirror"));
- remove_mirror(point_y[0],point_x[0]);
+ remove_mirror(point_y[0], point_x[0]);
}
return TRUE;
* @param dam ダメージ量
* @return 効果があったらTRUEを返す
*/
-void seal_of_mirror( HIT_POINT dam )
+void seal_of_mirror(HIT_POINT dam)
{
- int x,y;
+ POSITION x, y;
- for( x = 0 ; x < cur_wid ; x++ )
+ for (x = 0; x < cur_wid; x++)
{
- for( y = 0 ; y < cur_hgt ; y++ )
+ for (y = 0; y < cur_hgt; y++)
{
- if( is_mirror_grid(&cave[y][x]))
+ if (is_mirror_grid(&cave[y][x]))
{
- if(project_m(0,0,y,x,dam,GF_GENOCIDE,
- (PROJECT_GRID|PROJECT_ITEM|PROJECT_KILL|PROJECT_JUMP),TRUE))
+ if (project_m(0, 0, y, x, dam, GF_GENOCIDE,
+ (PROJECT_GRID | PROJECT_ITEM | PROJECT_KILL | PROJECT_JUMP), TRUE))
{
- if( !cave[y][x].m_idx )
+ if (!cave[y][x].m_idx)
{
- remove_mirror(y,x);
+ remove_mirror(y, x);
}
}
}