rnd-20050314-1-src
[rocksndiamonds.git] / src / game_em / convert.c
index 8fd194a90c069c9c6186a7353e0b34447244d817..6aac3b7d4db789b8f3d711a78096906f65658436 100644 (file)
@@ -8,76 +8,84 @@
  * inconsequential, but no doubt it will break some caves.
  */
 
+#include "global.h"
 #include "tile.h"
 #include "level.h"
 
 
-#if defined(TARGET_X11)
-
 static unsigned char remap_v6[256] =
 {
   /* filter crap for v6 */
 
-  0,0,2,2,4,4,118,118,8,9,10,11,12,13,14,15,
-  16,16,18,18,20,21,22,23,24,25,26,27,28,28,118,28,
-  0,16,2,18,36,37,37,37,40,41,42,43,44,45,128,128,
-  128,148,148,148,45,45,45,148,0,57,58,59,60,61,62,63,
-  64,65,66,67,68,69,69,69,69,73,74,75,118,75,75,75,
-  75,75,75,75,75,153,153,153,153,153,153,153,153,153,153,153,
-  153,153,153,99,100,68,68,68,68,68,68,68,68,118,118,118,
-  118,118,114,115,131,118,118,119,120,121,122,118,118,118,118,118,
-  128,129,130,131,132,133,134,135,136,137,138,139,140,141,142,143,
-  144,145,146,147,148,149,150,151,152,153,154,155,156,157,158,159,
-  160,161,162,163,164,165,165,118,168,169,170,171,172,173,174,175,
-  176,177,178,179,180,181,182,183,184,185,186,187,188,189,68,191,
-  192,193,194,195,196,197,198,199,200,201,202,203,204,205,206,207,
-  208,209,210,211,212,213,214,215,216,217,218,219,220,221,222,223,
-  224,225,226,227,228,229,230,231,232,233,234,235,236,237,238,239,
-  240,241,242,243,244,245,153,153,153,153,153,153,153,153,153,153
+  0,0,2,2,         4,4,118,118,     8,9,10,11,       12,13,14,15,
+  16,16,18,18,     20,21,22,23,     24,25,26,27,     28,28,118,28,
+  0,16,2,18,       36,37,37,37,     40,41,42,43,     44,45,128,128,
+  128,148,148,     148,45,45,45,    148,0,57,58,     59,60,61,62,63,
+
+  64,65,66,67,     68,69,69,69,     69,73,74,75,     118,75,75,75,
+  75,75,75,75,     75,153,153,153,  153,153,153,153, 153,153,153,153,
+  153,153,153,99,  100,68,68,68,    68,68,68,68,     68,118,118,118,
+  118,118,114,115, 131,118,118,119, 120,121,122,118, 118,118,118,118,
+
+  128,129,130,131, 132,133,134,135, 136,137,138,139, 140,141,142,143,
+  144,145,146,147, 148,149,150,151, 152,153,154,155, 156,157,158,159,
+  160,161,162,163, 164,165,165,118, 168,169,170,171, 172,173,174,175,
+  176,177,178,179, 180,181,182,183, 184,185,186,187, 188,189,68,191,
+
+  192,193,194,195, 196,197,198,199, 200,201,202,203, 204,205,206,207,
+  208,209,210,211, 212,213,214,215, 216,217,218,219, 220,221,222,223,
+  224,225,226,227, 228,229,230,231, 232,233,234,235, 236,237,238,239,
+  240,241,242,243, 244,245,153,153, 153,153,153,153, 153,153,153,153
 };
 
 static unsigned char remap_v5[256] =
 {
   /* filter crap for v5 */
 
-  0,0,2,2,4,4,118,118,8,9,10,11,12,13,14,15,
-  16,16,18,18,20,21,22,23,24,25,26,27,28,28,118,28,
-  0,16,2,18,36,37,37,37,147,41,42,43,44,45,128,128,
-  128,148,148,148,45,45,45,148,0,57,58,59,60,61,62,63,
-  64,65,66,67,68,153,153,153,153,153,153,153,153,153,153,153,
-  153,153,153,153,153,153,153,153,153,153,153,153,153,153,153,153,
-  153,153,153,153,153,68,68,68,68,68,68,68,68,118,118,118,
-  118,118,114,115,131,118,118,119,120,121,122,118,118,118,118,118,
-  128,129,130,131,132,133,134,135,136,137,138,139,140,141,142,143,
-  144,145,146,147,148,149,150,151,152,153,154,155,156,157,158,159,
-  160,153,153,153,153,153,153,118,168,169,170,171,172,173,174,175,
-  176,177,178,179,180,181,182,183,184,185,186,187,188,189,68,153,
-  153,153,153,153,153,153,153,153,200,201,202,203,204,205,206,207,
-  208,209,210,211,212,213,214,215,216,217,218,219,220,221,222,223,
-  224,225,226,227,228,229,230,231,232,233,234,235,236,237,238,239,
-  240,241,153,153,153,153,153,153,153,153,153,153,153,153,153,153
+  0,0,2,2,         4,4,118,118,     8,9,10,11,       12,13,14,15,
+  16,16,18,18,     20,21,22,23,     24,25,26,27,     28,28,118,28,
+  0,16,2,18,       36,37,37,37,     147,41,42,43,    44,45,128,128,
+  128,148,148,148, 45,45,45,148,    0,57,58,59,      60,61,62,63,
+
+  64,65,66,67,     68,153,153,153,  153,153,153,153, 153,153,153,153,
+  153,153,153,153, 153,153,153,153, 153,153,153,153, 153,153,153,153,
+  153,153,153,153, 153,68,68,68,68, 68,68,68,68,118, 118,118,
+  118,118,114,115, 131,118,118,119, 120,121,122,118, 118,118,118,118,
+
+  128,129,130,131, 132,133,134,135, 136,137,138,139, 140,141,142,143,
+  144,145,146,147, 148,149,150,151, 152,153,154,155, 156,157,158,159,
+  160,153,153,153, 153,153,153,118, 168,169,170,171, 172,173,174,175,
+  176,177,178,179, 180,181,182,183, 184,185,186,187, 188,189,68,153,
+
+  153,153,153,153, 153,153,153,153, 200,201,202,203, 204,205,206,207,
+  208,209,210,211, 212,213,214,215, 216,217,218,219, 220,221,222,223,
+  224,225,226,227, 228,229,230,231, 232,233,234,235, 236,237,238,239,
+  240,241,153,153, 153,153,153,153, 153,153,153,153, 153,153,153,153
 };
 
 static unsigned char remap_v4[256] =
 {
   /* filter crap for v4 */
 
-  0,0,2,2,4,4,118,118,8,9,10,11,12,13,14,15,
-  16,16,18,18,20,21,22,23,24,25,26,27,28,28,118,28,
-  0,16,2,18,36,37,37,37,147,41,42,43,44,45,128,128,
-  128,148,148,148,45,45,45,148,0,153,153,59,60,61,62,63,
-  64,65,66,153,153,153,153,153,153,153,153,153,153,153,153,153,
-  153,153,153,153,153,153,153,153,153,153,153,153,153,153,153,153,
-  153,153,153,153,153,153,153,153,153,153,153,153,153,153,153,153,
-  153,118,114,115,131,118,118,119,120,121,122,118,118,118,118,118,
-  128,129,130,131,132,133,134,135,136,137,138,139,140,141,142,143,
-  144,145,146,147,148,149,150,151,152,68,154,155,156,157,158,160,
-  160,160,160,160,160,160,160,160,160,160,160,160,160,160,160,175,
-  153,153,153,153,153,153,153,153,153,153,153,153,153,153,68,153,
-  153,153,153,153,153,153,153,153,200,201,202,203,204,205,206,207,
-  208,209,210,211,212,213,214,215,216,217,218,219,220,221,222,223,
-  224,225,226,227,228,229,230,231,232,233,234,235,236,237,238,239,
-  240,241,153,153,153,153,153,153,153,153,153,153,153,153,153,153
+  0,0,2,2,         4,4,118,118,     8,9,10,11,       12,13,14,15,
+  16,16,18,18,     20,21,22,23,     24,25,26,27,     28,28,118,28,
+  0,16,2,18,       36,37,37,37,     147,41,42,43,    44,45,128,128,
+  128,148,148,148, 45,45,45,148,    0,153,153,59,    60,61,62,63,
+
+  64,65,66,153,    153,153,153,153, 153,153,153,153, 153,153,153,153,
+  153,153,153,153, 153,153,153,153, 153,153,153,153, 153,153,153,153,
+  153,153,153,153, 153,153,153,153, 153,153,153,153, 153,153,153,153,
+  153,118,114,115, 131,118,118,119, 120,121,122,118, 118,118,118,118,
+
+  128,129,130,131, 132,133,134,135, 136,137,138,139, 140,141,142,143,
+  144,145,146,147, 148,149,150,151, 152,68,154,155,  156,157,158,160,
+  160,160,160,160, 160,160,160,160, 160,160,160,160, 160,160,160,175,
+  153,153,153,153, 153,153,153,153, 153,153,153,153, 153,153,68,153,
+
+  153,153,153,153, 153,153,153,153, 200,201,202,203, 204,205,206,207,
+  208,209,210,211, 212,213,214,215, 216,217,218,219, 220,221,222,223,
+  224,225,226,227, 228,229,230,231, 232,233,234,235, 236,237,238,239,
+  240,241,153,153, 153,153,153,153, 153,153,153,153, 153,153,153,153
 };
 
 static unsigned char remap_v4eater[28] =
