src/artifact/random-art-generator.cpp

   1 /*!
   2  * @file random-art-generator.cpp
   3  * @brief ランダムアーティファクトの生成メイン定義 / Artifact code
   4  * @date 2020/07/14
   5  * @author Hourier
   6  */
   7
   8 #include "artifact/random-art-generator.h"
   9 #include "artifact/fixed-art-types.h"
  10 #include "artifact/random-art-activation.h"
  11 #include "artifact/random-art-bias-types.h"
  12 #include "artifact/random-art-characteristics.h"
  13 #include "artifact/random-art-effects.h"
  14 #include "artifact/random-art-misc.h"
  15 #include "artifact/random-art-pval-investor.h"
  16 #include "artifact/random-art-resistance.h"
  17 #include "artifact/random-art-slay.h"
  18 #include "avatar/avatar.h"
  19 #include "core/asking-player.h"
  20 #include "core/window-redrawer.h"
  21 #include "flavor/object-flavor.h"
  22 #include "game-option/cheat-types.h"
  23 #include "object-enchant/special-object-flags.h"
  24 #include "object-enchant/tr-types.h"
  25 #include "object-hook/hook-armor.h"
  26 #include "object-hook/hook-weapon.h"
  27 #include "object/object-flags.h"
  28 #include "object/object-kind-hook.h"
  29 #include "object/object-value-calc.h"
  30 #include "object/tval-types.h"
  31 #include "perception/identification.h"
  32 #include "perception/object-perception.h"
  33 #include "sv-definition/sv-weapon-types.h"
  34 #include "system/baseitem-info.h"
  35 #include "system/item-entity.h"
  36 #include "system/player-type-definition.h"
  37 #include "util/bit-flags-calculator.h"
  38 #include "util/quarks.h"
  39 #include "view/display-messages.h"
  40 #include "wizard/artifact-bias-table.h"
  41 #include "wizard/wizard-messages.h"
  42 #include "world/world.h"
  43
  44 static bool weakening_artifact(ItemEntity *o_ptr)
  45 {
  46     const auto bi_id = lookup_baseitem_id({ o_ptr->tval, o_ptr->sval });
  47     auto *k_ptr = &baseitems_info[bi_id];
  48     auto flgs = object_flags(o_ptr);
  49
  50     if (flgs.has(TR_KILL_EVIL)) {
  51         o_ptr->art_flags.reset(TR_KILL_EVIL);
  52         o_ptr->art_flags.set(TR_SLAY_EVIL);
  53         return true;
  54     }
  55
  56     if (k_ptr->dd < o_ptr->dd) {
  57         o_ptr->dd--;
  58         return true;
  59     }
  60
  61     if (k_ptr->ds < o_ptr->ds) {
  62         o_ptr->ds--;
  63         return true;
  64     }
  65
  66     if (o_ptr->to_d > 10) {
  67         o_ptr->to_d = o_ptr->to_d - damroll(1, 6);
  68         if (o_ptr->to_d < 10) {
  69             o_ptr->to_d = 10;
  70         }
  71
  72         return true;
  73     }
  74
  75     return false;
  76 }
  77
  78 static void set_artifact_bias(PlayerType *player_ptr, ItemEntity *o_ptr, int *warrior_artifact_bias)
  79 {
  80     switch (player_ptr->pclass) {
  81     case PlayerClassType::WARRIOR:
  82     case PlayerClassType::BERSERKER:
  83     case PlayerClassType::ARCHER:
  84     case PlayerClassType::SAMURAI:
  85     case PlayerClassType::CAVALRY:
  86     case PlayerClassType::SMITH:
  87         o_ptr->artifact_bias = BIAS_WARRIOR;
  88         break;
  89     case PlayerClassType::MAGE:
  90     case PlayerClassType::HIGH_MAGE:
  91     case PlayerClassType::SORCERER:
  92     case PlayerClassType::MAGIC_EATER:
  93     case PlayerClassType::BLUE_MAGE:
  94         o_ptr->artifact_bias = BIAS_MAGE;
  95         break;
  96     case PlayerClassType::PRIEST:
  97         o_ptr->artifact_bias = BIAS_PRIESTLY;
  98         break;
  99     case PlayerClassType::ROGUE:
 100     case PlayerClassType::NINJA:
 101         o_ptr->artifact_bias = BIAS_ROGUE;
 102         *warrior_artifact_bias = 25;
 103         break;
 104     case PlayerClassType::RANGER:
 105     case PlayerClassType::SNIPER:
 106         o_ptr->artifact_bias = BIAS_RANGER;
 107         *warrior_artifact_bias = 30;
 108         break;
 109     case PlayerClassType::PALADIN:
 110         o_ptr->artifact_bias = BIAS_PRIESTLY;
 111         *warrior_artifact_bias = 40;
 112         break;
 113     case PlayerClassType::WARRIOR_MAGE:
 114     case PlayerClassType::RED_MAGE:
 115         o_ptr->artifact_bias = BIAS_MAGE;
 116         *warrior_artifact_bias = 40;
 117         break;
 118     case PlayerClassType::CHAOS_WARRIOR:
 119         o_ptr->artifact_bias = BIAS_CHAOS;
 120         *warrior_artifact_bias = 40;
 121         break;
 122     case PlayerClassType::MONK:
 123     case PlayerClassType::FORCETRAINER:
 124         o_ptr->artifact_bias = BIAS_PRIESTLY;
 125         break;
 126     case PlayerClassType::MINDCRAFTER:
 127     case PlayerClassType::BARD:
 128         if (randint1(5) > 2) {
 129             o_ptr->artifact_bias = BIAS_PRIESTLY;
 130         }
 131         break;
 132     case PlayerClassType::TOURIST:
 133         if (randint1(5) > 2) {
 134             o_ptr->artifact_bias = BIAS_WARRIOR;
 135         }
 136         break;
 137     case PlayerClassType::IMITATOR:
 138         if (randint1(2) > 1) {
 139             o_ptr->artifact_bias = BIAS_RANGER;
 140         }
 141         break;
 142     case PlayerClassType::BEASTMASTER:
 143         o_ptr->artifact_bias = BIAS_CHR;
 144         *warrior_artifact_bias = 50;
 145         break;
 146     case PlayerClassType::MIRROR_MASTER:
 147         if (randint1(4) > 1) {
 148             o_ptr->artifact_bias = BIAS_MAGE;
 149         } else {
 150             o_ptr->artifact_bias = BIAS_ROGUE;
 151         }
 152         break;
 153     case PlayerClassType::ELEMENTALIST:
 154         o_ptr->artifact_bias = one_in_(2) ? BIAS_MAGE : BIAS_INT;
 155         break;
 156
 157     case PlayerClassType::MAX:
 158         break;
 159     }
 160 }
 161
 162 static void decide_warrior_bias(PlayerType *player_ptr, ItemEntity *o_ptr, const bool a_scroll)
 163 {
 164     int warrior_artifact_bias = 0;
 165     if (a_scroll && one_in_(4)) {
 166         set_artifact_bias(player_ptr, o_ptr, &warrior_artifact_bias);
 167     }
 168
 169     if (a_scroll && (randint1(100) <= warrior_artifact_bias)) {
 170         o_ptr->artifact_bias = BIAS_WARRIOR;
 171     }
 172 }
 173
 174 static bool decide_random_art_cursed(const bool a_scroll, ItemEntity *o_ptr)
 175 {
 176     constexpr auto chance_cursed = 13;
 177     if (!a_scroll && one_in_(chance_cursed)) {
 178         return true;
 179     }
 180
 181     if (((o_ptr->tval == ItemKindType::AMULET) || (o_ptr->tval == ItemKindType::RING)) && o_ptr->is_cursed()) {
 182         return true;
 183     }
 184
 185     return false;
 186 }
 187
 188 static int decide_random_art_power(const bool a_cursed)
 189 {
 190     int powers = randint1(5) + 1;
 191     while (one_in_(powers) || one_in_(7) || one_in_(10)) {
 192         powers++;
 193     }
 194
 195     if (!a_cursed && one_in_(CHANCE_STRENGTHENING)) {
 196         powers *= 2;
 197     }
 198
 199     if (a_cursed) {
 200         powers /= 2;
 201     }
 202
 203     return powers;
 204 }
 205
 206 static void invest_powers(PlayerType *player_ptr, ItemEntity *o_ptr, int *powers, bool *has_pval, const bool a_cursed)
 207 {
 208     int max_type = o_ptr->is_weapon_ammo() ? 7 : 5;
 209     while ((*powers)--) {
 210         switch (randint1(max_type)) {
 211         case 1:
 212         case 2:
 213             random_plus(o_ptr);
 214             *has_pval = true;
 215             break;
 216         case 3:
 217         case 4:
 218             if (one_in_(2) && o_ptr->is_weapon_ammo() && (o_ptr->tval != ItemKindType::BOW)) {
 219                 if (a_cursed && !one_in_(13)) {
 220                     break;
 221                 }
 222                 if (one_in_(13)) {
 223                     if (one_in_(o_ptr->ds + 4)) {
 224                         o_ptr->ds++;
 225                     }
 226                 } else {
 227                     if (one_in_(o_ptr->dd + 1)) {
 228                         o_ptr->dd++;
 229                     }
 230                 }
 231             } else {
 232                 random_resistance(o_ptr);
 233             }
 234
 235             break;
 236         case 5:
 237             random_misc(player_ptr, o_ptr);
 238             break;
 239         case 6:
 240         case 7:
 241             random_slay(o_ptr);
 242             break;
 243         default:
 244             if (w_ptr->wizard) {
 245                 msg_print("Switch error in become_random_artifact!");
 246             }
 247
 248             (*powers)++;
 249         }
 250     };
 251 }
 252
 253 static void strengthen_pval(ItemEntity *o_ptr)
 254 {
 255     if (o_ptr->art_flags.has(TR_BLOWS)) {
 256         o_ptr->pval = randint1(2);
 257         if ((o_ptr->tval == ItemKindType::SWORD) && (o_ptr->sval == SV_HAYABUSA)) {
 258             o_ptr->pval++;
 259         }
 260     } else {
 261         do {
 262             o_ptr->pval++;
 263         } while (o_ptr->pval < randint1(5) || one_in_(o_ptr->pval));
 264     }
 265
 266     if ((o_ptr->pval > 4) && !one_in_(CHANCE_STRENGTHENING)) {
 267         o_ptr->pval = 4;
 268     }
 269 }
 270
 271 /*!
 272  * @brief 防具ならばAC修正、武具なら殺戮修正を付与する
 273  * @param player_ptr プレイヤーへの参照ポインタ
 274  * @param o_ptr ランダムアーティファクトを示すアイテムへの参照ポインタ
 275  */
 276 static void invest_positive_modified_value(ItemEntity *o_ptr)
 277 {
 278     if (o_ptr->is_armour()) {
 279         o_ptr->to_a += randint1(o_ptr->to_a > 19 ? 1 : 20 - o_ptr->to_a);
 280         return;
 281     }
 282
 283     if (!o_ptr->is_weapon_ammo()) {
 284         return;
 285     }
 286
 287     o_ptr->to_h += randint1(o_ptr->to_h > 19 ? 1 : 20 - o_ptr->to_h);
 288     o_ptr->to_d += randint1(o_ptr->to_d > 19 ? 1 : 20 - o_ptr->to_d);
 289     if ((o_ptr->art_flags.has(TR_WIS)) && (o_ptr->pval > 0)) {
 290         o_ptr->art_flags.set(TR_BLESSED);
 291     }
 292 }
 293
 294 /*!
 295  * @brief 防具のAC修正が高すぎた場合に弱化させる
 296  * @param player_ptr プレイヤーへの参照ポインタ
 297  * @param o_ptr ランダムアーティファクトを示すアイテムへの参照ポインタ
 298  */
 299 static void invest_negative_modified_value(ItemEntity *o_ptr)
 300 {
 301     if (!o_ptr->is_armour()) {
 302         return;
 303     }
 304
 305     while ((o_ptr->to_d + o_ptr->to_h) > 20) {
 306         if (one_in_(o_ptr->to_d) && one_in_(o_ptr->to_h)) {
 307             break;
 308         }
 309
 310         o_ptr->to_d -= (int)randint0(3);
 311         o_ptr->to_h -= (HIT_PROB)randint0(3);
 312     }
 313
 314     while ((o_ptr->to_d + o_ptr->to_h) > 10) {
 315         if (one_in_(o_ptr->to_d) || one_in_(o_ptr->to_h)) {
 316             break;
 317         }
 318
 319         o_ptr->to_d -= (int)randint0(3);
 320         o_ptr->to_h -= (HIT_PROB)randint0(3);
 321     }
 322 }
 323
 324 static void reset_flags_poison_needle(ItemEntity *o_ptr)
 325 {
 326     if ((o_ptr->tval != ItemKindType::SWORD) || (o_ptr->sval != SV_POISON_NEEDLE)) {
 327         return;
 328     }
 329
 330     o_ptr->to_h = 0;
 331     o_ptr->to_d = 0;
 332     o_ptr->art_flags.reset(TR_BLOWS);
 333     o_ptr->art_flags.reset(TR_FORCE_WEAPON);
 334     o_ptr->art_flags.reset(TR_SLAY_ANIMAL);
 335     o_ptr->art_flags.reset(TR_SLAY_EVIL);
 336     o_ptr->art_flags.reset(TR_SLAY_UNDEAD);
 337     o_ptr->art_flags.reset(TR_SLAY_DEMON);
 338     o_ptr->art_flags.reset(TR_SLAY_ORC);
 339     o_ptr->art_flags.reset(TR_SLAY_TROLL);
 340     o_ptr->art_flags.reset(TR_SLAY_GIANT);
 341     o_ptr->art_flags.reset(TR_SLAY_DRAGON);
 342     o_ptr->art_flags.reset(TR_KILL_DRAGON);
 343     o_ptr->art_flags.reset(TR_SLAY_HUMAN);
 344     o_ptr->art_flags.reset(TR_VORPAL);
 345     o_ptr->art_flags.reset(TR_BRAND_POIS);
 346     o_ptr->art_flags.reset(TR_BRAND_ACID);
 347     o_ptr->art_flags.reset(TR_BRAND_ELEC);
 348     o_ptr->art_flags.reset(TR_BRAND_FIRE);
 349     o_ptr->art_flags.reset(TR_BRAND_COLD);
 350 }
 351
 352 static int decide_random_art_power_level(ItemEntity *o_ptr, const bool a_cursed, const int total_flags)
 353 {
 354     if (o_ptr->is_weapon_ammo()) {
 355         if (a_cursed) {
 356             return 0;
 357         }
 358
 359         if (total_flags < 20000) {
 360             return 1;
 361         }
 362
 363         if (total_flags < 45000) {
 364             return 2;
 365         }
 366
 367         return 3;
 368     }
 369
 370     if (a_cursed) {
 371         return 0;
 372     }
 373
 374     if (total_flags < 15000) {
 375         return 1;
 376     }
 377
 378     if (total_flags < 35000) {
 379         return 2;
 380     }
 381
 382     return 3;
 383 }
 384
 385 static void name_unnatural_random_artifact(PlayerType *player_ptr, ItemEntity *o_ptr, const bool a_scroll, const int power_level, GAME_TEXT *new_name)
 386 {
 387     if (!a_scroll) {
 388         get_random_name(o_ptr, new_name, o_ptr->is_armour(), power_level);
 389         return;
 390     }
 391
 392     GAME_TEXT dummy_name[MAX_NLEN] = "";
 393     concptr ask_msg = _("このアーティファクトを何と名付けますか？", "What do you want to call the artifact? ");
 394     object_aware(player_ptr, o_ptr);
 395     object_known(o_ptr);
 396     o_ptr->ident |= IDENT_FULL_KNOWN;
 397     o_ptr->art_name = quark_add("");
 398     (void)screen_object(player_ptr, o_ptr, 0L);
 399     if (!get_string(ask_msg, dummy_name, sizeof dummy_name) || !dummy_name[0]) {
 400         if (one_in_(2)) {
 401             get_table_sindarin_aux(dummy_name);
 402         } else {
 403             get_table_name_aux(dummy_name);
 404         }
 405     }
 406
 407     sprintf(new_name, _("《%s》", "'%s'"), dummy_name);
 408     chg_virtue(player_ptr, V_INDIVIDUALISM, 2);
 409     chg_virtue(player_ptr, V_ENCHANT, 5);
 410 }
 411
 412 static void generate_unnatural_random_artifact(
 413     PlayerType *player_ptr, ItemEntity *o_ptr, const bool a_scroll, const int power_level, const int max_powers, const int total_flags)
 414 {
 415     GAME_TEXT new_name[1024];
 416     strcpy(new_name, "");
 417     name_unnatural_random_artifact(player_ptr, o_ptr, a_scroll, power_level, new_name);
 418     o_ptr->art_name = quark_add(new_name);
 419     msg_format_wizard(player_ptr, CHEAT_OBJECT,
 420         _("パワー %d で 価値%ld のランダムアーティファクト生成 バイアスは「%s」", "Random artifact generated - Power:%d Value:%d Bias:%s."), max_powers,
 421         total_flags, artifact_bias_name[o_ptr->artifact_bias]);
 422     set_bits(player_ptr->window_flags, PW_INVEN | PW_EQUIP | PW_FLOOR_ITEM_LIST);
 423 }
 424
 425 /*!
 426  * @brief ランダムアーティファクト生成のメインルーチン
 427  * @details 既に生成が済んでいるオブジェクトの構造体を、アーティファクトとして強化する。
 428  * @param player_ptr プレイヤーへの参照ポインタ
 429  * @param o_ptr 対象のオブジェクト構造体ポインタ
 430  * @param a_scroll アーティファクト生成の巻物上の処理。呪いのアーティファクトが生成対象外となる。
 431  * @return 常にTRUE(1)を返す
 432  */
 433 bool become_random_artifact(PlayerType *player_ptr, ItemEntity *o_ptr, bool a_scroll)
 434 {
 435     o_ptr->artifact_bias = 0;
 436     o_ptr->fixed_artifact_idx = FixedArtifactId::NONE;
 437     o_ptr->ego_idx = EgoType::NONE;
 438     o_ptr->art_flags |= baseitems_info[o_ptr->bi_id].flags;
 439
 440     bool has_pval = o_ptr->pval != 0;
 441     decide_warrior_bias(player_ptr, o_ptr, a_scroll);
 442
 443     bool a_cursed = decide_random_art_cursed(a_scroll, o_ptr);
 444     int powers = decide_random_art_power(a_cursed);
 445     int max_powers = powers;
 446     invest_powers(player_ptr, o_ptr, &powers, &has_pval, a_cursed);
 447     if (has_pval) {
 448         strengthen_pval(o_ptr);
 449     }
 450
 451     invest_positive_modified_value(o_ptr);
 452     o_ptr->art_flags.set(TR_IGNORE_ACID);
 453     o_ptr->art_flags.set(TR_IGNORE_ELEC);
 454     o_ptr->art_flags.set(TR_IGNORE_FIRE);
 455     o_ptr->art_flags.set(TR_IGNORE_COLD);
 456
 457     int32_t total_flags = flag_cost(o_ptr, o_ptr->pval);
 458     if (a_cursed) {
 459         curse_artifact(player_ptr, o_ptr);
 460     }
 461
 462     constexpr auto activation_chance = 3;
 463     if (!a_cursed && one_in_(o_ptr->is_armour() ? activation_chance * 2 : activation_chance)) {
 464         o_ptr->activation_id = RandomArtActType::NONE;
 465         give_activation_power(o_ptr);
 466     }
 467
 468     invest_negative_modified_value(o_ptr);
 469     if (((o_ptr->artifact_bias == BIAS_MAGE) || (o_ptr->artifact_bias == BIAS_INT)) && (o_ptr->tval == ItemKindType::GLOVES)) {
 470         o_ptr->art_flags.set(TR_FREE_ACT);
 471     }
 472
 473     reset_flags_poison_needle(o_ptr);
 474     int power_level = decide_random_art_power_level(o_ptr, a_cursed, total_flags);
 475     constexpr auto chance_avoid_weakening = 6;
 476     while (has_extreme_damage_rate(player_ptr, o_ptr) && !one_in_(chance_avoid_weakening)) {
 477         weakening_artifact(o_ptr);
 478     }
 479
 480     generate_unnatural_random_artifact(player_ptr, o_ptr, a_scroll, power_level, max_powers, total_flags);
 481     return true;
 482 }