src/view/status-first-page.cpp

   1 /*!
   2  * @file status-first-page.c
   3  * @brief キャラ基本情報及び技能値の表示
   4  * @date 2020/02/23
   5  * @author Hourier
   6  */
   7
   8 #include "view/status-first-page.h"
   9 #include "artifact/fixed-art-types.h"
  10 #include "combat/attack-power-table.h"
  11 #include "combat/shoot.h"
  12 #include "game-option/text-display-options.h"
  13 #include "inventory/inventory-slot-types.h"
  14 #include "mutation/mutation-flag-types.h"
  15 #include "object-enchant/special-object-flags.h"
  16 #include "object-enchant/tr-types.h"
  17 #include "object/object-flags.h"
  18 #include "object/tval-types.h"
  19 #include "perception/object-perception.h"
  20 #include "player-base/player-class.h"
  21 #include "player-info/equipment-info.h"
  22 #include "player-info/monk-data-type.h"
  23 #include "player-status/player-hand-types.h"
  24 #include "player/player-status-flags.h"
  25 #include "player/special-defense-types.h"
  26 #include "sv-definition/sv-weapon-types.h"
  27 #include "system/object-type-definition.h"
  28 #include "system/player-type-definition.h"
  29 #include "term/term-color-types.h"
  30 #include "util/bit-flags-calculator.h"
  31 #include "view/display-util.h"
  32
  33 static TERM_COLOR likert_color = TERM_WHITE;
  34
  35 /*!
  36  * @brief
  37  * @param player_ptr プレイヤーへの参照ポインタ
  38  * @param o_ptr 装備中の弓への参照ポインタ
  39  * @param shots 射撃回数
  40  * @param shot_frac 射撃速度
  41  */
  42 static void calc_shot_params(PlayerType *player_ptr, ItemEntity *o_ptr, int *shots, int *shot_frac)
  43 {
  44     if (o_ptr->k_idx == 0) {
  45         return;
  46     }
  47
  48     ENERGY energy_fire = bow_energy(o_ptr->sval);
  49     *shots = player_ptr->num_fire * 100;
  50     *shot_frac = ((*shots) * 100 / energy_fire) % 100;
  51     *shots = (*shots) / energy_fire;
  52     if (!o_ptr->is_specific_artifact(FixedArtifactId::CRIMSON)) {
  53         return;
  54     }
  55
  56     *shots = 1;
  57     *shot_frac = 0;
  58     if (!PlayerClass(player_ptr).equals(PlayerClassType::ARCHER)) {
  59         return;
  60     }
  61
  62     if (player_ptr->lev >= 10) {
  63         (*shots)++;
  64     }
  65     if (player_ptr->lev >= 30) {
  66         (*shots)++;
  67     }
  68     if (player_ptr->lev >= 45) {
  69         (*shots)++;
  70     }
  71 }
  72
  73 /*!
  74  * @brief 武器装備に制限のあるクラスで、直接攻撃のダメージを計算する
  75  * @param player_ptr プレイヤーへの参照ポインタ
  76  * @param hand 手 (利き手が0、反対の手が1…のはず)
  77  * @param damage 直接攻撃のダメージ
  78  * @param basedam 素手における直接攻撃のダメージ
  79  * @param o_ptr 装備中の武器への参照ポインタ
  80  * @return 利き手ならTRUE、反対の手ならFALSE
  81  */
  82 static bool calc_weapon_damage_limit(PlayerType *player_ptr, int hand, int *damage, int *basedam, ItemEntity *o_ptr)
  83 {
  84     PLAYER_LEVEL level = player_ptr->lev;
  85     if (hand > 0) {
  86         damage[hand] = 0;
  87         return false;
  88     }
  89
  90     PlayerClass pc(player_ptr);
  91     if (pc.equals(PlayerClassType::FORCETRAINER)) {
  92         level = std::max<short>(1, level - 3);
  93     }
  94
  95     if (pc.monk_stance_is(MonkStanceType::BYAKKO)) {
  96         *basedam = monk_ave_damage[level][1];
  97     } else if (pc.monk_stance_is(MonkStanceType::GENBU) || pc.monk_stance_is(MonkStanceType::SUZAKU)) {
  98         *basedam = monk_ave_damage[level][2];
  99     } else {
 100         *basedam = monk_ave_damage[level][0];
 101     }
 102
 103     damage[hand] += *basedam;
 104     if ((o_ptr->tval == ItemKindType::SWORD) && (o_ptr->sval == SV_POISON_NEEDLE)) {
 105         damage[hand] = 1;
 106     }
 107     if (damage[hand] < 0) {
 108         damage[hand] = 0;
 109     }
 110
 111     return true;
 112 }
 113
 114 /*!
 115  * @brief 片手あたりのダメージ量を計算する
 116  * @param o_ptr 装備中の武器への参照ポインタ
 117  * @param hand 手
 118  * @param damage 直接攻撃のダメージ
 119  * @param basedam 素手における直接攻撃のダメージ
 120  * @return 素手ならFALSE、武器を持っていればTRUE
 121  */
 122 static bool calc_weapon_one_hand(ItemEntity *o_ptr, int hand, int *damage, int *basedam)
 123 {
 124     if (o_ptr->k_idx == 0) {
 125         return false;
 126     }
 127
 128     *basedam = 0;
 129     damage[hand] += *basedam;
 130     if ((o_ptr->tval == ItemKindType::SWORD) && (o_ptr->sval == SV_POISON_NEEDLE)) {
 131         damage[hand] = 1;
 132     }
 133
 134     if (damage[hand] < 0) {
 135         damage[hand] = 0;
 136     }
 137
 138     return true;
 139 }
 140
 141 /*!
 142  * @brief ヴォーパル武器等によるダメージ強化
 143  * @param player_ptr プレイヤーへの参照ポインタ
 144  * @param o_ptr 装備中の武器への参照ポインタ
 145  * @param basedam 素手における直接攻撃のダメージ
 146  * @param flgs オブジェクトフラグ群
 147  * @return 強化後の素手ダメージ
 148  * @todo ヴォーパル計算処理が building-craft-weapon::compare_weapon_aux() と多重実装.
 149  */
 150 static int strengthen_basedam(PlayerType *player_ptr, ItemEntity *o_ptr, int basedam, const TrFlags &flgs)
 151 {
 152     const auto is_vorpal_blade = o_ptr->is_specific_artifact(FixedArtifactId::VORPAL_BLADE);
 153     const auto is_chainsword = o_ptr->is_specific_artifact(FixedArtifactId::CHAINSWORD);
 154     if (o_ptr->is_fully_known() && (is_vorpal_blade || is_chainsword)) {
 155         /* vorpal blade */
 156         basedam *= 5;
 157         basedam /= 3;
 158     } else if (flgs.has(TR_VORPAL)) {
 159         /* vorpal flag only */
 160         basedam *= 11;
 161         basedam /= 9;
 162     }
 163
 164     // 理力
 165     bool is_force = !PlayerClass(player_ptr).equals(PlayerClassType::SAMURAI);
 166     is_force &= flgs.has(TR_FORCE_WEAPON);
 167     is_force &= player_ptr->csp > (o_ptr->dd * o_ptr->ds / 5);
 168     if (is_force) {
 169         basedam = basedam * 7 / 2;
 170     }
 171
 172     return basedam;
 173 }
 174
 175 /*!
 176  * @brief 技能ランクの表示基準を定める
 177  * Returns a "rating" of x depending on y
 178  * @param x 技能値
 179  * @param y 技能値に対するランク基準比
 180  */
 181 static concptr likert(int x, int y)
 182 {
 183     static char dummy[20] = "", dummy2[20] = "";
 184     memset(dummy, 0, strlen(dummy));
 185     memset(dummy2, 0, strlen(dummy2));
 186     if (y <= 0) {
 187         y = 1;
 188     }
 189
 190     if (show_actual_value) {
 191         sprintf(dummy, "%3d-", x);
 192     }
 193
 194     if (x < 0) {
 195         likert_color = TERM_L_DARK;
 196         strcat(dummy, _("最低", "Very Bad"));
 197         return dummy;
 198     }
 199
 200     switch ((x / y)) {
 201     case 0:
 202     case 1: {
 203         likert_color = TERM_RED;
 204         strcat(dummy, _("悪い", "Bad"));
 205         break;
 206     }
 207     case 2: {
 208         likert_color = TERM_L_RED;
 209         strcat(dummy, _("劣る", "Poor"));
 210         break;
 211     }
 212     case 3:
 213     case 4: {
 214         likert_color = TERM_ORANGE;
 215         strcat(dummy, _("普通", "Fair"));
 216         break;
 217     }
 218     case 5: {
 219         likert_color = TERM_YELLOW;
 220         strcat(dummy, _("良い", "Good"));
 221         break;
 222     }
 223     case 6: {
 224         likert_color = TERM_YELLOW;
 225         strcat(dummy, _("大変良い", "Very Good"));
 226         break;
 227     }
 228     case 7:
 229     case 8: {
 230         likert_color = TERM_L_GREEN;
 231         strcat(dummy, _("卓越", "Excellent"));
 232         break;
 233     }
 234     case 9:
 235     case 10:
 236     case 11:
 237     case 12:
 238     case 13: {
 239         likert_color = TERM_GREEN;
 240         strcat(dummy, _("超越", "Superb"));
 241         break;
 242     }
 243     case 14:
 244     case 15:
 245     case 16:
 246     case 17: {
 247         likert_color = TERM_BLUE;
 248         strcat(dummy, _("英雄的", "Heroic"));
 249         break;
 250     }
 251     default: {
 252         likert_color = TERM_VIOLET;
 253         sprintf(dummy2, _("伝説的[%d]", "Legendary[%d]"), (int)((((x / y) - 17) * 5) / 2));
 254         strcat(dummy, dummy2);
 255         break;
 256     }
 257     }
 258
 259     return dummy;
 260 }
 261
 262 /*!
 263  * @brief 弓＋両手の武器それぞれについてダメージを計算する
 264  * @param player_ptr プレイヤーへの参照ポインタ
 265  * @param damage 直接攻撃のダメージ
 266  * @param to_h 命中補正
 267  */
 268 static void calc_two_hands(PlayerType *player_ptr, int *damage, int *to_h)
 269 {
 270     ItemEntity *o_ptr;
 271     o_ptr = &player_ptr->inventory_list[INVEN_BOW];
 272
 273     for (int i = 0; i < 2; i++) {
 274         int basedam;
 275         damage[i] = player_ptr->dis_to_d[i] * 100;
 276         PlayerClass pc(player_ptr);
 277         if (pc.is_martial_arts_pro() && (empty_hands(player_ptr, true) & EMPTY_HAND_MAIN)) {
 278             if (!calc_weapon_damage_limit(player_ptr, i, damage, &basedam, o_ptr)) {
 279                 break;
 280             }
 281
 282             continue;
 283         }
 284
 285         o_ptr = &player_ptr->inventory_list[INVEN_MAIN_HAND + i];
 286         if (!calc_weapon_one_hand(o_ptr, i, damage, &basedam)) {
 287             continue;
 288         }
 289
 290         to_h[i] = 0;
 291         bool poison_needle = false;
 292         if ((o_ptr->tval == ItemKindType::SWORD) && (o_ptr->sval == SV_POISON_NEEDLE)) {
 293             poison_needle = true;
 294         }
 295         if (o_ptr->is_known()) {
 296             damage[i] += o_ptr->to_d * 100;
 297             to_h[i] += o_ptr->to_h;
 298         }
 299
 300         basedam = ((o_ptr->dd + player_ptr->to_dd[i]) * (o_ptr->ds + player_ptr->to_ds[i] + 1)) * 50;
 301         auto flgs = object_flags_known(o_ptr);
 302
 303         bool impact = player_ptr->impact != 0;
 304         basedam = calc_expect_crit(player_ptr, o_ptr->weight, to_h[i], basedam, player_ptr->dis_to_h[i], poison_needle, impact);
 305         basedam = strengthen_basedam(player_ptr, o_ptr, basedam, flgs);
 306         damage[i] += basedam;
 307         if ((o_ptr->tval == ItemKindType::SWORD) && (o_ptr->sval == SV_POISON_NEEDLE)) {
 308             damage[i] = 1;
 309         }
 310         if (damage[i] < 0) {
 311             damage[i] = 0;
 312         }
 313     }
 314 }
 315
 316 /*!
 317  * @brief キャラ基本情報及び技能値をメインウィンドウに表示する
 318  * @param player_ptr プレイヤーへの参照ポインタ
 319  * @param xthb 武器等を含めた最終命中率
 320  * @param damage 打撃修正
 321  * @param shots 射撃回数
 322  * @param shot_frac 射撃速度
 323  * @param display_player_one_line 1行表示用のコールバック関数
 324  */
 325 static void display_first_page(PlayerType *player_ptr, int xthb, int *damage, int shots, int shot_frac)
 326 {
 327     int xthn = player_ptr->skill_thn + (player_ptr->to_h_m * BTH_PLUS_ADJ);
 328
 329     int muta_att = 0;
 330     if (player_ptr->muta.has(PlayerMutationType::HORNS)) {
 331         muta_att++;
 332     }
 333     if (player_ptr->muta.has(PlayerMutationType::SCOR_TAIL)) {
 334         muta_att++;
 335     }
 336     if (player_ptr->muta.has(PlayerMutationType::BEAK)) {
 337         muta_att++;
 338     }
 339     if (player_ptr->muta.has(PlayerMutationType::TRUNK)) {
 340         muta_att++;
 341     }
 342     if (player_ptr->muta.has(PlayerMutationType::TENTACLES)) {
 343         muta_att++;
 344     }
 345
 346     int blows1 = can_attack_with_main_hand(player_ptr) ? player_ptr->num_blow[0] : 0;
 347     int blows2 = can_attack_with_sub_hand(player_ptr) ? player_ptr->num_blow[1] : 0;
 348     int xdis = player_ptr->skill_dis;
 349     int xdev = player_ptr->skill_dev;
 350     int xsav = player_ptr->skill_sav;
 351     int xstl = player_ptr->skill_stl;
 352     int xsrh = player_ptr->skill_srh;
 353     int xfos = player_ptr->skill_fos;
 354     int xdig = player_ptr->skill_dig;
 355
 356     concptr desc = likert(xthn, 12);
 357     display_player_one_line(ENTRY_SKILL_FIGHT, desc, likert_color);
 358
 359     desc = likert(xthb, 12);
 360     display_player_one_line(ENTRY_SKILL_SHOOT, desc, likert_color);
 361
 362     desc = likert(xsav, 7);
 363     display_player_one_line(ENTRY_SKILL_SAVING, desc, likert_color);
 364
 365     desc = likert((xstl > 0) ? xstl : -1, 1);
 366     display_player_one_line(ENTRY_SKILL_STEALTH, desc, likert_color);
 367
 368     desc = likert(xfos, 6);
 369     display_player_one_line(ENTRY_SKILL_PERCEP, desc, likert_color);
 370
 371     desc = likert(xsrh, 6);
 372     display_player_one_line(ENTRY_SKILL_SEARCH, desc, likert_color);
 373
 374     desc = likert(xdis, 8);
 375     display_player_one_line(ENTRY_SKILL_DISARM, desc, likert_color);
 376
 377     desc = likert(xdev, 6);
 378     display_player_one_line(ENTRY_SKILL_DEVICE, desc, likert_color);
 379
 380     desc = likert(xdev, 6);
 381     display_player_one_line(ENTRY_SKILL_DEVICE, desc, likert_color);
 382
 383     desc = likert(xdig, 4);
 384     display_player_one_line(ENTRY_SKILL_DIG, desc, likert_color);
 385
 386     if (!muta_att) {
 387         display_player_one_line(ENTRY_BLOWS, format("%d+%d", blows1, blows2), TERM_L_BLUE);
 388     } else {
 389         display_player_one_line(ENTRY_BLOWS, format("%d+%d+%d", blows1, blows2, muta_att), TERM_L_BLUE);
 390     }
 391
 392     display_player_one_line(ENTRY_SHOTS, format("%d.%02d", shots, shot_frac), TERM_L_BLUE);
 393
 394     if ((damage[0] + damage[1]) == 0) {
 395         desc = "nil!";
 396     } else {
 397         desc = format("%d+%d", blows1 * damage[0] / 100, blows2 * damage[1] / 100);
 398     }
 399
 400     display_player_one_line(ENTRY_AVG_DMG, desc, TERM_L_BLUE);
 401     display_player_one_line(ENTRY_INFRA, format("%d feet", player_ptr->see_infra * 10), TERM_WHITE);
 402 }
 403
 404 /*!
 405  * @brief プレイヤーステータスの1ページ目各種詳細をまとめて表示する
 406  * Prints ratings on certain abilities
 407  * @param player_ptr プレイヤーへの参照ポインタ
 408  * @param display_player_one_line 1行表示用のコールバック関数
 409  * @details
 410  * This code is "imitated" elsewhere to "dump" a character sheet.
 411  */
 412 void display_player_various(PlayerType *player_ptr)
 413 {
 414     ItemEntity *o_ptr;
 415     o_ptr = &player_ptr->inventory_list[INVEN_BOW];
 416     int tmp = player_ptr->to_h_b + o_ptr->to_h;
 417     int xthb = player_ptr->skill_thb + (tmp * BTH_PLUS_ADJ);
 418     int shots = 0;
 419     int shot_frac = 0;
 420     calc_shot_params(player_ptr, o_ptr, &shots, &shot_frac);
 421
 422     int damage[2];
 423     int to_h[2];
 424     calc_two_hands(player_ptr, damage, to_h);
 425     display_first_page(player_ptr, xthb, damage, shots, shot_frac);
 426 }