1 #include "market/building-recharger.h"
2 #include "autopick/autopick.h"
3 #include "core/asking-player.h"
4 #include "core/player-update-types.h"
5 #include "core/window-redrawer.h"
6 #include "flavor/flavor-describer.h"
7 #include "flavor/object-flavor-types.h"
8 #include "floor/floor-object.h"
9 #include "inventory/inventory-slot-types.h"
10 #include "market/building-util.h"
11 #include "object-enchant/special-object-flags.h"
12 #include "object-hook/hook-magic.h"
13 #include "object/item-tester-hooker.h"
14 #include "object/item-use-flags.h"
15 #include "object/object-kind.h"
16 #include "perception/object-perception.h"
17 #include "spell-kind/spells-perception.h"
18 #include "system/object-type-definition.h"
19 #include "system/player-type-definition.h"
20 #include "term/screen-processor.h"
21 #include "view/display-messages.h"
24 * @brief 魔道具の使用回数を回復させる施設のメインルーチン / Recharge rods, wands and staffs
26 * The player can select the number of charges to add\n
27 * (up to a limit), and the recharge never fails.\n
29 * The cost for rods depends on the level of the rod. The prices\n
30 * for recharging wands and staffs are dependent on the cost of\n
32 * @param player_ptr プレイヤーへの参照ポインタ
34 void building_recharge(PlayerType *player_ptr)
38 prt(_(" 再充填の費用はアイテムの種類によります。", " The prices of recharge depend on the type."), 6, 0);
40 concptr q = _("どのアイテムに魔力を充填しますか? ", "Recharge which item? ");
41 concptr s = _("魔力を充填すべきアイテムがない。", "You have nothing to recharge.");
45 o_ptr = choose_object(player_ptr, &item, q, s, (USE_INVEN | USE_FLOOR), FuncItemTester(&ObjectType::is_rechargeable));
50 k_ptr = &k_info[o_ptr->k_idx];
53 * We don't want to give the player free info about
54 * the level of the item or the number of charges.
56 /* The item must be "known" */
57 char tmp_str[MAX_NLEN];
58 if (!o_ptr->is_known()) {
59 msg_format(_("充填する前に鑑定されている必要があります!", "The item must be identified first!"));
62 if ((player_ptr->au >= 50) && get_check(_("$50で鑑定しますか? ", "Identify for 50 gold? ")))
66 identify_item(player_ptr, o_ptr);
67 describe_flavor(player_ptr, tmp_str, o_ptr, 0);
68 msg_format(_("%s です。", "You have: %s."), tmp_str);
70 autopick_alter_item(player_ptr, item, false);
71 building_prt_gold(player_ptr);
77 DEPTH lev = k_info[o_ptr->k_idx].level;
79 if (o_ptr->tval == ItemKindType::ROD) {
80 if (o_ptr->timeout > 0) {
81 price = (lev * 50 * o_ptr->timeout) / k_ptr->pval;
84 msg_format(_("それは再充填する必要はありません。", "That doesn't need to be recharged."));
87 } else if (o_ptr->tval == ItemKindType::STAFF) {
88 price = (k_info[o_ptr->k_idx].cost / 10) * o_ptr->number;
89 price = std::max(10, price);
91 price = (k_info[o_ptr->k_idx].cost / 10);
92 price = std::max(10, price);
95 if (o_ptr->tval == ItemKindType::WAND && (o_ptr->pval / o_ptr->number >= k_ptr->pval)) {
96 if (o_ptr->number > 1) {
97 msg_print(_("この魔法棒はもう充分に充填されています。", "These wands are already fully charged."));
99 msg_print(_("この魔法棒はもう充分に充填されています。", "This wand is already fully charged."));
103 } else if (o_ptr->tval == ItemKindType::STAFF && o_ptr->pval >= k_ptr->pval) {
104 if (o_ptr->number > 1) {
105 msg_print(_("この杖はもう充分に充填されています。", "These staffs are already fully charged."));
107 msg_print(_("この杖はもう充分に充填されています。", "This staff is already fully charged."));
113 if (player_ptr->au < price) {
114 describe_flavor(player_ptr, tmp_str, o_ptr, OD_NAME_ONLY);
116 msg_format("%sを再充填するには$%d 必要です!", tmp_str, price);
118 msg_format("You need %d gold to recharge %s!", price, tmp_str);
123 PARAMETER_VALUE charges;
124 if (o_ptr->tval == ItemKindType::ROD) {
126 if (get_check(format("そのロッドを$%d で再充填しますか?", price)))
128 if (get_check(format("Recharge the %s for %d gold? ", ((o_ptr->number > 1) ? "rods" : "rod"), price)))
138 if (o_ptr->tval == ItemKindType::STAFF)
139 max_charges = k_ptr->pval - o_ptr->pval;
141 max_charges = o_ptr->number * k_ptr->pval - o_ptr->pval;
143 charges = (PARAMETER_VALUE)get_quantity(
144 format(_("一回分$%d で何回分充填しますか?", "Add how many charges for %d gold apiece? "), price), std::min(player_ptr->au / price, max_charges));
150 o_ptr->pval += charges;
151 o_ptr->ident &= ~(IDENT_EMPTY);
154 describe_flavor(player_ptr, tmp_str, o_ptr, 0);
156 msg_format("%sを$%d で再充填しました。", tmp_str, price);
158 msg_format("%^s %s recharged for %d gold.", tmp_str, ((o_ptr->number > 1) ? "were" : "was"), price);
160 player_ptr->update |= (PU_COMBINE | PU_REORDER);
161 player_ptr->window_flags |= (PW_INVEN);
162 player_ptr->au -= price;
166 * @brief 魔道具の使用回数を回復させる施設の一括処理向けサブルーチン / Recharge rods, wands and staffs
168 * The player can select the number of charges to add\n
169 * (up to a limit), and the recharge never fails.\n
171 * The cost for rods depends on the level of the rod. The prices\n
172 * for recharging wands and staffs are dependent on the cost of\n
174 * @param player_ptr プレイヤーへの参照ポインタ
176 void building_recharge_all(PlayerType *player_ptr)
180 prt(_(" 再充填の費用はアイテムの種類によります。", " The prices of recharge depend on the type."), 6, 0);
183 PRICE total_cost = 0;
184 for (INVENTORY_IDX i = 0; i < INVEN_PACK; i++) {
186 o_ptr = &player_ptr->inventory_list[i];
188 if ((o_ptr->tval < ItemKindType::STAFF) || (o_ptr->tval > ItemKindType::ROD))
190 if (!o_ptr->is_known())
193 DEPTH lev = k_info[o_ptr->k_idx].level;
195 k_ptr = &k_info[o_ptr->k_idx];
197 switch (o_ptr->tval) {
198 case ItemKindType::ROD:
199 price = (lev * 50 * o_ptr->timeout) / k_ptr->pval;
202 case ItemKindType::STAFF:
203 price = (k_info[o_ptr->k_idx].cost / 10) * o_ptr->number;
204 price = std::max(10, price);
205 price = (k_ptr->pval - o_ptr->pval) * price;
208 case ItemKindType::WAND:
209 price = (k_info[o_ptr->k_idx].cost / 10);
210 price = std::max(10, price);
211 price = (o_ptr->number * k_ptr->pval - o_ptr->pval) * price;
223 msg_print(_("充填する必要はありません。", "No need to recharge."));
228 if (player_ptr->au < total_cost) {
229 msg_format(_("すべてのアイテムを再充填するには$%d 必要です!", "You need %d gold to recharge all items!"), total_cost);
234 if (!get_check(format(_("すべてのアイテムを $%d で再充填しますか?", "Recharge all items for %d gold? "), total_cost)))
237 for (INVENTORY_IDX i = 0; i < INVEN_PACK; i++) {
239 o_ptr = &player_ptr->inventory_list[i];
241 k_ptr = &k_info[o_ptr->k_idx];
243 if ((o_ptr->tval < ItemKindType::STAFF) || (o_ptr->tval > ItemKindType::ROD))
246 if (!o_ptr->is_known()) {
247 identify_item(player_ptr, o_ptr);
248 autopick_alter_item(player_ptr, i, false);
251 switch (o_ptr->tval) {
252 case ItemKindType::ROD:
255 case ItemKindType::STAFF:
256 if (o_ptr->pval < k_ptr->pval)
257 o_ptr->pval = k_ptr->pval;
259 o_ptr->ident &= ~(IDENT_EMPTY);
261 case ItemKindType::WAND:
262 if (o_ptr->pval < o_ptr->number * k_ptr->pval)
263 o_ptr->pval = o_ptr->number * k_ptr->pval;
265 o_ptr->ident &= ~(IDENT_EMPTY);
273 msg_format(_("$%d で再充填しました。", "You pay %d gold."), total_cost);
275 player_ptr->update |= (PU_COMBINE | PU_REORDER);
276 player_ptr->window_flags |= (PW_INVEN);
277 player_ptr->au -= total_cost;