src/character-dump.c

   1 #include "character-dump.h"
   2 #include "core.h"
   3 #include "world.h"
   4 #include "floor-town.h"
   5 #include "dungeon.h"
   6 #include "store.h"
   7 #include "cmd/cmd-pet.h"
   8 #include "monster-status.h"
   9 #include "sort.h"
  10 #include "quest.h"
  11 #include "init.h"
  12 #include "mutation.h"
  13 #include "object-flavor.h"
  14 #include "cmd/cmd-dump.h"
  15 #include "io/special-class-dump.h"
  16 #include "io/player-status-dump.h"
  17 #include "io/write-diary.h"
  18 #include "avatar.h"
  19 #include "market/store-util.h"
  20
  21 /*!
  22  * @brief プレイヤーのペット情報をファイルにダンプする
  23  * @param creature_ptr プレーヤーへの参照ポインタ
  24  * @param fff ファイルポインタ
  25  * @return なし
  26  */
  27 static void dump_aux_pet(player_type *master_ptr, FILE *fff)
  28 {
  29         bool pet = FALSE;
  30         bool pet_settings = FALSE;
  31         for (int i = master_ptr->current_floor_ptr->m_max - 1; i >= 1; i--)
  32         {
  33                 monster_type *m_ptr = &master_ptr->current_floor_ptr->m_list[i];
  34
  35                 if (!monster_is_valid(m_ptr)) continue;
  36                 if (!is_pet(m_ptr)) continue;
  37                 pet_settings = TRUE;
  38                 if (!m_ptr->nickname && (master_ptr->riding != i)) continue;
  39                 if (!pet)
  40                 {
  41                         fprintf(fff, _("\n\n  [主なペット]\n\n", "\n\n  [Leading Pets]\n\n"));
  42                         pet = TRUE;
  43                 }
  44
  45                 GAME_TEXT pet_name[MAX_NLEN];
  46                 monster_desc(master_ptr, pet_name, m_ptr, MD_ASSUME_VISIBLE | MD_INDEF_VISIBLE);
  47                 fprintf(fff, "%s\n", pet_name);
  48         }
  49
  50         if (!pet_settings) return;
  51
  52         fprintf(fff, _("\n\n  [ペットへの命令]\n", "\n\n  [Command for Pets]\n"));
  53
  54         fprintf(fff, _("\n ドアを開ける:                       %s", "\n Pets open doors:                    %s"),
  55                 (master_ptr->pet_extra_flags & PF_OPEN_DOORS) ? "ON" : "OFF");
  56
  57         fprintf(fff, _("\n アイテムを拾う:                     %s", "\n Pets pick up items:                 %s"),
  58                 (master_ptr->pet_extra_flags & PF_PICKUP_ITEMS) ? "ON" : "OFF");
  59
  60         fprintf(fff, _("\n テレポート系魔法を使う:             %s", "\n Allow teleport:                     %s"),
  61                 (master_ptr->pet_extra_flags & PF_TELEPORT) ? "ON" : "OFF");
  62
  63         fprintf(fff, _("\n 攻撃魔法を使う:                     %s", "\n Allow cast attack spell:            %s"),
  64                 (master_ptr->pet_extra_flags & PF_ATTACK_SPELL) ? "ON" : "OFF");
  65
  66         fprintf(fff, _("\n 召喚魔法を使う:                     %s", "\n Allow cast summon spell:            %s"),
  67                 (master_ptr->pet_extra_flags & PF_SUMMON_SPELL) ? "ON" : "OFF");
  68
  69         fprintf(fff, _("\n プレイヤーを巻き込む範囲魔法を使う: %s", "\n Allow involve player in area spell: %s"),
  70                 (master_ptr->pet_extra_flags & PF_BALL_SPELL) ? "ON" : "OFF");
  71
  72         fputc('\n', fff);
  73 }
  74
  75
  76 /*!
  77  * @brief クエスト情報をファイルにダンプする
  78  * @param creature_ptr プレーヤーへの参照ポインタ
  79  * @param fff ファイルポインタ
  80  * @return なし
  81  */
  82 static void dump_aux_quest(player_type *creature_ptr, FILE *fff)
  83 {
  84         fprintf(fff, _("\n\n  [クエスト情報]\n", "\n\n  [Quest Information]\n"));
  85         QUEST_IDX *quest_num;
  86         C_MAKE(quest_num, max_q_idx, QUEST_IDX);
  87
  88         for (QUEST_IDX i = 1; i < max_q_idx; i++)
  89                 quest_num[i] = i;
  90         int dummy;
  91         ang_sort(quest_num, &dummy, max_q_idx, ang_sort_comp_quest_num, ang_sort_swap_quest_num);
  92
  93         fputc('\n', fff);
  94         do_cmd_knowledge_quests_completed(creature_ptr, fff, quest_num);
  95         fputc('\n', fff);
  96         do_cmd_knowledge_quests_failed(creature_ptr, fff, quest_num);
  97         fputc('\n', fff);
  98
  99         C_KILL(quest_num, max_q_idx, QUEST_IDX);
 100 }
 101
 102
 103 /*!
 104  * @brief 死の直前メッセージ並びに遺言をファイルにダンプする
 105  * @param creature_ptr プレーヤーへの参照ポインタ
 106  * @param fff ファイルポインタ
 107  * @return なし
 108  */
 109 static void dump_aux_last_message(player_type *creature_ptr, FILE *fff)
 110 {
 111         if (!creature_ptr->is_dead) return;
 112
 113         if (!current_world_ptr->total_winner)
 114         {
 115                 fprintf(fff, _("\n  [死ぬ直前のメッセージ]\n\n", "\n  [Last Messages]\n\n"));
 116                 for (int i = MIN(message_num(), 30); i >= 0; i--)
 117                 {
 118                         fprintf(fff, "> %s\n", message_str((s16b)i));
 119                 }
 120
 121                 fputc('\n', fff);
 122                 return;
 123         }
 124
 125         if (creature_ptr->last_message)
 126         {
 127                 fprintf(fff, _("\n  [*勝利*メッセージ]\n\n", "\n  [*Winning* Message]\n\n"));
 128                 fprintf(fff, "  %s\n", creature_ptr->last_message);
 129                 fputc('\n', fff);
 130         }
 131 }
 132
 133
 134 /*!
 135  * @brief 帰還場所情報をファイルにダンプする
 136  * @param fff ファイルポインタ
 137  * @return なし
 138  */
 139 static void dump_aux_recall(FILE *fff)
 140 {
 141         fprintf(fff, _("\n  [帰還場所]\n\n", "\n  [Recall Depth]\n\n"));
 142         for (int y = 1; y < current_world_ptr->max_d_idx; y++)
 143         {
 144                 bool seiha = FALSE;
 145
 146                 if (!d_info[y].maxdepth) continue;
 147                 if (!max_dlv[y]) continue;
 148                 if (d_info[y].final_guardian)
 149                 {
 150                         if (!r_info[d_info[y].final_guardian].max_num) seiha = TRUE;
 151                 }
 152                 else if (max_dlv[y] == d_info[y].maxdepth) seiha = TRUE;
 153
 154                 fprintf(fff, _("   %c%-12s: %3d 階\n", "   %c%-16s: level %3d\n"),
 155                         seiha ? '!' : ' ', d_name + d_info[y].name, (int)max_dlv[y]);
 156         }
 157 }
 158
 159
 160 /*!
 161  * @brief オプション情報をファイルにダンプする
 162  * @param fff ファイルポインタ
 163  * @return なし
 164  */
 165 static void dump_aux_options(FILE *fff)
 166 {
 167         fprintf(fff, _("\n  [オプション設定]\n", "\n  [Option Settings]\n"));
 168         if (preserve_mode)
 169                 fprintf(fff, _("\n 保存モード:         ON", "\n Preserve Mode:      ON"));
 170         else
 171                 fprintf(fff, _("\n 保存モード:         OFF", "\n Preserve Mode:      OFF"));
 172
 173         if (ironman_small_levels)
 174                 fprintf(fff, _("\n 小さいダンジョン:   ALWAYS", "\n Small Levels:       ALWAYS"));
 175         else if (always_small_levels)
 176                 fprintf(fff, _("\n 小さいダンジョン:   ON", "\n Small Levels:       ON"));
 177         else if (small_levels)
 178                 fprintf(fff, _("\n 小さいダンジョン:   ENABLED", "\n Small Levels:       ENABLED"));
 179         else
 180                 fprintf(fff, _("\n 小さいダンジョン:   OFF", "\n Small Levels:       OFF"));
 181
 182         if (vanilla_town)
 183                 fprintf(fff, _("\n 元祖の町のみ:       ON", "\n Vanilla Town:       ON"));
 184         else if (lite_town)
 185                 fprintf(fff, _("\n 小規模な町:         ON", "\n Lite Town:          ON"));
 186
 187         if (ironman_shops)
 188                 fprintf(fff, _("\n 店なし:             ON", "\n No Shops:           ON"));
 189
 190         if (ironman_downward)
 191                 fprintf(fff, _("\n 階段を上がれない:   ON", "\n Diving Only:        ON"));
 192
 193         if (ironman_rooms)
 194                 fprintf(fff, _("\n 普通でない部屋:     ON", "\n Unusual Rooms:      ON"));
 195
 196         if (ironman_nightmare)
 197                 fprintf(fff, _("\n 悪夢モード:         ON", "\n Nightmare Mode:     ON"));
 198
 199         if (ironman_empty_levels)
 200                 fprintf(fff, _("\n アリーナ:           ALWAYS", "\n Arena Levels:       ALWAYS"));
 201         else if (empty_levels)
 202                 fprintf(fff, _("\n アリーナ:           ENABLED", "\n Arena Levels:       ENABLED"));
 203         else
 204                 fprintf(fff, _("\n アリーナ:           OFF", "\n Arena Levels:       OFF"));
 205
 206         fputc('\n', fff);
 207
 208         if (current_world_ptr->noscore)
 209                 fprintf(fff, _("\n 何か不正なことをしてしまっています。\n", "\n You have done something illegal.\n"));
 210
 211         fputc('\n', fff);
 212 }
 213
 214
 215 /*!
 216  * @brief 闘技場の情報をファイルにダンプする
 217  * @param creature_ptr プレーヤーへの参照ポインタ
 218  * @param fff ファイルポインタ
 219  * @return なし
 220  */
 221 static void dump_aux_arena(player_type *creature_ptr, FILE *fff)
 222 {
 223         if (lite_town || vanilla_town) return;
 224
 225         if (creature_ptr->arena_number < 0)
 226         {
 227                 if (creature_ptr->arena_number <= ARENA_DEFEATED_OLD_VER)
 228                 {
 229                         fprintf(fff, _("\n 闘技場: 敗北\n", "\n Arena: Defeated\n"));
 230                 }
 231                 else
 232                 {
 233 #ifdef JP
 234                         fprintf(fff, "\n 闘技場: %d回戦で%sの前に敗北\n", -creature_ptr->arena_number,
 235                                 r_name + r_info[arena_info[-1 - creature_ptr->arena_number].r_idx].name);
 236 #else
 237                         fprintf(fff, "\n Arena: Defeated by %s in the %d%s fight\n",
 238                                 r_name + r_info[arena_info[-1 - creature_ptr->arena_number].r_idx].name,
 239                                 -creature_ptr->arena_number, get_ordinal_number_suffix(-creature_ptr->arena_number));
 240 #endif
 241                 }
 242
 243                 fprintf(fff, "\n");
 244                 return;
 245         }
 246
 247         if (creature_ptr->arena_number > MAX_ARENA_MONS + 2)
 248         {
 249                 fprintf(fff, _("\n 闘技場: 真のチャンピオン\n", "\n Arena: True Champion\n"));
 250                 fprintf(fff, "\n");
 251                 return;
 252         }
 253
 254         if (creature_ptr->arena_number > MAX_ARENA_MONS - 1)
 255         {
 256                 fprintf(fff, _("\n 闘技場: チャンピオン\n", "\n Arena: Champion\n"));
 257                 fprintf(fff, "\n");
 258                 return;
 259         }
 260
 261 #ifdef JP
 262         fprintf(fff, "\n 闘技場: %2d勝\n", (creature_ptr->arena_number > MAX_ARENA_MONS ? MAX_ARENA_MONS : creature_ptr->arena_number));
 263 #else
 264         fprintf(fff, "\n Arena: %2d Victor%s\n", (creature_ptr->arena_number > MAX_ARENA_MONS ? MAX_ARENA_MONS : creature_ptr->arena_number), (creature_ptr->arena_number > 1) ? "ies" : "y");
 265 #endif
 266         fprintf(fff, "\n");
 267 }
 268
 269
 270 /*!
 271  * @brief 撃破モンスターの情報をファイルにダンプする
 272  * @param fff ファイルポインタ
 273  * @return なし
 274  */
 275 static void dump_aux_monsters(FILE *fff)
 276 {
 277         fprintf(fff, _("\n  [倒したモンスター]\n\n", "\n  [Defeated Monsters]\n\n"));
 278
 279         /* Allocate the "who" array */
 280         MONRACE_IDX *who;
 281         u16b why = 2;
 282         C_MAKE(who, max_r_idx, MONRACE_IDX);
 283
 284         /* Count monster kills */
 285         long uniq_total = 0;
 286         long norm_total = 0;
 287         for (IDX k = 1; k < max_r_idx; k++)
 288         {
 289                 /* Ignore unused index */
 290                 monster_race *r_ptr = &r_info[k];
 291                 if (!r_ptr->name) continue;
 292
 293                 if (r_ptr->flags1 & RF1_UNIQUE)
 294                 {
 295                         bool dead = (r_ptr->max_num == 0);
 296                         if (dead)
 297                         {
 298                                 norm_total++;
 299
 300                                 /* Add a unique monster to the list */
 301                                 who[uniq_total++] = k;
 302                         }
 303
 304                         continue;
 305                 }
 306
 307                 if (r_ptr->r_pkills > 0)
 308                 {
 309                         norm_total += r_ptr->r_pkills;
 310                 }
 311         }
 312
 313         /* No monsters is defeated */
 314         if (norm_total < 1)
 315         {
 316                 fprintf(fff, _("まだ敵を倒していません。\n", "You have defeated no enemies yet.\n"));
 317                 C_KILL(who, max_r_idx, s16b);
 318                 return;
 319         }
 320
 321         /* Defeated more than one normal monsters */
 322         if (uniq_total == 0)
 323         {
 324 #ifdef JP
 325                 fprintf(fff, "%ld体の敵を倒しています。\n", norm_total);
 326 #else
 327                 fprintf(fff, "You have defeated %ld %s.\n", norm_total, norm_total == 1 ? "enemy" : "enemies");
 328 #endif
 329                 C_KILL(who, max_r_idx, s16b);
 330                 return;
 331         }
 332
 333         /* Defeated more than one unique monsters */
 334 #ifdef JP
 335         fprintf(fff, "%ld体のユニーク・モンスターを含む、合計%ld体の敵を倒しています。\n", uniq_total, norm_total);
 336 #else
 337         fprintf(fff, "You have defeated %ld %s including %ld unique monster%s in total.\n", norm_total, norm_total == 1 ? "enemy" : "enemies", uniq_total, (uniq_total == 1 ? "" : "s"));
 338 #endif
 339
 340         /* Sort the array by dungeon depth of monsters */
 341         ang_sort(who, &why, uniq_total, ang_sort_comp_hook, ang_sort_swap_hook);
 342         fprintf(fff, _("\n《上位%ld体のユニーク・モンスター》\n", "\n< Unique monsters top %ld >\n"), MIN(uniq_total, 10));
 343
 344         for (IDX k = uniq_total - 1; k >= 0 && k >= uniq_total - 10; k--)
 345         {
 346                 monster_race *r_ptr = &r_info[who[k]];
 347                 fprintf(fff, _("  %-40s (レベル%3d)\n", "  %-40s (level %3d)\n"), (r_name + r_ptr->name), (int)r_ptr->level);
 348         }
 349
 350         C_KILL(who, max_r_idx, s16b);
 351 }
 352
 353
 354 /*!
 355  * @brief 元種族情報をファイルにダンプする
 356  * @param creature_ptr プレーヤーへの参照ポインタ
 357  * @param fff ファイルポインタ
 358  * @return なし
 359  */
 360 static void dump_aux_race_history(player_type *creature_ptr, FILE *fff)
 361 {
 362         if (!creature_ptr->old_race1 && !creature_ptr->old_race2) return;
 363
 364         fprintf(fff, _("\n\n あなたは%sとして生まれた。", "\n\n You were born as %s."), race_info[creature_ptr->start_race].title);
 365         for (int i = 0; i < MAX_RACES; i++)
 366         {
 367                 if (creature_ptr->start_race == i) continue;
 368                 if (i < 32)
 369                 {
 370                         if (!(creature_ptr->old_race1 & 1L << i)) continue;
 371                 }
 372                 else
 373                 {
 374                         if (!(creature_ptr->old_race2 & 1L << (i - 32))) continue;
 375                 }
 376
 377                 fprintf(fff, _("\n あなたはかつて%sだった。", "\n You were a %s before."), race_info[i].title);
 378         }
 379
 380         fputc('\n', fff);
 381 }
 382
 383
 384 /*!
 385  * @brief 元魔法領域情報をファイルにダンプする
 386  * @param creature_ptr プレーヤーへの参照ポインタ
 387  * @param fff ファイルポインタ
 388  * @return なし
 389  */
 390 static void dump_aux_realm_history(player_type *creature_ptr, FILE *fff)
 391 {
 392         if (creature_ptr->old_realm) return;
 393
 394         fputc('\n', fff);
 395         for (int i = 0; i < MAX_MAGIC; i++)
 396         {
 397                 if (!(creature_ptr->old_realm & 1L << i)) continue;
 398                 fprintf(fff, _("\n あなたはかつて%s魔法を使えた。", "\n You were able to use %s magic before."), realm_names[i + 1]);
 399         }
 400
 401         fputc('\n', fff);
 402 }
 403
 404
 405 /*!
 406  * @brief 徳の情報をファイルにダンプする
 407  * @param creature_ptr プレーヤーへの参照ポインタ
 408  * @param fff ファイルポインタ
 409  * @return なし
 410  */
 411 static void dump_aux_virtues(player_type *creature_ptr, FILE *fff)
 412 {
 413         fprintf(fff, _("\n\n  [自分に関する情報]\n\n", "\n\n  [HP-rate & Max stat & Virtues]\n\n"));
 414
 415         int percent = (int)(((long)creature_ptr->player_hp[PY_MAX_LEVEL - 1] * 200L) /
 416                 (2 * creature_ptr->hitdie +
 417                 ((PY_MAX_LEVEL - 1 + 3) * (creature_ptr->hitdie + 1))));
 418
 419 #ifdef JP
 420         if (creature_ptr->knowledge & KNOW_HPRATE) fprintf(fff, "現在の体力ランク : %d/100\n\n", percent);
 421         else fprintf(fff, "現在の体力ランク : ???\n\n");
 422         fprintf(fff, "能力の最大値\n");
 423 #else
 424         if (creature_ptr->knowledge & KNOW_HPRATE) fprintf(fff, "Your current Life Rating is %d/100.\n\n", percent);
 425         else fprintf(fff, "Your current Life Rating is ???.\n\n");
 426         fprintf(fff, "Limits of maximum stats\n");
 427 #endif
 428         for (int v_nr = 0; v_nr < A_MAX; v_nr++)
 429         {
 430                 if ((creature_ptr->knowledge & KNOW_STAT) || creature_ptr->stat_max[v_nr] == creature_ptr->stat_max_max[v_nr]) fprintf(fff, "%s 18/%d\n", stat_names[v_nr], creature_ptr->stat_max_max[v_nr] - 18);
 431                 else fprintf(fff, "%s ???\n", stat_names[v_nr]);
 432         }
 433
 434         fprintf(fff, _("\n属性 : %s\n", "\nYour alignment : %s\n"), your_alignment(creature_ptr));
 435         fprintf(fff, "\n");
 436         dump_virtues(creature_ptr, fff);
 437 }
 438
 439
 440 /*!
 441  * @brief 突然変異の情報をファイルにダンプする
 442  * @param creature_ptr プレーヤーへの参照ポインタ
 443  * @param fff ファイルポインタ
 444  * @return なし
 445  */
 446 static void dump_aux_mutations(player_type *creature_ptr, FILE *fff)
 447 {
 448         if (creature_ptr->muta1 || creature_ptr->muta2 || creature_ptr->muta3)
 449         {
 450                 fprintf(fff, _("\n\n  [突然変異]\n\n", "\n\n  [Mutations]\n\n"));
 451                 dump_mutations(creature_ptr, fff);
 452         }
 453 }
 454
 455
 456 /*!
 457  * @brief 所持品の情報をファイルにダンプする
 458  * @param creature_ptr プレーヤーへの参照ポインタ
 459  * @param fff ファイルポインタ
 460  * @return なし
 461  */
 462 static void dump_aux_equipment_inventory(player_type *creature_ptr, FILE *fff)
 463 {
 464         GAME_TEXT o_name[MAX_NLEN];
 465         if (creature_ptr->equip_cnt)
 466         {
 467                 fprintf(fff, _("  [キャラクタの装備]\n\n", "  [Character Equipment]\n\n"));
 468                 for (int i = INVEN_RARM; i < INVEN_TOTAL; i++)
 469                 {
 470                         object_desc(creature_ptr, o_name, &creature_ptr->inventory_list[i], 0);
 471                         if ((((i == INVEN_RARM) && creature_ptr->hidarite) || ((i == INVEN_LARM) && creature_ptr->migite)) && creature_ptr->ryoute)
 472                                 strcpy(o_name, _("(武器を両手持ち)", "(wielding with two-hands)"));
 473
 474                         fprintf(fff, "%c) %s\n",
 475                                 index_to_label(i), o_name);
 476                 }
 477
 478                 fprintf(fff, "\n\n");
 479         }
 480
 481         fprintf(fff, _("  [キャラクタの持ち物]\n\n", "  [Character Inventory]\n\n"));
 482
 483         for (int i = 0; i < INVEN_PACK; i++)
 484         {
 485                 if (!creature_ptr->inventory_list[i].k_idx) break;
 486                 object_desc(creature_ptr, o_name, &creature_ptr->inventory_list[i], 0);
 487                 fprintf(fff, "%c) %s\n", index_to_label(i), o_name);
 488         }
 489
 490         fprintf(fff, "\n\n");
 491 }
 492
 493
 494 /*!
 495  * @brief 我が家と博物館のオブジェクト情報をファイルにダンプする
 496  * @param fff ファイルポインタ
 497  * @return なし
 498  */
 499 static void dump_aux_home_museum(player_type *creature_ptr, FILE *fff)
 500 {
 501         store_type  *store_ptr;
 502         store_ptr = &town_info[1].store[STORE_HOME];
 503
 504         GAME_TEXT o_name[MAX_NLEN];
 505         if (store_ptr->stock_num)
 506         {
 507                 fprintf(fff, _("  [我が家のアイテム]\n", "  [Home Inventory]\n"));
 508
 509                 TERM_LEN x = 1;
 510                 for (int i = 0; i < store_ptr->stock_num; i++)
 511                 {
 512                         if ((i % 12) == 0)
 513                                 fprintf(fff, _("\n ( %d ページ )\n", "\n ( page %d )\n"), x++);
 514                         object_desc(creature_ptr, o_name, &store_ptr->stock[i], 0);
 515                         fprintf(fff, "%c) %s\n", I2A(i % 12), o_name);
 516                 }
 517
 518                 fprintf(fff, "\n\n");
 519         }
 520
 521         store_ptr = &town_info[1].store[STORE_MUSEUM];
 522
 523         if (store_ptr->stock_num == 0) return;
 524
 525         fprintf(fff, _("  [博物館のアイテム]\n", "  [Museum]\n"));
 526
 527         TERM_LEN x = 1;
 528         for (int i = 0; i < store_ptr->stock_num; i++)
 529         {
 530 #ifdef JP
 531                 if ((i % 12) == 0) fprintf(fff, "\n ( %d ページ )\n", x++);
 532                 object_desc(creature_ptr, o_name, &store_ptr->stock[i], 0);
 533                 fprintf(fff, "%c) %s\n", I2A(i % 12), o_name);
 534 #else
 535                 if ((i % 12) == 0) fprintf(fff, "\n ( page %d )\n", x++);
 536                 object_desc(creature_ptr, o_name, &st_ptr->stock[i], 0);
 537                 fprintf(fff, "%c) %s\n", I2A(i % 12), o_name);
 538 #endif
 539         }
 540
 541         fprintf(fff, "\n\n");
 542 }
 543
 544
 545 /*!
 546  * @brief ダンプ出力のメインルーチン
 547  * Output the character dump to a file
 548  * @param creature_ptr プレーヤーへの参照ポインタ
 549  * @param fff ファイルポインタ
 550  * @return エラーコード
 551  */
 552 void make_character_dump(player_type *creature_ptr, FILE *fff, void(*update_playtime)(void), display_player_pf display_player, map_name_pf map_name)
 553 {
 554         fprintf(fff, _("  [変愚蛮怒 %d.%d.%d キャラクタ情報]\n\n", "  [Hengband %d.%d.%d Character Dump]\n\n"),
 555                 FAKE_VER_MAJOR - 10, FAKE_VER_MINOR, FAKE_VER_PATCH);
 556         (*update_playtime)();
 557
 558         dump_aux_player_status(creature_ptr, fff, display_player, map_name);
 559         dump_aux_last_message(creature_ptr, fff);
 560         dump_aux_options(fff);
 561         dump_aux_recall(fff);
 562         dump_aux_quest(creature_ptr, fff);
 563         dump_aux_arena(creature_ptr, fff);
 564         dump_aux_monsters(fff);
 565         dump_aux_virtues(creature_ptr, fff);
 566         dump_aux_race_history(creature_ptr, fff);
 567         dump_aux_realm_history(creature_ptr, fff);
 568         dump_aux_class_special(creature_ptr, fff);
 569         dump_aux_mutations(creature_ptr, fff);
 570         dump_aux_pet(creature_ptr, fff);
 571         fputs("\n\n", fff);
 572         dump_aux_equipment_inventory(creature_ptr, fff);
 573         dump_aux_home_museum(creature_ptr, fff);
 574
 575         fprintf(fff, _("  [チェックサム: \"%s\"]\n\n", "  [Check Sum: \"%s\"]\n\n"), get_check_sum());
 576 }