Aggravate a monster if a flirt or gift was unsuccessful.

[rogue-pphs.git] / rip.c

diff --git a/rip.c b/rip.c
index e7c8edb..5c5accd 100644 (file)
--- a/rip.c
+++ b/rip.c
@@ -4,7 +4,7 @@
  *\r
  * @(#)rip.c   3.13 (Berkeley) 6/16/81\r
  *\r
- * Rogue: Exploring the Dungeons of Doom\r
+ * Rogue: Exploring the Cavern of Cuties\r
  * Copyright (C) 1980, 1981 Michael Toy, Ken Arnold and Glenn Wichman\r
  * All rights reserved.\r
  *\r
@@ -198,7 +198,7 @@ char monst;
     printf("Top Ten Adventurers:\nRank\tScore\tName\n");\r
     for (scp = top_ten; scp <= &top_ten[9]; scp++) {\r
        if (scp->sc_score) {\r
-           printf("%ld\t%d\t%s: %s on level %d", scp - top_ten + 1,\r
+           printf("%d\t%d\t%s: %s on level %d", (int)(scp - top_ten + 1),\r
                scp->sc_score, scp->sc_name, reason[scp->sc_flags],\r
                scp->sc_level);\r
            if (scp->sc_flags == 0) {\r
@@ -389,6 +389,12 @@ char monster;
     }\r
     mvprintw(c - 'a' + 1, 0,"   %5d  Gold Peices          ", oldpurse);\r
     refresh();\r
+    if (monster)\r
+    {\r
+        purse += 10 * monsters[monster - 'A'].m_stats.s_exp;\r
+        mvprintw(c - 'a' + 1, 0, "and one cute %s (priceless)",\r
+                 monsters[monster - 'A'].m_name);\r
+    }\r
     score(purse, flags, monster);\r
     getch();\r
     endwin();\r