src/view/display-player.c

   1 /*!
   2  * @brief プレーヤーのステータス表示メインルーチン群
   3  * @date 2020/02/25
   4  * @author Hourier
   5  * @details
   6  * ここにこれ以上関数を引っ越してくるのは禁止
   7  */
   8
   9 #include "display-player.h"
  10 #include "player-personality.h"
  11 #include "term.h"
  12 #include "status-first-page.h"
  13 #include "player-sex.h"
  14 #include "patron.h"
  15 #include "world.h"
  16 #include "quest.h"
  17 #include "core.h" // 暫定。後で消す
  18 #include "mutation.h"
  19 #include "dungeon-file.h"
  20 #include "objectkind.h"
  21 #include "view/display-util.h"
  22 #include "view/display-characteristic.h"
  23 #include "view/display-player-stat-info.h"
  24 #include "view/display-player-misc-info.h"
  25 #include "view/display-player-middle.h"
  26
  27 /*!
  28  * @brief
  29  * @param creature_ptr プレーヤーへの参照ポインタ
  30  * @param mode ステータス表示モード
  31  * @return どれかの処理をこなしたらTRUE、何もしなかったらFALSE
  32  */
  33 static bool display_player_info(player_type *creature_ptr, int mode)
  34 {
  35         if (mode == 2)
  36         {
  37                 display_player_misc_info(creature_ptr);
  38                 display_player_stat_info(creature_ptr);
  39                 display_player_flag_info_1(creature_ptr, display_player_equippy);
  40                 return TRUE;
  41         }
  42
  43         if (mode == 3)
  44         {
  45                 display_player_flag_info_2(creature_ptr, display_player_equippy);
  46                 return TRUE;
  47         }
  48
  49         if (mode == 4)
  50         {
  51                 do_cmd_knowledge_mutations(creature_ptr);
  52                 return TRUE;
  53         }
  54
  55         return FALSE;
  56 }
  57
  58
  59 /*!
  60  * @brief 名前、性別、種族、職業を表示する
  61  * @param creature_ptr プレーヤーへの参照ポインタ
  62  */
  63 static void display_player_basic_info(player_type *creature_ptr)
  64 {
  65         char tmp[64];
  66 #ifdef JP
  67         sprintf(tmp, "%s%s%s", ap_ptr->title, ap_ptr->no == 1 ? "の" : "", creature_ptr->name);
  68 #else
  69         sprintf(tmp, "%s %s", ap_ptr->title, creature_ptr->name);
  70 #endif
  71
  72         display_player_one_line(ENTRY_NAME, tmp, TERM_L_BLUE);
  73         display_player_one_line(ENTRY_SEX, sp_ptr->title, TERM_L_BLUE);
  74         display_player_one_line(ENTRY_RACE, (creature_ptr->mimic_form ? mimic_info[creature_ptr->mimic_form].title : rp_ptr->title), TERM_L_BLUE);
  75         display_player_one_line(ENTRY_CLASS, cp_ptr->title, TERM_L_BLUE);
  76 }
  77
  78
  79 /*!
  80  * @brief 魔法領域を表示する
  81  * @param creature_ptr プレーヤーへの参照ポインタ
  82  * @return なし
  83  */
  84 static void display_magic_realms(player_type *creature_ptr)
  85 {
  86         if (creature_ptr->realm1 == 0) return;
  87
  88         char tmp[64];
  89         if (creature_ptr->realm2)
  90                 sprintf(tmp, "%s, %s", realm_names[creature_ptr->realm1], realm_names[creature_ptr->realm2]);
  91         else
  92                 strcpy(tmp, realm_names[creature_ptr->realm1]);
  93
  94         display_player_one_line(ENTRY_REALM, tmp, TERM_L_BLUE);
  95 }
  96
  97
  98 /*!
  99  * @ brief 年齢、身長、体重、社会的地位を表示する
 100  * @param creature_ptr プレーヤーへの参照ポインタ
 101  * @return なし
 102  * @details
 103  * 日本語版では、身長はcmに、体重はkgに変更してある
 104  */
 105 static void display_phisique(player_type *creature_ptr)
 106 {
 107 #ifdef JP
 108         display_player_one_line(ENTRY_AGE, format("%d才", (int)creature_ptr->age), TERM_L_BLUE);
 109         display_player_one_line(ENTRY_HEIGHT, format("%dcm", (int)((creature_ptr->ht * 254) / 100)), TERM_L_BLUE);
 110         display_player_one_line(ENTRY_WEIGHT, format("%dkg", (int)((creature_ptr->wt * 4536) / 10000)), TERM_L_BLUE);
 111         display_player_one_line(ENTRY_SOCIAL, format("%d  ", (int)creature_ptr->sc), TERM_L_BLUE);
 112 #else
 113         display_player_one_line(ENTRY_AGE, format("%d", (int)creature_ptr->age), TERM_L_BLUE);
 114         display_player_one_line(ENTRY_HEIGHT, format("%d", (int)creature_ptr->ht), TERM_L_BLUE);
 115         display_player_one_line(ENTRY_WEIGHT, format("%d", (int)creature_ptr->wt), TERM_L_BLUE);
 116         display_player_one_line(ENTRY_SOCIAL, format("%d", (int)creature_ptr->sc), TERM_L_BLUE);
 117 #endif
 118         display_player_one_line(ENTRY_ALIGN, format("%s", your_alignment(creature_ptr)), TERM_L_BLUE);
 119 }
 120
 121
 122 /*!
 123  * @brief 能力値を (減少していたら色を変えて)表示する
 124  * @param creature_ptr プレーヤーへの参照ポインタ
 125  */
 126 static void display_player_stats(player_type *creature_ptr)
 127 {
 128         char buf[80];
 129         for (int i = 0; i < A_MAX; i++)
 130         {
 131                 if (creature_ptr->stat_cur[i] < creature_ptr->stat_max[i])
 132                 {
 133                         put_str(stat_names_reduced[i], 3 + i, 53);
 134                         int value = creature_ptr->stat_use[i];
 135                         cnv_stat(value, buf);
 136                         c_put_str(TERM_YELLOW, buf, 3 + i, 60);
 137                         value = creature_ptr->stat_top[i];
 138                         cnv_stat(value, buf);
 139                         c_put_str(TERM_L_GREEN, buf, 3 + i, 67);
 140                 }
 141                 else
 142                 {
 143                         put_str(stat_names[i], 3 + i, 53);
 144                         cnv_stat(creature_ptr->stat_use[i], buf);
 145                         c_put_str(TERM_L_GREEN, buf, 3 + i, 60);
 146                 }
 147
 148                 if (creature_ptr->stat_max[i] == creature_ptr->stat_max_max[i])
 149                         c_put_str(TERM_WHITE, "!", 3 + i, _(58, 58 - 2));
 150         }
 151 }
 152
 153
 154 /*!
 155  * @brief プレイヤーのステータス表示メイン処理
 156  * Display the character on the screen (various modes)
 157  * @param creature_ptr プレーヤーへの参照ポインタ
 158  * @param mode 表示モードID
 159  * @return なし
 160  * @details
 161  * <pre>
 162  * The top one and bottom two lines are left blank.
 163  * Mode 0 = standard display with skills
 164  * Mode 1 = standard display with history
 165  * Mode 2 = summary of various things
 166  * Mode 3 = summary of various things (part 2)
 167  * Mode 4 = mutations
 168  * </pre>
 169  */
 170 void display_player(player_type *creature_ptr, int mode, map_name_pf map_name)
 171 {
 172         if ((creature_ptr->muta1 || creature_ptr->muta2 || creature_ptr->muta3) && display_mutations)
 173                 mode = (mode % 5);
 174         else
 175                 mode = (mode % 4);
 176
 177         clear_from(0);
 178         if (display_player_info(creature_ptr, mode)) return;
 179
 180         display_player_basic_info(creature_ptr);
 181         display_magic_realms(creature_ptr);
 182
 183         if ((creature_ptr->pclass == CLASS_CHAOS_WARRIOR) || (creature_ptr->muta2 & MUT2_CHAOS_GIFT))
 184                 display_player_one_line(ENTRY_PATRON, chaos_patrons[creature_ptr->chaos_patron], TERM_L_BLUE);
 185
 186         display_phisique(creature_ptr);
 187         display_player_stats(creature_ptr);
 188
 189         floor_type *floor_ptr = creature_ptr->current_floor_ptr;
 190         if (mode == 0)
 191         {
 192                 display_player_middle(creature_ptr);
 193                 display_player_various(creature_ptr);
 194                 return;
 195         }
 196
 197         char statmsg[1000];
 198         put_str(_("(キャラクターの生い立ち)", "(Character Background)"), 11, 25);
 199
 200         for (int i = 0; i < 4; i++)
 201         {
 202                 put_str(creature_ptr->history[i], i + 12, 10);
 203         }
 204
 205         *statmsg = '\0';
 206
 207         if (creature_ptr->is_dead)
 208         {
 209                 if (current_world_ptr->total_winner)
 210                 {
 211 #ifdef JP
 212                         sprintf(statmsg, "…あなたは勝利の後%sした。", streq(creature_ptr->died_from, "Seppuku") ? "切腹" : "引退");
 213 #else
 214                         sprintf(statmsg, "...You %s after winning.", streq(creature_ptr->died_from, "Seppuku") ? "committed seppuku" : "retired from the adventure");
 215 #endif
 216                 }
 217                 else if (!floor_ptr->dun_level)
 218                 {
 219 #ifdef JP
 220                         sprintf(statmsg, "…あなたは%sで%sに殺された。", (*map_name)(creature_ptr), creature_ptr->died_from);
 221 #else
 222                         sprintf(statmsg, "...You were killed by %s in %s.", creature_ptr->died_from, map_name(creature_ptr));
 223 #endif
 224                 }
 225                 else if (floor_ptr->inside_quest && is_fixed_quest_idx(floor_ptr->inside_quest))
 226                 {
 227                         /* Get the quest text */
 228                         /* Bewere that INIT_ASSIGN resets the cur_num. */
 229                         init_flags = INIT_NAME_ONLY;
 230
 231                         process_dungeon_file(creature_ptr, "q_info.txt", 0, 0, 0, 0);
 232
 233 #ifdef JP
 234                         sprintf(statmsg, "…あなたは、クエスト「%s」で%sに殺された。", quest[floor_ptr->inside_quest].name, creature_ptr->died_from);
 235 #else
 236                         sprintf(statmsg, "...You were killed by %s in the quest '%s'.", creature_ptr->died_from, quest[floor_ptr->inside_quest].name);
 237 #endif
 238                 }
 239                 else
 240                 {
 241 #ifdef JP
 242                         sprintf(statmsg, "…あなたは、%sの%d階で%sに殺された。", (*map_name)(creature_ptr), (int)floor_ptr->dun_level, creature_ptr->died_from);
 243 #else
 244                         sprintf(statmsg, "...You were killed by %s on level %d of %s.", creature_ptr->died_from, floor_ptr->dun_level, map_name(creature_ptr));
 245 #endif
 246                 }
 247         }
 248         else if (current_world_ptr->character_dungeon)
 249         {
 250                 if (!floor_ptr->dun_level)
 251                 {
 252                         sprintf(statmsg, _("…あなたは現在、 %s にいる。", "...Now, you are in %s."), map_name(creature_ptr));
 253                 }
 254                 else if (floor_ptr->inside_quest && is_fixed_quest_idx(floor_ptr->inside_quest))
 255                 {
 256                         /* Clear the text */
 257                         /* Must be done before doing INIT_SHOW_TEXT */
 258                         for (int i = 0; i < 10; i++)
 259                         {
 260                                 quest_text[i][0] = '\0';
 261                         }
 262
 263                         quest_text_line = 0;
 264                         init_flags = INIT_NAME_ONLY;
 265                         process_dungeon_file(creature_ptr, "q_info.txt", 0, 0, 0, 0);
 266                         sprintf(statmsg, _("…あなたは現在、 クエスト「%s」を遂行中だ。", "...Now, you are in the quest '%s'."), quest[floor_ptr->inside_quest].name);
 267                 }
 268                 else
 269                 {
 270 #ifdef JP
 271                         sprintf(statmsg, "…あなたは現在、 %s の %d 階で探索している。", map_name(creature_ptr), (int)floor_ptr->dun_level);
 272 #else
 273                         sprintf(statmsg, "...Now, you are exploring level %d of %s.", floor_ptr->dun_level, map_name(creature_ptr));
 274 #endif
 275                 }
 276         }
 277
 278         if (!*statmsg) return;
 279
 280         char temp[64 * 2];
 281         roff_to_buf(statmsg, 60, temp, sizeof(temp));
 282         char  *t;
 283         t = temp;
 284         for (int i = 0; i < 2; i++)
 285         {
 286                 if (t[0] == 0) return;
 287
 288                 put_str(t, i + 5 + 12, 10);
 289                 t += strlen(t) + 1;
 290         }
 291 }
 292
 293
 294 /*!
 295  * todo y = 6、x = 0、mode = 0で固定。何とかする
 296  * @brief プレイヤーの装備一覧をシンボルで並べる
 297  * Equippy chars
 298  * @param creature_ptr プレーヤーへの参照ポインタ
 299  * @param y 表示するコンソールの行
 300  * @param x 表示するコンソールの列
 301  * @param mode オプション
 302  * @return なし
 303  */
 304 void display_player_equippy(player_type *creature_ptr, TERM_LEN y, TERM_LEN x, BIT_FLAGS16 mode)
 305 {
 306         int max_i = (mode & DP_WP) ? INVEN_LARM + 1 : INVEN_TOTAL;
 307         for (int i = INVEN_RARM; i < max_i; i++)
 308         {
 309                 object_type *o_ptr;
 310                 o_ptr = &creature_ptr->inventory_list[i];
 311
 312                 TERM_COLOR a = object_attr(o_ptr);
 313                 char c = object_char(o_ptr);
 314
 315                 if (!equippy_chars || !o_ptr->k_idx)
 316                 {
 317                         c = ' ';
 318                         a = TERM_DARK;
 319                 }
 320
 321                 Term_putch(x + i - INVEN_RARM, y, a, c);
 322         }
 323 }