src/mind/mind-cavalry.c

   1 /*!
   2  * @brief 騎兵のレイシャルパワー処理
   3  * @date 2020/05/16
   4  * @author Hourier
   5  */
   6
   7 #include "mind/mind-cavalry.h"
   8 #include "cmd-action/cmd-pet.h"
   9 #include "floor/floor.h"
  10 #include "monster-race/race-flags1.h"
  11 #include "monster-race/race-flags7.h"
  12 #include "monster/smart-learn-types.h"
  13 #include "monster/monster-describer.h"
  14 #include "monster/monster-info.h"
  15 #include "monster/monster2.h"
  16 #include "pet/pet-fall-off.h"
  17 #include "player/player-skill.h"
  18
  19 /*!
  20  * 荒馬慣らし
  21  * @param creature_ptr プレーヤーへの参照ポインタ
  22  * @return 結果はどうあれ騎乗したらTRUE
  23  */
  24 bool rodeo(player_type *creature_ptr)
  25 {
  26     GAME_TEXT m_name[MAX_NLEN];
  27     monster_type *m_ptr;
  28     monster_race *r_ptr;
  29     int rlev;
  30
  31     if (creature_ptr->riding) {
  32         msg_print(_("今は乗馬中だ。", "You ARE riding."));
  33         return FALSE;
  34     }
  35
  36     if (!do_cmd_riding(creature_ptr, TRUE))
  37         return TRUE;
  38
  39     m_ptr = &creature_ptr->current_floor_ptr->m_list[creature_ptr->riding];
  40     r_ptr = &r_info[m_ptr->r_idx];
  41     monster_desc(creature_ptr, m_name, m_ptr, 0);
  42     msg_format(_("%sに乗った。", "You ride on %s."), m_name);
  43
  44     if (is_pet(m_ptr))
  45         return TRUE;
  46
  47     rlev = r_ptr->level;
  48
  49     if (r_ptr->flags1 & RF1_UNIQUE)
  50         rlev = rlev * 3 / 2;
  51     if (rlev > 60)
  52         rlev = 60 + (rlev - 60) / 2;
  53     if ((randint1(creature_ptr->skill_exp[GINOU_RIDING] / 120 + creature_ptr->lev * 2 / 3) > rlev) && one_in_(2)
  54         && !creature_ptr->current_floor_ptr->inside_arena && !creature_ptr->phase_out && !(r_ptr->flags7 & (RF7_GUARDIAN)) && !(r_ptr->flags1 & (RF1_QUESTOR))
  55         && (rlev < creature_ptr->lev * 3 / 2 + randint0(creature_ptr->lev / 5))) {
  56         msg_format(_("%sを手なずけた。", "You tame %s."), m_name);
  57         set_pet(creature_ptr, m_ptr);
  58     } else {
  59         msg_format(_("%sに振り落とされた！", "You have been thrown off by %s."), m_name);
  60         process_fall_off_horse(creature_ptr, 1, TRUE);
  61
  62         /* 落馬処理に失敗してもとにかく乗馬解除 */
  63         creature_ptr->riding = 0;
  64     }
  65
  66     return TRUE;
  67 }