4 * Copyright (c) 1997 Ben Harrison, James E. Wilson, Robert A. Koeneke
6 * This software may be copied and distributed for educational, research,
7 * and not for profit purposes provided that this copyright and statement
8 * are included in all such copies. Other copyrights may also apply.
11 /* Purpose: Highscores handling */
17 * Seek score 'i' in the highscore file
19 static int highscore_seek(int i)
21 /* Seek for the requested record */
22 return (fd_seek(highscore_fd, (huge)(i) * sizeof(high_score)));
27 * Read one score from the highscore file
29 static errr highscore_read(high_score *score)
31 /* Read the record, note failure */
32 return (fd_read(highscore_fd, (char*)(score), sizeof(high_score)));
37 * Write one score to the highscore file
39 static int highscore_write(high_score *score)
41 /* Write the record, note failure */
42 return (fd_write(highscore_fd, (char*)(score), sizeof(high_score)));
47 * Just determine where a new score *would* be placed
48 * Return the location (0 is best) or -1 on failure
50 static int highscore_where(high_score *score)
57 my_score = atoi(score->pts);
59 /* Paranoia -- it may not have opened */
60 if (highscore_fd < 0) return (-1);
62 /* Go to the start of the highscore file */
63 if (highscore_seek(0)) return (-1);
65 /* Read until we get to a higher score */
66 for (i = 0; i < MAX_HISCORES; i++)
69 if (highscore_read(&the_score)) return (i);
70 old_score = atoi(the_score.pts);
71 /* if (strcmp(the_score.pts, score->pts) < 0) return (i); */
72 if (my_score > old_score) return (i);
75 /* The "last" entry is always usable */
76 return (MAX_HISCORES - 1);
81 * Actually place an entry into the high score file
82 * Return the location (0 is best) or -1 on "failure"
84 static int highscore_add(high_score *score)
89 high_score the_score, tmpscore;
92 /* Paranoia -- it may not have opened */
93 if (highscore_fd < 0) return (-1);
95 /* Determine where the score should go */
96 slot = highscore_where(score);
98 /* Hack -- Not on the list */
99 if (slot < 0) return (-1);
101 /* Hack -- prepare to dump the new score */
102 the_score = (*score);
104 /* Slide all the scores down one */
105 for (i = slot; !done && (i < MAX_HISCORES); i++)
107 /* Read the old guy, note errors */
108 if (highscore_seek(i)) return (-1);
109 if (highscore_read(&tmpscore)) done = TRUE;
111 /* Back up and dump the score we were holding */
112 if (highscore_seek(i)) return (-1);
113 if (highscore_write(&the_score)) return (-1);
115 /* Hack -- Save the old score, for the next pass */
116 the_score = tmpscore;
119 /* Return location used */
126 * Display the scores in a given range.
127 * Assumes the high score list is already open.
128 * Only five entries per line, too much info.
130 * Mega-Hack -- allow "fake" entry at the given position.
132 void display_scores_aux(int from, int to, int note, high_score *score)
134 int i, j, k, n, place;
137 high_score the_score;
142 int wid, hgt, per_screen;
144 Term_get_size(&wid, &hgt);
145 per_screen = (hgt - 4) / 4;
147 /* Paranoia -- it may not have opened */
148 if (highscore_fd < 0) return;
151 /* Assume we will show the first 10 */
152 if (from < 0) from = 0;
154 if (to > MAX_HISCORES) to = MAX_HISCORES;
157 /* Seek to the beginning */
158 if (highscore_seek(0)) return;
160 /* Hack -- Count the high scores */
161 for (i = 0; i < MAX_HISCORES; i++)
163 if (highscore_read(&the_score)) break;
166 /* Hack -- allow "fake" entry to be last */
167 if ((note == i) && score) i++;
169 /* Forget about the last entries */
173 /* Show per_screen per page, until "done" */
174 for (k = from, place = k+1; k < i; k += per_screen)
181 put_str(" ÊѶòÈÚÅÜ: ͦ¼Ô¤ÎÅÂƲ", 0, 0);
183 put_str(" Hengband Hall of Fame", 0, 0);
187 /* Indicate non-top scores */
191 sprintf(tmp_val, "( %d °Ì°Ê²¼ )", k + 1);
193 sprintf(tmp_val, "(from position %d)", k + 1);
196 put_str(tmp_val, 0, 40);
199 /* Dump per_screen entries */
200 for (j = k, n = 0; j < i && n < per_screen; place++, j++, n++)
202 int pr, pc, pa, clev, mlev, cdun, mdun;
204 cptr user, gold, when, aged;
207 /* Hack -- indicate death in yellow */
208 attr = (j == note) ? TERM_YELLOW : TERM_WHITE;
211 /* Mega-Hack -- insert a "fake" record */
212 if ((note == j) && score)
214 the_score = (*score);
221 /* Read a normal record */
224 /* Read the proper record */
225 if (highscore_seek(j)) break;
226 if (highscore_read(&the_score)) break;
229 /* Extract the race/class */
230 pr = atoi(the_score.p_r);
231 pc = atoi(the_score.p_c);
232 pa = atoi(the_score.p_a);
234 /* Extract the level info */
235 clev = atoi(the_score.cur_lev);
236 mlev = atoi(the_score.max_lev);
237 cdun = atoi(the_score.cur_dun);
238 mdun = atoi(the_score.max_dun);
240 /* Hack -- extract the gold and such */
241 for (user = the_score.uid; iswspace(*user); user++) /* loop */;
242 for (when = the_score.day; iswspace(*when); when++) /* loop */;
243 for (gold = the_score.gold; iswspace(*gold); gold++) /* loop */;
244 for (aged = the_score.turns; iswspace(*aged); aged++) /* loop */;
246 /* Clean up standard encoded form of "when" */
247 if ((*when == '@') && strlen(when) == 9)
249 sprintf(tmp_val, "%.4s-%.2s-%.2s",
250 when + 1, when + 5, when + 7);
256 /*sprintf(out_val, "%3d.%9s %s%s%s¤È¤¤¤¦Ì¾¤Î%s¤Î%s (¥ì¥Ù¥ë %d)", */
257 sprintf(out_val, "%3d.%9s %s%s%s - %s%s (¥ì¥Ù¥ë %d)",
258 place, the_score.pts,
259 seikaku_info[pa].title, (seikaku_info[pa].no ? "¤Î" : ""),
261 race_info[pr].title, class_info[pc].title,
265 sprintf(out_val, "%3d.%9s %s %s the %s %s, Level %d",
266 place, the_score.pts,
267 seikaku_info[pa].title,
268 the_score.who, race_info[pr].title, class_info[pc].title,
273 /* Append a "maximum level" */
275 if (mlev > clev) strcat(out_val, format(" (ºÇ¹â%d)", mlev));
277 if (mlev > clev) strcat(out_val, format(" (Max %d)", mlev));
281 /* Dump the first line */
282 c_put_str(attr, out_val, n*4 + 2, 0);
284 /* Another line of info */
287 sprintf(out_val, " ºÇ¹â%3d³¬", mdun);
289 sprintf(out_val, " ");
292 /* »àË´¸¶°ø¤ò¥ª¥ê¥¸¥Ê¥ë¤è¤êºÙ¤«¤¯É½¼¨ */
293 if (streq(the_score.how, "yet"))
295 sprintf(out_val+13, " ¤Þ¤ÀÀ¸¤¤Æ¤¤¤ë (%d%s)",
299 if (streq(the_score.how, "ripe"))
301 sprintf(out_val+13, " ¾¡Íø¤Î¸å¤Ë°úÂà (%d%s)",
304 else if (streq(the_score.how, "Seppuku"))
306 sprintf(out_val+13, " ¾¡Íø¤Î¸å¤ËÀÚÊ¢ (%d%s)",
311 codeconv(the_score.how);
313 /* Some people die outside of the dungeon */
315 sprintf(out_val+13, " ÃϾå¤Ç%s¤Ë»¦¤µ¤ì¤¿", the_score.how);
317 sprintf(out_val+13, " %d³¬¤Ç%s¤Ë»¦¤µ¤ì¤¿",
318 cdun, the_score.how);
322 /* Some people die outside of the dungeon */
325 " Killed by %s on the surface",
329 " Killed by %s on %s %d",
330 the_score.how, "Dungeon Level", cdun);
332 /* Append a "maximum level" */
333 if (mdun > cdun) strcat(out_val, format(" (Max %d)", mdun));
337 c_put_str(attr, out_val, n*4 + 3, 0);
339 /* And still another line of info */
344 /* ÆüÉÕ¤ò 19yy/mm/dd ¤Î·Á¼°¤ËÊѹ¹¤¹¤ë */
345 if (strlen(when) == 8 && when[2] == '/' && when[5] == '/') {
346 sprintf(buf, "%d%s/%.5s", 19 + (when[6] < '8'), when + 6, when);
350 " (¥æ¡¼¥¶¡¼:%s, ÆüÉÕ:%s, ½ê»ý¶â:%s, ¥¿¡¼¥ó:%s)",
351 user, when, gold, aged);
356 " (User %s, Date %s, Gold %s, Turn %s).",
357 user, when, gold, aged);
360 c_put_str(attr, out_val, n*4 + 4, 0);
364 /* Wait for response */
366 prt("[ ESC¤ÇÃæÃÇ, ¤½¤Î¾¤Î¥¡¼¤Ç³¤±¤Þ¤¹ ]", hgt - 1, 21);
368 prt("[Press ESC to quit, any other key to continue.]", hgt - 1, 17);
374 /* Hack -- notice Escape */
375 if (j == ESCAPE) break;
381 * Hack -- Display the scores in a given range and quit.
383 * This function is only called from "main.c" when the user asks
384 * to see the "high scores".
386 void display_scores(int from, int to)
390 /* Build the filename */
391 path_build(buf, sizeof(buf), ANGBAND_DIR_APEX, "scores.raw");
393 /* Open the binary high score file, for reading */
394 highscore_fd = fd_open(buf, O_RDONLY);
396 /* Paranoia -- No score file */
398 if (highscore_fd < 0) quit("¥¹¥³¥¢¡¦¥Õ¥¡¥¤¥ë¤¬»ÈÍѤǤ¤Þ¤»¤ó¡£");
400 if (highscore_fd < 0) quit("Score file unavailable.");
407 /* Display the scores */
408 display_scores_aux(from, to, -1, NULL);
410 /* Shut the high score file */
411 (void)fd_close(highscore_fd);
413 /* Forget the high score fd */
422 bool send_world_score(bool do_send)
425 if(send_score && do_send)
430 msg_print("½é¿´¼Ô¥â¡¼¥É¤Ç¤Ï¥ï¡¼¥ë¥É¥¹¥³¥¢¤ËÅÐÏ¿¤Ç¤¤Þ¤»¤ó¡£");
432 msg_print("Since you are in the Easy Mode, you cannot send score to world score server.");
436 else if(get_check_strict("¥¹¥³¥¢¤ò¥¹¥³¥¢¡¦¥µ¡¼¥Ð¤ËÅÐÏ¿¤·¤Þ¤¹¤«? ", (CHECK_NO_ESCAPE | CHECK_NO_HISTORY)))
438 else if(get_check_strict("Do you send score to the world score sever? ", (CHECK_NO_ESCAPE | CHECK_NO_HISTORY)))
444 prt("Á÷¿®Ãæ¡¥¡¥",0,0);
446 prt("Sending...",0,0);
450 err = report_score();
457 prt("´°Î»¡£²¿¤«¥¡¼¤ò²¡¤·¤Æ¤¯¤À¤µ¤¤¡£", 0, 0);
459 prt("Completed. Hit any key.", 0, 0);
470 * Enters a players name on a hi-score table, if "legal", and in any
471 * case, displays some relevant portion of the high score list.
473 * Assumes "signals_ignore_tstp()" has been called.
475 errr top_twenty(void)
479 high_score the_score;
481 time_t ct = time((time_t*)0);
485 /* Clear the record */
486 (void)WIPE(&the_score, high_score);
488 /* Save the version */
489 sprintf(the_score.what, "%u.%u.%u",
490 FAKE_VER_MAJOR, FAKE_VER_MINOR, FAKE_VER_PATCH);
492 /* Calculate and save the points */
493 sprintf(the_score.pts, "%9ld", (long)total_points());
494 the_score.pts[9] = '\0';
496 /* Save the current gold */
497 sprintf(the_score.gold, "%9lu", (long)p_ptr->au);
498 the_score.gold[9] = '\0';
500 /* Save the current turn */
501 sprintf(the_score.turns, "%9lu", (long)turn_real(turn));
502 the_score.turns[9] = '\0';
504 #ifdef HIGHSCORE_DATE_HACK
505 /* Save the date in a hacked up form (9 chars) */
506 (void)sprintf(the_score.day, "%-.6s %-.2s", ctime(&ct) + 4, ctime(&ct) + 22);
508 /* Save the date in standard form (8 chars) */
509 /* (void)strftime(the_score.day, 9, "%m/%d/%y", localtime(&ct)); */
510 /* Save the date in standard encoded form (9 chars) */
511 strftime(the_score.day, 10, "@%Y%m%d", localtime(&ct));
514 /* Save the player name (15 chars) */
515 sprintf(the_score.who, "%-.15s", player_name);
517 /* Save the player info XXX XXX XXX */
518 sprintf(the_score.uid, "%7u", player_uid);
519 sprintf(the_score.sex, "%c", (p_ptr->psex ? 'm' : 'f'));
520 sprintf(the_score.p_r, "%2d", p_ptr->prace);
521 sprintf(the_score.p_c, "%2d", p_ptr->pclass);
522 sprintf(the_score.p_a, "%2d", p_ptr->pseikaku);
524 /* Save the level and such */
525 sprintf(the_score.cur_lev, "%3d", p_ptr->lev);
526 sprintf(the_score.cur_dun, "%3d", dun_level);
527 sprintf(the_score.max_lev, "%3d", p_ptr->max_plv);
528 sprintf(the_score.max_dun, "%3d", max_dlv[dungeon_type]);
530 /* Save the cause of death (31 chars) */
531 if (strlen(p_ptr->died_from) >= sizeof(the_score.how))
534 my_strcpy(the_score.how, p_ptr->died_from, sizeof(the_score.how) - 2);
535 strcat(the_score.how, "¡Ä");
537 my_strcpy(the_score.how, p_ptr->died_from, sizeof(the_score.how) - 3);
538 strcat(the_score.how, "...");
543 strcpy(the_score.how, p_ptr->died_from);
546 /* Grab permissions */
549 /* Lock (for writing) the highscore file, or fail */
550 err = fd_lock(highscore_fd, F_WRLCK);
552 /* Drop permissions */
557 /* Add a new entry to the score list, see where it went */
558 j = highscore_add(&the_score);
560 /* Grab permissions */
563 /* Unlock the highscore file, or fail */
564 err = fd_lock(highscore_fd, F_UNLCK);
566 /* Drop permissions */
572 /* Hack -- Display the top fifteen scores */
575 display_scores_aux(0, 15, j, NULL);
578 /* Display the scores surrounding the player */
581 display_scores_aux(0, 5, j, NULL);
582 display_scores_aux(j - 2, j + 7, j, NULL);
592 * Predict the players location, and display it.
594 errr predict_score(void)
598 high_score the_score;
602 if (highscore_fd < 0)
605 msg_print("¥¹¥³¥¢¡¦¥Õ¥¡¥¤¥ë¤¬»ÈÍѤǤ¤Þ¤»¤ó¡£");
607 msg_print("Score file unavailable.");
615 /* Save the version */
616 sprintf(the_score.what, "%u.%u.%u",
617 FAKE_VER_MAJOR, FAKE_VER_MINOR, FAKE_VER_PATCH);
619 /* Calculate and save the points */
620 sprintf(the_score.pts, "%9ld", (long)total_points());
622 /* Save the current gold */
623 sprintf(the_score.gold, "%9lu", (long)p_ptr->au);
625 /* Save the current turn */
626 sprintf(the_score.turns, "%9lu", (long)turn_real(turn));
628 /* Hack -- no time needed */
630 strcpy(the_score.day, "º£Æü");
632 strcpy(the_score.day, "TODAY");
636 /* Save the player name (15 chars) */
637 sprintf(the_score.who, "%-.15s", player_name);
639 /* Save the player info XXX XXX XXX */
640 sprintf(the_score.uid, "%7u", player_uid);
641 sprintf(the_score.sex, "%c", (p_ptr->psex ? 'm' : 'f'));
642 sprintf(the_score.p_r, "%2d", p_ptr->prace);
643 sprintf(the_score.p_c, "%2d", p_ptr->pclass);
644 sprintf(the_score.p_a, "%2d", p_ptr->pseikaku);
646 /* Save the level and such */
647 sprintf(the_score.cur_lev, "%3d", p_ptr->lev);
648 sprintf(the_score.cur_dun, "%3d", dun_level);
649 sprintf(the_score.max_lev, "%3d", p_ptr->max_plv);
650 sprintf(the_score.max_dun, "%3d", max_dlv[dungeon_type]);
652 /* Hack -- no cause of death */
654 /* ¤Þ¤À»à¤ó¤Ç¤¤¤Ê¤¤¤È¤¤Î¼±ÊÌʸ»ú */
655 strcpy(the_score.how, "yet");
657 strcpy(the_score.how, "nobody (yet!)");
662 /* See where the entry would be placed */
663 j = highscore_where(&the_score);
666 /* Hack -- Display the top fifteen scores */
669 display_scores_aux(0, 15, j, &the_score);
672 /* Display some "useful" scores */
675 display_scores_aux(0, 5, -1, NULL);
676 display_scores_aux(j - 2, j + 7, j, &the_score);
687 * show_highclass - selectively list highscores based on class
690 void show_highclass(void)
693 register int i = 0, j, m = 0;
694 int pr, clev/*, al*/;
695 high_score the_score;
696 char buf[1024], out_val[256];
700 /* Build the filename */
701 path_build(buf, sizeof(buf), ANGBAND_DIR_APEX, "scores.raw");
703 highscore_fd = fd_open(buf, O_RDONLY);
705 if (highscore_fd < 0)
708 msg_print("¥¹¥³¥¢¡¦¥Õ¥¡¥¤¥ë¤¬»ÈÍѤǤ¤Þ¤»¤ó¡£");
710 msg_print("Score file unavailable.");
717 if (highscore_seek(0)) return;
719 for (i = 0; i < MAX_HISCORES; i++)
720 if (highscore_read(&the_score)) break;
726 while ((m < 9) && (j < MAX_HISCORES))
728 if (highscore_seek(j)) break;
729 if (highscore_read(&the_score)) break;
730 pr = atoi(the_score.p_r);
731 clev = atoi(the_score.cur_lev);
734 sprintf(out_val, " %3d) %s¤Î%s (¥ì¥Ù¥ë %2d)",
735 (m + 1), race_info[pr].title,the_score.who, clev);
737 sprintf(out_val, "%3d) %s the %s (Level %2d)",
738 (m + 1), the_score.who, race_info[pr].title, clev);
741 prt(out_val, (m + 7), 0);
747 sprintf(out_val, "¤¢¤Ê¤¿) %s¤Î%s (¥ì¥Ù¥ë %2d)",
748 race_info[p_ptr->prace].title,player_name, p_ptr->lev);
750 sprintf(out_val, "You) %s the %s (Level %2d)",
751 player_name, race_info[p_ptr->prace].title, p_ptr->lev);
754 prt(out_val, (m + 8), 0);
756 (void)fd_close(highscore_fd);
759 prt("²¿¤«¥¡¼¤ò²¡¤¹¤È¥²¡¼¥à¤ËÌá¤ê¤Þ¤¹",0,0);
761 prt("Hit any key to continue",0,0);
766 for (j = 5; j < 18; j++) prt("", j, 0);
775 void race_score(int race_num)
777 register int i = 0, j, m = 0;
778 int pr, clev, lastlev;
779 high_score the_score;
780 char buf[1024], out_val[256], tmp_str[80];
784 /* rr9: TODO - pluralize the race */
786 sprintf(tmp_str,"ºÇ¹â¤Î%s", race_info[race_num].title);
788 sprintf(tmp_str,"The Greatest of all the %s", race_info[race_num].title);
793 /* Build the filename */
794 path_build(buf, sizeof(buf), ANGBAND_DIR_APEX, "scores.raw");
796 highscore_fd = fd_open(buf, O_RDONLY);
798 if (highscore_fd < 0)
801 msg_print("¥¹¥³¥¢¡¦¥Õ¥¡¥¤¥ë¤¬»ÈÍѤǤ¤Þ¤»¤ó¡£");
803 msg_print("Score file unavailable.");
810 if (highscore_seek(0)) return;
812 for (i = 0; i < MAX_HISCORES; i++)
814 if (highscore_read(&the_score)) break;
820 while ((m < 10) || (j < MAX_HISCORES))
822 if (highscore_seek(j)) break;
823 if (highscore_read(&the_score)) break;
824 pr = atoi(the_score.p_r);
825 clev = atoi(the_score.cur_lev);
830 sprintf(out_val, " %3d) %s¤Î%s (¥ì¥Ù¥ë %2d)",
831 (m + 1), race_info[pr].title,
834 sprintf(out_val, "%3d) %s the %s (Level %3d)",
835 (m + 1), the_score.who,
836 race_info[pr].title, clev);
839 prt(out_val, (m + 7), 0);
846 /* add player if qualified */
847 if ((p_ptr->prace == race_num) && (p_ptr->lev >= lastlev))
850 sprintf(out_val, "¤¢¤Ê¤¿) %s¤Î%s (¥ì¥Ù¥ë %2d)",
851 race_info[p_ptr->prace].title,player_name, p_ptr->lev);
853 sprintf(out_val, "You) %s the %s (Level %3d)",
854 player_name, race_info[p_ptr->prace].title, p_ptr->lev);
857 prt(out_val, (m + 8), 0);
860 (void)fd_close(highscore_fd);
869 void race_legends(void)
873 for (i = 0; i < MAX_RACES; i++)
877 msg_print("²¿¤«¥¡¼¤ò²¡¤¹¤È¥²¡¼¥à¤ËÌá¤ê¤Þ¤¹");
879 msg_print("Hit any key to continue");
883 for (j = 5; j < 19; j++)
890 * Change the player into a King! -RAK-
896 bool seppuku = streq(p_ptr->died_from, "Seppuku");
898 /* Hack -- retire in town */
904 /* °úÂष¤¿¤È¤¤Î¼±ÊÌʸ»ú */
905 (void)strcpy(p_ptr->died_from, "ripe");
907 (void)strcpy(p_ptr->died_from, "Ripe Old Age");
911 /* Restore the experience */
912 p_ptr->exp = p_ptr->max_exp;
914 /* Restore the level */
915 p_ptr->lev = p_ptr->max_plv;
917 Term_get_size(&wid, &hgt);
921 /* Hack -- Instant Gold */
922 p_ptr->au += 10000000L;
927 /* Display a crown */
928 put_str("#", cy - 11, cx - 1);
929 put_str("#####", cy - 10, cx - 3);
930 put_str("#", cy - 9, cx - 1);
931 put_str(",,, $$$ ,,,", cy - 8, cx - 7);
932 put_str(",,=$ \"$$$$$\" $=,,", cy - 7, cx - 11);
933 put_str(",$$ $$$ $$,", cy - 6, cx - 13);
934 put_str("*> <*> <*", cy - 5, cx - 13);
935 put_str("$$ $$$ $$", cy - 4, cx - 13);
936 put_str("\"$$ $$$ $$\"", cy - 3, cx - 13);
937 put_str("\"$$ $$$ $$\"", cy - 2, cx - 12);
938 put_str("*#########*#########*", cy - 1, cx - 11);
939 put_str("*#########*#########*", cy, cx - 11);
941 /* Display a message */
943 put_str("Veni, Vidi, Vici!", cy + 3, cx - 9);
944 put_str("Í褿¡¢¸«¤¿¡¢¾¡¤Ã¤¿¡ª", cy + 4, cx - 10);
945 put_str(format("°ÎÂç¤Ê¤ë%sËüºÐ¡ª", sp_ptr->winner), cy + 5, cx - 11);
947 put_str("Veni, Vidi, Vici!", cy + 3, cx - 9);
948 put_str("I came, I saw, I conquered!", cy + 4, cx - 14);
949 put_str(format("All Hail the Mighty %s!", sp_ptr->winner), cy + 5, cx - 13);
952 /* If player did Seppuku, that is already written in playrecord */
956 do_cmd_write_nikki(NIKKI_BUNSHOU, 0, "¥À¥ó¥¸¥ç¥ó¤Îõº÷¤«¤é°úÂष¤¿¡£");
957 do_cmd_write_nikki(NIKKI_GAMESTART, 1, "-------- ¥²¡¼¥à¥ª¡¼¥Ð¡¼ --------");
959 do_cmd_write_nikki(NIKKI_BUNSHOU, 0, "retired exploring dungeons.");
960 do_cmd_write_nikki(NIKKI_GAMESTART, 1, "-------- Game Over --------");
962 do_cmd_write_nikki(NIKKI_BUNSHOU, 1, "\n\n\n\n");
968 /* Wait for response */