diff --git a/src/pickup.c b/src/pickup.c
index 1d621b48c..0fa4e65cc 100644
--- a/src/pickup.c
+++ b/src/pickup.c
@@ -1818,10 +1818,13 @@ reverse_loot()
                 boxdummy = zeroobj, boxdummy.otyp = SPE_WIZARD_LOCK;
                 (void) boxlock(coffers, &boxdummy);
             }
-        } else if ((mon = makemon(courtmon(), x, y, NO_MM_FLAGS)) != 0) {
+        } else if (levl[x][y].looted != T_LOOTED &&
+                   (mon = makemon(courtmon(), x, y, NO_MM_FLAGS)) != 0) {
             freeinv(goldob);
             add_to_minv(mon, goldob);
             pline("The exchequer accepts your contribution.");
+            if (!rn2(10))
+                levl[x][y].looted = T_LOOTED;
         } else {
             You("drop %s.", doname(goldob));
             dropx(goldob);