+ * @brief 対邪悪結界が効いている状態で邪悪なモンスターから直接攻撃を受けた時の処理
+ * @param target_ptr プレーヤーへの参照ポインタ
+ * @monap_ptr モンスターからモンスターへの直接攻撃構造体への参照ポインタ
+ * @return briefに書いた条件+確率が満たされたらTRUE、それ以外はFALSE
+ */
+static bool effect_protecion_from_evil(player_type *target_ptr, monap_type *monap_ptr)
+{
+ monster_race *r_ptr = &r_info[monap_ptr->m_ptr->r_idx];
+ if ((target_ptr->protevil <= 0) || ((r_ptr->flags3 & RF3_EVIL) == 0) || (target_ptr->lev < monap_ptr->rlev) || ((randint0(100) + target_ptr->lev) <= 50))
+ return FALSE;
+
+ if (is_original_ap_and_seen(target_ptr, monap_ptr->m_ptr))
+ r_ptr->r_flags3 |= RF3_EVIL;
+
+#ifdef JP
+ if (monap_ptr->abbreviate)
+ msg_format("撃退した。");
+ else
+ msg_format("%^sは撃退された。", monap_ptr->m_name);
+
+ monap_ptr->abbreviate = 1; /* 2回目以降は省略 */
+#else
+ msg_format("%^s is repelled.", monap_ptr->m_name);
+#endif
+
+ return TRUE;
+}
+
+/*!