X-Git-Url: https://git.artsoft.org/?a=blobdiff_plain;f=src%2Ffiles.c;h=fab3df37653d139a61b68d0b52aa39e09c306e5a;hb=963345fd2614535471086111e64eded2cd9818e4;hp=afccc4a6a295f795d24171be61cf6ad705246e5d;hpb=cb7f26a8df21868e53ba10fbf8815cf402c6603a;p=rocksndiamonds.git

diff --git a/src/files.c b/src/files.c
index afccc4a6..fab3df37 100644
--- a/src/files.c
+++ b/src/files.c
@@ -8476,8 +8476,17 @@ void DumpTape(struct TapeInfo *tape)
     Print("[tas_keys]");
   if (tape->property_bits & TAPE_PROPERTY_SMALL_GRAPHICS)
     Print("[small_graphics]");
-
   Print("\n");
+
+  int year2 = tape->date / 10000;
+  int year4 = (year2 < 70 ? 2000 + year2 : 1900 + year2);
+  int month_index_raw = (tape->date / 100) % 100;
+  int month_index = month_index_raw % 12;	// prevent invalid index
+  int month = month_index + 1;
+  int day = tape->date % 100;
+
+  Print("Tape date: %04d-%02d-%02d\n", year4, month, day);
+
   PrintLine("-", 79);
 
   tape_frame_counter = 0;