src/knowledge/knowledge-inventory.c

   1 /*
   2  * @brief 装備の耐性を表示する
   3  * @date 2020/04/20
   4  * @author Hourier
   5  */
   6
   7 #include "knowledge/knowledge-inventory.h"
   8 #include "core/show-file.h"
   9 #include "floor/floor-town.h"
  10 #include "io-dump/dump-util.h"
  11 #include "object/object-appraiser.h"
  12 #include "object/object-flavor.h"
  13 #include "object/object-hook.h"
  14 #include "object/special-object-flags.h"
  15 #include "object/sv-amulet-types.h"
  16 #include "object/sv-protector-types.h"
  17 #include "object/sv-ring-types.h"
  18 #include "object/tr-types.h"
  19 #include "store/store-util.h"
  20
  21 static concptr inven_res_label = _(
  22         "                               酸電火冷毒光闇破轟獄因沌劣 盲怖乱痺透命感消復浮",
  23         "                               AcElFiCoPoLiDkShSoNtNxCaDi BlFeCfFaSeHlEpSdRgLv");
  24
  25 #define IM_FLAG_STR  _("＊", "* ")
  26 #define HAS_FLAG_STR _("＋", "+ ")
  27 #define NO_FLAG_STR  _("・", ". ")
  28
  29
  30 /*!
  31  * @brief 4元素耐性を表示する
  32  * @param immunity 4元素耐性の種類 (二重？)
  33  * @param resistance 4元素耐性
  34  * @param flags 耐性配列へのポインタ
  35  * @param fff 一時ファイルへのポインタ
  36  * @return なし
  37  */
  38 static void print_im_or_res_flag(int immunity, int resistance, BIT_FLAGS *flags, FILE *fff)
  39 {
  40         fputs(have_flag(flags, immunity) ? IM_FLAG_STR :
  41               (have_flag(flags, resistance) ? HAS_FLAG_STR : NO_FLAG_STR), fff);
  42 }
  43
  44
  45 /*!
  46  * @brief 4元素以外の耐性を表示する
  47  * @param tr 耐性
  48  * @param flags 耐性配列へのポインタ
  49  * @param fff 一時ファイルへのポインタ
  50  * @return なし
  51  */
  52 static void print_flag(int tr, BIT_FLAGS *flags, FILE *fff)
  53 {
  54         fputs(have_flag(flags, tr) ? HAS_FLAG_STR : NO_FLAG_STR, fff);
  55 }
  56
  57
  58 /*!
  59  * @brief 特殊なアイテムかどうかを調べる
  60  * @param o_ptr アイテムへの参照ポインタ
  61  * @param tval アイテム主分類番号
  62  * @return 特殊なアイテムならTRUE
  63  */
  64 static bool determine_spcial_item_type(object_type *o_ptr, tval_type tval)
  65 {
  66         bool is_special_item_type = (object_is_wearable(o_ptr) && object_is_ego(o_ptr))
  67                 || ((tval == TV_AMULET) && (o_ptr->sval == SV_AMULET_RESISTANCE))
  68                 || ((tval == TV_RING) && (o_ptr->sval == SV_RING_LORDLY))
  69                 || ((tval == TV_SHIELD) && (o_ptr->sval == SV_DRAGON_SHIELD))
  70                 || ((tval == TV_HELM) && (o_ptr->sval == SV_DRAGON_HELM))
  71                 || ((tval == TV_GLOVES) && (o_ptr->sval == SV_SET_OF_DRAGON_GLOVES))
  72                 || ((tval == TV_BOOTS) && (o_ptr->sval == SV_PAIR_OF_DRAGON_GREAVE))
  73                 || object_is_artifact(o_ptr);
  74
  75         return is_special_item_type;
  76 }
  77
  78
  79 /*!
  80  * @brief アイテムに耐性の表示をする必要があるかを判定する
  81  * @param o_ptr アイテムへの参照ポインタ
  82  * @param tval アイテム主分類番号
  83  * @return 必要があるならTRUE
  84  */
  85 static bool check_item_knowledge(object_type *o_ptr, tval_type tval)
  86 {
  87         if (o_ptr->k_idx == 0) return FALSE;
  88         if (o_ptr->tval != tval) return FALSE;
  89         if (!object_is_known(o_ptr)) return FALSE;
  90         if (!determine_spcial_item_type(o_ptr, tval)) return FALSE;
  91
  92         return TRUE;
  93 }
  94
  95
  96 /*!
  97  * todo ここの関数から表示用の関数に移したい
  98  * @brief 鑑定済アイテムの耐性を表示する
  99  * @param o_ptr アイテムへの参照ポインタ
 100  * @param fff 一時ファイルへの参照ポインタ
 101  * @return なし
 102  */
 103 static void display_identified_resistances_flag(object_type *o_ptr, FILE *fff)
 104 {
 105         BIT_FLAGS flags[TR_FLAG_SIZE];
 106         object_flags_known(o_ptr, flags);
 107
 108         print_im_or_res_flag(TR_IM_ACID, TR_RES_ACID, flags, fff);
 109         print_im_or_res_flag(TR_IM_ELEC, TR_RES_ELEC, flags, fff);
 110         print_im_or_res_flag(TR_IM_FIRE, TR_RES_FIRE, flags, fff);
 111         print_im_or_res_flag(TR_IM_COLD, TR_RES_COLD, flags, fff);
 112         print_flag(TR_RES_POIS, flags, fff);
 113         print_flag(TR_RES_LITE, flags, fff);
 114         print_flag(TR_RES_DARK, flags, fff);
 115         print_flag(TR_RES_SHARDS, flags, fff);
 116         print_flag(TR_RES_SOUND, flags, fff);
 117         print_flag(TR_RES_NETHER, flags, fff);
 118         print_flag(TR_RES_NEXUS, flags, fff);
 119         print_flag(TR_RES_CHAOS, flags, fff);
 120         print_flag(TR_RES_DISEN, flags, fff);
 121
 122         fputs(" ", fff);
 123
 124         print_flag(TR_RES_BLIND, flags, fff);
 125         print_flag(TR_RES_FEAR, flags, fff);
 126         print_flag(TR_RES_CONF, flags, fff);
 127         print_flag(TR_FREE_ACT, flags, fff);
 128         print_flag(TR_SEE_INVIS, flags, fff);
 129         print_flag(TR_HOLD_EXP, flags, fff);
 130         print_flag(TR_TELEPATHY, flags, fff);
 131         print_flag(TR_SLOW_DIGEST, flags, fff);
 132         print_flag(TR_REGEN, flags, fff);
 133         print_flag(TR_LEVITATION, flags, fff);
 134
 135         fputc('\n', fff);
 136 }
 137
 138
 139 /*!
 140  * @brief アイテム1つ当たりの耐性を表示する
 141  * @param creature_ptr プレーヤーへの参照ポインタ
 142  * @param fff 一時ファイルへの参照ポインタ
 143  * @param o_ptr アイテムへの参照ポインタ
 144  * @param where アイテムの場所 (手持ち、家等) を示す文字列への参照ポインタ
 145  * @return なし
 146  */
 147 static void do_cmd_knowledge_inventory_aux(player_type *creature_ptr, FILE *fff, object_type *o_ptr, char *where)
 148 {
 149         int i = 0;
 150         GAME_TEXT o_name[MAX_NLEN];
 151         object_desc(creature_ptr, o_name, o_ptr, OD_NAME_ONLY);
 152         while (o_name[i] && (i < 26))
 153         {
 154 #ifdef JP
 155                 if (iskanji(o_name[i])) i++;
 156 #endif
 157                 i++;
 158         }
 159
 160         if (i < 28)
 161         {
 162                 while (i < 28)
 163                 {
 164                         o_name[i] = ' '; i++;
 165                 }
 166         }
 167
 168         o_name[i] = '\0';
 169
 170         fprintf(fff, "%s %s", where, o_name);
 171
 172         if (!object_is_fully_known(o_ptr))
 173         {
 174                 fputs(_("-------不明--------------- -------不明---------\n",
 175                         "-------unknown------------ -------unknown------\n"), fff);
 176                 return;
 177         }
 178
 179         display_identified_resistances_flag(o_ptr, fff);
 180 }
 181
 182
 183 /*!
 184  * @brief 9行おきにラベルを追加する
 185  * @param label_number 現在の行数
 186  * @param fff 一時ファイルへの参照ポインタ
 187  * @return なし
 188  */
 189 static void add_res_label(int *label_number, FILE *fff)
 190 {
 191         (*label_number)++;
 192         if (*label_number == 9)
 193         {
 194                 *label_number = 0;
 195                 fprintf(fff, "%s\n", inven_res_label);
 196         }
 197 }
 198
 199
 200 /*!
 201  * @brief 9行ごとに行数をリセットする
 202  * @param label_number 現在の行数
 203  * @param fff 一時ファイルへの参照ポインタ
 204  * @return なし
 205  */
 206 static void reset_label_number(int *label_number, FILE *fff)
 207 {
 208         if (*label_number == 0) return;
 209
 210         for (; *label_number < 9; (*label_number)++)
 211         {
 212                 fputc('\n', fff);
 213         }
 214
 215         *label_number = 0;
 216         fprintf(fff, "%s\n", inven_res_label);
 217 }
 218
 219
 220 /*!
 221  * 装備中のアイテムについて、耐性を表示する
 222  * @param creature_ptr プレーヤーへの参照ポインタ
 223  * @param tval アイテム主分類番号
 224  * @param label_number 現在の行数
 225  * @param fff ファイルへの参照ポインタ
 226  * @return なし
 227  */
 228 static void show_wearing_equipment_resistances(player_type *creature_ptr, tval_type tval, int *label_number, FILE *fff)
 229 {
 230         char where[32];
 231         strcpy(where, _("装", "E "));
 232         for (int i = INVEN_RARM; i < INVEN_TOTAL; i++)
 233         {
 234                 object_type *o_ptr = &creature_ptr->inventory_list[i];
 235                 if (!check_item_knowledge(o_ptr, tval))
 236                         continue;
 237
 238                 do_cmd_knowledge_inventory_aux(creature_ptr, fff, o_ptr, where);
 239                 add_res_label(label_number, fff);
 240         }
 241 }
 242
 243
 244 /*!
 245  * 手持ち中のアイテムについて、耐性を表示する
 246  * @param creature_ptr プレーヤーへの参照ポインタ
 247  * @param tval アイテム主分類番号
 248  * @param label_number 現在の行数
 249  * @param fff ファイルへの参照ポインタ
 250  * @return なし
 251  */
 252 static void show_holding_equipment_resistances(player_type *creature_ptr, tval_type tval, int *label_number, FILE *fff)
 253 {
 254         char where[32];
 255         strcpy(where, _("持", "I "));
 256         for (int i = 0; i < INVEN_PACK; i++)
 257         {
 258                 object_type *o_ptr = &creature_ptr->inventory_list[i];
 259                 if (!check_item_knowledge(o_ptr, tval))
 260                         continue;
 261
 262                 do_cmd_knowledge_inventory_aux(creature_ptr, fff, o_ptr, where);
 263                 add_res_label(label_number, fff);
 264         }
 265 }
 266
 267
 268 /*!
 269  * 我が家のアイテムについて、耐性を表示する
 270  * @param creature_ptr プレーヤーへの参照ポインタ
 271  * @param tval アイテム主分類番号
 272  * @param label_number 現在の行数
 273  * @param fff ファイルへの参照ポインタ
 274  * @return なし
 275  */
 276 static void show_home_equipment_resistances(player_type *creature_ptr, tval_type tval, int *label_number, FILE *fff)
 277 {
 278         store_type *store_ptr;
 279         store_ptr = &town_info[1].store[STORE_HOME];
 280         char where[32];
 281         strcpy(where, _("家", "H "));
 282         for (int i = 0; i < store_ptr->stock_num; i++)
 283         {
 284                 object_type *o_ptr = &store_ptr->stock[i];
 285                 if (!check_item_knowledge(o_ptr, tval))
 286                         continue;
 287
 288                 do_cmd_knowledge_inventory_aux(creature_ptr, fff, o_ptr, where);
 289                 add_res_label(label_number, fff);
 290         }
 291 }
 292
 293
 294 /*
 295  * @brief Display *ID* ed weapons/armors's resistances
 296  * @param creature_ptr プレーヤーへの参照ポインタ
 297  * @return なし
 298  */
 299 void do_cmd_knowledge_inventory(player_type *creature_ptr)
 300 {
 301         FILE *fff = NULL;
 302         GAME_TEXT file_name[FILE_NAME_SIZE];
 303         if (!open_temporary_file(&fff, file_name)) return;
 304
 305         fprintf(fff, "%s\n", inven_res_label);
 306         int label_number = 0;
 307         for (tval_type tval = TV_WEARABLE_BEGIN; tval <= TV_WEARABLE_END; tval++)
 308         {
 309                 reset_label_number(&label_number, fff);
 310                 show_wearing_equipment_resistances(creature_ptr, tval, &label_number, fff);
 311                 show_holding_equipment_resistances(creature_ptr, tval, &label_number, fff);
 312                 show_home_equipment_resistances(creature_ptr, tval, &label_number, fff);
 313         }
 314
 315         my_fclose(fff);
 316         (void)show_file(creature_ptr, TRUE, file_name, _("*鑑定*済み武器/防具の耐性リスト", "Resistances of *identified* equipment"), 0, 0);
 317         fd_kill(file_name);
 318 }