src/market/building-craft-weapon.c

   1 #include "market/building-craft-weapon.h"
   2 #include "art-definition/art-sword-types.h"
   3 #include "combat/attack-accuracy.h"
   4 #include "combat/shoot.h"
   5 #include "core/stuff-handler.h"
   6 #include "floor/floor-object.h"
   7 #include "io/input-key-acceptor.h"
   8 #include "market/building-util.h"
   9 #include "object-enchant/tr-types.h"
  10 #include "object-hook/hook-weapon.h"
  11 #include "object/item-use-flags.h"
  12 #include "object/object-flags.h"
  13 #include "object/object-flavor.h"
  14 #include "object/object-generator.h"
  15 #include "object/item-tester-hooker.h"
  16 #include "realm/realm-hex-numbers.h"
  17 #include "spell-realm/spells-hex.h"
  18 #include "sv-definition/sv-weapon-types.h"
  19 #include "term/screen-processor.h"
  20 #include "term/term-color-types.h"
  21 #include "util/bit-flags-calculator.h"
  22 #include "view/display-messages.h"
  23 #include "world/world.h"
  24
  25 /*!
  26  * @brief 攻撃時スレイによるダメージ期待値修正計算 / critical happens at i / 10000
  27  * @param dam 基本ダメージ
  28  * @param mult スレイ倍率（掛け算部分）
  29  * @param div スレイ倍率（割り算部分）
  30  * @param force 理力特別計算フラグ
  31  * @return ダメージ期待値
  32  */
  33 static HIT_POINT calc_slaydam(HIT_POINT dam, int mult, int div, bool force)
  34 {
  35     int tmp;
  36     if (force) {
  37         tmp = dam * 60;
  38         tmp *= mult * 3;
  39         tmp /= div * 2;
  40         tmp += dam * 60 * 2;
  41         tmp /= 60;
  42         return tmp;
  43     }
  44
  45     tmp = dam * 60;
  46     tmp *= mult;
  47     tmp /= div;
  48     tmp /= 60;
  49     return tmp;
  50 }
  51
  52 /*!
  53  * @brief 攻撃時の期待値計算（スレイ→重量クリティカル→切れ味効果）
  54  * @param player_ptr プレーヤーへの参照ポインタ
  55  * @param dam 基本ダメージ
  56  * @param mult スレイ倍率（掛け算部分）
  57  * @param div スレイ倍率（割り算部分）
  58  * @param force 理力特別計算フラグ
  59  * @param weight 重量
  60  * @param plus 武器ダメージ修正
  61  * @param meichuu 命中値
  62  * @param dokubari 毒針処理か否か
  63  * @param vorpal_mult 切れ味倍率（掛け算部分）
  64  * @param vorpal_div 切れ味倍率（割り算部分）
  65  * @return ダメージ期待値
  66  */
  67 static u32b calc_expect_dice(
  68     player_type *owner_ptr, u32b dam, int mult, int div, bool force, WEIGHT weight, int plus, s16b meichuu, bool dokubari, int vorpal_mult, int vorpal_div)
  69 {
  70     dam = calc_slaydam(dam, mult, div, force);
  71     dam = calc_expect_crit(owner_ptr, weight, plus, dam, meichuu, dokubari);
  72     dam = calc_slaydam(dam, vorpal_mult, vorpal_div, FALSE);
  73     return dam;
  74 }
  75
  76 /*!
  77  * @brief 武器の各条件毎のダメージ期待値を表示する。
  78  * @param r 表示行
  79  * @param c 表示列
  80  * @param mindice ダイス部分最小値
  81  * @param maxdice ダイス部分最大値
  82  * @param blows 攻撃回数
  83  * @param dam_bonus ダメージ修正値
  84  * @param attr 条件内容
  85  * @param color 条件内容の表示色
  86  * @details
  87  * Display the damage figure of an object\n
  88  * (used by compare_weapon_aux)\n
  89  * \n
  90  * Only accurate for the current weapon, because it includes\n
  91  * the current +dam of the player.\n
  92  * @return なし
  93  */
  94 static void show_weapon_dmg(int r, int c, int mindice, int maxdice, int blows, int dam_bonus, concptr attr, byte color)
  95 {
  96     c_put_str(color, attr, r, c);
  97     GAME_TEXT tmp_str[80];
  98     int mindam = blows * (mindice + dam_bonus);
  99     int maxdam = blows * (maxdice + dam_bonus);
 100     sprintf(tmp_str, _("１ターン: %d-%d ダメージ", "Attack: %d-%d damage"), mindam, maxdam);
 101     put_str(tmp_str, r, c + 8);
 102 }
 103
 104 /*!
 105  * @brief 武器一つ毎のダメージ情報を表示する。
 106  * @param o_ptr オブジェクトの構造体の参照ポインタ。
 107  * @param col 表示する行の上端
 108  * @param r 表示する列の左端
 109  * @details
 110  * Show the damage figures for the various monster types\n
 111  * \n
 112  * Only accurate for the current weapon, because it includes\n
 113  * the current number of blows for the player.\n
 114  * @return なし
 115  */
 116 static void compare_weapon_aux(player_type *owner_ptr, object_type *o_ptr, int col, int r)
 117 {
 118     BIT_FLAGS flgs[TR_FLAG_SIZE];
 119     int blow = owner_ptr->num_blow[0];
 120     bool force = FALSE;
 121     bool dokubari = FALSE;
 122
 123     int eff_dd = o_ptr->dd + owner_ptr->to_dd[0];
 124     int eff_ds = o_ptr->ds + owner_ptr->to_ds[0];
 125
 126     int mindice = eff_dd;
 127     int maxdice = eff_ds * eff_dd;
 128     int mindam = 0;
 129     int maxdam = 0;
 130     int vorpal_mult = 1;
 131     int vorpal_div = 1;
 132     int dmg_bonus = o_ptr->to_d + owner_ptr->to_d[0];
 133
 134     object_flags(owner_ptr, o_ptr, flgs);
 135     if ((o_ptr->tval == TV_SWORD) && (o_ptr->sval == SV_POISON_NEEDLE))
 136         dokubari = TRUE;
 137
 138     mindam = calc_expect_crit(owner_ptr, o_ptr->weight, o_ptr->to_h, mindice, owner_ptr->to_h[0], dokubari);
 139     maxdam = calc_expect_crit(owner_ptr, o_ptr->weight, o_ptr->to_h, maxdice, owner_ptr->to_h[0], dokubari);
 140     show_weapon_dmg(r++, col, mindam, maxdam, blow, dmg_bonus, _("会心:", "Critical:"), TERM_L_RED);
 141     if ((have_flag(flgs, TR_VORPAL) || hex_spelling(owner_ptr, HEX_RUNESWORD))) {
 142         if ((o_ptr->name1 == ART_VORPAL_BLADE) || (o_ptr->name1 == ART_CHAINSWORD)) {
 143             vorpal_mult = 5;
 144             vorpal_div = 3;
 145         } else {
 146             vorpal_mult = 11;
 147             vorpal_div = 9;
 148         }
 149
 150         mindam = calc_expect_dice(owner_ptr, mindice, 1, 1, FALSE, o_ptr->weight, o_ptr->to_h, owner_ptr->to_h[0], dokubari, vorpal_mult, vorpal_div);
 151         maxdam = calc_expect_dice(owner_ptr, maxdice, 1, 1, FALSE, o_ptr->weight, o_ptr->to_h, owner_ptr->to_h[0], dokubari, vorpal_mult, vorpal_div);
 152         show_weapon_dmg(r++, col, mindam, maxdam, blow, dmg_bonus, _("切れ味:", "Vorpal:"), TERM_L_RED);
 153     }
 154
 155     if ((owner_ptr->pclass != CLASS_SAMURAI) && have_flag(flgs, TR_FORCE_WEAPON) && (owner_ptr->csp > (o_ptr->dd * o_ptr->ds / 5))) {
 156         force = TRUE;
 157
 158         mindam = calc_expect_dice(owner_ptr, mindice, 1, 1, force, o_ptr->weight, o_ptr->to_h, owner_ptr->to_h[0], dokubari, vorpal_mult, vorpal_div);
 159         maxdam = calc_expect_dice(owner_ptr, maxdice, 1, 1, force, o_ptr->weight, o_ptr->to_h, owner_ptr->to_h[0], dokubari, vorpal_mult, vorpal_div);
 160         show_weapon_dmg(r++, col, mindam, maxdam, blow, dmg_bonus, _("理力:", "Force  :"), TERM_L_BLUE);
 161     }
 162
 163     if (have_flag(flgs, TR_KILL_ANIMAL)) {
 164         mindam = calc_expect_dice(owner_ptr, mindice, 4, 1, force, o_ptr->weight, o_ptr->to_h, owner_ptr->to_h[0], dokubari, vorpal_mult, vorpal_div);
 165         maxdam = calc_expect_dice(owner_ptr, maxdice, 4, 1, force, o_ptr->weight, o_ptr->to_h, owner_ptr->to_h[0], dokubari, vorpal_mult, vorpal_div);
 166         show_weapon_dmg(r++, col, mindam, maxdam, blow, dmg_bonus, _("動物:", "Animals:"), TERM_YELLOW);
 167     } else if (have_flag(flgs, TR_SLAY_ANIMAL)) {
 168         mindam = calc_expect_dice(owner_ptr, mindice, 5, 2, force, o_ptr->weight, o_ptr->to_h, owner_ptr->to_h[0], dokubari, vorpal_mult, vorpal_div);
 169         maxdam = calc_expect_dice(owner_ptr, maxdice, 5, 2, force, o_ptr->weight, o_ptr->to_h, owner_ptr->to_h[0], dokubari, vorpal_mult, vorpal_div);
 170         show_weapon_dmg(r++, col, mindam, maxdam, blow, dmg_bonus, _("動物:", "Animals:"), TERM_YELLOW);
 171     }
 172
 173     if (have_flag(flgs, TR_KILL_EVIL)) {
 174         mindam = calc_expect_dice(owner_ptr, mindice, 7, 2, force, o_ptr->weight, o_ptr->to_h, owner_ptr->to_h[0], dokubari, vorpal_mult, vorpal_div);
 175         maxdam = calc_expect_dice(owner_ptr, maxdice, 7, 2, force, o_ptr->weight, o_ptr->to_h, owner_ptr->to_h[0], dokubari, vorpal_mult, vorpal_div);
 176         show_weapon_dmg(r++, col, mindam, maxdam, blow, dmg_bonus, _("邪悪:", "Evil:"), TERM_YELLOW);
 177     } else if (have_flag(flgs, TR_SLAY_EVIL)) {
 178         mindam = calc_expect_dice(owner_ptr, mindice, 2, 1, force, o_ptr->weight, o_ptr->to_h, owner_ptr->to_h[0], dokubari, vorpal_mult, vorpal_div);
 179         maxdam = calc_expect_dice(owner_ptr, maxdice, 2, 1, force, o_ptr->weight, o_ptr->to_h, owner_ptr->to_h[0], dokubari, vorpal_mult, vorpal_div);
 180         show_weapon_dmg(r++, col, mindam, maxdam, blow, dmg_bonus, _("邪悪:", "Evil:"), TERM_YELLOW);
 181     }
 182
 183     if (have_flag(flgs, TR_KILL_HUMAN)) {
 184         mindam = calc_expect_dice(owner_ptr, mindice, 4, 1, force, o_ptr->weight, o_ptr->to_h, owner_ptr->to_h[0], dokubari, vorpal_mult, vorpal_div);
 185         maxdam = calc_expect_dice(owner_ptr, maxdice, 4, 1, force, o_ptr->weight, o_ptr->to_h, owner_ptr->to_h[0], dokubari, vorpal_mult, vorpal_div);
 186         show_weapon_dmg(r++, col, mindam, maxdam, blow, dmg_bonus, _("人間:", "Human:"), TERM_YELLOW);
 187     } else if (have_flag(flgs, TR_SLAY_HUMAN)) {
 188         mindam = calc_expect_dice(owner_ptr, mindice, 5, 2, force, o_ptr->weight, o_ptr->to_h, owner_ptr->to_h[0], dokubari, vorpal_mult, vorpal_div);
 189         maxdam = calc_expect_dice(owner_ptr, maxdice, 5, 2, force, o_ptr->weight, o_ptr->to_h, owner_ptr->to_h[0], dokubari, vorpal_mult, vorpal_div);
 190         show_weapon_dmg(r++, col, mindam, maxdam, blow, dmg_bonus, _("人間:", "Human:"), TERM_YELLOW);
 191     }
 192
 193     if (have_flag(flgs, TR_KILL_UNDEAD)) {
 194         mindam = calc_expect_dice(owner_ptr, mindice, 5, 1, force, o_ptr->weight, o_ptr->to_h, owner_ptr->to_h[0], dokubari, vorpal_mult, vorpal_div);
 195         maxdam = calc_expect_dice(owner_ptr, maxdice, 5, 1, force, o_ptr->weight, o_ptr->to_h, owner_ptr->to_h[0], dokubari, vorpal_mult, vorpal_div);
 196         show_weapon_dmg(r++, col, mindam, maxdam, blow, dmg_bonus, _("不死:", "Undead:"), TERM_YELLOW);
 197     } else if (have_flag(flgs, TR_SLAY_UNDEAD)) {
 198         mindam = calc_expect_dice(owner_ptr, mindice, 3, 1, force, o_ptr->weight, o_ptr->to_h, owner_ptr->to_h[0], dokubari, vorpal_mult, vorpal_div);
 199         maxdam = calc_expect_dice(owner_ptr, maxdice, 3, 1, force, o_ptr->weight, o_ptr->to_h, owner_ptr->to_h[0], dokubari, vorpal_mult, vorpal_div);
 200         show_weapon_dmg(r++, col, mindam, maxdam, blow, dmg_bonus, _("不死:", "Undead:"), TERM_YELLOW);
 201     }
 202
 203     if (have_flag(flgs, TR_KILL_DEMON)) {
 204         mindam = calc_expect_dice(owner_ptr, mindice, 5, 1, force, o_ptr->weight, o_ptr->to_h, owner_ptr->to_h[0], dokubari, vorpal_mult, vorpal_div);
 205         maxdam = calc_expect_dice(owner_ptr, maxdice, 5, 1, force, o_ptr->weight, o_ptr->to_h, owner_ptr->to_h[0], dokubari, vorpal_mult, vorpal_div);
 206         show_weapon_dmg(r++, col, mindam, maxdam, blow, dmg_bonus, _("悪魔:", "Demons:"), TERM_YELLOW);
 207     } else if (have_flag(flgs, TR_SLAY_DEMON)) {
 208         mindam = calc_expect_dice(owner_ptr, mindice, 3, 1, force, o_ptr->weight, o_ptr->to_h, owner_ptr->to_h[0], dokubari, vorpal_mult, vorpal_div);
 209         maxdam = calc_expect_dice(owner_ptr, maxdice, 3, 1, force, o_ptr->weight, o_ptr->to_h, owner_ptr->to_h[0], dokubari, vorpal_mult, vorpal_div);
 210         show_weapon_dmg(r++, col, mindam, maxdam, blow, dmg_bonus, _("悪魔:", "Demons:"), TERM_YELLOW);
 211     }
 212
 213     if (have_flag(flgs, TR_KILL_ORC)) {
 214         mindam = calc_expect_dice(owner_ptr, mindice, 5, 1, force, o_ptr->weight, o_ptr->to_h, owner_ptr->to_h[0], dokubari, vorpal_mult, vorpal_div);
 215         maxdam = calc_expect_dice(owner_ptr, maxdice, 5, 1, force, o_ptr->weight, o_ptr->to_h, owner_ptr->to_h[0], dokubari, vorpal_mult, vorpal_div);
 216         show_weapon_dmg(r++, col, mindam, maxdam, blow, dmg_bonus, _("オーク:", "Orcs:"), TERM_YELLOW);
 217     } else if (have_flag(flgs, TR_SLAY_ORC)) {
 218         mindam = calc_expect_dice(owner_ptr, mindice, 3, 1, force, o_ptr->weight, o_ptr->to_h, owner_ptr->to_h[0], dokubari, vorpal_mult, vorpal_div);
 219         maxdam = calc_expect_dice(owner_ptr, maxdice, 3, 1, force, o_ptr->weight, o_ptr->to_h, owner_ptr->to_h[0], dokubari, vorpal_mult, vorpal_div);
 220         show_weapon_dmg(r++, col, mindam, maxdam, blow, dmg_bonus, _("オーク:", "Orcs:"), TERM_YELLOW);
 221     }
 222
 223     if (have_flag(flgs, TR_KILL_TROLL)) {
 224         mindam = calc_expect_dice(owner_ptr, mindice, 5, 1, force, o_ptr->weight, o_ptr->to_h, owner_ptr->to_h[0], dokubari, vorpal_mult, vorpal_div);
 225         maxdam = calc_expect_dice(owner_ptr, maxdice, 5, 1, force, o_ptr->weight, o_ptr->to_h, owner_ptr->to_h[0], dokubari, vorpal_mult, vorpal_div);
 226         show_weapon_dmg(r++, col, mindam, maxdam, blow, dmg_bonus, _("トロル:", "Trolls:"), TERM_YELLOW);
 227     } else if (have_flag(flgs, TR_SLAY_TROLL)) {
 228         mindam = calc_expect_dice(owner_ptr, mindice, 3, 1, force, o_ptr->weight, o_ptr->to_h, owner_ptr->to_h[0], dokubari, vorpal_mult, vorpal_div);
 229         maxdam = calc_expect_dice(owner_ptr, maxdice, 3, 1, force, o_ptr->weight, o_ptr->to_h, owner_ptr->to_h[0], dokubari, vorpal_mult, vorpal_div);
 230         show_weapon_dmg(r++, col, mindam, maxdam, blow, dmg_bonus, _("トロル:", "Trolls:"), TERM_YELLOW);
 231     }
 232
 233     if (have_flag(flgs, TR_KILL_GIANT)) {
 234         mindam = calc_expect_dice(owner_ptr, mindice, 5, 1, force, o_ptr->weight, o_ptr->to_h, owner_ptr->to_h[0], dokubari, vorpal_mult, vorpal_div);
 235         maxdam = calc_expect_dice(owner_ptr, maxdice, 5, 1, force, o_ptr->weight, o_ptr->to_h, owner_ptr->to_h[0], dokubari, vorpal_mult, vorpal_div);
 236         show_weapon_dmg(r++, col, mindam, maxdam, blow, dmg_bonus, _("巨人:", "Giants:"), TERM_YELLOW);
 237     } else if (have_flag(flgs, TR_SLAY_GIANT)) {
 238         mindam = calc_expect_dice(owner_ptr, mindice, 3, 1, force, o_ptr->weight, o_ptr->to_h, owner_ptr->to_h[0], dokubari, vorpal_mult, vorpal_div);
 239         maxdam = calc_expect_dice(owner_ptr, maxdice, 3, 1, force, o_ptr->weight, o_ptr->to_h, owner_ptr->to_h[0], dokubari, vorpal_mult, vorpal_div);
 240         show_weapon_dmg(r++, col, mindam, maxdam, blow, dmg_bonus, _("巨人:", "Giants:"), TERM_YELLOW);
 241     }
 242
 243     if (have_flag(flgs, TR_KILL_DRAGON)) {
 244         mindam = calc_expect_dice(owner_ptr, mindice, 5, 1, force, o_ptr->weight, o_ptr->to_h, owner_ptr->to_h[0], dokubari, vorpal_mult, vorpal_div);
 245         maxdam = calc_expect_dice(owner_ptr, maxdice, 5, 1, force, o_ptr->weight, o_ptr->to_h, owner_ptr->to_h[0], dokubari, vorpal_mult, vorpal_div);
 246         show_weapon_dmg(r++, col, mindam, maxdam, blow, dmg_bonus, _("竜:", "Dragons:"), TERM_YELLOW);
 247     } else if (have_flag(flgs, TR_SLAY_DRAGON)) {
 248         mindam = calc_expect_dice(owner_ptr, mindice, 3, 1, force, o_ptr->weight, o_ptr->to_h, owner_ptr->to_h[0], dokubari, vorpal_mult, vorpal_div);
 249         maxdam = calc_expect_dice(owner_ptr, maxdice, 3, 1, force, o_ptr->weight, o_ptr->to_h, owner_ptr->to_h[0], dokubari, vorpal_mult, vorpal_div);
 250         show_weapon_dmg(r++, col, mindam, maxdam, blow, dmg_bonus, _("竜:", "Dragons:"), TERM_YELLOW);
 251     }
 252
 253     if (have_flag(flgs, TR_BRAND_ACID)) {
 254         mindam = calc_expect_dice(owner_ptr, mindice, 5, 2, force, o_ptr->weight, o_ptr->to_h, owner_ptr->to_h[0], dokubari, vorpal_mult, vorpal_div);
 255         maxdam = calc_expect_dice(owner_ptr, maxdice, 5, 2, force, o_ptr->weight, o_ptr->to_h, owner_ptr->to_h[0], dokubari, vorpal_mult, vorpal_div);
 256         show_weapon_dmg(r++, col, mindam, maxdam, blow, dmg_bonus, _("酸属性:", "Acid:"), TERM_RED);
 257     }
 258
 259     if (have_flag(flgs, TR_BRAND_ELEC)) {
 260         mindam = calc_expect_dice(owner_ptr, mindice, 5, 2, force, o_ptr->weight, o_ptr->to_h, owner_ptr->to_h[0], dokubari, vorpal_mult, vorpal_div);
 261         maxdam = calc_expect_dice(owner_ptr, maxdice, 5, 2, force, o_ptr->weight, o_ptr->to_h, owner_ptr->to_h[0], dokubari, vorpal_mult, vorpal_div);
 262         show_weapon_dmg(r++, col, mindam, maxdam, blow, dmg_bonus, _("電属性:", "Elec:"), TERM_RED);
 263     }
 264
 265     if (have_flag(flgs, TR_BRAND_FIRE)) {
 266         mindam = calc_expect_dice(owner_ptr, mindice, 5, 2, force, o_ptr->weight, o_ptr->to_h, owner_ptr->to_h[0], dokubari, vorpal_mult, vorpal_div);
 267         maxdam = calc_expect_dice(owner_ptr, maxdice, 5, 2, force, o_ptr->weight, o_ptr->to_h, owner_ptr->to_h[0], dokubari, vorpal_mult, vorpal_div);
 268         show_weapon_dmg(r++, col, mindam, maxdam, blow, dmg_bonus, _("炎属性:", "Fire:"), TERM_RED);
 269     }
 270
 271     if (have_flag(flgs, TR_BRAND_COLD)) {
 272         mindam = calc_expect_dice(owner_ptr, mindice, 5, 2, force, o_ptr->weight, o_ptr->to_h, owner_ptr->to_h[0], dokubari, vorpal_mult, vorpal_div);
 273         maxdam = calc_expect_dice(owner_ptr, maxdice, 5, 2, force, o_ptr->weight, o_ptr->to_h, owner_ptr->to_h[0], dokubari, vorpal_mult, vorpal_div);
 274         show_weapon_dmg(r++, col, mindam, maxdam, blow, dmg_bonus, _("冷属性:", "Cold:"), TERM_RED);
 275     }
 276
 277     if (have_flag(flgs, TR_BRAND_POIS)) {
 278         mindam = calc_expect_dice(owner_ptr, mindice, 5, 2, force, o_ptr->weight, o_ptr->to_h, owner_ptr->to_h[0], dokubari, vorpal_mult, vorpal_div);
 279         maxdam = calc_expect_dice(owner_ptr, maxdice, 5, 2, force, o_ptr->weight, o_ptr->to_h, owner_ptr->to_h[0], dokubari, vorpal_mult, vorpal_div);
 280         show_weapon_dmg(r++, col, mindam, maxdam, blow, dmg_bonus, _("毒属性:", "Poison:"), TERM_RED);
 281     }
 282 }
 283
 284 /*!
 285  * @brief 武器匠における武器一つ毎の完全情報を表示する。
 286  * @param player_type プレーヤーへの参照ポインタ
 287  * @param o_ptr オブジェクトの構造体の参照ポインタ。
 288  * @param row 表示する列の左端
 289  * @param col 表示する行の上端
 290  * @details
 291  * Displays all info about a weapon
 292  *
 293  * Only accurate for the current weapon, because it includes
 294  * various info about the player's +to_dam and number of blows.
 295  * @return なし
 296  */
 297 static void list_weapon(player_type *player_ptr, object_type *o_ptr, TERM_LEN row, TERM_LEN col)
 298 {
 299     GAME_TEXT o_name[MAX_NLEN];
 300     GAME_TEXT tmp_str[80];
 301
 302     DICE_NUMBER eff_dd = o_ptr->dd + player_ptr->to_dd[0];
 303     DICE_SID eff_ds = o_ptr->ds + player_ptr->to_ds[0];
 304     HIT_RELIABILITY reli = player_ptr->skill_thn + (player_ptr->to_h[0] + o_ptr->to_h) * BTH_PLUS_ADJ;
 305
 306     object_desc(player_ptr, o_name, o_ptr, OD_NAME_ONLY);
 307     c_put_str(TERM_YELLOW, o_name, row, col);
 308     sprintf(tmp_str, _("攻撃回数: %d", "Number of Blows: %d"), player_ptr->num_blow[0]);
 309     put_str(tmp_str, row + 1, col);
 310
 311     sprintf(tmp_str, _("命中率:  0  50 100 150 200 (敵のAC)", "To Hit:  0  50 100 150 200 (AC)"));
 312     put_str(tmp_str, row + 2, col);
 313     sprintf(tmp_str, "        %2d  %2d  %2d  %2d  %2d (%%)", (int)hit_chance(player_ptr, reli, 0), (int)hit_chance(player_ptr, reli, 50),
 314         (int)hit_chance(player_ptr, reli, 100), (int)hit_chance(player_ptr, reli, 150), (int)hit_chance(player_ptr, reli, 200));
 315     put_str(tmp_str, row + 3, col);
 316     c_put_str(TERM_YELLOW, _("可能なダメージ:", "Possible Damage:"), row + 5, col);
 317
 318     sprintf(tmp_str, _("攻撃一回につき %d-%d", "One Strike: %d-%d damage"), (int)(eff_dd + o_ptr->to_d + player_ptr->to_d[0]),
 319         (int)(eff_ds * eff_dd + o_ptr->to_d + player_ptr->to_d[0]));
 320     put_str(tmp_str, row + 6, col + 1);
 321
 322     sprintf(tmp_str, _("１ターンにつき %d-%d", "One Attack: %d-%d damage"), (int)(player_ptr->num_blow[0] * (eff_dd + o_ptr->to_d + player_ptr->to_d[0])),
 323         (int)(player_ptr->num_blow[0] * (eff_ds * eff_dd + o_ptr->to_d + player_ptr->to_d[0])));
 324     put_str(tmp_str, row + 7, col + 1);
 325 }
 326
 327 /*!
 328  * @brief 武器匠鑑定1回分（オブジェクト2種）の処理。/ Compare weapons
 329  * @details
 330  * Copies the weapons to compare into the weapon-slot and\n
 331  * compares the values for both weapons.\n
 332  * 武器1つだけで比較をしないなら費用は半額になる。
 333  * @param bcost 基本鑑定費用
 334  * @return 最終的にかかった費用
 335  */
 336 PRICE compare_weapons(player_type *customer_ptr, PRICE bcost)
 337 {
 338     object_type *o_ptr[2];
 339     object_type orig_weapon;
 340     object_type *i_ptr;
 341     TERM_LEN row = 2;
 342     TERM_LEN wid = 38, mgn = 2;
 343     bool old_character_xtra = current_world_ptr->character_xtra;
 344     char ch;
 345     PRICE total = 0;
 346     PRICE cost = 0; /* First time no price */
 347
 348     screen_save();
 349     clear_bldg(0, 22);
 350     i_ptr = &customer_ptr->inventory_list[INVEN_RARM];
 351     object_copy(&orig_weapon, i_ptr);
 352
 353     item_tester_hook = item_tester_hook_orthodox_melee_weapons;
 354     concptr q = _("第一の武器は？", "What is your first weapon? ");
 355     concptr s = _("比べるものがありません。", "You have nothing to compare.");
 356
 357     OBJECT_IDX item;
 358     o_ptr[0] = choose_object(customer_ptr, &item, q, s, (USE_EQUIP | USE_INVEN | IGNORE_BOTHHAND_SLOT), 0);
 359     if (!o_ptr[0]) {
 360         screen_load();
 361         return 0;
 362     }
 363
 364     int n = 1;
 365     total = bcost;
 366
 367     while (TRUE) {
 368         clear_bldg(0, 22);
 369         item_tester_hook = item_tester_hook_orthodox_melee_weapons;
 370         current_world_ptr->character_xtra = TRUE;
 371         for (int i = 0; i < n; i++) {
 372             int col = (wid * i + mgn);
 373             if (o_ptr[i] != i_ptr)
 374                 object_copy(i_ptr, o_ptr[i]);
 375
 376             customer_ptr->update |= PU_BONUS;
 377             handle_stuff(customer_ptr);
 378
 379             list_weapon(customer_ptr, o_ptr[i], row, col);
 380             compare_weapon_aux(customer_ptr, o_ptr[i], col, row + 8);
 381             object_copy(i_ptr, &orig_weapon);
 382         }
 383
 384         customer_ptr->update |= PU_BONUS;
 385         handle_stuff(customer_ptr);
 386
 387         current_world_ptr->character_xtra = old_character_xtra;
 388 #ifdef JP
 389         put_str(format("[ 比較対象: 's'で変更 ($%d) ]", cost), 1, (wid + mgn));
 390         put_str("(一番高いダメージが適用されます。複数の倍打効果は足し算されません。)", row + 4, 0);
 391         prt("現在の技量から判断すると、あなたの武器は以下のような威力を発揮します:", 0, 0);
 392 #else
 393         put_str(format("[ 's' Select secondary weapon($%d) ]", cost), 1, (wid + mgn));
 394         put_str("(Only highest damage applies per monster. Special damage not cumulative.)", row + 4, 0);
 395         prt("Based on your current abilities, here is what your weapons will do", 0, 0);
 396 #endif
 397
 398         flush();
 399         ch = inkey();
 400         if (ch != 's')
 401             break;
 402
 403         if (total + cost > customer_ptr->au) {
 404             msg_print(_("お金が足りません！", "You don't have enough money!"));
 405             msg_print(NULL);
 406             continue;
 407         }
 408
 409         q = _("第二の武器は？", "What is your second weapon? ");
 410         s = _("比べるものがありません。", "You have nothing to compare.");
 411         OBJECT_IDX item2;
 412         o_ptr[1] = choose_object(customer_ptr, &item2, q, s, (USE_EQUIP | USE_INVEN | IGNORE_BOTHHAND_SLOT), 0);
 413         if (!o_ptr[1])
 414             continue;
 415
 416         total += cost;
 417         cost = bcost / 2;
 418         n = 2;
 419     }
 420
 421     screen_load();
 422     return total;
 423 }