@@ -89,60 +97,68 @@ static unsigned char remap_v4eater[28] =
   146,147,175,65,66,64,2,18
 };
 
-int clean_emerald(unsigned char *src, unsigned long *length)
+int cleanup_em_level(unsigned char *src, int length)
 {
-  unsigned int i;
+  int file_version = 0;
+  int i;
 
-  if (*length >= 2172 &&
+  if (length >= 2172 &&
       src[2106] == 255 &&
       src[2107] == 54 &&
       src[2108] == 48 &&
       src[2109] == 48)
   {
+    /* ---------- this cave has V6 file format ---------- */
+    file_version = FILE_VERSION_EM_V6;
+
     for (i = 0; i < 2048; i++)
       src[i] = remap_v6[src[i]];
     for (i = 2048; i < 2084; i++)
       src[i] = remap_v6[src[i]];
     for (i = 2112; i < 2148; i++)
       src[i] = remap_v6[src[i]];
-
-    goto v6;
   }
-
-  if (*length >= 2110 &&
-      src[2106] == 255 &&
-      src[2107] == 53 &&
-      src[2108] == 48 &&
-      src[2109] == 48)
+  else if (length >= 2110 &&
+          src[2106] == 255 &&
+          src[2107] == 53 &&
+          src[2108] == 48 &&
+          src[2109] == 48)
   {
+    /* ---------- this cave has V5 file format ---------- */
+    file_version = FILE_VERSION_EM_V5;
+
     for (i = 0; i < 2048; i++)
       src[i] = remap_v5[src[i]];
     for (i = 2048; i < 2084; i++)
       src[i] = remap_v5[src[i]];
     for (i = 2112; i < 2148; i++)
       src[i] = src[i - 64];
-
-    goto v5;
   }
-
-  if (*length >= 2106 &&
-      src[1983] == 116)
+#if 0
+  else if (length >= 2106)     /* !!! TEST ONLY: SHOW BROKEN LEVELS !!! */
+#else
+  else if (length >= 2106 &&
+          src[1983] == 116)
+#endif
   {
+    /* ---------- this cave has V4 file format ---------- */
+    file_version = FILE_VERSION_EM_V4;
+
     for (i = 0; i < 2048; i++)
       src[i] = remap_v4[src[i]];
     for (i = 2048; i < 2084; i++)
       src[i] = remap_v4eater[src[i] >= 28 ? 0 : src[i]];
     for (i = 2112; i < 2148; i++) src[i] = src[i - 64];
-
-    goto v4;
   }
-
-  if (*length >= 2106 &&
-      src[0] == 241 &&
-      src[1983] == 27)
+  else if (length >= 2106 &&
+          src[0] == 241 &&
+          src[1983] == 27)
   {
     unsigned char j = 94;
 
+    /* ---------- this cave has V3 file format ---------- */
+    file_version = FILE_VERSION_EM_V3;
+
     for (i = 0; i < 2106; i++)
       src[i] = (src[i] ^ (j += 7)) - 0x11;
     src[1] = 131;
@@ -152,48 +168,90 @@ int clean_emerald(unsigned char *src, unsigned long *length)
       src[i] = remap_v4eater[src[i] >= 28 ? 0 : src[i]];
     for (i = 2112; i < 2148; i++)
       src[i] = src[i - 64];
-
-    goto v3;
   }
+#if 1
+  else if (length >= 2106 &&
+          src[0] == 245 &&
+          src[1983] == 27)
+  {
+    unsigned char j = 94;
 
-  return 1;            /* unrecognized cave */
-
- v3:
- v4:
- v5:
+    /* ---------- this cave has V3 file format ---------- */
+    file_version = FILE_VERSION_EM_V3;
 
-  /* id */
-  src[2106] = 255;
-  src[2107] = 54;
-  src[2108] = 48;
-  src[2109] = 48;
+    for (i = 0; i < 2106; i++)
+      src[i] = (src[i] ^ (j += 7)) - 0x11;
+    src[1] = 131;
+    for (i = 0; i < 2048; i++)
+      src[i] = remap_v4[src[i]];
+    for (i = 2048; i < 2084; i++)
+      src[i] = remap_v4eater[src[i] >= 28 ? 0 : src[i]];
+    for (i = 2112; i < 2148; i++)
+      src[i] = src[i - 64];
+  }
+#endif
+  else
+  {
+    /* ---------- this cave has unknown file format ---------- */
 
-  /* time */
-  i = src[2094] * 10;
-  src[2110] = i >> 8;
-  src[2111] = i;
+#if 1
+    printf("::: %d, %d\n", src[0], src[1983]);
+#endif
 
-  for (i = 2148; i < 2172; i++)
-    src[i] = 0;
+    return 0;
+  }
 
-  /* ball data */
-  src[2159] = 128;
+  if (file_version < FILE_VERSION_EM_V6)
+  {
+    /* id */
+    src[2106] = 255;
+    src[2107] = 54;
+    src[2108] = 48;
+    src[2109] = 48;
+
+    /* time */
+    i = src[2094] * 10;
+    src[2110] = i >> 8;
+    src[2111] = i;
+
+    for (i = 2148; i < 2172; i++)
+      src[i] = 0;
+
+    /* ball data */
+    src[2159] = 128;
+  }
 
- v6:
+  /* ---------- at this stage, the cave data always has V6 format ---------- */
 
   /* fix wheel */
   for (i = 0; i < 2048; i++)
     if (src[i] == 40)
       break;
-
   for (i++; i < 2048; i++)
     if (src[i] == 40)
       src[i] = 147;
 
+#if 0
   /* fix acid */
   for (i = 64; i < 2048; i++)
-    if (src[i] == 63)
-      src[i - 64] = 101;
+    if (src[i] == 63)          /* replace element above 'Xacid_s' ... */
+      src[i - 64] = 101;       /* ... with 'Xacid_1' */
+
+#else
+
+  /* fix acid */
+  for (i = 64; i < 2048; i++)
+  {
+    if (src[i] == 63)          /* 'Xacid_s' (acid pool, bottom middle) */
+    {
+      if (file_version == FILE_VERSION_EM_V4 &&
+         i < 2048 - 64 && src[i + 64] == 63)
+       src[i - 64] = 255;      /* replace element above with 'Xfake_acid_1' */
+      else
+       src[i - 64] = 101;      /* replace element above with 'Xacid_1' */
+    }
+  }
+#endif
 
   /* fix acid in eater 1 */
   for (i = 2051; i < 2057; i++)
@@ -246,7 +304,7 @@ int clean_emerald(unsigned char *src, unsigned long *length)
   src[2098] &= 7;
   src[src[2098] << 8 | src[2099]] = 128;
 
-  /* ameuba speed */
+  /* amoeba speed */
   if ((src[2100] << 8 | src[2101]) > 9999)
   {
     src[2100] = 39;
@@ -321,9 +379,13 @@ int clean_emerald(unsigned char *src, unsigned long *length)
   src[2168] &= 31;
 
   /* size of v6 cave */
-  *length = 2172;
+  length = 2172;
+
+#if 1
+  printf("::: EM level file version: %d\n", file_version);
+#endif
 
-  return 0;
+  return file_version;
 }
 
 /* 2000-07-30T00:26:00Z
@@ -343,7 +405,8 @@ int clean_emerald(unsigned char *src, unsigned long *length)
  *   rolls.
  * - a compile time option for rolling objects (stone, nut, spring, bomb) only
  *   in eater.
- * - acid is always deadly even with no base beneath it.
+ * - acid is always deadly even with no base beneath it (this breaks cave 0 in
+ *   downunder mine 16)
  *
  * so far all below have not broken any caves:
  *
@@ -376,133 +439,178 @@ int clean_emerald(unsigned char *src, unsigned long *length)
 
 static unsigned short remap_emerald[256] =
 {
-  Xstone, Xstone, Xdiamond, Xdiamond, Xalien, Xalien, Xblank, Xblank,
-  Xtank_n, Xtank_e, Xtank_s, Xtank_w, Xtank_gon, Xtank_goe, Xtank_gos, Xtank_gow,
-  Xbomb, Xbomb, Xemerald, Xemerald, Xbug_n, Xbug_e, Xbug_s, Xbug_w,
-  Xbug_gon, Xbug_goe, Xbug_gos, Xbug_gow, Xdrip_eat, Xdrip_eat, Xdrip_eat, Xdrip_eat,
-  Xstone, Xbomb, Xdiamond, Xemerald, Xwonderwall, Xnut, Xnut, Xnut,
-  Xwheel, Xeater_n, Xeater_s, Xeater_w, Xeater_e, Xsand_stone, Xblank, Xblank,
-  Xblank, Xsand, Xsand, Xsand, Xsand_stone, Xsand_stone, Xsand_stone, Xsand,
-  Xstone, Xgrow_ew, Xgrow_ns, Xdynamite_1, Xdynamite_2, Xdynamite_3, Xdynamite_4, Xacid_s,
-  Xexit_1, Xexit_2, Xexit_3, Xballoon, Xplant, Xspring, Xspring, Xspring,
-  Xspring, Xball_1, Xball_2, Xandroid, Xblank, Xandroid, Xandroid, Xandroid,
-  Xandroid, Xandroid, Xandroid, Xandroid, Xandroid, Xblank, Xblank, Xblank,
-  Xblank, Xblank, Xblank, Xblank, Xblank, Xblank, Xblank, Xblank,
+  Xstone,              Xstone,         Xdiamond,       Xdiamond,
+  Xalien,              Xalien,         Xblank,         Xblank,
+  Xtank_n,             Xtank_e,        Xtank_s,        Xtank_w,
+  Xtank_gon,           Xtank_goe,      Xtank_gos,      Xtank_gow,
+
+  Xbomb,               Xbomb,          Xemerald,       Xemerald,
+  Xbug_n,              Xbug_e,         Xbug_s,         Xbug_w,
+  Xbug_gon,            Xbug_goe,       Xbug_gos,       Xbug_gow,
+  Xdrip_eat,           Xdrip_eat,      Xdrip_eat,      Xdrip_eat,
+
+  Xstone,              Xbomb,          Xdiamond,       Xemerald,
+  Xwonderwall,         Xnut,           Xnut,           Xnut,
+  Xwheel,              Xeater_n,       Xeater_s,       Xeater_w,
+  Xeater_e,            Xsand_stone,    Xblank,         Xblank,
+
+  Xblank,              Xsand,          Xsand,          Xsand,
+  Xsand_stone,         Xsand_stone,    Xsand_stone,    Xsand,
+  Xstone,              Xgrow_ew,       Xgrow_ns,       Xdynamite_1,
+  Xdynamite_2,         Xdynamite_3,    Xdynamite_4,    Xacid_s,
+
+  Xexit_1,             Xexit_2,        Xexit_3,        Xballoon,
+  Xplant,              Xspring,        Xspring,        Xspring,
+  Xspring,             Xball_1,        Xball_2,        Xandroid,
+  Xblank,              Xandroid,       Xandroid,       Xandroid,
+
+  Xandroid,            Xandroid,       Xandroid,       Xandroid,
+  Xandroid,            Xblank,         Xblank,         Xblank,
+  Xblank,              Xblank,         Xblank,         Xblank,
+  Xblank,              Xblank,         Xblank,         Xblank,
 
 #ifdef BAD_ROLL
 
-  Xblank, Xblank, Xblank, Xspring_force_w, Xspring_force_e, Xacid_1, Xacid_2, Xacid_3,
-  Xacid_4, Xacid_5, Xacid_6, Xacid_7, Xacid_8, Xblank, Xblank, Xblank,
-  Xblank, Xblank, Xnut_force_w, Xnut_force_e, Xsteel_1, Xblank, Xblank, Xbomb_force_w,
-  Xbomb_force_e, Xstone_force_w, Xstone_force_e, Xblank, Xblank, Xblank, Xblank, Xblank,
+  Xblank,              Xblank,         Xblank,         Xspring_force_w,
+  Xspring_force_e,     Xacid_1,        Xacid_2,        Xacid_3,
+  Xacid_4,             Xacid_5,        Xacid_6,        Xacid_7,
+  Xacid_8,             Xblank,         Xblank,         Xblank,
+
+  Xblank,              Xblank,         Xnut_force_w,   Xnut_force_e,
+  Xsteel_1,            Xblank,         Xblank,         Xbomb_force_w,
+  Xbomb_force_e,       Xstone_force_w, Xstone_force_e, Xblank,
+  Xblank,              Xblank,         Xblank,         Xblank,
 
 #else
 
-  Xblank, Xblank, Xblank, Xspring, Xspring, Xacid_1, Xacid_2, Xacid_3,
-  Xacid_4, Xacid_5, Xacid_6, Xacid_7, Xacid_8, Xblank, Xblank, Xblank,
-  Xblank, Xblank, Xnut, Xnut, Xsteel_1, Xblank, Xblank, Xbomb,
-  Xbomb, Xstone, Xstone, Xblank, Xblank, Xblank, Xblank, Xblank,
+  Xblank,              Xblank,         Xblank,         Xspring,
+  Xspring,             Xacid_1,        Xacid_2,        Xacid_3,
+  Xacid_4,             Xacid_5,        Xacid_6,        Xacid_7,
+  Xacid_8,             Xblank,         Xblank,         Xblank,
+
+  Xblank,              Xblank,         Xnut,           Xnut,
+  Xsteel_1,            Xblank,         Xblank,         Xbomb,
+  Xbomb,               Xstone,         Xstone,         Xblank,
+  Xblank,              Xblank,         Xblank,         Xblank,
 
 #endif
 
-  Xblank, Xround_wall_1, Xgrass, Xsteel_1, Xwall_1, Xkey_1, Xkey_2, Xkey_3,
-  Xkey_4, Xdoor_1, Xdoor_2, Xdoor_3, Xdoor_4, Xdripper, Xfake_door_1, Xfake_door_2,
-  Xfake_door_3, Xfake_door_4, Xwonderwall, Xwheel, Xsand, Xacid_nw, Xacid_ne, Xacid_sw,
-  Xacid_se, Xfake_blank, Xameuba_1, Xameuba_2, Xameuba_3, Xameuba_4, Xexit, Xalpha_arrow_w,
-  Xfake_grass, Xlenses, Xmagnify, Xfake_blank, Xfake_grass, Xswitch, Xswitch, Xblank,
-  Xdecor_8, Xdecor_9, Xdecor_10, Xdecor_5, Xalpha_comma, Xalpha_quote, Xalpha_minus, Xdynamite,
-  Xsteel_3, Xdecor_6, Xdecor_7, Xsteel_2, Xround_wall_2, Xdecor_2, Xdecor_4, Xdecor_3,
-  Xwind_nesw, Xwind_e, Xwind_s, Xwind_w, Xwind_n, Xdirt, Xplant, Xkey_5,
-  Xkey_6, Xkey_7, Xkey_8, Xdoor_5, Xdoor_6, Xdoor_7, Xdoor_8, Xbumper,
-  Xalpha_a, Xalpha_b, Xalpha_c, Xalpha_d, Xalpha_e, Xalpha_f, Xalpha_g, Xalpha_h,
-  Xalpha_i, Xalpha_j, Xalpha_k, Xalpha_l, Xalpha_m, Xalpha_n, Xalpha_o, Xalpha_p,
-  Xalpha_q, Xalpha_r, Xalpha_s, Xalpha_t, Xalpha_u, Xalpha_v, Xalpha_w, Xalpha_x,
-  Xalpha_y, Xalpha_z, Xalpha_0, Xalpha_1, Xalpha_2, Xalpha_3, Xalpha_4, Xalpha_5,
-  Xalpha_6, Xalpha_7, Xalpha_8, Xalpha_9, Xalpha_perio, Xalpha_excla, Xalpha_colon, Xalpha_quest,
-  Xalpha_arrow_e, Xdecor_1, Xfake_door_5, Xfake_door_6, Xfake_door_7, Xfake_door_8, Xblank, Xblank,
-  Xblank, Xblank, Xblank, Xblank, Xblank, Xblank, Xblank, Xblank,
+  Xblank,              Xround_wall_1,  Xgrass,         Xsteel_1,
+  Xwall_1,             Xkey_1,         Xkey_2,         Xkey_3,
+  Xkey_4,              Xdoor_1,        Xdoor_2,        Xdoor_3,
+  Xdoor_4,             Xdripper,       Xfake_door_1,   Xfake_door_2,
+
+  Xfake_door_3,                Xfake_door_4,   Xwonderwall,    Xwheel,
+  Xsand,               Xacid_nw,       Xacid_ne,       Xacid_sw,
+  Xacid_se,            Xfake_blank,    Xamoeba_1,      Xamoeba_2,
+  Xamoeba_3,           Xamoeba_4,      Xexit,          Xalpha_arrow_w,
+
+  Xfake_grass,         Xlenses,        Xmagnify,       Xfake_blank,
+  Xfake_grass,         Xswitch,        Xswitch,        Xblank,
+  Xdecor_8,            Xdecor_9,       Xdecor_10,      Xdecor_5,
+  Xalpha_comma,                Xalpha_quote,   Xalpha_minus,   Xdynamite,
+
+  Xsteel_3,            Xdecor_6,       Xdecor_7,       Xsteel_2,
+  Xround_wall_2,       Xdecor_2,       Xdecor_4,       Xdecor_3,
+  Xwind_nesw,          Xwind_e,        Xwind_s,        Xwind_w,
+  Xwind_n,             Xdirt,          Xplant,         Xkey_5,
+
+  Xkey_6,              Xkey_7,         Xkey_8,         Xdoor_5,
+  Xdoor_6,             Xdoor_7,        Xdoor_8,        Xbumper,
+  Xalpha_a,            Xalpha_b,       Xalpha_c,       Xalpha_d,
+  Xalpha_e,            Xalpha_f,       Xalpha_g,       Xalpha_h,
+
+  Xalpha_i,            Xalpha_j,       Xalpha_k,       Xalpha_l,
+  Xalpha_m,            Xalpha_n,       Xalpha_o,       Xalpha_p,
+  Xalpha_q,            Xalpha_r,       Xalpha_s,       Xalpha_t,
+  Xalpha_u,            Xalpha_v,       Xalpha_w,       Xalpha_x,
+
+  Xalpha_y,            Xalpha_z,       Xalpha_0,       Xalpha_1,
+  Xalpha_2,            Xalpha_3,       Xalpha_4,       Xalpha_5,
+  Xalpha_6,            Xalpha_7,       Xalpha_8,       Xalpha_9,
+  Xalpha_perio,                Xalpha_excla,   Xalpha_colon,   Xalpha_quest,
+
+  Xalpha_arrow_e,      Xdecor_1,       Xfake_door_5,   Xfake_door_6,
+  Xfake_door_7,                Xfake_door_8,   Xblank,         Xblank,
+  Xblank,              Xblank,         Xblank,         Xblank,
+#if 0
+  Xblank,              Xblank,         Xblank,         Xblank,
+#else
+  /* special elements added to solve compatibility problems */
+  Xblank,              Xblank,         Xblank,         Xfake_acid_1
+#endif
 };
 
-void convert_emerald(unsigned char *src)
+void convert_em_level(unsigned char *src, int file_version)
 {
-  unsigned int x, y, temp;
-
-  lev.width = 64;
-  lev.height = 32;
-
+  static int eater_offset[8] =
+  {
+    0x800, 0x809, 0x812, 0x81B, 0x840, 0x849, 0x852, 0x85B
+  };
+  unsigned int i, x, y, temp;
+
+#if 1
+  lev.time_seconds = src[0x83E] << 8 | src[0x83F];
+  if (lev.time_seconds > 9999)
+    lev.time_seconds = 9999;
+#else
   temp = ((src[0x83E] << 8 | src[0x83F]) * 25 + 3) / 4;
   if (temp == 0 || temp > 9999)
     temp = 9999;
-  lev.time = temp;
-  lev.required = src[0x82F];
+  lev.time_initial = temp;
+#endif
+
+  lev.required_initial = src[0x82F];
 
   temp = src[0x830] << 8 | src[0x831];
-  ply1.oldx = ply1.x = (temp & 63) + 1;
-  ply1.oldy = ply1.y = (temp >> 6 & 31) + 1;
+  ply1.x_initial = (temp & 63) + 1;
+  ply1.y_initial = (temp >> 6 & 31) + 1;
   temp = src[0x832] << 8 | src[0x833];
-  ply2.oldx = ply2.x = (temp & 63) + 1;
-  ply2.oldy = ply2.y = (temp >> 6 & 31) + 1;
-
-  lev.alien_score = src[0x826];
+  ply2.x_initial = (temp & 63) + 1;
+  ply2.y_initial = (temp >> 6 & 31) + 1;
 
   temp = (src[0x834] << 8 | src[0x835]) * 28;
   if (temp > 9999)
     temp = 9999;
-  lev.ameuba_time = temp;
-  lev.android_move_cnt = lev.android_move_time = src[0x874] << 8 | src[0x875];
-  lev.android_clone_cnt= lev.android_clone_time = src[0x876] << 8 | src[0x877];
-  lev.ball_pos = 0;
+  lev.amoeba_time = temp;
+
+  lev.android_move_time = src[0x874] << 8 | src[0x875];
+  lev.android_clone_time = src[0x876] << 8 | src[0x877];
+
   lev.ball_random = src[0x872] & 1 ? 1 : 0;
-  lev.ball_state = src[0x872] & 128 ? 1 : 0;
-  lev.ball_cnt = lev.ball_time = src[0x870] << 8 | src[0x871];
-  lev.bug_score = src[0x828];
+  lev.ball_state_initial = src[0x872] & 128 ? 1 : 0;
+  lev.ball_time = src[0x870] << 8 | src[0x871];
+
+  lev.emerald_score = src[0x824];
   lev.diamond_score = src[0x825];
-  lev.dynamite_score = src[0x82B];
-  lev.eater_pos = 0;
+  lev.alien_score = src[0x826];
+  lev.tank_score = src[0x827];
+  lev.bug_score = src[0x828];
   lev.eater_score = src[0x829];
-  lev.emerald_score = src[0x824];
-  lev.exit_score = src[0x82D] * 8 / 5;
+  lev.nut_score = src[0x82A];
+  lev.dynamite_score = src[0x82B];
   lev.key_score = src[0x82C];
-  lev.lenses_cnt = 0;
+  lev.exit_score = src[0x82D] * 8 / 5;
   lev.lenses_score = src[0x867];
-  lev.lenses_time = src[0x86A] << 8 | src[0x86B];
-  lev.magnify_cnt = 0;
   lev.magnify_score = src[0x868];
-  lev.magnify_time = src[0x86C] << 8 | src[0x86D];
-  lev.nut_score = src[0x82A];
-  lev.shine_cnt = 0;
   lev.slurp_score = src[0x869];
-  lev.tank_score = src[0x827];
-  lev.wheel_cnt = 0;
-  lev.wheel_x = 1;
-  lev.wheel_y = 1;
+
+  lev.lenses_time = src[0x86A] << 8 | src[0x86B];
+  lev.magnify_time = src[0x86C] << 8 | src[0x86D];
   lev.wheel_time = src[0x838] << 8 | src[0x839];
-  lev.wind_cnt = src[0x865] & 15 ? 9999 : 0;
+
+  lev.wind_cnt_initial = src[0x865] & 15 ? lev.wind_time : 0;
   temp = src[0x865];
-  lev.wind_direction = (temp & 8 ? 0 :
-                       temp & 1 ? 1 :
-                       temp & 2 ? 2 :
-                       temp & 4 ? 3 : 0);
-  lev.wind_time = 9999;
-  lev.wonderwall_state = 0;
-  lev.wonderwall_time = src[0x836] << 8 | src[0x837];
-
-  for (x = 0; x < 9; x++)
-    lev.eater_array[0][x] = remap_emerald[src[0x800 + x]];
-  for (x = 0; x < 9; x++)
-    lev.eater_array[1][x] = remap_emerald[src[0x809 + x]];
-  for (x = 0; x < 9; x++)
-    lev.eater_array[2][x] = remap_emerald[src[0x812 + x]];
-  for (x = 0; x < 9; x++)
-    lev.eater_array[3][x] = remap_emerald[src[0x81B + x]];
-  for (x = 0; x < 9; x++)
-    lev.eater_array[4][x] = remap_emerald[src[0x840 + x]];
-  for (x = 0; x < 9; x++)
-    lev.eater_array[5][x] = remap_emerald[src[0x849 + x]];
-  for (x = 0; x < 9; x++)
-    lev.eater_array[6][x] = remap_emerald[src[0x852 + x]];
-  for (x = 0; x < 9; x++)
-    lev.eater_array[7][x] = remap_emerald[src[0x85B + x]];
+  lev.wind_direction_initial = (temp & 8 ? 0 :
+                               temp & 1 ? 1 :
+                               temp & 2 ? 2 :
+                               temp & 4 ? 3 : 0);
+
+  lev.wonderwall_time_initial = src[0x836] << 8 | src[0x837];
+
+  for (i = 0; i < 8; i++)
+    for (x = 0; x < 9; x++)
+      lev.eater_array[i][x] = remap_emerald[src[eater_offset[i] + x]];
 
   temp = remap_emerald[src[0x86F]];
   for (y = 0; y < 8; y++)
@@ -514,20 +622,17 @@ void convert_emerald(unsigned char *src)
     }
     else
     {
-      lev.ball_array[y][1] = (src[0x873] & 1) ? temp : Xblank;  /* north */
-      lev.ball_array[y][6] = (src[0x873] & 2) ? temp : Xblank;  /* south */
-      lev.ball_array[y][3] = (src[0x873] & 4) ? temp : Xblank;  /* west */
-      lev.ball_array[y][4] = (src[0x873] & 8) ? temp : Xblank;  /* east */
+      lev.ball_array[y][1] = (src[0x873] & 1)  ? temp : Xblank; /* north */
+      lev.ball_array[y][6] = (src[0x873] & 2)  ? temp : Xblank; /* south */
+      lev.ball_array[y][3] = (src[0x873] & 4)  ? temp : Xblank; /* west */
+      lev.ball_array[y][4] = (src[0x873] & 8)  ? temp : Xblank; /* east */
       lev.ball_array[y][7] = (src[0x873] & 16) ? temp : Xblank; /* southeast */
       lev.ball_array[y][5] = (src[0x873] & 32) ? temp : Xblank; /* southwest */
       lev.ball_array[y][2] = (src[0x873] & 64) ? temp : Xblank; /* northeast */
-      lev.ball_array[y][0] = (src[0x873] & 128) ? temp : Xblank;/* northwest */
+      lev.ball_array[y][0] = (src[0x873] & 128)? temp : Xblank; /* northwest */
     }
   }
 
