src/object-enchant/others/apply-magic-others.cpp

   1 /*!
   2  * @brief 防具系のアイテムを強化して(恐らく床に)生成する処理
   3  * @date 2020/06/02
   4  * @author Hourier
   5  * @todo ちょっと長い。要分割
   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-flags9.h"
  15 #include "monster-race/race-indice-types.h"
  16 #include "monster/monster-list.h"
  17 #include "monster/monster-util.h"
  18 #include "object-enchant/object-ego.h"
  19 #include "object-enchant/tr-types.h"
  20 #include "object-enchant/trc-types.h"
  21 #include "object/object-kind.h"
  22 #include "perception/object-perception.h"
  23 #include "sv-definition/sv-lite-types.h"
  24 #include "sv-definition/sv-other-types.h"
  25 #include "system/floor-type-definition.h"
  26 #include "system/monster-race-definition.h"
  27 #include "system/object-type-definition.h"
  28 #include "system/player-type-definition.h"
  29 #include "util/bit-flags-calculator.h"
  30 #include "view/display-messages.h"
  31
  32 /*!
  33  * @brief その他雑多のオブジェクトに生成ランクごとの強化を与えるサブルーチン
  34  * Apply magic to an item known to be "boring"
  35  * @param player_ptr プレイヤーへの参照ポインタ
  36  * @param o_ptr 強化を与えたいオブジェクトの構造体参照ポインタ
  37  * @param power 生成ランク
  38  * @details power > 2はデバッグ専用.
  39  */
  40 void apply_magic_others(PlayerType *player_ptr, object_type *o_ptr, int power)
  41 {
  42     object_kind *k_ptr = &k_info[o_ptr->k_idx];
  43
  44     floor_type *floor_ptr = player_ptr->current_floor_ptr;
  45     switch (o_ptr->tval) {
  46     case ItemKindType::WHISTLE: {
  47         break;
  48     }
  49     case ItemKindType::FLASK: {
  50         o_ptr->xtra4 = o_ptr->pval;
  51         o_ptr->pval = 0;
  52         break;
  53     }
  54     case ItemKindType::LITE: {
  55         if (o_ptr->sval == SV_LITE_TORCH) {
  56             if (o_ptr->pval > 0)
  57                 o_ptr->xtra4 = randint1(o_ptr->pval);
  58             o_ptr->pval = 0;
  59         }
  60
  61         if (o_ptr->sval == SV_LITE_LANTERN) {
  62             if (o_ptr->pval > 0)
  63                 o_ptr->xtra4 = randint1(o_ptr->pval);
  64             o_ptr->pval = 0;
  65         }
  66
  67         if (power > 2) {
  68             become_random_artifact(player_ptr, o_ptr, false);
  69         } else if ((power == 2) || ((power == 1) && one_in_(3))) {
  70             while (!o_ptr->name2) {
  71                 while (true) {
  72                     bool okay_flag = true;
  73
  74                     o_ptr->name2 = get_random_ego(INVEN_LITE, true);
  75
  76                     switch (o_ptr->name2) {
  77                     case EGO_LITE_LONG:
  78                         if (o_ptr->sval == SV_LITE_FEANOR)
  79                             okay_flag = false;
  80                     }
  81
  82                     if (okay_flag)
  83                         break;
  84                 }
  85             }
  86         } else if (power == -2) {
  87             o_ptr->name2 = get_random_ego(INVEN_LITE, false);
  88             switch (o_ptr->name2) {
  89             case EGO_LITE_DARKNESS:
  90                 o_ptr->xtra4 = 0;
  91
  92                 if (o_ptr->sval == SV_LITE_TORCH) {
  93                     o_ptr->art_flags.set(TR_LITE_M1);
  94                 } else if (o_ptr->sval == SV_LITE_LANTERN) {
  95                     o_ptr->art_flags.set(TR_LITE_M2);
  96                 } else if (o_ptr->sval == SV_LITE_FEANOR) {
  97                     o_ptr->art_flags.set(TR_LITE_M3);
  98                 }
  99                 break;
 100             }
 101         }
 102
 103         break;
 104     }
 105     case ItemKindType::WAND:
 106     case ItemKindType::STAFF: {
 107         /* The wand or staff gets a number of initial charges equal
 108          * to between 1/2 (+1) and the full object kind's pval. -LM-
 109          */
 110         o_ptr->pval = k_ptr->pval / 2 + randint1((k_ptr->pval + 1) / 2);
 111         break;
 112     }
 113     case ItemKindType::ROD: {
 114         o_ptr->pval = k_ptr->pval;
 115         break;
 116     }
 117     case ItemKindType::CAPTURE: {
 118         o_ptr->pval = 0;
 119         object_aware(player_ptr, o_ptr);
 120         object_known(o_ptr);
 121         break;
 122     }
 123     case ItemKindType::FIGURINE: {
 124         PARAMETER_VALUE i = 1;
 125         int check;
 126         monster_race *r_ptr;
 127         while (true) {
 128             i = randint1(r_info.size() - 1);
 129
 130             if (!item_monster_okay(player_ptr, i))
 131                 continue;
 132             if (i == MON_TSUCHINOKO)
 133                 continue;
 134
 135             r_ptr = &r_info[i];
 136             check = (floor_ptr->dun_level < r_ptr->level) ? (r_ptr->level - floor_ptr->dun_level) : 0;
 137             if (!r_ptr->rarity)
 138                 continue;
 139             if (r_ptr->rarity > 100)
 140                 continue;
 141             if (randint0(check))
 142                 continue;
 143
 144             break;
 145         }
 146
 147         o_ptr->pval = i;
 148         if (one_in_(6))
 149             o_ptr->curse_flags.set(CurseTraitType::CURSED);
 150
 151         break;
 152     }
 153     case ItemKindType::CORPSE: {
 154         PARAMETER_VALUE i = 1;
 155         int check;
 156         uint32_t match = 0;
 157         monster_race *r_ptr;
 158         if (o_ptr->sval == SV_SKELETON) {
 159             match = RF9_DROP_SKELETON;
 160         } else if (o_ptr->sval == SV_CORPSE) {
 161             match = RF9_DROP_CORPSE;
 162         }
 163
 164         get_mon_num_prep(player_ptr, item_monster_okay, nullptr);
 165         while (true) {
 166             i = get_mon_num(player_ptr, 0, floor_ptr->dun_level, 0);
 167             r_ptr = &r_info[i];
 168             check = (floor_ptr->dun_level < r_ptr->level) ? (r_ptr->level - floor_ptr->dun_level) : 0;
 169             if (!r_ptr->rarity)
 170                 continue;
 171             if (!(r_ptr->flags9 & match))
 172                 continue;
 173             if (randint0(check))
 174                 continue;
 175
 176             break;
 177         }
 178
 179         o_ptr->pval = i;
 180         object_aware(player_ptr, o_ptr);
 181         object_known(o_ptr);
 182         break;
 183     }
 184     case ItemKindType::STATUE: {
 185         PARAMETER_VALUE i = 1;
 186         monster_race *r_ptr;
 187         while (true) {
 188             i = randint1(r_info.size() - 1);
 189             r_ptr = &r_info[i];
 190             if (!r_ptr->rarity)
 191                 continue;
 192
 193             break;
 194         }
 195
 196         o_ptr->pval = i;
 197         if (cheat_peek) {
 198             msg_format(_("%sの像", "Statue of %s"), r_ptr->name.c_str());
 199         }
 200
 201         object_aware(player_ptr, o_ptr);
 202         object_known(o_ptr);
 203         break;
 204     }
 205     case ItemKindType::CHEST: {
 206         DEPTH obj_level = k_info[o_ptr->k_idx].level;
 207         if (obj_level <= 0)
 208             break;
 209
 210         o_ptr->pval = randint1(obj_level);
 211         if (o_ptr->sval == SV_CHEST_KANDUME)
 212             o_ptr->pval = 6;
 213
 214         o_ptr->xtra3 = floor_ptr->dun_level + 5;
 215         if (o_ptr->pval > 55)
 216             o_ptr->pval = 55 + (byte)randint0(5);
 217
 218         break;
 219     }
 220
 221     default:
 222         break;
 223     }
 224 }