*/
static void monst_bolt_monst(int m_idx, int y, int x, int typ, int dam_hp, int monspell, bool learnable)
{
- int flg = PROJECT_STOP | PROJECT_KILL | PROJECT_REFLECTABLE;
-
+ int flg = PROJECT_STOP | PROJECT_KILL;
+ if (typ != GF_ARROW) flg |= PROJECT_REFLECTABLE;
(void)project(m_idx, 0, y, x, dam_hp, typ, flg, (learnable ? monspell : -1));
}
u32b u_mode = 0L;
int s_num_6 = (easy_band ? 2 : 6);
int s_num_4 = (easy_band ? 1 : 4);
+ int rad = 0; //For elemental balls
byte spell[96], num = 0;
/* Can the player be aware of this attack? */
known = (m_ptr->cdis <= MAX_SIGHT) || (t_ptr->cdis <= MAX_SIGHT);
- if (p_ptr->riding && (m_idx == p_ptr->riding)) disturb(1, 0);
+ if (p_ptr->riding && (m_idx == p_ptr->riding)) disturb(1, 1);
/* Check for spell failure (inate attacks never fail) */
if (!spell_is_inate(thrown_spell) && (in_no_magic_dungeon || (MON_STUNNED(m_ptr) && one_in_(2))))
{
- disturb(1, 0);
+ disturb(1, 1);
/* Message */
#ifdef JP
if (see_m) msg_format("%^s¤Ï¼öʸ¤ò¾§¤¨¤è¤¦¤È¤·¤¿¤¬¼ºÇÔ¤·¤¿¡£", m_name);
return (TRUE);
}
+ /* Hex: Anti Magic Barrier */
+ if (!spell_is_inate(thrown_spell) && magic_barrier(m_idx))
+ {
+#ifdef JP
+ if (see_m) msg_format("È¿ËâË¡¥Ð¥ê¥¢¤¬%^s¤Î¼öʸ¤ò¤«¤¾Ã¤·¤¿¡£", m_name);
+#else
+ if (see_m) msg_format("Anti magic barrier cancels the spell which %^s casts.");
+#endif
+ return (TRUE);
+ }
+
can_remember = is_original_ap_and_seen(m_ptr);
switch (thrown_spell)
{
if (see_either)
{
- disturb(1, 0);
+ disturb(1, 1);
if (blind)
{
{
if (see_either)
{
- disturb(1, 0);
+ disturb(1, 1);
if (blind)
{
{
if (see_either)
{
- disturb(1, 0);
+ disturb(1, 1);
if (blind)
{
{
if (see_either)
{
- disturb(1, 0);
+ disturb(1, 1);
if (blind)
{
{
if (see_either)
{
- disturb(1, 0);
+ disturb(1, 1);
if (blind)
{
{
if (see_either)
{
- disturb(1, 0);
+ disturb(1, 1);
if (blind)
{
{
if (see_either)
{
- disturb(1, 0);
+ disturb(1, 1);
if (blind)
{
{
if (see_either)
{
- disturb(1, 0);
+ disturb(1, 1);
if (blind)
{
{
if (see_either)
{
- disturb(1, 0);
+ disturb(1, 1);
if (blind)
{
{
if (see_either)
{
- disturb(1, 0);
+ disturb(1, 1);
if (blind)
{
{
if (see_either)
{
- disturb(1, 0);
+ disturb(1, 1);
if (m_ptr->r_idx == MON_JAIAN)
#ifdef JP
{
if (see_either)
{
- disturb(1, 0);
+ disturb(1, 1);
if (blind)
{
{
if (see_either)
{
- disturb(1, 0);
+ disturb(1, 1);
if (blind)
{
{
if (see_either)
{
- disturb(1, 0);
+ disturb(1, 1);
if (blind)
{
{
if (see_either)
{
- disturb(1, 0);
+ disturb(1, 1);
if (blind)
{
{
if (see_either)
{
- disturb(1, 0);
+ disturb(1, 1);
if (blind)
{
{
if (see_either)
{
- disturb(1, 0);
+ disturb(1, 1);
if (blind)
{
{
if (see_either)
{
- disturb(1, 0);
+ disturb(1, 1);
if (m_ptr->r_idx == MON_BOTEI)
#ifdef JP
{
if (see_either)
{
- disturb(1, 0);
+ disturb(1, 1);
if (blind)
{
{
if (see_either)
{
- disturb(1, 0);
+ disturb(1, 1);
if (blind)
{
{
if (see_either)
{
- disturb(1, 0);
+ disturb(1, 1);
if (blind)
{
{
if (see_either)
{
- disturb(1, 0);
+ disturb(1, 1);
if (blind)
{
{
if (see_either)
{
- disturb(1, 0);
+ disturb(1, 1);
if (blind)
{
{
if (see_either)
{
- disturb(1, 0);
+ disturb(1, 1);
if (blind)
{
{
if (see_either)
{
- disturb(1, 0);
+ disturb(1, 1);
if (blind)
{
{
if (see_either)
{
- disturb(1, 0);
+ disturb(1, 1);
if (blind)
{
}
}
- dam = (randint1(rlev * 3) + 15) * ((r_ptr->flags2 & RF2_POWERFUL) ? 2 : 1);
- monst_breath_monst(m_idx, y, x, GF_ACID, dam, 2, FALSE, MS_BALL_ACID, learnable);
-
+ if (r_ptr->flags2 & RF2_POWERFUL)
+ {
+ rad = 4;
+ dam = (rlev * 4) + 50 + damroll(10, 10);
+ }
+ else
+ {
+ rad = 2;
+ dam = (randint1(rlev * 3) + 15);
+ }
+ monst_breath_monst(m_idx, y, x, GF_ACID, dam, rad, FALSE, MS_BALL_ACID, learnable);
break;
/* RF5_BA_ELEC */
{
if (see_either)
{
- disturb(1, 0);
+ disturb(1, 1);
if (blind)
{
}
}
- dam = (randint1(rlev * 3 / 2) + 8) * ((r_ptr->flags2 & RF2_POWERFUL) ? 2 : 1);
- monst_breath_monst(m_idx, y, x, GF_ELEC, dam, 2, FALSE, MS_BALL_ELEC, learnable);
-
+ if (r_ptr->flags2 & RF2_POWERFUL)
+ {
+ rad = 4;
+ dam = (rlev * 4) + 50 + damroll(10, 10);
+ }
+ else
+ {
+ rad = 2;
+ dam = (randint1(rlev * 3 / 2) + 8);
+ }
+ monst_breath_monst(m_idx, y, x, GF_ELEC, dam, rad, FALSE, MS_BALL_ELEC, learnable);
break;
/* RF5_BA_FIRE */
{
if (see_either)
{
- disturb(1, 0);
+ disturb(1, 1);
if (m_ptr->r_idx == MON_ROLENTO)
{
}
}
- dam = (randint1(rlev * 7 / 2) + 10) * ((r_ptr->flags2 & RF2_POWERFUL) ? 2 : 1);
- monst_breath_monst(m_idx, y, x, GF_FIRE, dam, 2, FALSE, MS_BALL_FIRE, learnable);
-
+ if (r_ptr->flags2 & RF2_POWERFUL)
+ {
+ rad = 4;
+ dam = (rlev * 4) + 50 + damroll(10, 10);
+ }
+ else
+ {
+ rad = 2;
+ dam = (randint1(rlev * 7 / 2) + 10);
+ }
+ monst_breath_monst(m_idx, y, x, GF_FIRE, dam, rad, FALSE, MS_BALL_FIRE, learnable);
break;
/* RF5_BA_COLD */
{
if (see_either)
{
- disturb(1, 0);
+ disturb(1, 1);
if (blind)
{
}
}
- dam = (randint1(rlev * 3 / 2) + 10) * ((r_ptr->flags2 & RF2_POWERFUL) ? 2 : 1);
- monst_breath_monst(m_idx, y, x, GF_COLD, dam, 2, FALSE, MS_BALL_COLD, learnable);
-
+ if (r_ptr->flags2 & RF2_POWERFUL)
+ {
+ rad = 4;
+ dam = (rlev * 4) + 50 + damroll(10, 10);
+ }
+ else
+ {
+ rad = 2;
+ dam = (randint1(rlev * 3 / 2) + 10);
+ }
+ monst_breath_monst(m_idx, y, x, GF_COLD, dam, rad, FALSE, MS_BALL_COLD, learnable);
break;
/* RF5_BA_POIS */
{
if (see_either)
{
- disturb(1, 0);
+ disturb(1, 1);
if (blind)
{
{
if (see_either)
{
- disturb(1, 0);
+ disturb(1, 1);
if (blind)
{
{
if (see_either)
{
- disturb(1, 0);
+ disturb(1, 1);
if (blind)
{
{
if (see_either)
{
- disturb(1, 0);
+ disturb(1, 1);
if (blind)
{
{
if (see_either)
{
- disturb(1, 0);
+ disturb(1, 1);
if (blind)
{
{
if (see_either)
{
- disturb(1, 0);
+ disturb(1, 1);
if (blind)
{
{
if (see_m)
{
- disturb(1, 0);
+ disturb(1, 1);
#ifdef JP
msg_format("%s¤Ï̵½ý¤Îµå¤Î¼öʸ¤ò¾§¤¨¤¿¡£", m_name);
#else
/* RF6_BLINK */
case 160+4:
- if (see_m)
+ if (teleport_barrier(m_idx))
{
+ if (see_m)
+ {
#ifdef JP
- msg_format("%^s¤¬½Ö»þ¤Ë¾Ã¤¨¤¿¡£", m_name);
+ msg_format("ËâË¡¤Î¥Ð¥ê¥¢¤¬%^s¤Î¥Æ¥ì¥Ý¡¼¥È¤ò¼ÙË⤷¤¿¡£", m_name);
#else
- msg_format("%^s blinks away.", m_name);
+ msg_format("Magic barrier obstructs teleporting of %^s.", m_name);
#endif
-
+ }
+ }
+ else
+ {
+ if (see_m)
+ {
+#ifdef JP
+ msg_format("%^s¤¬½Ö»þ¤Ë¾Ã¤¨¤¿¡£", m_name);
+#else
+ msg_format("%^s blinks away.", m_name);
+#endif
+ }
+ teleport_away(m_idx, 10, 0L);
}
-
- teleport_away(m_idx, 10, 0L);
-
break;
/* RF6_TPORT */
case 160+5:
- if (see_m)
+ if (teleport_barrier(m_idx))
+ {
+ if (see_m)
+ {
+#ifdef JP
+ msg_format("ËâË¡¤Î¥Ð¥ê¥¢¤¬%^s¤Î¥Æ¥ì¥Ý¡¼¥È¤ò¼ÙË⤷¤¿¡£", m_name);
+#else
+ msg_format("Magic barrier obstructs teleporting of %^s.", m_name);
+#endif
+ }
+ }
+ else
{
+ if (see_m)
+ {
#ifdef JP
- msg_format("%^s¤¬¥Æ¥ì¥Ý¡¼¥È¤·¤¿¡£", m_name);
+ msg_format("%^s¤¬¥Æ¥ì¥Ý¡¼¥È¤·¤¿¡£", m_name);
#else
- msg_format("%^s teleports away.", m_name);
+ msg_format("%^s teleports away.", m_name);
#endif
+ }
+ teleport_away_followable(m_idx);
}
-
- teleport_away_followable(m_idx);
break;
/* RF6_WORLD */
{
if (see_either)
{
- disturb(1, 0);
+ disturb(1, 1);
#ifdef JP
msg_format("%^s¤Ï¼êÜØÃƤò¤Ð¤é¤Þ¤¤¤¿¡£", m_name);
{
if (see_either)
{
- disturb(1, 0);
+ disturb(1, 1);
#ifdef JP
if (blind) msg_format("%^s¤¬²¿¤«¤ò¤Ä¤Ö¤ä¤¤¤¿¡£", m_name);
#else
{
if (see_either)
{
- disturb(1, 0);
+ disturb(1, 1);
if (m_ptr->r_idx == MON_SERPENT || m_ptr->r_idx == MON_ZOMBI_SERPENT)
{
{
if (see_either)
{
- disturb(1, 0);
+ disturb(1, 1);
#ifdef JP
msg_format("%^s¤¬¥µ¥¤¥Ð¡¼¥Ç¡¼¥â¥ó¤ò¾¤´¤·¤¿¡ª", m_name);
{
if (see_either)
{
- disturb(1, 0);
+ disturb(1, 1);
#ifdef JP
msg_format("%^s¤¬ËâË¡¤ÇÃç´Ö¤ò¾¤´¤·¤¿¡ª", m_name);
{
if (see_either)
{
- disturb(1, 0);
+ disturb(1, 1);
#ifdef JP
msg_format("%^s¤¬ËâË¡¤Ç¥â¥ó¥¹¥¿¡¼¤ò¾¤´¤·¤¿¡ª", m_name);
{
if (see_either)
{
- disturb(1, 0);
+ disturb(1, 1);
#ifdef JP
msg_format("%^s¤¬ËâË¡¤Ç¥¢¥ê¤ò¾¤´¤·¤¿¡£", m_name);
{
if (see_either)
{
- disturb(1, 0);
+ disturb(1, 1);
#ifdef JP
msg_format("%^s¤¬ËâË¡¤Ç¥¯¥â¤ò¾¤´¤·¤¿¡£", m_name);
{
if (see_either)
{
- disturb(1, 0);
+ disturb(1, 1);
#ifdef JP
msg_format("%^s¤¬ËâË¡¤Ç¥Ï¥¦¥ó¥É¤ò¾¤´¤·¤¿¡£", m_name);
{
if (see_either)
{
- disturb(1, 0);
+ disturb(1, 1);
#ifdef JP
msg_format("%^s¤¬ËâË¡¤Ç¥Ò¥É¥é¤ò¾¤´¤·¤¿¡£", m_name);
{
if (see_either)
{
- disturb(1, 0);
+ disturb(1, 1);
#ifdef JP
msg_format("%^s¤¬ËâË¡¤ÇÅ·»È¤ò¾¤´¤·¤¿¡ª", m_name);
{
if (see_either)
{
- disturb(1, 0);
+ disturb(1, 1);
#ifdef JP
msg_format("%^s¤¬ËâË¡¤Çº®Æ٤εÜÄ¤é¥Ç¡¼¥â¥ó¤ò¾¤´¤·¤¿¡ª", m_name);
{
if (see_either)
{
- disturb(1, 0);
+ disturb(1, 1);
#ifdef JP
msg_format("%s¤¬ËâË¡¤Ç¥¢¥ó¥Ç¥Ã¥É¤ò¾¤´¤·¤¿¡£", m_name);
{
if (see_either)
{
- disturb(1, 0);
+ disturb(1, 1);
#ifdef JP
msg_format("%^s¤¬ËâË¡¤Ç¥É¥é¥´¥ó¤ò¾¤´¤·¤¿¡ª", m_name);
{
if (see_either)
{
- disturb(1, 0);
+ disturb(1, 1);
#ifdef JP
msg_format("%s¤¬ËâË¡¤Ç¥¢¥ó¥Ç¥Ã¥É¤ò¾¤´¤·¤¿¡£", m_name);
{
if (see_either)
{
- disturb(1, 0);
+ disturb(1, 1);
#ifdef JP
msg_format("%^s¤¬ËâË¡¤Ç¸ÅÂå¥É¥é¥´¥ó¤ò¾¤´¤·¤¿¡ª", m_name);
{
if (see_either)
{
- disturb(1, 0);
+ disturb(1, 1);
#ifdef JP
msg_format("%^s¤¬¥¢¥ó¥Ð¡¼¤Î²¦Â²¤ò¾¤´¤·¤¿¡ª", m_name);
{
if (see_either)
{
- disturb(1, 0);
+ disturb(1, 1);
#ifdef JP
msg_format("%^s¤¬ËâË¡¤ÇÆÃÊ̤ʶ¯Å¨¤ò¾¤´¤·¤¿¡ª", m_name);
count += summon_specific(m_idx, y, x, rlev, SUMMON_UNIQUE, (PM_ALLOW_GROUP | PM_ALLOW_UNIQUE));
}
+ {
+ int non_unique_type = SUMMON_HI_UNDEAD;
+
+ if ((m_ptr->sub_align & (SUB_ALIGN_GOOD | SUB_ALIGN_EVIL)) == (SUB_ALIGN_GOOD | SUB_ALIGN_EVIL))
+ non_unique_type = 0;
+ else if (m_ptr->sub_align & SUB_ALIGN_GOOD)
+ non_unique_type = SUMMON_ANGEL;
+
+ for (k = count; k < s_num_4; k++)
+ {
+ count += summon_specific(m_idx, y, x, rlev, non_unique_type, (PM_ALLOW_GROUP | PM_ALLOW_UNIQUE));
+ }
+ }
+
if (known && !see_t && count)
{
mon_fight = TRUE;
p_ptr->mane_num++;
new_mane = TRUE;
- p_ptr->redraw |= (PR_MANE);
+ p_ptr->redraw |= (PR_IMITATION);
}
}