-  for (temp = 0; temp < TILE_MAX; temp++)
-    lev.android_array[temp] = Xblank;
-
   temp = src[0x878] << 8 | src[0x879];
 
   if (temp & 1)
@@ -676,14 +781,14 @@ void convert_emerald(unsigned char *src)
   {
     lev.android_array[Xdripper] =
       lev.android_array[XdripperB] =
-      lev.android_array[Xameuba_1] =
-      lev.android_array[Xameuba_2] =
-      lev.android_array[Xameuba_3] =
-      lev.android_array[Xameuba_4] =
-      lev.android_array[Xameuba_5] =
-      lev.android_array[Xameuba_6] =
-      lev.android_array[Xameuba_7] =
-      lev.android_array[Xameuba_8] = Xdrip_eat;
+      lev.android_array[Xamoeba_1] =
+      lev.android_array[Xamoeba_2] =
+      lev.android_array[Xamoeba_3] =
+      lev.android_array[Xamoeba_4] =
+      lev.android_array[Xamoeba_5] =
+      lev.android_array[Xamoeba_6] =
+      lev.android_array[Xamoeba_7] =
+      lev.android_array[Xamoeba_8] = Xdrip_eat;
   }
 
   if (temp & 4096)
@@ -696,14 +801,14 @@ void convert_emerald(unsigned char *src)
     switch (src[temp])
     {
       case 0x24:                               /* wonderwall */
-       lev.wonderwall_state = 1;
-       lev.wonderwall_time = 9999;
+       lev.wonderwall_state_initial = 1;
+       lev.wonderwall_time_initial = 9999;
        break;
 
       case 0x28:                               /* wheel */
-       lev.wheel_x = temp & 63;
-       lev.wheel_y = temp >> 6;
-       lev.wheel_cnt = lev.wheel_time;
+       lev.wheel_x_initial = temp & 63;
+       lev.wheel_y_initial = temp >> 6;
+       lev.wheel_cnt_initial = lev.wheel_time;
        break;
 
 #ifndef BAD_ROLL
@@ -749,28 +854,44 @@ void convert_emerald(unsigned char *src)
 #endif
 
       case 0xA3:                               /* fake blank */
-       lev.lenses_cnt = 9999;
+       lev.lenses_cnt_initial = 9999;
        break;
 
       case 0xA4:                               /* fake grass */
-       lev.magnify_cnt = 9999;
+       lev.magnify_cnt_initial = 9999;
        break;
     }
   }
 
