}
}
+bool_hack life_stream(bool_hack message, bool_hack virtue)
+{
+ if(virtue)
+ {
+ chg_virtue(V_VITALITY, 1);
+ chg_virtue(V_UNLIFE, -5);
+ }
+ if(message)
+ {
+ msg_print(_("体中に生命力が満ちあふれてきた！", "You feel life flow through your body!"));
+ }
+ restore_level();
+ (void)set_poisoned(0);
+ (void)set_blind(0);
+ (void)set_confused(0);
+ (void)set_image(0);
+ (void)set_stun(0);
+ (void)set_cut(0);
+ (void)restore_all_status();
+ (void)set_shero(0, TRUE);
+ update_stuff();
+ hp_player(5000);
+
+ return TRUE;
+}
+
+bool_hack heroism(int base)
+{
+ bool_hack ident = FALSE;
+ if(set_afraid(0)) ident = TRUE;
+ if(set_hero(p_ptr->hero + randint1(base) + base, FALSE)) ident = TRUE;
+ if(hp_player(10)) ident = TRUE;
+ return ident;
+}
+
+bool_hack berserk(int base)
+{
+ bool_hack ident = FALSE;
+ if (set_afraid(0)) ident = TRUE;
+ if (set_shero(p_ptr->hero + randint1(base) + base, FALSE)) ident = TRUE;
+ if (hp_player(30)) ident = TRUE;
+ return ident;
+}
+
+bool_hack cure_light_wounds(int dice, int sides)
+{
+ bool_hack ident = FALSE;
+ if (hp_player(damroll(dice, sides))) ident = TRUE;
+ if (set_blind(0)) ident = TRUE;
+ if (set_cut(p_ptr->cut - 10)) ident = TRUE;
+ if (set_shero(0, TRUE)) ident = TRUE;
+ return ident;
+}
+
+bool_hack cure_serious_wounds(int dice, int sides)
+{
+ bool_hack ident = FALSE;
+ if (hp_player(damroll(dice, sides))) ident = TRUE;
+ if (set_blind(0)) ident = TRUE;
+ if (set_confused(0)) ident = TRUE;
+ if (set_cut((p_ptr->cut / 2) - 50)) ident = TRUE;
+ if (set_shero(0, TRUE)) ident = TRUE;
+ return ident;
+}
+
+bool_hack cure_critical_wounds(HIT_POINT pow)
+{
+ bool_hack ident = FALSE;
+ if (hp_player(pow)) ident = TRUE;
+ if (set_blind(0)) ident = TRUE;
+ if (set_confused(0)) ident = TRUE;
+ if (set_poisoned(0)) ident = TRUE;
+ if (set_stun(0)) ident = TRUE;
+ if (set_cut(0)) ident = TRUE;
+ if (set_shero(0, TRUE)) ident = TRUE;
+ return ident;
+}
+
+bool_hack true_healing(HIT_POINT pow)
+{
+ bool_hack ident = FALSE;
+ if (hp_player(pow)) ident = TRUE;
+ if (set_blind(0)) ident = TRUE;
+ if (set_confused(0)) ident = TRUE;
+ if (set_poisoned(0)) ident = TRUE;
+ if (set_stun(0)) ident = TRUE;
+ if (set_cut(0)) ident = TRUE;
+ if (set_image(0)) ident = TRUE;
+ return ident;
+}
+
+bool_hack restore_mana(bool_hack magic_eater)
+{
+ bool_hack ident = FALSE;
+
+ if (p_ptr->pclass == CLASS_MAGIC_EATER && magic_eater)
+ {
+ int i;
+ for (i = 0; i < EATER_EXT * 2; i++)
+ {
+ p_ptr->magic_num1[i] += (p_ptr->magic_num2[i] < 10) ? EATER_CHARGE * 3 : p_ptr->magic_num2[i] * EATER_CHARGE / 3;
+ if (p_ptr->magic_num1[i] > p_ptr->magic_num2[i] * EATER_CHARGE) p_ptr->magic_num1[i] = p_ptr->magic_num2[i] * EATER_CHARGE;
+ }
+ for (; i < EATER_EXT * 3; i++)
+ {
+ KIND_OBJECT_IDX k_idx = lookup_kind(TV_ROD, i - EATER_EXT * 2);
+ p_ptr->magic_num1[i] -= ((p_ptr->magic_num2[i] < 10) ? EATER_ROD_CHARGE * 3 : p_ptr->magic_num2[i] * EATER_ROD_CHARGE / 3)*k_info[k_idx].pval;
+ if (p_ptr->magic_num1[i] < 0) p_ptr->magic_num1[i] = 0;
+ }
+ msg_print(_("頭がハッキリとした。", "You feel your head clear."));
+ p_ptr->window |= (PW_PLAYER);
+ ident = TRUE;
+ }
+ else if (p_ptr->csp < p_ptr->msp)
+ {
+ p_ptr->csp = p_ptr->msp;
+ p_ptr->csp_frac = 0;
+ msg_print(_("頭がハッキリとした。", "You feel your head clear."));
+ p_ptr->redraw |= (PR_MANA);
+ p_ptr->window |= (PW_PLAYER);
+ p_ptr->window |= (PW_SPELL);
+ ident = TRUE;
+ }
+
+ return ident;
+}
+
+bool restore_all_status(void)
+{
+ bool ident = FALSE;
+ if (do_res_stat(A_STR)) ident = TRUE;
+ if (do_res_stat(A_INT)) ident = TRUE;
+ if (do_res_stat(A_WIS)) ident = TRUE;
+ if (do_res_stat(A_DEX)) ident = TRUE;
+ if (do_res_stat(A_CON)) ident = TRUE;
+ if (do_res_stat(A_CHR)) ident = TRUE;
+ return ident;
+}
+
+/*!
+ * @brief 口を使う継続的な処理を中断する
+ * @return なし
+ */
+void stop_mouth(void)
+{
+ if (music_singing_any()) stop_singing();
+ if (hex_spelling_any()) stop_hex_spell_all();
+}
+
+
+bool_hack vampirism(void)
+{
+ DIRECTION dir;
+ int x, y, dummy;
+ cave_type *c_ptr;
+
+ if (d_info[dungeon_type].flags1 & DF1_NO_MELEE)
+ {
+ msg_print(_("なぜか攻撃することができない。", "Something prevent you from attacking."));
+ return FALSE;
+ }
+
+ /* Only works on adjacent monsters */
+ if (!get_rep_dir2(&dir)) return FALSE;
+ y = p_ptr->y + ddy[dir];
+ x = p_ptr->x + ddx[dir];
+ c_ptr = &cave[y][x];
+
+ stop_mouth();
+
+ if (!(c_ptr->m_idx))
+ {
+ msg_print(_("何もない場所に噛みついた！", "You bite into thin air!"));
+ return FALSE;
+ }
+
+ msg_print(_("あなたはニヤリとして牙をむいた...", "You grin and bare your fangs..."));
+
+ dummy = p_ptr->lev * 2;
+
+ if (hypodynamic_bolt(dir, dummy))
+ {
+ if (p_ptr->food < PY_FOOD_FULL)
+ /* No heal if we are "full" */
+ (void)hp_player(dummy);
+ else
+ msg_print(_("あなたは空腹ではありません。", "You were not hungry."));
+
+ /* Gain nutritional sustenance: 150/hp drained */
+ /* A Food ration gives 5000 food points (by contrast) */
+ /* Don't ever get more than "Full" this way */
+ /* But if we ARE Gorged, it won't cure us */
+ dummy = p_ptr->food + MIN(5000, 100 * dummy);
+ if (p_ptr->food < PY_FOOD_MAX) /* Not gorged already */
+ (void)set_food(dummy >= PY_FOOD_MAX ? PY_FOOD_MAX - 1 : dummy);
+ }
+ else
+ msg_print(_("げぇ！ひどい味だ。", "Yechh. That tastes foul."));
+ return TRUE;
+}
+
+bool panic_hit(void)
+{
+ DIRECTION dir;
+ POSITION x, y;
+
+ if (!get_rep_dir2(&dir)) return FALSE;
+ y = p_ptr->y + ddy[dir];
+ x = p_ptr->x + ddx[dir];
+ if (cave[y][x].m_idx)
+ {
+ py_attack(y, x, 0);
+ if (randint0(p_ptr->skill_dis) < 7)
+ msg_print(_("うまく逃げられなかった。", "You failed to run away."));
+ else
+ teleport_player(30, 0L);
+ return TRUE;
+ }
+ else
+ {
+ msg_print(_("その方向にはモンスターはいません。", "You don't see any monster in this direction"));
+ msg_print(NULL);
+ return FALSE;
+ }
+
+}
\ No newline at end of file
OSDN Git Service
