Changeset 285

Timestamp:

07/05/07 15:55:35 (1 year ago)

Author:

ajps

Message:

Add ability to create gold with debug commands. Allow normal gold pickup when gold has not been 'seen'. Closes #201.

Files:

• trunk/src/cmd1.c (modified) (1 diff)
• trunk/src/wizard2.c (modified) (2 diffs)

trunk/src/cmd1.c

@@ -521 +521 @@
-                /* Get the next object */
-                next_o_idx = o_ptr->next_o_idx;
-
-                /* Ignore all hidden objects */
-                if (!o_ptr->marked) continue;
-
-                /* Ignore if not legal treasure */

trunk/src/wizard2.c

@@ -409 +409 @@
-        { TV_BOTTLE,            "Empty bottle"         },
-        { TV_JUNK,              "Junk"                 },
+        { TV_GOLD,              "Gold"                 },
-        { 0,                    NULL                   }
-};
@@ -1026 +1027 @@
-        /* Apply magic (no messages, no artifacts) */
-        apply_magic(i_ptr, p_ptr->depth, FALSE, FALSE, FALSE);
+
+        if (k_info[k_idx].tval == TV_GOLD)
+        {
+                /* Hack -- Base coin cost */
+                s32b base = k_info[k_idx].cost;
+
+                /* Determine how much the treasure is "worth" */
+                i_ptr->pval = (base + (8L * randint(base)) + randint(8));
+        }
-
-        /* Drop the object from heaven */