+  /* first fill the complete playfield with the default border element */
   for (y = 0; y < HEIGHT; y++)
     for (x = 0; x < WIDTH; x++)
-      Cave[y][x] = ZBORDER;
+      native_em_level.cave[x][y] = ZBORDER;
 
+  /* then copy the real level contents from level file into the playfield */
   temp = 0;
   for (y = 0; y < lev.height; y++)
     for (x = 0; x < lev.width; x++)
-      Cave[y+1][x+1] = remap_emerald[src[temp++]];
+      native_em_level.cave[x + 1][y + 1] = remap_emerald[src[temp++]];
+
+  /* at last, set the two players at their positions in the playfield */
+  if (ply1.alive_initial)
+    native_em_level.cave[ply1.x_initial][ply1.y_initial] = Zplayer;
+  if (ply2.alive_initial)
+    native_em_level.cave[ply2.x_initial][ply2.y_initial] = Zplayer;
 
-  if (ply1.alive)
-    Cave[ply1.y][ply1.x] = Zplayer;
-  if (ply2.alive)
-    Cave[ply2.y][ply2.x] = Zplayer;
+  native_em_level.file_version = file_version;
+}
+
+void prepare_em_level(void)
+{
+  unsigned int x, y;
+
+  /* reset all runtime variables to their initial values */
+
+  for (y = 0; y < HEIGHT; y++)
+    for (x = 0; x < WIDTH; x++)
+      Cave[y][x] = native_em_level.cave[x][y];
 
   for (y = 0; y < HEIGHT; y++)
     for (x = 0; x < WIDTH; x++)
@@ -779,6 +900,67 @@ void convert_emerald(unsigned char *src)
   for (y = 0; y < HEIGHT; y++)
     for (x = 0; x < WIDTH; x++)
       Draw[y][x] = Cave[y][x];
-}
 
