*/
#include "angband.h"
+#include "io/signal-handlers.h"
+#include "gameterm.h"
+#include "util.h"
+#include "core.h"
+
+#include "dungeon.h"
+#include "player/race-info-table.h"
+#include "player-status.h"
+#include "player-class.h"
+#include "player-personality.h"
+#include "player-sex.h"
+#include "io/uid-checker.h"
+#include "files.h"
+#include "scores.h"
+#include "floor.h"
+#include "world.h"
+#include "io/write-diary.h"
+#include "cmd/cmd-dump.h"
+#include "report.h"
+#include "japanese.h"
+
+ /*
+ * The "highscore" file descriptor, if available.
+ */
+int highscore_fd = -1;
/*!
* @brief i番目のスコア情報にバッファ位置をシークする / Seek score 'i' in the highscore file
return (fd_write(highscore_fd, (char*)(score), sizeof(high_score)));
}
+
/*!
* @brief スコア情報を全て得るまで繰り返し取得する / Just determine where a new score *would* be placed
* @param score スコア情報参照ポインタ
*/
static int highscore_where(high_score *score)
{
- int i;
-
- high_score the_score;
- int my_score;
-
- my_score = atoi(score->pts);
-
/* Paranoia -- it may not have opened */
- if (highscore_fd < 0) return (-1);
+ if (highscore_fd < 0) return -1;
/* Go to the start of the highscore file */
- if (highscore_seek(0)) return (-1);
+ if (highscore_seek(0)) return -1;
/* Read until we get to a higher score */
- for (i = 0; i < MAX_HISCORES; i++)
+ high_score the_score;
+ int my_score = atoi(score->pts);
+ for (int i = 0; i < MAX_HISCORES; i++)
{
int old_score;
if (highscore_read(&the_score)) return (i);
old_score = atoi(the_score.pts);
-/* if (strcmp(the_score.pts, score->pts) < 0) return (i); */
if (my_score > old_score) return (i);
}
/* The "last" entry is always usable */
- return (MAX_HISCORES - 1);
+ return MAX_HISCORES - 1;
}
*/
static int highscore_add(high_score *score)
{
- int i, slot;
- bool done = FALSE;
-
- high_score the_score, tmpscore;
-
-
/* Paranoia -- it may not have opened */
- if (highscore_fd < 0) return (-1);
+ if (highscore_fd < 0) return -1;
/* Determine where the score should go */
- slot = highscore_where(score);
+ int slot = highscore_where(score);
/* Hack -- Not on the list */
- if (slot < 0) return (-1);
+ if (slot < 0) return -1;
/* Hack -- prepare to dump the new score */
- the_score = (*score);
+ high_score the_score = (*score);
/* Slide all the scores down one */
- for (i = slot; !done && (i < MAX_HISCORES); i++)
+ bool done = FALSE;
+ high_score tmpscore;
+ for (int i = slot; !done && (i < MAX_HISCORES); i++)
{
/* Read the old guy, note errors */
- if (highscore_seek(i)) return (-1);
+ if (highscore_seek(i)) return -1;
if (highscore_read(&tmpscore)) done = TRUE;
/* Back up and dump the score we were holding */
- if (highscore_seek(i)) return (-1);
- if (highscore_write(&the_score)) return (-1);
+ if (highscore_seek(i)) return -1;
+ if (highscore_write(&the_score)) return -1;
/* Hack -- Save the old score, for the next pass */
the_score = tmpscore;
}
/* Return location used */
- return (slot);
+ return slot;
}
-
/*!
* @brief 指定された順位範囲でスコアを並べて表示する / Display the scores in a given range.
* @param from 順位先頭
void display_scores(int from, int to)
{
char buf[1024];
-
- /* Build the filename */
path_build(buf, sizeof(buf), ANGBAND_DIR_APEX, "scores.raw");
/* Open the binary high score file, for reading */
/*!
+ * todo プリプロが邪魔していて最初のif文を削除すると到達不能コードが発生する
* @brief スコアサーバへの転送処理
+ * @param current_player_ptr プレーヤーへの参照ポインタ
* @param do_send 実際に転送ア処置を行うか否か
* @return 転送が成功したらTRUEを返す
*/
-bool send_world_score(bool do_send)
+bool send_world_score(player_type *current_player_ptr, bool do_send, void(*update_playtime)(void), display_player_pf display_player, map_name_pf map_name)
{
#ifdef WORLD_SCORE
- if(send_score && do_send)
+ if (send_score && do_send)
{
- if(easy_band)
+ if (easy_band)
{
msg_print(_("初心者モードではワールドスコアに登録できません。",
- "Since you are in the Easy Mode, you cannot send score to world score server."));
- }
- else if(get_check_strict(_("スコアをスコア・サーバに登録しますか? ", "Do you send score to the world score sever? "),
- (CHECK_NO_ESCAPE | CHECK_NO_HISTORY)))
- {
- errr err;
- prt("",0,0);
- prt(_("送信中..", "Sending..."),0,0);
- Term_fresh();
- screen_save();
- err = report_score();
- screen_load();
- if (err)
- {
- return FALSE;
- }
- prt(_("完了。何かキーを押してください。", "Completed. Hit any key."), 0, 0);
- (void)inkey();
+ "Since you are in the Easy Mode, you cannot send score to world score server."));
+ return TRUE;
}
- else return FALSE;
+
+ bool is_registration = get_check_strict(_("スコアをスコア・サーバに登録しますか? ", "Do you send score to the world score server? "), (CHECK_NO_ESCAPE | CHECK_NO_HISTORY));
+ if (!is_registration) return FALSE;
+
+ errr err;
+ prt("", 0, 0);
+ prt(_("送信中..", "Sending..."), 0, 0);
+ Term_fresh();
+ screen_save();
+ err = report_score(current_player_ptr, update_playtime, display_player, map_name);
+ screen_load();
+ if (err) return FALSE;
+
+ prt(_("完了。何かキーを押してください。", "Completed. Hit any key."), 0, 0);
+ (void)inkey();
}
#endif
return TRUE;
}
+
/*!
* @brief スコアの過去二十位内ランキングを表示する
* Enters a players name on a hi-score table, if "legal", and in any
* case, displays some relevant portion of the high score list.
+ * @param current_player_ptr スコアに適用するための現在プレイヤークリーチャー参照ポインタ
* @return エラーコード
* @details
* Assumes "signals_ignore_tstp()" has been called.
*/
-errr top_twenty(void)
+errr top_twenty(player_type *current_player_ptr)
{
- int j;
-
- high_score the_score;
-
- time_t ct = time((time_t*)0);
-
- errr err;
-
- /* Clear the record */
+ high_score the_score;
(void)WIPE(&the_score, high_score);
/* Save the version */
FAKE_VER_MAJOR, FAKE_VER_MINOR, FAKE_VER_PATCH);
/* Calculate and save the points */
- sprintf(the_score.pts, "%9ld", (long)total_points());
+ sprintf(the_score.pts, "%9ld", (long)calc_score(current_player_ptr));
the_score.pts[9] = '\0';
/* Save the current gold */
- sprintf(the_score.gold, "%9lu", (long)p_ptr->au);
+ sprintf(the_score.gold, "%9lu", (long)current_player_ptr->au);
the_score.gold[9] = '\0';
/* Save the current turn */
- sprintf(the_score.turns, "%9lu", (long)turn_real(turn));
+ sprintf(the_score.turns, "%9lu", (long)turn_real(current_player_ptr, current_world_ptr->game_turn));
the_score.turns[9] = '\0';
-#ifdef HIGHSCORE_DATE_HACK
- /* Save the date in a hacked up form (9 chars) */
- (void)sprintf(the_score.day, "%-.6s %-.2s", ctime(&ct) + 4, ctime(&ct) + 22);
-#else
- /* Save the date in standard form (8 chars) */
-/* (void)strftime(the_score.day, 9, "%m/%d/%y", localtime(&ct)); */
+ time_t ct = time((time_t*)0);
+
/* Save the date in standard encoded form (9 chars) */
strftime(the_score.day, 10, "@%Y%m%d", localtime(&ct));
-#endif
/* Save the player name (15 chars) */
- sprintf(the_score.who, "%-.15s", p_ptr->name);
+ sprintf(the_score.who, "%-.15s", current_player_ptr->name);
/* Save the player info */
- sprintf(the_score.uid, "%7u", player_uid);
- sprintf(the_score.sex, "%c", (p_ptr->psex ? 'm' : 'f'));
- sprintf(the_score.p_r, "%2d", MIN(p_ptr->prace, MAX_RACES));
- sprintf(the_score.p_c, "%2d", MIN(p_ptr->pclass, MAX_CLASS));
- sprintf(the_score.p_a, "%2d", MIN(p_ptr->pseikaku, MAX_SEIKAKU));
+ sprintf(the_score.uid, "%7u", current_player_ptr->player_uid);
+ sprintf(the_score.sex, "%c", (current_player_ptr->psex ? 'm' : 'f'));
+ sprintf(the_score.p_r, "%2d", MIN(current_player_ptr->prace, MAX_RACES));
+ sprintf(the_score.p_c, "%2d", MIN(current_player_ptr->pclass, MAX_CLASS));
+ sprintf(the_score.p_a, "%2d", MIN(current_player_ptr->pseikaku, MAX_SEIKAKU));
/* Save the level and such */
- sprintf(the_score.cur_lev, "%3d", MIN((u16b)p_ptr->lev, 999));
- sprintf(the_score.cur_dun, "%3d", (int)dun_level);
- sprintf(the_score.max_lev, "%3d", MIN((u16b)p_ptr->max_plv, 999));
- sprintf(the_score.max_dun, "%3d", (int)max_dlv[dungeon_type]);
+ sprintf(the_score.cur_lev, "%3d", MIN((u16b)current_player_ptr->lev, 999));
+ sprintf(the_score.cur_dun, "%3d", (int)current_player_ptr->current_floor_ptr->dun_level);
+ sprintf(the_score.max_lev, "%3d", MIN((u16b)current_player_ptr->max_plv, 999));
+ sprintf(the_score.max_dun, "%3d", (int)max_dlv[current_player_ptr->dungeon_idx]);
/* Save the cause of death (31 chars) */
- if (strlen(p_ptr->died_from) >= sizeof(the_score.how))
+ if (strlen(current_player_ptr->died_from) >= sizeof(the_score.how))
{
#ifdef JP
- my_strcpy(the_score.how, p_ptr->died_from, sizeof(the_score.how) - 2);
+ my_strcpy(the_score.how, current_player_ptr->died_from, sizeof(the_score.how) - 2);
strcat(the_score.how, "…");
#else
- my_strcpy(the_score.how, p_ptr->died_from, sizeof(the_score.how) - 3);
+ my_strcpy(the_score.how, current_player_ptr->died_from, sizeof(the_score.how) - 3);
strcat(the_score.how, "...");
#endif
}
else
{
- strcpy(the_score.how, p_ptr->died_from);
+ strcpy(the_score.how, current_player_ptr->died_from);
}
/* Grab permissions */
safe_setuid_grab();
/* Lock (for writing) the highscore file, or fail */
- err = fd_lock(highscore_fd, F_WRLCK);
+ errr err = fd_lock(highscore_fd, F_WRLCK);
/* Drop permissions */
safe_setuid_drop();
- if (err) return (1);
+ if (err) return 1;
/* Add a new entry to the score list, see where it went */
- j = highscore_add(&the_score);
+ int j = highscore_add(&the_score);
/* Grab permissions */
safe_setuid_grab();
/* Drop permissions */
safe_setuid_drop();
- if (err) return (1);
-
+ if (err) return 1;
/* Hack -- Display the top fifteen scores */
if (j < 10)
{
display_scores_aux(0, 15, j, NULL);
+ return 0;
}
/* Display the scores surrounding the player */
- else
- {
- display_scores_aux(0, 5, j, NULL);
- display_scores_aux(j - 2, j + 7, j, NULL);
- }
-
-
- /* Success */
- return (0);
+ display_scores_aux(0, 5, j, NULL);
+ display_scores_aux(j - 2, j + 7, j, NULL);
+ return 0;
}
+
/*!
* @brief プレイヤーの現在のスコアをランキングに挟む /
* Predict the players location, and display it.
* @return エラーコード
*/
-errr predict_score(void)
+errr predict_score(player_type *current_player_ptr)
{
- int j;
-
- high_score the_score;
-
+ high_score the_score;
/* No score file */
if (highscore_fd < 0)
{
msg_print(_("スコア・ファイルが使用できません。", "Score file unavailable."));
msg_print(NULL);
- return (0);
+ return 0;
}
-
/* Save the version */
sprintf(the_score.what, "%u.%u.%u",
FAKE_VER_MAJOR, FAKE_VER_MINOR, FAKE_VER_PATCH);
/* Calculate and save the points */
- sprintf(the_score.pts, "%9ld", (long)total_points());
+ sprintf(the_score.pts, "%9ld", (long)calc_score(current_player_ptr));
/* Save the current gold */
- sprintf(the_score.gold, "%9lu", (long)p_ptr->au);
+ sprintf(the_score.gold, "%9lu", (long)current_player_ptr->au);
/* Save the current turn */
- sprintf(the_score.turns, "%9lu", (long)turn_real(turn));
+ sprintf(the_score.turns, "%9lu", (long)turn_real(current_player_ptr, current_world_ptr->game_turn));
/* Hack -- no time needed */
strcpy(the_score.day, _("今日", "TODAY"));
/* Save the player name (15 chars) */
- sprintf(the_score.who, "%-.15s", p_ptr->name);
+ sprintf(the_score.who, "%-.15s", current_player_ptr->name);
/* Save the player info */
- sprintf(the_score.uid, "%7u", player_uid);
- sprintf(the_score.sex, "%c", (p_ptr->psex ? 'm' : 'f'));
- sprintf(the_score.p_r, "%2d", MIN(p_ptr->prace, MAX_RACES));
- sprintf(the_score.p_c, "%2d", MIN(p_ptr->pclass, MAX_CLASS));
- sprintf(the_score.p_a, "%2d", MIN(p_ptr->pseikaku, MAX_SEIKAKU));
+ sprintf(the_score.uid, "%7u", current_player_ptr->player_uid);
+ sprintf(the_score.sex, "%c", (current_player_ptr->psex ? 'm' : 'f'));
+ sprintf(the_score.p_r, "%2d", MIN(current_player_ptr->prace, MAX_RACES));
+ sprintf(the_score.p_c, "%2d", MIN(current_player_ptr->pclass, MAX_CLASS));
+ sprintf(the_score.p_a, "%2d", MIN(current_player_ptr->pseikaku, MAX_SEIKAKU));
/* Save the level and such */
- sprintf(the_score.cur_lev, "%3d", MIN((u16b)p_ptr->lev, 999));
- sprintf(the_score.cur_dun, "%3d", (int)dun_level);
- sprintf(the_score.max_lev, "%3d", MIN((u16b)p_ptr->max_plv, 999));
- sprintf(the_score.max_dun, "%3d", (int)max_dlv[dungeon_type]);
+ sprintf(the_score.cur_lev, "%3d", MIN((u16b)current_player_ptr->lev, 999));
+ sprintf(the_score.cur_dun, "%3d", (int)current_player_ptr->current_floor_ptr->dun_level);
+ sprintf(the_score.max_lev, "%3d", MIN((u16b)current_player_ptr->max_plv, 999));
+ sprintf(the_score.max_dun, "%3d", (int)max_dlv[current_player_ptr->dungeon_idx]);
/* Hack -- no cause of death */
/* まだ死んでいないときの識別文字 */
strcpy(the_score.how, _("yet", "nobody (yet!)"));
/* See where the entry would be placed */
- j = highscore_where(&the_score);
-
+ int j = highscore_where(&the_score);
/* Hack -- Display the top fifteen scores */
if (j < 10)
{
display_scores_aux(0, 15, j, &the_score);
+ return 0;
}
- /* Display some "useful" scores */
- else
- {
- display_scores_aux(0, 5, -1, NULL);
- display_scores_aux(j - 2, j + 7, j, &the_score);
- }
-
-
- /* Success */
- return (0);
+ display_scores_aux(0, 5, -1, NULL);
+ display_scores_aux(j - 2, j + 7, j, &the_score);
+ return 0;
}
* show_highclass - selectively list highscores based on class -KMW-
* @return なし
*/
-void show_highclass(void)
+void show_highclass(player_type *current_player_ptr)
{
-
- register int i = 0, j, m = 0;
- int pr;
- PLAYER_LEVEL clev/*, al*/;
- high_score the_score;
- char buf[1024], out_val[256];
-
screen_save();
-
- /* Build the filename */
+ char buf[1024], out_val[256];
path_build(buf, sizeof(buf), ANGBAND_DIR_APEX, "scores.raw");
highscore_fd = fd_open(buf, O_RDONLY);
if (highscore_seek(0)) return;
- for (i = 0; i < MAX_HISCORES; i++)
+ high_score the_score;
+ for (int i = 0; i < MAX_HISCORES; i++)
if (highscore_read(&the_score)) break;
- m = 0;
- j = 0;
- clev = 0;
-
+ int m = 0;
+ int j = 0;
+ PLAYER_LEVEL clev = 0;
+ int pr;
while ((m < 9) && (j < MAX_HISCORES))
{
if (highscore_seek(j)) break;
#ifdef JP
sprintf(out_val, "あなた) %sの%s (レベル %2d)",
- race_info[p_ptr->prace].title,p_ptr->name, p_ptr->lev);
+ race_info[current_player_ptr->prace].title,current_player_ptr->name, current_player_ptr->lev);
#else
sprintf(out_val, "You) %s the %s (Level %2d)",
- p_ptr->name, race_info[p_ptr->prace].title, p_ptr->lev);
+ current_player_ptr->name, race_info[current_player_ptr->prace].title, current_player_ptr->lev);
#endif
prt(out_val, (m + 8), 0);
screen_load();
}
+
/*!
* @brief スコアランキングの簡易表示(種族毎)サブルーチン /
* Race Legends -KMW-
* @param race_num 種族ID
* @return なし
*/
-void race_score(int race_num)
+void race_score(player_type *current_player_ptr, int race_num)
{
register int i = 0, j, m = 0;
int pr, clev, lastlev;
sprintf(tmp_str,_("最高の%s", "The Greatest of all the %s"), race_info[race_num].title);
prt(tmp_str, 5, 15);
-
- /* Build the filename */
path_build(buf, sizeof(buf), ANGBAND_DIR_APEX, "scores.raw");
highscore_fd = fd_open(buf, O_RDONLY);
}
/* add player if qualified */
- if ((p_ptr->prace == race_num) && (p_ptr->lev >= lastlev))
+ if ((current_player_ptr->prace == race_num) && (current_player_ptr->lev >= lastlev))
{
#ifdef JP
sprintf(out_val, "あなた) %sの%s (レベル %2d)",
- race_info[p_ptr->prace].title,p_ptr->name, p_ptr->lev);
+ race_info[current_player_ptr->prace].title,current_player_ptr->name, current_player_ptr->lev);
#else
sprintf(out_val, "You) %s the %s (Level %3d)",
- p_ptr->name, race_info[p_ptr->prace].title, p_ptr->lev);
+ current_player_ptr->name, race_info[current_player_ptr->prace].title, current_player_ptr->lev);
#endif
prt(out_val, (m + 8), 0);
* Race Legends -KMW-
* @return なし
*/
-void race_legends(void)
+void race_legends(player_type *current_player_ptr)
{
- int i, j;
-
- for (i = 0; i < MAX_RACES; i++)
+ for (int i = 0; i < MAX_RACES; i++)
{
- race_score(i);
+ race_score(current_player_ptr, i);
msg_print(_("何かキーを押すとゲームに戻ります", "Hit any key to continue"));
msg_print(NULL);
- for (j = 5; j < 19; j++)
+ for (int j = 5; j < 19; j++)
prt("", j, 0);
}
}
+
/*!
* @brief 勝利者用の引退演出処理 /
* Change the player into a King! -RAK-
* @return なし
*/
-void kingly(void)
+void kingly(player_type *winner_ptr)
{
TERM_LEN wid, hgt;
TERM_LEN cx, cy;
- bool seppuku = streq(p_ptr->died_from, "Seppuku");
+ bool seppuku = streq(winner_ptr->died_from, "Seppuku");
/* Hack -- retire in town */
- dun_level = 0;
+ winner_ptr->current_floor_ptr->dun_level = 0;
/* Fake death */
if (!seppuku)
/* 引退したときの識別文字 */
- (void)strcpy(p_ptr->died_from, _("ripe", "Ripe Old Age"));
+ (void)strcpy(winner_ptr->died_from, _("ripe", "Ripe Old Age"));
/* Restore the experience */
- p_ptr->exp = p_ptr->max_exp;
+ winner_ptr->exp = winner_ptr->max_exp;
/* Restore the level */
- p_ptr->lev = p_ptr->max_plv;
+ winner_ptr->lev = winner_ptr->max_plv;
Term_get_size(&wid, &hgt);
cy = hgt / 2;
cx = wid / 2;
/* Hack -- Instant Gold */
- p_ptr->au += 10000000L;
+ winner_ptr->au += 10000000L;
Term_clear();
/* Display a crown */
/* If player did Seppuku, that is already written in playrecord */
if (!seppuku)
{
- do_cmd_write_nikki(NIKKI_BUNSHOU, 0, _("ダンジョンの探索から引退した。", "retired exploring dungeons."));
- do_cmd_write_nikki(NIKKI_GAMESTART, 1, _("-------- ゲームオーバー --------", "-------- Game Over --------"));
- do_cmd_write_nikki(NIKKI_BUNSHOU, 1, "\n\n\n\n");
+ exe_write_diary(winner_ptr, DIARY_DESCRIPTION, 0, _("ダンジョンの探索から引退した。", "retired exploring dungeons."));
+ exe_write_diary(winner_ptr, DIARY_GAMESTART, 1, _("-------- ゲームオーバー --------", "-------- Game Over --------"));
+ exe_write_diary(winner_ptr, DIARY_DESCRIPTION, 1, "\n\n\n\n");
}
/* Flush input */
/* Wait for response */
pause_line(hgt - 1);
}
+
+
+/*!
+ * @brief スコアファイル出力
+ * Display some character info
+ * @return なし
+ */
+bool check_score(player_type *current_player_ptr)
+{
+ Term_clear();
+
+ /* No score file */
+ if (highscore_fd < 0)
+ {
+ msg_print(_("スコア・ファイルが使用できません。", "Score file unavailable."));
+ msg_print(NULL);
+ return FALSE;
+ }
+
+ /* Wizard-mode pre-empts scoring */
+ if (current_world_ptr->noscore & 0x000F)
+ {
+ msg_print(_("ウィザード・モードではスコアが記録されません。", "Score not registered for wizards."));
+ msg_print(NULL);
+ return FALSE;
+ }
+
+ /* Cheaters are not scored */
+ if (current_world_ptr->noscore & 0xFF00)
+ {
+ msg_print(_("詐欺をやった人はスコアが記録されません。", "Score not registered for cheaters."));
+ msg_print(NULL);
+ return FALSE;
+ }
+
+ /* Interupted */
+ if (!current_world_ptr->total_winner && streq(current_player_ptr->died_from, _("強制終了", "Interrupting")))
+ {
+ msg_print(_("強制終了のためスコアが記録されません。", "Score not registered due to interruption."));
+ msg_print(NULL);
+ return FALSE;
+ }
+
+ /* Quitter */
+ if (!current_world_ptr->total_winner && streq(current_player_ptr->died_from, _("途中終了", "Quitting")))
+ {
+ msg_print(_("途中終了のためスコアが記録されません。", "Score not registered due to quitting."));
+ msg_print(NULL);
+ return FALSE;
+ }
+ return TRUE;
+}