7 #include "mind/mind-cavalry.h"
8 #include "cmd-action/cmd-pet.h"
9 #include "monster-race/monster-race.h"
10 #include "monster/monster-describer.h"
11 #include "monster/monster-info.h"
12 #include "monster/monster-status-setter.h"
13 #include "monster/smart-learn-types.h"
14 #include "pet/pet-fall-off.h"
15 #include "player/player-skill.h"
16 #include "system/angband-system.h"
17 #include "system/floor-type-definition.h"
18 #include "system/monster-entity.h"
19 #include "system/monster-race-info.h"
20 #include "system/player-type-definition.h"
21 #include "view/display-messages.h"
25 * @param player_ptr プレイヤーへの参照ポインタ
26 * @return 結果はどうあれ騎乗したらTRUE
28 bool rodeo(PlayerType *player_ptr)
30 if (player_ptr->riding) {
31 msg_print(_("今は乗馬中だ。", "You ARE riding."));
35 if (!do_cmd_riding(player_ptr, true)) {
39 auto *m_ptr = &player_ptr->current_floor_ptr->m_list[player_ptr->riding];
40 auto *r_ptr = &m_ptr->get_monrace();
41 const auto m_name = monster_desc(player_ptr, m_ptr, 0);
42 msg_format(_("%sに乗った。", "You ride on %s."), m_name.data());
44 if (m_ptr->is_pet()) {
48 auto rlev = r_ptr->level;
50 if (r_ptr->kind_flags.has(MonsterKindType::UNIQUE)) {
54 rlev = 60 + (rlev - 60) / 2;
56 if ((randint1(player_ptr->skill_exp[PlayerSkillKindType::RIDING] / 120 + player_ptr->lev * 2 / 3) > rlev) && one_in_(2) &&
57 !player_ptr->current_floor_ptr->inside_arena && !AngbandSystem::get_instance().is_phase_out() && r_ptr->misc_flags.has_not(MonsterMiscType::GUARDIAN) && r_ptr->misc_flags.has_not(MonsterMiscType::QUESTOR) &&
58 (rlev < player_ptr->lev * 3 / 2 + randint0(player_ptr->lev / 5))) {
59 msg_format(_("%sを手なずけた。", "You tame %s."), m_name.data());
60 set_pet(player_ptr, m_ptr);
62 msg_format(_("%sに振り落とされた!", "You have been thrown off by %s."), m_name.data());
63 process_fall_off_horse(player_ptr, 1, true);
65 /* 落馬処理に失敗してもとにかく乗馬解除 */
66 player_ptr->riding = 0;