1 /* 2000-08-20T09:41:18Z
3 * identify all emerald mine caves and turn them into v6 format.
4 * fixes illegal tiles, acid, wheel, limits times, cleans flags.
6 * these tables weed out bad tiles for older caves (eg. wheel on -> wheel off)
7 * and clean up v6 caves (acid, number limits) which should(!) be
8 * inconsequential, but no doubt it will break some caves.
14 static unsigned char remap_v6[256] =
16 /* filter crap for v6 */
18 0,0,2,2, 4,4,118,118, 8,9,10,11, 12,13,14,15,
19 16,16,18,18, 20,21,22,23, 24,25,26,27, 28,28,118,28,
20 0,16,2,18, 36,37,37,37, 40,41,42,43, 44,45,128,128,
21 128,148,148, 148,45,45,45, 148,0,57,58, 59,60,61,62,63,
23 64,65,66,67, 68,69,69,71, 72,73,74,75, 118,75,75,75,
24 75,75,75,75, 75,153,153,153, 153,153,153,153, 153,153,153,153,
25 153,153,153,99, 100,68,68,68, 68,68,68,68, 68,118,118,118,
26 118,118,114,115, 131,118,118,119, 120,121,122,118, 118,118,118,118,
28 128,129,130,131, 132,133,134,135, 136,137,138,139, 140,141,142,143,
29 144,145,146,147, 148,149,150,151, 152,153,154,155, 156,157,158,159,
30 160,161,162,163, 164,165,165,118, 168,169,170,171, 172,173,174,175,
31 176,177,178,179, 180,181,182,183, 184,185,186,187, 188,189,68,191,
33 192,193,194,195, 196,197,198,199, 200,201,202,203, 204,205,206,207,
34 208,209,210,211, 212,213,214,215, 216,217,218,219, 220,221,222,223,
35 224,225,226,227, 228,229,230,231, 232,233,234,235, 236,237,238,239,
36 240,241,242,243, 244,245,153,153, 153,153,153,153, 153,153,153,153
39 static unsigned char remap_v5[256] =
41 /* filter crap for v5 */
43 0,0,2,2, 4,4,118,118, 8,9,10,11, 12,13,14,15,
44 16,16,18,18, 20,21,22,23, 24,25,26,27, 28,28,118,28,
45 0,16,2,18, 36,37,37,37, 147,41,42,43, 44,45,128,128,
46 128,148,148,148, 45,45,45,148, 0,57,58,59, 60,61,62,63,
48 64,65,66,67, 68,153,153,153, 153,153,153,153, 153,153,153,153,
49 153,153,153,153, 153,153,153,153, 153,153,153,153, 153,153,153,153,
50 153,153,153,153, 153,68,68,68,68, 68,68,68,68,118, 118,118,
51 118,118,114,115, 131,118,118,119, 120,121,122,118, 118,118,118,118,
53 128,129,130,131, 132,133,134,135, 136,137,138,139, 140,141,142,143,
54 144,145,146,147, 148,149,150,151, 152,153,154,155, 156,157,158,159,
55 160,153,153,153, 153,153,153,118, 168,169,170,171, 172,173,174,175,
56 176,177,178,179, 180,181,182,183, 184,185,186,187, 188,189,68,153,
58 153,153,153,153, 153,153,153,153, 200,201,202,203, 204,205,206,207,
59 208,209,210,211, 212,213,214,215, 216,217,218,219, 220,221,222,223,
60 224,225,226,227, 228,229,230,231, 232,233,234,235, 236,237,238,239,
61 240,241,153,153, 153,153,153,153, 153,153,153,153, 153,153,153,153
64 static unsigned char remap_v4[256] =
66 /* filter crap for v4 */
68 0,0,2,2, 4,4,118,118, 8,9,10,11, 12,13,14,15,
69 16,16,18,18, 20,21,22,23, 24,25,26,27, 28,28,118,28,
70 0,16,2,18, 36,37,37,37, 147,41,42,43, 44,45,128,128,
71 128,148,148,148, 45,45,45,148, 0,153,153,59, 60,61,62,63,
73 64,65,66,153, 153,153,153,153, 153,153,153,153, 153,153,153,153,
74 153,153,153,153, 153,153,153,153, 153,153,153,153, 153,153,153,153,
75 153,153,153,153, 153,153,153,153, 153,153,153,153, 153,153,153,153,
76 153,118,114,115, 131,118,118,119, 120,121,122,118, 118,118,118,118,
78 128,129,130,131, 132,133,134,135, 136,137,138,139, 140,141,142,143,
79 144,145,146,147, 148,149,150,151, 152,68,154,155, 156,157,158,160,
80 160,160,160,160, 160,160,160,160, 160,160,160,160, 160,160,160,175,
81 153,153,153,153, 153,153,153,153, 153,153,153,153, 153,153,68,153,
83 153,153,153,153, 153,153,153,153, 200,201,202,203, 204,205,206,207,
84 208,209,210,211, 212,213,214,215, 216,217,218,219, 220,221,222,223,
85 224,225,226,227, 228,229,230,231, 232,233,234,235, 236,237,238,239,
86 240,241,153,153, 153,153,153,153, 153,153,153,153, 153,153,153,153
89 static unsigned char remap_v4eater[28] =
91 /* filter crap for v4 */
93 128,18,2,0,4,8,16,20,28,37,
94 41,45,130,129,131,132,133,134,135,136,
95 146,147,175,65,66,64,2,18
98 static boolean filename_has_v1_format(char *filename)
100 char *basename = getBaseNamePtr(filename);
102 return (strlen(basename) == 3 &&
103 basename[0] == 'a' &&
104 basename[1] >= 'a' && basename[1] <= 'k' &&
105 basename[2] >= '0' && basename[2] <= '9');
108 int cleanup_em_level(unsigned char *src, int length, char *filename)
110 int file_version = FILE_VERSION_EM_UNKNOWN;
113 if (length >= 2172 &&
114 src[2106] == 255 && /* version id: */
115 src[2107] == 54 && /* '6' */
116 src[2108] == 48 && /* '0' */
117 src[2109] == 48) /* '0' */
119 /* ---------- this cave has V6 file format ---------- */
120 file_version = FILE_VERSION_EM_V6;
122 /* remap elements to internal EMC level format */
123 for (i = 0; i < 2048; i++)
124 src[i] = remap_v6[src[i]];
125 for (i = 2048; i < 2084; i++)
126 src[i] = remap_v6[src[i]];
127 for (i = 2112; i < 2148; i++)
128 src[i] = remap_v6[src[i]];
130 else if (length >= 2110 &&
131 src[2106] == 255 && /* version id: */
132 src[2107] == 53 && /* '5' */
133 src[2108] == 48 && /* '0' */
134 src[2109] == 48) /* '0' */
136 /* ---------- this cave has V5 file format ---------- */
137 file_version = FILE_VERSION_EM_V5;
139 /* remap elements to internal EMC level format */
140 for (i = 0; i < 2048; i++)
141 src[i] = remap_v5[src[i]];
142 for (i = 2048; i < 2084; i++)
143 src[i] = remap_v5[src[i]];
144 for (i = 2112; i < 2148; i++)
145 src[i] = src[i - 64];
147 else if (length >= 2106 &&
148 (src[1983] == 27 || /* encrypted (only EM I/II/III) */
149 src[1983] == 116 || /* unencrypted (usual case) */
150 src[1983] == 131)) /* unencrypted (rare case) */
152 /* ---------- this cave has V1, V2 or V3 file format ---------- */
154 boolean fix_copyright = FALSE;
157 byte at position 1983 (0x07bf) is used as "magic byte":
158 - 27 (0x1b) => encrypted level (V3 only / Kingsoft original games)
159 - 116 (0x74) => unencrypted level (byte is corrected to 131 (0x83))
160 - 131 (0x83) => unencrypted level (happens only in very rare cases)
163 if (src[1983] == 27) /* (0x1b) -- after decryption: 116 (0x74) */
165 /* this is original (encrypted) Emerald Mine I, II or III level file */
167 int first_byte = src[0];
168 unsigned char code0 = 0x65;
169 unsigned char code1 = 0x11;
171 /* decode encrypted level data */
172 for (i = 0; i < 2106; i++)
177 code0 = (code0 + 7) & 0xff;
180 src[1] = 131; /* needed for all Emerald Mine levels */
182 /* first byte is either 0xf1 (EM I and III) or 0xf5 (EM II) */
183 if (first_byte == 0xf5)
185 src[0] = 131; /* only needed for Emerald Mine II levels */
187 fix_copyright = TRUE;
190 /* ---------- this cave has V3 file format ---------- */
191 file_version = FILE_VERSION_EM_V3;
193 else if (filename_has_v1_format(filename))
195 /* ---------- this cave has V1 file format ---------- */
196 file_version = FILE_VERSION_EM_V1;
200 /* ---------- this cave has V2 file format ---------- */
201 file_version = FILE_VERSION_EM_V2;
204 /* remap elements to internal EMC level format */
205 for (i = 0; i < 2048; i++)
206 src[i] = remap_v4[src[i]];
207 for (i = 2048; i < 2084; i++)
208 src[i] = remap_v4eater[src[i] >= 28 ? 0 : src[i]];
209 for (i = 2112; i < 2148; i++)
210 src[i] = src[i - 64];
212 if (fix_copyright) /* fix "(c)" sign in Emerald Mine II levels */
214 for (i = 0; i < 2048; i++)
216 src[i] = 254; /* replace 'Xdecor_1' with 'Xalpha_copyr' */
221 /* ---------- this cave has unknown file format ---------- */
223 /* if file has length of old-style level file, print (wrong) magic byte */
225 Error(ERR_WARN, "unknown magic byte 0x%02x at position 0x%04x",
228 return FILE_VERSION_EM_UNKNOWN;
231 if (file_version < FILE_VERSION_EM_V6)
234 src[2106] = 255; /* version id: */
235 src[2107] = 54; /* '6' */
236 src[2108] = 48; /* '0' */
237 src[2109] = 48; /* '0' */
241 /* stored level time of levels for the V2 player was changed to 50% of the
242 time for the V1 player (original V3 levels already considered this) */
243 if (file_version != FILE_VERSION_EM_V1 &&
244 file_version != FILE_VERSION_EM_V3)
249 for (i = 2148; i < 2172; i++)
256 /* ---------- at this stage, the cave data always has V6 format ---------- */
259 for (i = 0; i < 2048; i++)
262 for (i++; i < 2048; i++)
269 for (i = 64; i < 2048; i++)
270 if (src[i] == 63) /* replace element above 'Xacid_s' ... */
271 src[i - 64] = 101; /* ... with 'Xacid_1' */
277 for (i = 64; i < 2048; i++)
278 if (src[i] == 63) /* replace element above 'Xacid_s' ... */
279 src[i - 64] = 101; /* ... with 'Xacid_1' */
281 /* fix acid with no base beneath it (see below for details (*)) */
282 for (i = 64; i < 2048 - 1; i++)
284 if (file_version <= FILE_VERSION_EM_V2 &&
285 src[i - 64] == 101 && src[i] != 63) /* acid without base */
287 if (src[i - 1] == 101 || /* remove acid over acid row */
289 src[i - 64] = 6; /* replace element above with 'Xblank' */
291 src[i - 64] = 255; /* replace element above with 'Xfake_acid_1' */
298 for (i = 64; i < 2048; i++)
300 if (src[i] == 63) /* 'Xacid_s' (acid pool, bottom middle) */
302 if (file_version <= FILE_VERSION_EM_V2 &&
303 i < 2048 - 64 && src[i + 64] == 63)
305 int obj_left = remap_emerald[src[i - 1]];
306 int obj_right = remap_emerald[src[i + 1]];
308 if (obj_left == Xblank || obj_right == Xblank ||
309 obj_left == Xplant || obj_right == Xplant)
310 src[i - 64] = 6; /* replace element above with 'Xblank' */
312 src[i - 64] = 255; /* replace element above with 'Xfake_acid_1' */
316 src[i - 64] = 101; /* replace element above with 'Xacid_1' */
323 /* fix acid in eater 1 */
324 for (i = 2051; i < 2057; i++)
328 /* fix acid in eater 2 */
329 for (i = 2060; i < 2066; i++)
333 /* fix acid in eater 3 */
334 for (i = 2069; i < 2075; i++)
338 /* fix acid in eater 4 */
339 for (i = 2078; i < 2084; i++)
343 /* fix acid in eater 5 */
344 for (i = 2115; i < 2121; i++)
348 /* fix acid in eater 6 */
349 for (i = 2124; i < 2130; i++)
353 /* fix acid in eater 7 */
354 for (i = 2133; i < 2139; i++)
358 /* fix acid in eater 8 */
359 for (i = 2142; i < 2148; i++)
368 src[src[2096] << 8 | src[2097]] = 128;
372 src[src[2098] << 8 | src[2099]] = 128;
375 if ((src[2100] << 8 | src[2101]) > 9999)
381 /* time wonderwall */
382 if ((src[2102] << 8 | src[2103]) > 9999)
389 if ((src[2110] << 8 | src[2111]) > 9999)
402 if ((src[2154] << 8 | src[2155]) > 9999)
409 if ((src[2156] << 8 | src[2157]) > 9999)
417 src[2159] = remap_v6[src[2159]];
420 if ((src[2160] << 8 | src[2161]) > 9999)
431 /* android move pause */
432 if ((src[2164] << 8 | src[2165]) > 9999)
438 /* android clone pause */
439 if ((src[2166] << 8 | src[2167]) > 9999)
448 /* size of v6 cave */
453 Error(ERR_DEBUG, "EM level file version: %d", file_version);
459 /* 2000-07-30T00:26:00Z
461 * Read emerald mine caves version 6
463 * v4 and v5 emerald mine caves are converted to v6 (which completely supports
466 * converting to the internal format loses /significant/ information which can
467 * break lots of caves.
469 * major incompatibilities:
470 * - borderless caves behave completely differently, the player no longer
471 * "warps" to the other side.
472 * - a compile time option for spring can make it behave differently when it
474 * - a compile time option for rolling objects (stone, nut, spring, bomb) only
476 * - acid is always deadly even with no base beneath it (this breaks cave 0 in
478 * (*) fixed (see above):
479 * - downunder mine 16, level 0, works again
480 * - downunder mine 11, level 71, corrected (only cosmetically)
482 * so far all below have not broken any caves:
484 * - active wheel inside an eater will not function, eater explosions will not
486 * - initial collect objects (emerald, diamond, dynamite) don't exist.
487 * - initial rolling objects will be moved manually and made into sitting
489 * - drips always appear from dots.
490 * - more than one thing can fall into acid at the same time.
491 * - acid explodes when the player walks into it, rather than splashing.
492 * - simultaneous explosions may be in a slightly different order.
493 * - quicksand states have been reduced.
494 * - acid base is effectively an indestructable wall now which can affect eater
496 * - android can clone forever with a clone pause of 0 (emeralds, diamonds,
497 * nuts, stones, bombs, springs).
499 * 2001-03-12T02:46:55Z
500 * - rolling stuff is now allowed in the cave, i didn't like making this
502 * - if BAD_ROLL is not defined, initial rolling objects are moved by hand.
503 * - initial collect objects break some cave in elvis mine 5.
504 * - different timing for wonderwall break some cave in exception mine 2.
505 * - i think i'm pretty locked into always using the bad roll. *sigh*
506 * - rolling spring is now turned into regular spring. it appears the emc
507 * editor only uses the force code for initially moving spring. i will
508 * follow this in my editor.
511 * - introduced ALLOW_ROLLING_SPRING; if defined, do NOT turn rolling spring
512 * into regular spring, because this breaks at least E.M.C. Mine 3, level 79
513 * (see comment directly above)
516 * - always use BAD_ROLL and ALLOW_ROLLING_SPRING code when converting caves
517 * (that is, always allow initial rolling objects in caves now)
520 static unsigned short remap_emerald[256] =
522 Xstone, Xstone, Xdiamond, Xdiamond,
523 Xalien, Xalien, Xblank, Xblank,
524 Xtank_1_n, Xtank_1_e, Xtank_1_s, Xtank_1_w,
525 Xtank_2_n, Xtank_2_e, Xtank_2_s, Xtank_2_w,
527 Xbomb, Xbomb, Xemerald, Xemerald,
528 Xbug_1_n, Xbug_1_e, Xbug_1_s, Xbug_1_w,
529 Xbug_2_n, Xbug_2_e, Xbug_2_s, Xbug_2_w,
530 Xdrip, Xdrip, Xdrip, Xdrip,
532 Xstone, Xbomb, Xdiamond, Xemerald,
533 Xwonderwall, Xnut, Xnut, Xnut,
534 Xwheel, Xeater_n, Xeater_s, Xeater_w,
535 Xeater_e, Xsand_stone, Xblank, Xblank,
537 Xblank, Xsand, Xsand, Xsand,
538 Xsand_stone, Xsand_stone, Xsand_stone, Xsand,
539 Xstone, Xslidewall_ew, Xslidewall_ns, Xdynamite_1,
540 Xdynamite_2, Xdynamite_3, Xdynamite_4, Xacid_s,
542 Xexit_1, Xexit_2, Xexit_3, Xballoon,
543 Xplant, Xspring, Xspring_fall, Xspring_w,
544 Xspring_e, Xball_1, Xball_2, Xandroid,
545 Xblank, Xandroid, Xandroid, Xandroid,
547 Xandroid, Xandroid, Xandroid, Xandroid,
548 Xandroid, Xblank, Xblank, Xblank,
549 Xblank, Xblank, Xblank, Xblank,
550 Xblank, Xblank, Xblank, Xblank,
552 Xblank, Xblank, Xblank, Xpush_spring_w,
553 Xpush_spring_e, Xacid_1, Xacid_2, Xacid_3,
554 Xacid_4, Xacid_5, Xacid_6, Xacid_7,
555 Xacid_8, Xblank, Xblank, Xblank,
557 Xblank, Xblank, Xpush_nut_w, Xpush_nut_e,
558 Xsteel_1, Xblank, Xblank, Xpush_bomb_w,
559 Xpush_bomb_e, Xpush_stone_w, Xpush_stone_e, Xblank,
560 Xblank, Xblank, Xblank, Xblank,
562 Xblank, Xroundwall_1, Xgrass, Xsteel_1,
563 Xwall_1, Xkey_1, Xkey_2, Xkey_3,
564 Xkey_4, Xdoor_1, Xdoor_2, Xdoor_3,
565 Xdoor_4, Xfake_amoeba, Xfake_door_1, Xfake_door_2,
567 Xfake_door_3, Xfake_door_4, Xwonderwall, Xwheel,
568 Xsand, Xacid_nw, Xacid_ne, Xacid_sw,
569 Xacid_se, Xfake_blank, Xamoeba_1, Xamoeba_2,
570 Xamoeba_3, Xamoeba_4, Xexit, Xalpha_arrow_w,
572 Xfake_grass, Xlenses, Xmagnify, Xfake_blank,
573 Xfake_grass, Xswitch, Xswitch, Xblank,
574 Xdecor_8, Xdecor_9, Xdecor_10, Xdecor_5,
575 Xalpha_comma, Xalpha_quote, Xalpha_minus, Xdynamite,
577 Xsteel_3, Xdecor_6, Xdecor_7, Xsteel_2,
578 Xroundwall_2, Xdecor_2, Xdecor_4, Xdecor_3,
579 Xwind_any, Xwind_e, Xwind_s, Xwind_w,
580 Xwind_n, Xdirt, Xplant, Xkey_5,
582 Xkey_6, Xkey_7, Xkey_8, Xdoor_5,
583 Xdoor_6, Xdoor_7, Xdoor_8, Xbumper,
584 Xalpha_a, Xalpha_b, Xalpha_c, Xalpha_d,
585 Xalpha_e, Xalpha_f, Xalpha_g, Xalpha_h,
587 Xalpha_i, Xalpha_j, Xalpha_k, Xalpha_l,
588 Xalpha_m, Xalpha_n, Xalpha_o, Xalpha_p,
589 Xalpha_q, Xalpha_r, Xalpha_s, Xalpha_t,
590 Xalpha_u, Xalpha_v, Xalpha_w, Xalpha_x,
592 Xalpha_y, Xalpha_z, Xalpha_0, Xalpha_1,
593 Xalpha_2, Xalpha_3, Xalpha_4, Xalpha_5,
594 Xalpha_6, Xalpha_7, Xalpha_8, Xalpha_9,
595 Xalpha_perio, Xalpha_excla, Xalpha_colon, Xalpha_quest,
597 Xalpha_arrow_e, Xdecor_1, Xfake_door_5, Xfake_door_6,
598 Xfake_door_7, Xfake_door_8, Xblank, Xblank,
599 Xblank, Xblank, Xblank, Xblank,
601 Xblank, Xblank, Xblank, Xblank,
603 /* special elements added to solve compatibility problems */
604 Xblank, Xblank, Xalpha_copyr, Xfake_acid_1
608 static int get_em_element(unsigned short em_element_raw, int file_version)
610 int em_element = remap_emerald[em_element_raw];
612 if (file_version < FILE_VERSION_EM_V5)
614 /* versions below V5 had no grass, but only sand/dirt */
615 if (em_element == Xgrass)
622 void convert_em_level(unsigned char *src, int file_version)
624 static int eater_offset[8] =
626 0x800, 0x809, 0x812, 0x81B, 0x840, 0x849, 0x852, 0x85B
631 lev.time_seconds = src[0x83E] << 8 | src[0x83F];
632 if (lev.time_seconds > 9999)
633 lev.time_seconds = 9999;
635 temp = ((src[0x83E] << 8 | src[0x83F]) * 25 + 3) / 4;
636 if (temp == 0 || temp > 9999)
638 lev.time_initial = temp;
641 lev.required_initial = src[0x82F];
643 for (i = 0; i < 2; i++)
645 temp = src[0x830 + i * 2] << 8 | src[0x831 + i * 2];
646 ply[i].x_initial = (temp & 63);
647 ply[i].y_initial = (temp >> 6 & 31);
650 temp = (src[0x834] << 8 | src[0x835]) * 28;
653 lev.amoeba_time = temp;
655 lev.android_move_time = src[0x874] << 8 | src[0x875];
656 lev.android_clone_time = src[0x876] << 8 | src[0x877];
658 lev.ball_random = src[0x872] & 1 ? 1 : 0;
659 lev.ball_state_initial = src[0x872] & 128 ? 1 : 0;
660 lev.ball_time = src[0x870] << 8 | src[0x871];
662 lev.emerald_score = src[0x824];
663 lev.diamond_score = src[0x825];
664 lev.alien_score = src[0x826];
665 lev.tank_score = src[0x827];
666 lev.bug_score = src[0x828];
667 lev.eater_score = src[0x829];
668 lev.nut_score = src[0x82A];
669 lev.dynamite_score = src[0x82B];
670 lev.key_score = src[0x82C];
671 lev.exit_score = src[0x82D] * 8 / 5;
672 lev.lenses_score = src[0x867];
673 lev.magnify_score = src[0x868];
674 lev.slurp_score = src[0x869];
676 lev.lenses_time = src[0x86A] << 8 | src[0x86B];
677 lev.magnify_time = src[0x86C] << 8 | src[0x86D];
678 lev.wheel_time = src[0x838] << 8 | src[0x839];
680 lev.wind_cnt_initial = src[0x865] & 15 ? lev.wind_time : 0;
682 lev.wind_direction_initial = (temp & 8 ? 0 :
687 lev.wonderwall_time_initial = src[0x836] << 8 | src[0x837];
689 for (i = 0; i < 8; i++)
690 for (x = 0; x < 9; x++)
691 lev.eater_array[i][x] =
692 get_em_element(src[eater_offset[i] + x], file_version);
694 temp = get_em_element(src[0x86F], file_version);
695 for (y = 0; y < 8; y++)
699 for (x = 0; x < 8; x++)
700 lev.ball_array[y][x] = temp;
704 lev.ball_array[y][1] = (src[0x873] & 1) ? temp : Xblank; /* north */
705 lev.ball_array[y][6] = (src[0x873] & 2) ? temp : Xblank; /* south */
706 lev.ball_array[y][3] = (src[0x873] & 4) ? temp : Xblank; /* west */
707 lev.ball_array[y][4] = (src[0x873] & 8) ? temp : Xblank; /* east */
708 lev.ball_array[y][7] = (src[0x873] & 16) ? temp : Xblank; /* southeast */
709 lev.ball_array[y][5] = (src[0x873] & 32) ? temp : Xblank; /* southwest */
710 lev.ball_array[y][2] = (src[0x873] & 64) ? temp : Xblank; /* northeast */
711 lev.ball_array[y][0] = (src[0x873] & 128)? temp : Xblank; /* northwest */
715 temp = src[0x878] << 8 | src[0x879];
719 lev.android_array[Xemerald] = Xemerald;
720 lev.android_array[Xemerald_pause] = Xemerald;
721 lev.android_array[Xemerald_fall] = Xemerald;
722 lev.android_array[Yemerald_sB] = Xemerald;
723 lev.android_array[Yemerald_eB] = Xemerald;
724 lev.android_array[Yemerald_wB] = Xemerald;
729 lev.android_array[Xdiamond] = Xdiamond;
730 lev.android_array[Xdiamond_pause] = Xdiamond;
731 lev.android_array[Xdiamond_fall] = Xdiamond;
732 lev.android_array[Ydiamond_sB] = Xdiamond;
733 lev.android_array[Ydiamond_eB] = Xdiamond;
734 lev.android_array[Ydiamond_wB] = Xdiamond;
739 lev.android_array[Xstone] = Xstone;
740 lev.android_array[Xstone_pause] = Xstone;
741 lev.android_array[Xstone_fall] = Xstone;
742 lev.android_array[Ystone_sB] = Xstone;
743 lev.android_array[Ystone_eB] = Xstone;
744 lev.android_array[Ystone_wB] = Xstone;
749 lev.android_array[Xbomb] = Xbomb;
750 lev.android_array[Xbomb_pause] = Xbomb;
751 lev.android_array[Xbomb_fall] = Xbomb;
752 lev.android_array[Ybomb_sB] = Xbomb;
753 lev.android_array[Ybomb_eB] = Xbomb;
754 lev.android_array[Ybomb_wB] = Xbomb;
759 lev.android_array[Xnut] = Xnut;
760 lev.android_array[Xnut_pause] = Xnut;
761 lev.android_array[Xnut_fall] = Xnut;
762 lev.android_array[Ynut_sB] = Xnut;
763 lev.android_array[Ynut_eB] = Xnut;
764 lev.android_array[Ynut_wB] = Xnut;
769 lev.android_array[Xtank_1_n] = Xtank_1_n;
770 lev.android_array[Xtank_2_n] = Xtank_1_n;
771 lev.android_array[Ytank_nB] = Xtank_1_n;
772 lev.android_array[Ytank_n_e] = Xtank_1_n;
773 lev.android_array[Ytank_n_w] = Xtank_1_n;
775 lev.android_array[Xtank_1_e] = Xtank_1_e;
776 lev.android_array[Xtank_2_e] = Xtank_1_e;
777 lev.android_array[Ytank_eB] = Xtank_1_e;
778 lev.android_array[Ytank_e_s] = Xtank_1_e;
779 lev.android_array[Ytank_e_n] = Xtank_1_e;
781 lev.android_array[Xtank_1_s] = Xtank_1_s;
782 lev.android_array[Xtank_2_s] = Xtank_1_s;
783 lev.android_array[Ytank_sB] = Xtank_1_s;
784 lev.android_array[Ytank_s_w] = Xtank_1_s;
785 lev.android_array[Ytank_s_e] = Xtank_1_s;
787 lev.android_array[Xtank_1_w] = Xtank_1_w;
788 lev.android_array[Xtank_2_w] = Xtank_1_w;
789 lev.android_array[Ytank_wB] = Xtank_1_w;
790 lev.android_array[Ytank_w_n] = Xtank_1_w;
791 lev.android_array[Ytank_w_s] = Xtank_1_w;
796 lev.android_array[Xeater_n] = Xeater_n;
797 lev.android_array[Yeater_nB] = Xeater_n;
799 lev.android_array[Xeater_e] = Xeater_e;
800 lev.android_array[Yeater_eB] = Xeater_e;
802 lev.android_array[Xeater_s] = Xeater_s;
803 lev.android_array[Yeater_sB] = Xeater_s;
805 lev.android_array[Xeater_w] = Xeater_w;
806 lev.android_array[Yeater_wB] = Xeater_w;
811 lev.android_array[Xbug_1_n] = Xbug_2_n;
812 lev.android_array[Xbug_2_n] = Xbug_2_n;
813 lev.android_array[Ybug_nB] = Xbug_2_n;
814 lev.android_array[Ybug_n_e] = Xbug_2_n;
815 lev.android_array[Ybug_n_w] = Xbug_2_n;
817 lev.android_array[Xbug_1_e] = Xbug_2_e;
818 lev.android_array[Xbug_2_e] = Xbug_2_e;
819 lev.android_array[Ybug_eB] = Xbug_2_e;
820 lev.android_array[Ybug_e_s] = Xbug_2_e;
821 lev.android_array[Ybug_e_n] = Xbug_2_e;
823 lev.android_array[Xbug_1_s] = Xbug_2_s;
824 lev.android_array[Xbug_2_s] = Xbug_2_s;
825 lev.android_array[Ybug_sB] = Xbug_2_s;
826 lev.android_array[Ybug_s_w] = Xbug_2_s;
827 lev.android_array[Ybug_s_e] = Xbug_2_s;
829 lev.android_array[Xbug_1_w] = Xbug_2_w;
830 lev.android_array[Xbug_2_w] = Xbug_2_w;
831 lev.android_array[Ybug_wB] = Xbug_2_w;
832 lev.android_array[Ybug_w_n] = Xbug_2_w;
833 lev.android_array[Ybug_w_s] = Xbug_2_w;
838 lev.android_array[Xalien] = Xalien;
839 lev.android_array[Xalien_pause] = Xalien;
840 lev.android_array[Yalien_nB] = Xalien;
841 lev.android_array[Yalien_eB] = Xalien;
842 lev.android_array[Yalien_sB] = Xalien;
843 lev.android_array[Yalien_wB] = Xalien;
848 lev.android_array[Xspring] = Xspring;
849 lev.android_array[Xspring_pause] = Xspring;
850 lev.android_array[Xspring_e] = Xspring;
851 lev.android_array[Yspring_eB] = Xspring;
852 lev.android_array[Yspring_alien_eB] = Xspring;
853 lev.android_array[Xspring_w] = Xspring;
854 lev.android_array[Yspring_wB] = Xspring;
855 lev.android_array[Yspring_alien_wB] = Xspring;
856 lev.android_array[Xspring_fall] = Xspring;
857 lev.android_array[Yspring_sB] = Xspring;
862 lev.android_array[Yballoon_nB] = Xballoon;
863 lev.android_array[Yballoon_eB] = Xballoon;
864 lev.android_array[Yballoon_sB] = Xballoon;
865 lev.android_array[Yballoon_wB] = Xballoon;
866 lev.android_array[Xballoon] = Xballoon;
871 lev.android_array[Xfake_amoeba] = Xdrip;
872 lev.android_array[Xfake_amoebaB] = Xdrip;
873 lev.android_array[Xamoeba_1] = Xdrip;
874 lev.android_array[Xamoeba_2] = Xdrip;
875 lev.android_array[Xamoeba_3] = Xdrip;
876 lev.android_array[Xamoeba_4] = Xdrip;
877 lev.android_array[Xamoeba_5] = Xdrip;
878 lev.android_array[Xamoeba_6] = Xdrip;
879 lev.android_array[Xamoeba_7] = Xdrip;
880 lev.android_array[Xamoeba_8] = Xdrip;
885 lev.android_array[Xdynamite] = Xdynamite;
888 for (temp = 1; temp < 2047; temp++)
892 case 0x24: /* wonderwall */
893 lev.wonderwall_state_initial = 1;
894 lev.wonderwall_time_initial = 9999;
897 case 0x28: /* wheel */
898 lev.wheel_x_initial = temp & 63;
899 lev.wheel_y_initial = temp >> 6;
900 lev.wheel_cnt_initial = lev.wheel_time;
903 case 0xA3: /* fake blank */
904 lev.lenses_cnt_initial = 9999;
907 case 0xA4: /* fake grass */
908 lev.magnify_cnt_initial = 9999;
913 /* first fill the complete playfield with the default border element */
914 for (y = 0; y < CAVE_HEIGHT; y++)
915 for (x = 0; x < CAVE_WIDTH; x++)
916 native_em_level.cave[x][y] = Zborder;
918 /* then copy the real level contents from level file into the playfield */
920 for (y = 0; y < lev.height; y++)
921 for (x = 0; x < lev.width; x++)
922 native_em_level.cave[x][y] =
923 get_em_element(src[temp++], file_version);
925 /* at last, set the two players at their positions in the playfield */
926 /* (native EM[C] levels always have exactly two players in a level) */
927 for (i = 0; i < 2; i++)
928 native_em_level.cave[ply[i].x_initial][ply[i].y_initial] = Zplayer;
930 native_em_level.file_version = file_version;
933 void prepare_em_level(void)
939 /* reset all runtime variables to their initial values */
941 for (y = 0; y < CAVE_HEIGHT; y++)
942 for (x = 0; x < CAVE_WIDTH; x++)
943 lev.cave[x + CAVE_BUFFER_XOFFSET][y + CAVE_BUFFER_YOFFSET] =
944 native_em_level.cave[x][y];
946 for (y = 0; y < CAVE_BUFFER_HEIGHT; y++)
947 for (x = 0; x < CAVE_BUFFER_WIDTH; x++)
948 lev.next[x][y] = lev.cave[x][y];
950 for (y = 0; y < CAVE_BUFFER_HEIGHT; y++)
951 for (x = 0; x < CAVE_BUFFER_WIDTH; x++)
952 lev.draw[x][y] = lev.cave[x][y];
954 lev.time_initial = lev.time_seconds;
955 lev.time = lev.time_initial;
957 lev.required = lev.required_initial;
960 lev.android_move_cnt = lev.android_move_time;
961 lev.android_clone_cnt = lev.android_clone_time;
964 lev.ball_state = lev.ball_state_initial;
965 lev.ball_cnt = lev.ball_time;
970 lev.lenses_cnt = lev.lenses_cnt_initial;
971 lev.magnify_cnt = lev.magnify_cnt_initial;
973 lev.wheel_cnt = lev.wheel_cnt_initial;
974 lev.wheel_x = lev.wheel_x_initial;
975 lev.wheel_y = lev.wheel_y_initial;
977 lev.wind_direction = lev.wind_direction_initial;
978 lev.wind_cnt = lev.wind_cnt_initial;
980 lev.wonderwall_state = lev.wonderwall_state_initial;
981 lev.wonderwall_time = lev.wonderwall_time_initial;
983 lev.killed_out_of_time = FALSE;
985 /* determine number of players in this level */
986 lev.home_initial = 0;
988 for (i = 0; i < MAX_PLAYERS; i++)
991 ply[i].alive_initial = FALSE;
993 if (ply[i].x_initial != -1 && ply[i].y_initial != -1)
1001 team_mode = getTeamMode_EM();
1004 lev.home_initial = 1;
1006 lev.home = lev.home_initial;
1007 players_left = lev.home_initial;
1009 for (i = 0; i < MAX_PLAYERS; i++)
1015 ply[i].alive_initial = TRUE;
1020 int x = ply[i].x_initial;
1021 int y = ply[i].y_initial;
1023 native_em_level.cave[x][y] = Xblank;
1025 lev.cave[x + CAVE_BUFFER_XOFFSET][y + CAVE_BUFFER_YOFFSET] = Xblank;
1026 lev.next[x + CAVE_BUFFER_XOFFSET][y + CAVE_BUFFER_YOFFSET] = Xblank;
1027 lev.draw[x + CAVE_BUFFER_XOFFSET][y + CAVE_BUFFER_YOFFSET] = Xblank;
1032 for (i = 0; i < MAX_PLAYERS; i++)
1035 ply[i].alive = ply[i].alive_initial;
1036 ply[i].dynamite = 0;
1037 ply[i].dynamite_cnt = 0;
1040 ply[i].oldx = ply[i].x = ply[i].x_initial + CAVE_BUFFER_XOFFSET;
1041 ply[i].oldy = ply[i].y = ply[i].y_initial + CAVE_BUFFER_YOFFSET;
1042 ply[i].last_move_dir = MV_NONE;
1043 ply[i].joy_n = ply[i].joy_e = ply[i].joy_s = ply[i].joy_w = 0;
1044 ply[i].joy_snap = ply[i].joy_drop = 0;
1045 ply[i].joy_stick = ply[i].joy_spin = 0;
1048 // the following engine variables are initialized to version-specific values
1049 // in function InitGameEngine() (src/game.c):
1051 // - game_em.use_single_button (default: TRUE)
1052 // - game_em.use_snap_key_bug (default: FALSE)
1054 game_em.level_solved = FALSE;
1055 game_em.game_over = FALSE;
1057 game_em.any_player_moving = FALSE;
1058 game_em.any_player_snapping = FALSE;
1060 game_em.last_moving_player = 0; /* default: first player */
1062 for (i = 0; i < MAX_PLAYERS; i++)
1063 game_em.last_player_direction[i] = MV_NONE;
1065 lev.exit_x = lev.exit_y = -1; /* kludge for playing player exit sound */