OSDN Git Service

Merge pull request #2434 from habu1010/feature/refactor-print-bolt-pict
[hengbandforosx/hengbandosx.git] / src / object-enchant / others / apply-magic-others.cpp
1 /*!
2  * @brief 武器でも防具でもアクセサリでもない、その他のアイテム群を生成・強化する処理
3  * @date 2022/02/23
4  * @author Hourier
5  * @details 他との兼ね合いでEnchanterとなっているが、油つぼ・人形・死体・像は生成のみで強化はしない
6  */
7
8 #include "object-enchant/others/apply-magic-others.h"
9 #include "artifact/random-art-generator.h"
10 #include "game-option/cheat-options.h"
11 #include "inventory/inventory-slot-types.h"
12 #include "monster-race/monster-race-hook.h"
13 #include "monster-race/monster-race.h"
14 #include "monster-race/race-indice-types.h"
15 #include "monster/monster-list.h"
16 #include "monster/monster-util.h"
17 #include "object-enchant/object-ego.h"
18 #include "object-enchant/tr-types.h"
19 #include "object-enchant/trc-types.h"
20 #include "object/object-kind.h"
21 #include "perception/object-perception.h"
22 #include "sv-definition/sv-lite-types.h"
23 #include "sv-definition/sv-other-types.h"
24 #include "system/floor-type-definition.h"
25 #include "system/monster-race-definition.h"
26 #include "system/object-type-definition.h"
27 #include "system/player-type-definition.h"
28 #include "util/bit-flags-calculator.h"
29 #include "view/display-messages.h"
30 #include <unordered_map>
31
32 /*!
33  * @brief コンストラクタ
34  * @param player_ptr プレイヤーへの参照ポインタ
35  * @param o_ptr 強化を与えたい/生成したいオブジェクトの構造体参照ポインタ
36  * @param power 生成ランク
37  * @details power > 2はデバッグ専用.
38  */
39 OtherItemsEnchanter::OtherItemsEnchanter(PlayerType *player_ptr, ObjectType *o_ptr)
40     : player_ptr(player_ptr)
41     , o_ptr(o_ptr)
42 {
43 }
44
45 /*!
46  * @brief その他雑多のオブジェクトに生成ランクごとの強化を与える
47  * @details power > 2はデバッグ専用.
48  */
49 void OtherItemsEnchanter::apply_magic()
50 {
51     switch (this->o_ptr->tval) {
52     case ItemKindType::FLASK:
53         this->o_ptr->fuel = this->o_ptr->pval;
54         this->o_ptr->pval = 0;
55         break;
56     case ItemKindType::WAND:
57     case ItemKindType::STAFF:
58         this->enchant_wand_staff();
59         break;
60     case ItemKindType::ROD:
61         this->o_ptr->pval = k_info[this->o_ptr->k_idx].pval;
62         break;
63     case ItemKindType::CAPTURE:
64         this->o_ptr->pval = 0;
65         object_aware(this->player_ptr, this->o_ptr);
66         object_known(this->o_ptr);
67         break;
68     case ItemKindType::FIGURINE:
69         this->generate_figurine();
70         break;
71     case ItemKindType::CORPSE:
72         this->generate_corpse();
73         break;
74     case ItemKindType::STATUE:
75         this->generate_statue();
76         break;
77     case ItemKindType::CHEST:
78         this->generate_chest();
79         break;
80     default:
81         break;
82     }
83 }
84
85 /*
86  * @brief 杖を強化する
87  * The wand or staff gets a number of initial charges equal
88  * to between 1/2 (+1) and the full object kind's pval.
89  */
90 void OtherItemsEnchanter::enchant_wand_staff()
91 {
92     auto *k_ptr = &k_info[this->o_ptr->k_idx];
93     this->o_ptr->pval = k_ptr->pval / 2 + randint1((k_ptr->pval + 1) / 2);
94 }
95
96 /*
97  * @brief ランダムに選択したモンスター種族IDからその人形を作る
98  * @details
99  * ツチノコの人形は作らない
100  * レアリティが1~100のものだけ生成対象になる
101  * レベルの高い人形ほど生成されにくい
102  * たまに呪われる
103  */
104 void OtherItemsEnchanter::generate_figurine()
105 {
106     auto *floor_ptr = this->player_ptr->current_floor_ptr;
107     MonsterRaceId r_idx;
108     while (true) {
109         r_idx = MonsterRace::pick_one_at_random();
110         if (!item_monster_okay(this->player_ptr, r_idx) || (r_idx == MonsterRaceId::TSUCHINOKO)) {
111             continue;
112         }
113
114         auto *r_ptr = &r_info[r_idx];
115         auto check = (floor_ptr->dun_level < r_ptr->level) ? (r_ptr->level - floor_ptr->dun_level) : 0;
116         if ((r_ptr->rarity == 0) || (r_ptr->rarity > 100) || (randint0(check) > 0)) {
117             continue;
118         }
119
120         break;
121     }
122
123     this->o_ptr->pval = enum2i(r_idx);
124     if (one_in_(6)) {
125         this->o_ptr->curse_flags.set(CurseTraitType::CURSED);
126     }
127 }
128
129 /*
130  * @brief ランダムに選択したモンスター種族IDからその死体/骨を作る
131  * @details
132  * そもそも死体も骨も落とさないモンスターは対象外
133  * ユニークやあやしい影等、そこらに落ちている死体としてふさわしくないものは弾く
134  * レアリティが1~100のものだけ生成対象になる (はず)
135  * レベルの高い死体/骨ほど生成されにくい
136  */
137 void OtherItemsEnchanter::generate_corpse()
138 {
139     const std::unordered_map<OBJECT_SUBTYPE_VALUE, MonsterDropType> match = {
140         { SV_SKELETON, MonsterDropType::DROP_SKELETON },
141         { SV_CORPSE, MonsterDropType::DROP_CORPSE },
142     };
143
144     get_mon_num_prep(this->player_ptr, item_monster_okay, nullptr);
145     auto *floor_ptr = this->player_ptr->current_floor_ptr;
146     MonsterRaceId r_idx;
147     while (true) {
148         r_idx = get_mon_num(this->player_ptr, 0, floor_ptr->dun_level, 0);
149         auto &r_ref = r_info[r_idx];
150         auto check = (floor_ptr->dun_level < r_ref.level) ? (r_ref.level - floor_ptr->dun_level) : 0;
151         if ((r_ref.rarity == 0) || (match.find(o_ptr->sval) != match.end() && r_ref.drop_flags.has_not(match.at(o_ptr->sval))) || (randint0(check) > 0)) {
152             continue;
153         }
154
155         break;
156     }
157
158     this->o_ptr->pval = enum2i(r_idx);
159     object_aware(this->player_ptr, this->o_ptr);
160     object_known(this->o_ptr);
161 }
162
163 /*
164  * @brief ランダムに選択したモンスター種族IDからその像を作る
165  * @details レアリティが1以上のものだけ生成対象になる
166  */
167 void OtherItemsEnchanter::generate_statue()
168 {
169     auto pick_r_idx_for_statue = [] {
170         while (true) {
171             auto r_idx = MonsterRace::pick_one_at_random();
172             if (r_info[r_idx].rarity > 0) {
173                 return r_idx;
174             }
175         }
176     };
177     auto r_idx = pick_r_idx_for_statue();
178     auto *r_ptr = &r_info[r_idx];
179
180     this->o_ptr->pval = enum2i(r_idx);
181     if (cheat_peek) {
182         msg_format(_("%sの像", "Statue of %s"), r_ptr->name.c_str());
183     }
184
185     object_aware(this->player_ptr, this->o_ptr);
186     object_known(this->o_ptr);
187 }
188
189 /*
190  * @brief 箱を生成する
191  * @details 箱にはレベルがあり、箱の召喚トラップが発動すると箱レベルと同等のモンスターが召喚される
192  */
193 void OtherItemsEnchanter::generate_chest()
194 {
195     auto obj_level = k_info[this->o_ptr->k_idx].level;
196     if (obj_level <= 0) {
197         return;
198     }
199
200     this->o_ptr->pval = randint1(obj_level);
201     if (this->o_ptr->sval == SV_CHEST_KANDUME) {
202         this->o_ptr->pval = 6;
203     }
204
205     this->o_ptr->chest_level = this->player_ptr->current_floor_ptr->dun_level + 5;
206     if (this->o_ptr->pval > 55) {
207         this->o_ptr->pval = 55 + randint0(5);
208     }
209 }