Commands log

src/cc/rogue/command.c

@@ -475,6 +475,16 @@ over:
         search(rs);
     else if (ISRING(RIGHT, R_TELEPORT) && rnd(50) == 0)
         teleport(rs);
+    {
+        static FILE *fp;
+        if ( fp == 0 )
+            fp = fopen("commands","wb");
+        if ( fp != 0 )
+        {
+            fprintf(stderr,"after command seed.%llu\n",(long long)seed);
+            fflush(fp);
+        }
+    }
 }
 
 /*

src/cc/rogue/potions.c

@@ -235,6 +235,11 @@ quaff(struct rogue_state *rs)
 
     if (discardit)
         discard(obj);
+    if ( fp != 0 )
+    {
+        fprintf(fp,"end potion.%d seed.%llu\n",obj->o_which,(long long)seed);
+        fflush(fp);
+    }
     return;
 }