+#if 1
+  lev.time_initial = lev.time_seconds;
+#else
+  lev.time_initial = (lev.time_seconds * 50 + 7) / 8;
 #endif
+  lev.time = lev.time_initial;
+
+  lev.required = lev.required_initial;
+  lev.score = 0;
+
+  lev.android_move_cnt  = lev.android_move_time;
+  lev.android_clone_cnt = lev.android_clone_time;
+
+  lev.ball_pos = 0;
+  lev.ball_state = lev.ball_state_initial;
+  lev.ball_cnt = lev.ball_time;
+
+  lev.eater_pos = 0;
+  lev.shine_cnt = 0;
+
+  lev.lenses_cnt = lev.lenses_cnt_initial;
+  lev.magnify_cnt = lev.magnify_cnt_initial;
+
+  lev.wheel_cnt = lev.wheel_cnt_initial;
+  lev.wheel_x   = lev.wheel_x_initial;
+  lev.wheel_y   = lev.wheel_y_initial;
+
+  lev.wind_cnt       = lev.wind_cnt_initial;
+  lev.wind_direction = lev.wind_direction_initial;
+
+  lev.wonderwall_state = lev.wonderwall_state_initial;
+  lev.wonderwall_time  = lev.wonderwall_time_initial;
+
+  lev.home = lev.home_initial;
+
+  lev.killed_out_of_time = FALSE;
+
+  ply1.num = 0;
+  ply1.alive = ply1.alive_initial;
+  ply1.dynamite = 0;
+  ply1.dynamite_cnt = 0;
+  ply1.keys = 0;
+  ply1.anim = 0;
+  ply1.oldx = ply1.x = ply1.x_initial;
+  ply1.oldy = ply1.y = ply1.y_initial;
+  ply1.last_move_dir = MV_NO_MOVING;
+  ply1.joy_n = ply1.joy_e = ply1.joy_s = ply1.joy_w = 0;
+  ply1.joy_snap = ply1.joy_drop = 0;
+  ply1.joy_stick = ply1.joy_spin = 0;
+
+  ply2.num = 1;
+  ply2.alive = ply2.alive_initial;
+  ply2.dynamite = 0;
+  ply2.dynamite_cnt = 0;
+  ply2.keys = 0;
+  ply2.anim = 0;
+  ply2.oldx = ply2.x = ply2.x_initial;
+  ply2.oldy = ply2.y = ply2.y_initial;
+  ply2.last_move_dir = MV_NO_MOVING;
+  ply2.joy_n = ply2.joy_e = ply2.joy_s = ply2.joy_w = 0;
+  ply2.joy_snap = ply1.joy_drop = 0;
+  ply2.joy_stick = ply2.joy_spin = 0;
+}