TIMESTAMP_FILE = conftime.h
-LIBGAMEDIR = libgame
-LIBGAME = $(LIBGAMEDIR)/libgame.a
+LIBGAME_DIR = libgame
+LIBGAME = $(LIBGAME_DIR)/libgame.a
-LIBEMDIR = libem
-LIBEM = $(LIBEMDIR)/libem.a
+GAME_EM_DIR = game_em
+GAME_EM = $(GAME_EM_DIR)/game_em.a
-RNDLIBS = $(LIBGAME) $(LIBEM)
+RNDLIBS = $(LIBGAME) $(GAME_EM)
ICONBASE = windows_icon
ifeq ($(PLATFORM),cross-win32)
# build targets
# -----------------------------------------------------------------------------
-all: libgame_dir libem_dir $(PROGNAME)
+all: libgame_dir game_em_dir $(PROGNAME)
$(PROGNAME): $(RNDLIBS) $(TIMESTAMP_FILE) $(OBJS) $(ICON)
$(CC) $(PROFILING) $(OBJS) $(ICON) $(RNDLIBS) $(LDFLAGS) -o $(PROGNAME)
libgame_dir:
- @$(MAKE) -C $(LIBGAMEDIR)
+ @$(MAKE) -C $(LIBGAME_DIR)
$(LIBGAME):
- @$(MAKE) -C $(LIBGAMEDIR)
+ @$(MAKE) -C $(LIBGAME_DIR)
-libem_dir:
- @$(MAKE) -C $(LIBEMDIR)
-$(LIBEM):
- @$(MAKE) -C $(LIBEMDIR)
+game_em_dir:
+ @$(MAKE) -C $(GAME_EM_DIR)
+$(GAME_EM):
+ @$(MAKE) -C $(GAME_EM_DIR)
auto-conf:
@for i in $(CNFS); do \
conf_mus.h: conf_mus.c
@$(MAKE) auto-conf
-$(TIMESTAMP_FILE): $(SRCS) $(LIBGAME) $(LIBEM)
+$(TIMESTAMP_FILE): $(SRCS) $(LIBGAME) $(GAME_EM)
@date '+"[%Y-%m-%d %H:%M]"' \
| sed -e 's/^/#define COMPILE_DATE_STRING /' \
> $(TIMESTAMP_FILE)
$(CC) $(PROFILING) $(CFLAGS) -c $*.c
clean-obj:
- $(MAKE) -C $(LIBGAMEDIR) clean
- $(MAKE) -C $(LIBEMDIR) clean
+ $(MAKE) -C $(LIBGAME_DIR) clean
+ $(MAKE) -C $(GAME_EM_DIR) clean
$(RM) $(OBJS)
$(RM) $(LIBGAME)
- $(RM) $(LIBEM)
+ $(RM) $(GAME_EM)
clean-ico:
$(RM) $(ICONBASE).ico
dist-clean: clean-obj
depend:
- $(MAKE) -C $(LIBGAMEDIR) depend
- $(MAKE) -C $(LIBEMDIR) depend
+ $(MAKE) -C $(LIBGAME_DIR) depend
+ $(MAKE) -C $(GAME_EM_DIR) depend
for i in $(SRCS); do $(CPP) $(CFLAGS) -M $$i; done > .depend
ifeq (.depend,$(wildcard .depend))
-#define COMPILE_DATE_STRING "[2004-08-19 03:34]"
+#define COMPILE_DATE_STRING "[2004-08-20 03:27]"
--- /dev/null
+# =============================================================================
+# Rocks'n'Diamonds Makefile (game_em)
+# -----------------------------------------------------------------------------
+# (c) 1995-2004 Holger Schemel <info@artsoft.org>
+# -----------------------------------------------------------------------------
+# Emerald Mine for X11 © 2000,2001 David Tritscher
+# =============================================================================
+
+# -----------------------------------------------------------------------------
+# configuration
+# -----------------------------------------------------------------------------
+
+SRCS = cave.c \
+ convert.c \
+ graphics.c \
+ init.c \
+ input.c \
+ main.c \
+ sound.c \
+ synchro_1.c \
+ synchro_2.c \
+ synchro_3.c \
+ tab_generate.c \
+ ulaw_generate.c
+
+OBJS = cave.o \
+ convert.o \
+ graphics.o \
+ init.o \
+ input.o \
+ main.o \
+ sound.o \
+ synchro_1.o \
+ synchro_2.o \
+ synchro_3.o \
+ tab_generate.o \
+ ulaw_generate.o
+
+GAME_EM = game_em.a
+
+
+# -----------------------------------------------------------------------------
+# build targets
+# -----------------------------------------------------------------------------
+
+all: $(GAME_EM)
+
+$(GAME_EM): $(OBJS)
+ $(AR) cru $(GAME_EM) $(OBJS)
+ $(RANLIB) $(GAME_EM)
+
+.c.o:
+ $(CC) $(PROFILING) $(CFLAGS) -c $*.c
+
+clean:
+ $(RM) $(OBJS)
+ $(RM) $(GAME_EM)
+
+
+# -----------------------------------------------------------------------------
+# development only
+# -----------------------------------------------------------------------------
+
+depend:
+ for i in $(SRCS); do $(CPP) $(CFLAGS) -M $$i; done > .depend
+
+ifeq (.depend,$(wildcard .depend))
+include .depend
+endif
--- /dev/null
+/* 2000-08-10T16:43:50Z
+ *
+ * cave data structures
+ */
+
+#include <sys/types.h>
+#include <dirent.h>
+#include <stdlib.h>
+#include <stdio.h>
+#include <string.h>
+#include <errno.h>
+
+#include "global.h"
+#include "tile.h"
+#include "level.h"
+#include "file.h"
+
+
+#if defined(TARGET_X11)
+
+struct cave_node *cave_list;
+
+static void clear(void);
+
+/* attempt load a cave
+ *
+ * completely initializes the level structure, ready for a game
+ */
+int cave_convert(char *filename)
+{
+ int result;
+ FILE *file;
+ int actual;
+ unsigned long length;
+ unsigned char buffer[16384];
+
+ clear();
+
+ file = fopen(filename, "rb");
+ if(file == 0) {
+ fprintf(stderr, "%s: \"%s\": %s: %s\n", progname, filename, "open error", strerror(errno));
+ result = 1;
+ goto fail;
+ }
+ actual = fread(buffer, 1, 16384, file);
+ if(actual == -1) {
+ fprintf(stderr, "%s: \"%s\": %s: %s\n", progname, filename, "read error", strerror(errno));
+ result = 1;
+ goto fail;
+ }
+ length = actual;
+ fclose(file);
+ file = 0;
+
+ if(clean_emerald(buffer, &length)) {
+ fprintf(stderr, "%s: \"%s\": %s\n", progname, filename, "unrecognized format");
+ result = 1; goto fail;
+ }
+ convert_emerald(buffer);
+
+ result = 0;
+fail:
+ if(file) fclose(file);
+ return(result);
+}
+
+static void clear(void)
+{
+ lev.home = 1; /* number of players */
+ lev.width = 0;
+ lev.height = 0;
+ lev.time = 0;
+ lev.required = 0;
+ lev.score = 0;
+
+ ply1.num = 0;
+ ply1.alive = (lev.home >= 1);
+ ply1.dynamite = 0;
+ ply1.dynamite_cnt = 0;
+ ply1.keys = 0;
+ ply1.anim = 0;
+ ply1.oldx = ply1.x = 0;
+ ply1.oldy = ply1.y = 0;
+ ply1.joy_n = ply1.joy_e = ply1.joy_s = ply1.joy_w = ply1.joy_fire = ply1.joy_stick = ply1.joy_spin = 0;
+ ply2.num = 1;
+ ply2.alive = (lev.home >= 2);
+ ply2.dynamite = 0;
+ ply2.dynamite_cnt = 0;
+ ply2.keys = 0;
+ ply2.anim = 0;
+ ply2.oldx = ply2.x = 0;
+ ply2.oldy = ply2.y = 0;
+ ply2.joy_n = ply2.joy_e = ply2.joy_s = ply2.joy_w = ply2.joy_fire = ply2.joy_stick = ply2.joy_spin = 0;
+}
+
+void read_cave_list(void)
+{
+ char name[MAXNAME+2];
+ struct cave_node *node, **prev;
+ DIR *dir;
+ struct dirent *entry;
+ char *cut;
+ int len;
+
+ free_cave_list(); /* delete old list if i forgot to before */
+
+ name[MAXNAME] = 0;
+ if(arg_basedir) {
+ snprintf(name, MAXNAME+2, "%s/%s", arg_basedir, EM_LVL_DIR);
+ } else {
+ snprintf(name, MAXNAME+2, "%s", EM_LVL_DIR);
+ }
+ if(name[MAXNAME]) snprintf_overflow("read cave/ directory");
+
+ dir = opendir(name);
+ if(dir) {
+ prev = &cave_list;
+ while((entry = readdir(dir))) {
+ if(strcmp(entry->d_name, ".") == 0 || strcmp(entry->d_name, "..") == 0) continue;
+
+ node = malloc(sizeof(*node)); if(node == 0) break;
+ *prev = node; prev = &node->next;
+
+ node->path[MAXNAME] = 0;
+ snprintf(node->path, MAXNAME+2, "%s/%s", name, entry->d_name);
+ if(node->path[MAXNAME]) snprintf_overflow("read cave/ directory");
+
+ cut = strrchr(node->path, '/'); cut = cut ? cut + 1 : node->path;
+ len = strlen(cut);
+ if(len <= 32) {
+ strncpy(node->name, cut, 32);
+ } else {
+ snprintf(node->name, 32, "%.8s..%s", cut, cut + len - 16);
+ }
+ }
+ *prev = 0;
+ closedir(dir);
+ } else {
+ fprintf(stderr, "%s: \"%s\": %s: %s\n", progname, name, "failed to open directory", strerror(errno));
+ }
+}
+
+void free_cave_list(void)
+{
+ struct cave_node *node, *next;
+
+ for(node = cave_list; node; node = next) {
+ next = node->next;
+ free(node);
+ }
+ cave_list = 0;
+}
+
+#endif
--- /dev/null
+/* 2000-08-20T09:41:18Z
+ *
+ * identify all emerald mine caves and turn them into v6 format.
+ * fixes illegal tiles, acid, wheel, limits times, cleans flags.
+ *
+ * these tables weed out bad tiles for older caves (eg. wheel on -> wheel off)
+ * and clean up v6 caves (acid, number limits) which should(!) be inconsequential,
+ * but no doubt it will break some caves.
+ */
+
+#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
+};
+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
+};
+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
+};
+static unsigned char remap_v4eater[28] = { /* filter crap for v4 */
+ 128,18,2,0,4,8,16,20,28,37,41,45,130,129,131,132,133,134,135,136,146,147,175,65,66,
+ 64,2,18
+};
+
+int clean_emerald(unsigned char *src, unsigned long *length)
+{
+ unsigned int i;
+ if(*length >= 2172 && src[2106] == 255 && src[2107] == 54 && src[2108] == 48 && src[2109] == 48) {
+ 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) {
+ 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) {
+ 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) {
+ unsigned char j = 94;
+ 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];
+ goto v3;
+ }
+ return(1); /* unrecognized cave */
+v3:
+v4:
+v5:
+ src[2106] = 255; src[2107] = 54; src[2108] = 48; src[2109] = 48; /* id */
+ i = src[2094] * 10; src[2110] = i >> 8; src[2111] = i; /* time */
+ for(i = 2148; i < 2172; i++) src[i] = 0;
+ src[2159] = 128; /* ball data */
+v6:
+ for(i = 0; i < 2048; i++) if(src[i] == 40) break; /* fix wheel */
+ for(i++; i < 2048; i++) if(src[i] == 40) src[i] = 147;
+ for(i = 64; i < 2048; i++) if(src[i] == 63) src[i - 64] = 101; /* fix acid */
+ for(i = 2051; i < 2057; i++) if(src[i] == 63) src[i - 3] = 101; /* fix acid in eater 1 */
+ for(i = 2060; i < 2066; i++) if(src[i] == 63) src[i - 3] = 101; /* fix acid in eater 2 */
+ for(i = 2069; i < 2075; i++) if(src[i] == 63) src[i - 3] = 101; /* fix acid in eater 3 */
+ for(i = 2078; i < 2084; i++) if(src[i] == 63) src[i - 3] = 101; /* fix acid in eater 4 */
+ for(i = 2115; i < 2121; i++) if(src[i] == 63) src[i - 3] = 101; /* fix acid in eater 5 */
+ for(i = 2124; i < 2130; i++) if(src[i] == 63) src[i - 3] = 101; /* fix acid in eater 6 */
+ for(i = 2133; i < 2139; i++) if(src[i] == 63) src[i - 3] = 101; /* fix acid in eater 7 */
+ for(i = 2142; i < 2148; i++) if(src[i] == 63) src[i - 3] = 101; /* fix acid in eater 8 */
+ src[2094] = 0; /* old style time */
+ src[2096] &= 7; src[src[2096] << 8 | src[2097]] = 128; /* player 1 pos */
+ src[2098] &= 7; src[src[2098] << 8 | src[2099]] = 128; /* player 2 pos */
+ if((src[2100] << 8 | src[2101]) > 9999) { src[2100] = 39; src[2101] = 15; } /* ameuba speed */
+ if((src[2102] << 8 | src[2103]) > 9999) { src[2102] = 39; src[2103] = 15; } /* time wonderwall */
+ if((src[2110] << 8 | src[2111]) > 9999) { src[2110] = 39; src[2111] = 15; } /* time */
+ i = src[2149]; i &= 15; i &= -i; src[2149] = i; /* wind direction */
+ if((src[2154] << 8 | src[2155]) > 9999) { src[2154] = 39; src[2155] = 15; } /* time lenses */
+ if((src[2156] << 8 | src[2157]) > 9999) { src[2156] = 39; src[2157] = 15; } /* time magnify */
+ src[2158] = 0; src[2159] = remap_v6[src[2159]]; /* ball object */
+ if((src[2160] << 8 | src[2161]) > 9999) { src[2160] = 39; src[2161] = 15; } /* ball pause */
+ src[2162] &= 129; if(src[2162] & 1) src[2163] = 0; /* ball data */
+ if((src[2164] << 8 | src[2165]) > 9999) { src[2164] = 39; src[2165] = 15; } /* android move pause */
+ if((src[2166] << 8 | src[2167]) > 9999) { src[2166] = 39; src[2167] = 15; } /* android clone pause */
+ src[2168] &= 31; /* android data */
+
+ *length = 2172; /* size of v6 cave */
+ return(0);
+}
+
+/* 2000-07-30T00:26:00Z
+ *
+ * Read emerald mine caves version 6
+ *
+ * v4 and v5 emerald mine caves are converted to v6 (which completely supports older versions)
+ *
+ * converting to the internal format loses /significant/ information which can breaks lots of caves.
+ *
+ * major incompatibilities:
+ * borderless caves behave completely differently, the player no longer "warps" to the other side.
+ * a compile time option for spring can make it behave differently when it 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.
+ *
+ * so far all below have not broken any caves:
+ *
+ * active wheel inside an eater will not function, eater explosions will not change settings.
+ * initial collect objects (emerald, diamond, dynamite) dont exist.
+ * initial rolling objects will be moved manually and made into sitting objects.
+ * drips always appear from dots.
+ * more than one thing can fall into acid at the same time.
+ * acid explodes when the player walks into it, rather than splashing.
+ * simultaneous explosions may be in a slightly different order.
+ * quicksand states have been reduced.
+ * acid base is effectively an indestructable wall now which can affect eater explosions.
+ * android can clone forever with a clone pause of 0 (emeralds, diamonds, nuts, stones, bombs, springs).
+ *
+ * 2001-03-12T02:46:55Z
+ * rolling stuff is now allowed in the cave, i didn't like making this decision.
+ * if BAD_ROLL is not defined, initial rolling objects are moved by hand.
+ * initial collect objects break some cave in elvis mine 5.
+ * different timing for wonderwall break some cave in exception mine 2.
+ * i think i'm pretty locked into always using the bad roll. *sigh*
+ * rolling spring is now turned into regular spring. it appears the emc editor only uses
+ * the force code for initially moving spring. i will follow this in my editor.
+ */
+
+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,
+#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,
+#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,
+#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,
+};
+
+void convert_emerald(unsigned char *src)
+{
+ unsigned int x, y, temp;
+
+ lev.width = 64;
+ lev.height = 32;
+ temp = ((src[0x83E] << 8 | src[0x83F]) * 25 + 3) / 4; if(temp == 0 || temp > 9999) temp = 9999;
+ lev.time = temp;
+ lev.required = src[0x82F];
+
+ temp = src[0x830] << 8 | src[0x831];
+ ply1.oldx = ply1.x = (temp & 63) + 1;
+ ply1.oldy = ply1.y = (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];
+ 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.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.diamond_score = src[0x825];
+ lev.dynamite_score = src[0x82B];
+ lev.eater_pos = 0;
+ lev.eater_score = src[0x829];
+ lev.emerald_score = src[0x824];
+ lev.exit_score = src[0x82D] * 8 / 5;
+ lev.key_score = src[0x82C];
+ lev.lenses_cnt = 0;
+ 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.wheel_time = src[0x838] << 8 | src[0x839];
+ lev.wind_cnt = src[0x865] & 15 ? 9999 : 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]];
+ temp = remap_emerald[src[0x86F]];
+ for(y = 0; y < 8; y++) {
+ if(src[0x872] & 1) {
+ for(x = 0; x < 8; x++) lev.ball_array[y][x] = temp;
+ } 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][7] = (src[0x873] & 16) ? temp : Xblank; /* south east */
+ lev.ball_array[y][5] = (src[0x873] & 32) ? temp : Xblank; /* south west */
+ lev.ball_array[y][2] = (src[0x873] & 64) ? temp : Xblank; /* north east */
+ lev.ball_array[y][0] = (src[0x873] & 128) ? temp : Xblank; /* north west */
+ }
+ }
+ for(temp = 0; temp < TILE_MAX; temp++) lev.android_array[temp] = Xblank;
+ temp = src[0x878] << 8 | src[0x879];
+ if(temp & 1) {
+ lev.android_array[Xemerald] = lev.android_array[Xemerald_pause] =
+ lev.android_array[Xemerald_fall] = lev.android_array[Yemerald_sB] =
+ lev.android_array[Yemerald_eB] = lev.android_array[Yemerald_wB] = Xemerald;
+ }
+ if(temp & 2) {
+ lev.android_array[Xdiamond] = lev.android_array[Xdiamond_pause] =
+ lev.android_array[Xdiamond_fall] = lev.android_array[Ydiamond_sB] =
+ lev.android_array[Ydiamond_eB] = lev.android_array[Ydiamond_wB] = Xdiamond;
+ }
+ if(temp & 4) {
+ lev.android_array[Xstone] = lev.android_array[Xstone_pause] =
+ lev.android_array[Xstone_fall] = lev.android_array[Ystone_sB] =
+ lev.android_array[Ystone_eB] = lev.android_array[Ystone_wB] = Xstone;
+ }
+ if(temp & 8) {
+ lev.android_array[Xbomb] = lev.android_array[Xbomb_pause] =
+ lev.android_array[Xbomb_fall] = lev.android_array[Ybomb_sB] =
+ lev.android_array[Ybomb_eB] = lev.android_array[Ybomb_wB] = Xbomb;
+ }
+ if(temp & 16) {
+ lev.android_array[Xnut] = lev.android_array[Xnut_pause] =
+ lev.android_array[Xnut_fall] = lev.android_array[Ynut_sB] =
+ lev.android_array[Ynut_eB] = lev.android_array[Ynut_wB] = Xnut;
+ }
+ if(temp & 32) {
+ lev.android_array[Xtank_n] = lev.android_array[Xtank_gon] = lev.android_array[Ytank_nB] =
+ lev.android_array[Ytank_n_e] = lev.android_array[Ytank_n_w] = Xtank_n;
+ lev.android_array[Xtank_e] = lev.android_array[Xtank_goe] = lev.android_array[Ytank_eB] =
+ lev.android_array[Ytank_e_s] = lev.android_array[Ytank_e_n] = Xtank_e;
+ lev.android_array[Xtank_s] = lev.android_array[Xtank_gos] = lev.android_array[Ytank_sB] =
+ lev.android_array[Ytank_s_w] = lev.android_array[Ytank_s_e] = Xtank_s;
+ lev.android_array[Xtank_w] = lev.android_array[Xtank_gow] = lev.android_array[Ytank_wB] =
+ lev.android_array[Ytank_w_n] = lev.android_array[Ytank_w_s] = Xtank_w;
+ }
+ if(temp & 64) {
+ lev.android_array[Xeater_n] = lev.android_array[Yeater_nB] = Xeater_n;
+ lev.android_array[Xeater_e] = lev.android_array[Yeater_eB] = Xeater_e;
+ lev.android_array[Xeater_s] = lev.android_array[Yeater_sB] = Xeater_s;
+ lev.android_array[Xeater_w] = lev.android_array[Yeater_wB] = Xeater_w;
+ }
+ if(temp & 128) {
+ lev.android_array[Xbug_n] = lev.android_array[Xbug_gon] = lev.android_array[Ybug_nB] =
+ lev.android_array[Ybug_n_e] = lev.android_array[Ybug_n_w] = Xbug_gon;
+ lev.android_array[Xbug_e] = lev.android_array[Xbug_goe] = lev.android_array[Ybug_eB] =
+ lev.android_array[Ybug_e_s] = lev.android_array[Ybug_e_n] = Xbug_goe;
+ lev.android_array[Xbug_s] = lev.android_array[Xbug_gos] = lev.android_array[Ybug_sB] =
+ lev.android_array[Ybug_s_w] = lev.android_array[Ybug_s_e] = Xbug_gos;
+ lev.android_array[Xbug_w] = lev.android_array[Xbug_gow] = lev.android_array[Ybug_wB] =
+ lev.android_array[Ybug_w_n] = lev.android_array[Ybug_w_s] = Xbug_gow;
+ }
+ if(temp & 256) {
+ lev.android_array[Xalien] = lev.android_array[Xalien_pause] =
+ lev.android_array[Yalien_nB] = lev.android_array[Yalien_eB] =
+ lev.android_array[Yalien_sB] = lev.android_array[Yalien_wB] = Xalien;
+ }
+ if(temp & 512) {
+ lev.android_array[Xspring] = lev.android_array[Xspring_pause] =
+ lev.android_array[Xspring_e] = lev.android_array[Yspring_eB] = lev.android_array[Yspring_kill_eB] =
+ lev.android_array[Xspring_w] = lev.android_array[Yspring_wB] = lev.android_array[Yspring_kill_wB] =
+ lev.android_array[Xspring_fall] = lev.android_array[Yspring_sB] = Xspring;
+ }
+ if(temp & 1024) {
+ lev.android_array[Yballoon_nB] = lev.android_array[Yballoon_eB] =
+ lev.android_array[Yballoon_sB] = lev.android_array[Yballoon_wB] =
+ lev.android_array[Xballoon] = Xballoon;
+ }
+ if(temp & 2048) {
+ 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;
+ }
+ if(temp & 4096) {
+ lev.android_array[Xdynamite] = Xdynamite;
+ }
+
+ for(temp = 1; temp < 2047; temp++) {
+ switch(src[temp]) {
+ case 0x24: lev.wonderwall_state = 1; lev.wonderwall_time = 9999; break; /* wonderwall */
+ case 0x28: lev.wheel_x = temp & 63; lev.wheel_y = temp >> 6; lev.wheel_cnt = lev.wheel_time; break; /* wheel */
+#ifndef BAD_ROLL
+ case 0x63: src[temp - 1] = 0x45; src[temp] = 0x80; break; /* spring roll left */
+ case 0x64: src[temp + 1] = 0x45; src[temp] = 0x80; break; /* spring roll right */
+ case 0x72: src[temp - 1] = 0x25; src[temp] = 0x80; break; /* nut roll left */
+ case 0x73: src[temp + 1] = 0x25; src[temp] = 0x80; break; /* nut roll right */
+ case 0x77: src[temp - 1] = 0x10; src[temp] = 0x80; break; /* bomb roll left */
+ case 0x78: src[temp + 1] = 0x10; src[temp] = 0x80; break; /* bomb roll right */
+ case 0x79: src[temp - 1] = 0x00; src[temp] = 0x80; break; /* stone roll left */
+ case 0x7A: src[temp + 1] = 0x00; src[temp] = 0x80; break; /* stone roll right */
+#endif
+ case 0xA3: lev.lenses_cnt = 9999; break; /* fake blank */
+ case 0xA4: lev.magnify_cnt = 9999; break; /* fake grass */
+ }
+ }
+ for(y = 0; y < HEIGHT; y++) for(x = 0; x < WIDTH; x++) Cave[y][x] = ZBORDER;
+ 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++]];
+ }
+ if(ply1.alive) Cave[ply1.y][ply1.x] = Zplayer;
+ if(ply2.alive) Cave[ply2.y][ply2.x] = Zplayer;
+ for(y = 0; y < HEIGHT; y++) for(x = 0; x < WIDTH; x++) Next[y][x] = Cave[y][x];
+ for(y = 0; y < HEIGHT; y++) for(x = 0; x < WIDTH; x++) Draw[y][x] = Cave[y][x];
+}
+
+#endif
--- /dev/null
+#ifndef DISPLAY_H
+#define DISPLAY_H
+
+#include <X11/Xlib.h>
+#include <X11/Xutil.h>
+#include <X11/Xatom.h>
+#include <X11/keysym.h>
+
+#define ORIG_TILEX 16
+#define ORIG_TILEY 16
+#define ORIG_SCOREX 8
+#define ORIG_SCOREY 9
+#define ORIG_GFXMENUFONTX 14
+#define ORIG_GFXMENUFONTY 16
+#define ORIG_MENUFONTX 12
+#define ORIG_MENUFONTY 16
+
+#define ZOOM_FACTOR 2
+
+#define TILEX (ORIG_TILEX * ZOOM_FACTOR)
+#define TILEY (ORIG_TILEY * ZOOM_FACTOR)
+#define SCOREX (ORIG_SCOREX * ZOOM_FACTOR)
+#define SCOREY (ORIG_SCOREY * ZOOM_FACTOR)
+#define GFXMENUFONTX (ORIG_GFXMENUFONTX * ZOOM_FACTOR)
+#define GFXMENUFONTY (ORIG_GFXMENUFONTY * ZOOM_FACTOR)
+#define MENUFONTX (ORIG_MENUFONTX * ZOOM_FACTOR)
+#define MENUFONTY (ORIG_MENUFONTY * ZOOM_FACTOR)
+
+/* often used screen positions */
+#define SX 8
+#define SY 8
+
+#if 0
+
+extern Display *display;
+extern Window window;
+#define xwindow window
+
+#else
+
+#include "../libgame/system.h"
+
+#define xwindow (window->drawable)
+
+#endif
+
+#if 1
+
+extern Bitmap *screenBitmap;
+extern Bitmap *scoreBitmap;
+
+extern Bitmap *objBitmap;
+extern Bitmap *sprBitmap;
+extern Bitmap *ttlBitmap;
+extern Bitmap *botBitmap;
+
+#endif
+
+extern Pixmap screenPixmap;
+extern Pixmap scorePixmap;
+extern Pixmap spriteBitmap;
+
+extern Pixmap objPixmap;
+extern Pixmap objmaskBitmap;
+extern Pixmap sprPixmap;
+extern Pixmap sprmaskBitmap;
+extern Pixmap ttlPixmap;
+extern Pixmap ttlmaskBitmap;
+extern Pixmap botPixmap;
+extern Pixmap botmaskBitmap;
+
+extern GC screenGC;
+extern GC scoreGC;
+extern GC spriteGC;
+extern GC antsGC;
+
+extern Atom deleteAtom;
+
+extern KeySym lastKeySym;
+
+extern KeyCode northKeyCode[];
+extern KeyCode eastKeyCode[];
+extern KeyCode southKeyCode[];
+extern KeyCode westKeyCode[];
+extern KeyCode fireKeyCode[];
+extern KeyCode escKeyCode[];
+
+#endif
--- /dev/null
+#ifndef FILE_H
+#define FILE_H
+
+/* 2000-09-28T09:07:50Z
+ */
+
+#include "global.h"
+
+struct cave_node {
+ struct cave_node *next;
+ char path[MAXNAME+2];
+ char name[32];
+};
+
+extern struct cave_node *cave_list;
+
+#endif
--- /dev/null
+/***********************************************************
+* Artsoft Retro-Game Library *
+*----------------------------------------------------------*
+* (c) 1994-2002 Artsoft Entertainment *
+* Holger Schemel *
+* Detmolder Strasse 189 *
+* 33604 Bielefeld *
+* Germany *
+* e-mail: info@artsoft.org *
+*----------------------------------------------------------*
+* game_em.h *
+***********************************************************/
+
+#ifndef GAME_EM_H
+#define GAME_EM_H
+
+#define GAME_EM_VERSION_1_0_0
+
+extern void em_main();
+
+#endif /* GAME_EM_H */
--- /dev/null
+#ifndef GLOBAL_H
+#define GLOBAL_H
+
+#define EM_GFX_DIR "graphics.EM"
+#define EM_SND_DIR "sounds.EM"
+#define EM_LVL_DIR "levels.EM"
+
+#define MAXNAME 1024 /* arbitrary maximum length of filenames (cos i am lazy) */
+extern void snprintf_overflow(char *);
+
+extern int debug;
+extern char *progname;
+extern char *arg_basedir;
+extern char *arg_display;
+extern char *arg_geometry;
+extern int arg_install;
+extern int arg_silence;
+
+extern unsigned int frame;
+
+extern short ulaw_to_linear[256];
+extern unsigned char linear_to_ulaw[65536];
+
+/* all global function prototypes */
+
+int open_all(void);
+void close_all(void);
+
+void readjoy(void);
+void input_eventloop(void);
+
+void blitscreen(void);
+void game_initscreen(void);
+void game_blitscore(void);
+void game_animscreen(void);
+void title_initscreen(void);
+void title_blitscore(void);
+void title_animscreen(void);
+void title_blitants(unsigned int y);
+void title_string(unsigned int y, unsigned int left, unsigned int right, char *string);
+
+void sound_play(void);
+
+int cave_convert(char *filename);
+
+int game_start(void);
+void synchro_1(void);
+void synchro_2(void);
+void synchro_3(void);
+
+int clean_emerald(unsigned char *src, unsigned long *length);
+void convert_emerald(unsigned char *src);
+
+int sound_thread(void);
+int read_sample(char *name, short **data, long *length);
+
+void read_cave_list(void);
+void free_cave_list(void);
+
+#endif
--- /dev/null
+/* 2000-08-13T14:36:17Z
+ *
+ * graphics manipulation crap
+ */
+
+#include <X11/Xlib.h>
+#include <X11/Xutil.h>
+
+#include "global.h"
+#include "display.h"
+#include "level.h"
+
+#include <stdio.h>
+
+
+#if defined(TARGET_X11)
+
+unsigned int frame; /* current frame */
+unsigned int screen_x; /* current scroll position */
+unsigned int screen_y;
+
+static unsigned short screentiles[14][22]; /* tiles currently on screen */
+
+static unsigned int colours[8];
+static unsigned int colour_anim;
+
+static void xdebug(char *msg)
+{
+#if 0
+ XSync(display, False);
+ printf("EM DEBUG: %s\n", msg);
+#endif
+}
+
+static void colour_shuffle(void)
+{
+ unsigned int i, j, k;
+ for (i = 0; i < 8; i++) colours[i] = i;
+ for (i = 0; i < 8; i++) {
+ Random = Random * 129 + 1;
+ j = (Random >> 10) & 7;
+ k = colours[i];
+ colours[i] = colours[j];
+ colours[j] = k;
+ }
+}
+
+/* copy the entire screen to the window at the scroll position
+ *
+ * perhaps use mit-shm to speed this up
+ */
+void blitscreen(void)
+{
+ unsigned int x = screen_x % (22 * TILEX);
+ unsigned int y = screen_y % (14 * TILEY);
+
+ xdebug("blitscreen");
+
+#if 0
+ printf("::: %d, %d [%d, %d]\n", x, y, TILEX, TILEY);
+#endif
+
+ if (x < 2 * TILEX && y < 2 * TILEY) {
+
+#if 0
+ printf("!!! %ld, %ld, %ld, %ld\n",
+ display, screenPixmap, xwindow, screenGC);
+#endif
+
+ XCopyArea(display, screenPixmap, xwindow, screenGC, x, y, 20 * TILEX, 12 * TILEY, SX, SY);
+ } else if (x < 2 * TILEX && y >= 2 * TILEY) {
+ XCopyArea(display, screenPixmap, xwindow, screenGC, x, y, 20 * TILEX, 14 * TILEY - y, SX, SY);
+ XCopyArea(display, screenPixmap, xwindow, screenGC, x, 0, 20 * TILEX, y - 2 * TILEY, SX, SY + 14 * TILEY - y);
+ } else if (x >= 2 * TILEX && y < 2 * TILEY) {
+ XCopyArea(display, screenPixmap, xwindow, screenGC, x, y, 22 * TILEX - x, 12 * TILEY, SX, SY);
+ XCopyArea(display, screenPixmap, xwindow, screenGC, 0, y, x - 2 * TILEX, 12 * TILEY, SX + 22 * TILEX - x, SY);
+ } else {
+ XCopyArea(display, screenPixmap, xwindow, screenGC, x, y, 22 * TILEX - x, 14 * TILEY - y, SX, SY);
+ XCopyArea(display, screenPixmap, xwindow, screenGC, 0, y, x - 2 * TILEX, 14 * TILEY - y, SX + 22 * TILEX - x, SY);
+ XCopyArea(display, screenPixmap, xwindow, screenGC, x, 0, 22 * TILEX - x, y - 2 * TILEY, SX, SY + 14 * TILEY - y);
+ XCopyArea(display, screenPixmap, xwindow, screenGC, 0, 0, x - 2 * TILEX, y - 2 * TILEY, SX + 22 * TILEX - x, SY + 14 * TILEY - y);
+ }
+
+ XCopyArea(display, scorePixmap, xwindow, scoreGC, 0, 0, 20 * TILEX, SCOREY, SX, SY + 12 * TILEY);
+ XFlush(display);
+
+ xdebug("blitscreen - done");
+}
+
+/* draw differences between game tiles and screen tiles
+ *
+ * implicitly handles scrolling and restoring background under the sprites
+ *
+ * perhaps use mit-shm to speed this up
+ */
+static void animscreen(void)
+{
+ unsigned int x, y, dx, dy;
+ unsigned short obj;
+ unsigned int left = screen_x / TILEX;
+ unsigned int top = screen_y / TILEY;
+
+ xdebug("animscreen");
+
+ for (y = top; y < top + 14; y++) {
+ dy = y % 14;
+ for (x = left; x < left + 22; x++) {
+ dx = x % 22;
+ obj = map_obj[frame][Draw[y][x]];
+ if (screentiles[dy][dx] != obj) {
+ screentiles[dy][dx] = obj;
+ XCopyArea(display, objPixmap, screenPixmap, screenGC, (obj / 512) * TILEX, (obj % 512) * TILEY / 16, TILEX, TILEY, dx * TILEX, dy * TILEY);
+ }
+ }
+ }
+}
+
+/* blit players to the screen
+ *
+ * handles transparency and movement
+ */
+static void blitplayer(struct PLAYER *ply)
+{
+ unsigned int x, y, dx, dy;
+ unsigned short obj, spr;
+
+ xdebug("blitplayer");
+
+ if (ply->alive)
+ {
+ x = (frame * ply->oldx + (8 - frame) * ply->x) * TILEX / 8;
+ y = (frame * ply->oldy + (8 - frame) * ply->y) * TILEY / 8;
+ dx = x + TILEX - 1;
+ dy = y + TILEY - 1;
+
+ if ((unsigned int)(dx - screen_x) < (21 * TILEX - 1) &&
+ (unsigned int)(dy - screen_y) < (13 * TILEY - 1))
+ {
+ spr = map_spr[ply->num][frame][ply->anim];
+ x %= 22 * TILEX;
+ y %= 14 * TILEY;
+ dx %= 22 * TILEX;
+ dy %= 14 * TILEY;
+
+ if (objmaskBitmap)
+ {
+ obj = screentiles[y / TILEY][x / TILEX];
+ XCopyArea(display, objmaskBitmap, spriteBitmap, spriteGC,
+ (obj / 512) * TILEX, (obj % 512) * TILEY / 16, TILEX, TILEY,
+ -(x % TILEX), -(y % TILEY));
+
+ obj = screentiles[dy / TILEY][dx / TILEX];
+ XCopyArea(display, objmaskBitmap, spriteBitmap, spriteGC,
+ (obj / 512) * TILEX, (obj % 512) * TILEY / 16, TILEX, TILEY,
+ (22 * TILEX - x) % TILEX, (14 * TILEY - y) % TILEY);
+ }
+ else if (sprmaskBitmap)
+ {
+ XCopyArea(display, sprmaskBitmap, spriteBitmap, spriteGC,
+ (spr / 8) * TILEX, (spr % 8) * TILEY, TILEX, TILEY, 0, 0);
+ }
+ else
+ {
+ XFillRectangle(display, spriteBitmap, spriteGC, 0, 0, TILEX, TILEY);
+ }
+
+ screentiles[y / TILEY][x / TILEX] = -1; /* mark screen as dirty */
+ screentiles[dy / TILEY][dx / TILEX] = -1;
+
+ XSetClipMask(display, screenGC, spriteBitmap);
+ XSetClipOrigin(display, screenGC, x, y);
+ XCopyArea(display, sprPixmap, screenPixmap, screenGC,
+ (spr / 8) * TILEX, (spr % 8) * TILEY, TILEX, TILEY,
+ x, y);
+ XSetClipOrigin(display, screenGC, x - 22 * TILEX, y);
+ XCopyArea(display, sprPixmap, screenPixmap, screenGC,
+ (spr / 8) * TILEX, (spr % 8) * TILEY, TILEX, TILEY,
+ x - 22 * TILEX, y);
+ XSetClipOrigin(display, screenGC, x, y - 14 * TILEY);
+ XCopyArea(display, sprPixmap, screenPixmap, screenGC,
+ (spr / 8) * TILEX, (spr % 8) * TILEY, TILEX, TILEY,
+ x, y - 14 * TILEY);
+ XSetClipMask(display, screenGC, None);
+ }
+ }
+}
+
+void game_initscreen(void)
+{
+ unsigned int x,y;
+
+ xdebug("game_initscreen");
+
+ frame = 6;
+ screen_x = 0;
+ screen_y = 0;
+
+ for (y = 0; y < 14; y++) {
+ for (x = 0; x < 22; x++) {
+ screentiles[y][x] = -1;
+ }
+ }
+
+ colour_shuffle();
+ colours[0] += 16;
+ colours[1] += 16;
+ colours[2] += 16;
+ colour_anim = 0;
+
+ XFillRectangle(display, scorePixmap, scoreGC, 0, 0, 20 * TILEX, SCOREY);
+ XCopyArea(display, botPixmap, scorePixmap, scoreGC, 11 * SCOREX, colours[0] * SCOREY, 3 * SCOREX, SCOREY, 1 * SCOREX, 0); /* 0-63 time */
+ XCopyArea(display, botPixmap, scorePixmap, scoreGC, 18 * SCOREX, colours[0] * SCOREY, 6 * SCOREX, SCOREY, 15 * SCOREX, 0); /* 112-207 diamonds */
+ XCopyArea(display, botPixmap, scorePixmap, scoreGC, 14 * SCOREX, colours[0] * SCOREY, 4 * SCOREX, SCOREY, 32 * SCOREX, 0); /* 256-319 score */
+}
+
+void game_blitscore(void)
+{
+ unsigned int i;
+
+ xdebug("game_blitscore");
+
+ i = (lev.time + 4) / 5;
+ XCopyArea(display, botPixmap, scorePixmap, scoreGC, (i % 10) * SCOREX, colours[1] * SCOREY, SCOREX, SCOREY, 7 * SCOREX, 0); i /= 10;
+ XCopyArea(display, botPixmap, scorePixmap, scoreGC, (i % 10) * SCOREX, colours[1] * SCOREY, SCOREX, SCOREY, 6 * SCOREX, 0); i /= 10;
+ XCopyArea(display, botPixmap, scorePixmap, scoreGC, (i % 10) * SCOREX, colours[1] * SCOREY, SCOREX, SCOREY, 5 * SCOREX, 0); i /= 10;
+ XCopyArea(display, botPixmap, scorePixmap, scoreGC, (i % 10) * SCOREX, colours[1] * SCOREY, SCOREX, SCOREY, 4 * SCOREX, 0);
+ i = lev.score;
+ XCopyArea(display, botPixmap, scorePixmap, scoreGC, (i % 10) * SCOREX, colours[1] * SCOREY, SCOREX, SCOREY, 39 * SCOREX, 0); i /= 10;
+ XCopyArea(display, botPixmap, scorePixmap, scoreGC, (i % 10) * SCOREX, colours[1] * SCOREY, SCOREX, SCOREY, 38 * SCOREX, 0); i /= 10;
+ XCopyArea(display, botPixmap, scorePixmap, scoreGC, (i % 10) * SCOREX, colours[1] * SCOREY, SCOREX, SCOREY, 37 * SCOREX, 0); i /= 10;
+ XCopyArea(display, botPixmap, scorePixmap, scoreGC, (i % 10) * SCOREX, colours[1] * SCOREY, SCOREX, SCOREY, 36 * SCOREX, 0);
+ if (lev.home == 0) {
+ XCopyArea(display, botPixmap, scorePixmap, scoreGC, 12 * SCOREX, 24 * SCOREY, 12 * SCOREX, SCOREY, 14 * SCOREX, 0); /* relax */
+ goto done;
+ }
+ if (ply1.alive + ply2.alive >= lev.home && lev.required == 0) {
+ XCopyArea(display, botPixmap, scorePixmap, scoreGC, 24 * SCOREX, colours[2] * SCOREY, 12 * SCOREX, SCOREY, 14 * SCOREX, 0); /* find the exit */
+ goto done;
+ }
+ if (ply1.alive + ply2.alive < lev.home) {
+ if (++colour_anim > 11) colour_anim = 0;
+ if (colour_anim < 6) {
+ XCopyArea(display, botPixmap, scorePixmap, scoreGC, 0, 24 * SCOREY, 12 * SCOREX, SCOREY, 14 * SCOREX, 0); /* forget it */
+ goto done;
+ }
+ XCopyArea(display, botPixmap, scorePixmap, scoreGC, 18 * SCOREX, colours[0] * SCOREY, 6 * SCOREX, SCOREY, 15 * SCOREX, 0); /* diamonds */
+ }
+ i = lev.required;
+ XCopyArea(display, botPixmap, scorePixmap, scoreGC, (i % 10) * SCOREX, colours[1] * SCOREY, SCOREX, SCOREY, 24 * SCOREX, 0); i /= 10;
+ XCopyArea(display, botPixmap, scorePixmap, scoreGC, (i % 10) * SCOREX, colours[1] * SCOREY, SCOREX, SCOREY, 23 * SCOREX, 0); i /= 10;
+ XCopyArea(display, botPixmap, scorePixmap, scoreGC, (i % 10) * SCOREX, colours[1] * SCOREY, SCOREX, SCOREY, 22 * SCOREX, 0); i /= 10;
+ XCopyArea(display, botPixmap, scorePixmap, scoreGC, (i % 10) * SCOREX, colours[1] * SCOREY, SCOREX, SCOREY, 21 * SCOREX, 0);
+done:
+}
+
+void game_animscreen(void)
+{
+ unsigned int x,y;
+
+ xdebug("game_animscreen");
+
+ x = (frame * ply1.oldx + (8 - frame) * ply1.x) * TILEX / 8 + (19 * TILEX) / 2;
+ y = (frame * ply1.oldy + (8 - frame) * ply1.y) * TILEY / 8 + (11 * TILEY) / 2;
+ if (x > lev.width * TILEX) x = lev.width * TILEX;
+ if (y > lev.height * TILEY) y = lev.height * TILEY;
+ if (x < 20 * TILEX) x = 20 * TILEY;
+ if (y < 12 * TILEY) y = 12 * TILEY;
+ screen_x = x - 19 * TILEX;
+ screen_y = y - 11 * TILEY;
+
+ animscreen();
+ blitplayer(&ply1);
+ blitplayer(&ply2);
+ blitscreen();
+ XFlush(display);
+
+ Random = Random * 129 + 1;
+}
+
+void title_initscreen(void)
+{
+ xdebug("title_initscreen");
+
+ screen_x = 0;
+ screen_y = 0;
+
+ colour_shuffle();
+ colours[1] += 8;
+ colour_anim = 0;
+
+ XCopyArea(display, ttlPixmap, screenPixmap, screenGC, 0, 0, 20 * TILEX, 12 * TILEY, 0, 0);
+ if (botmaskBitmap) {
+ XCopyArea(display, botPixmap, scorePixmap, scoreGC, 0, colours[1] * SCOREY, 20 * TILEX, SCOREY, 0, 0);
+ XSetClipMask(display, scoreGC, botmaskBitmap);
+ XSetClipOrigin(display, scoreGC, 0, 0 - colours[0] * SCOREY);
+ }
+ XCopyArea(display, botPixmap, scorePixmap, scoreGC, 0, colours[0] * SCOREY, 20 * TILEX, SCOREY, 0, 0);
+ if (botmaskBitmap) {
+ XSetClipMask(display, scoreGC, None);
+ }
+}
+
+void title_blitscore(void)
+{
+ unsigned int x, y, i;
+
+ xdebug("title_blitscore");
+
+ if (++colour_anim > 30) colour_anim = 0;
+ i = colour_anim >= 16 ? 31 - colour_anim : colour_anim;
+ x = (i / 8 + 18) * 2 * SCOREX;
+ y = (i % 8 + 16) * SCOREY;
+
+ if (botmaskBitmap) {
+ XCopyArea(display, botPixmap, scorePixmap, scoreGC, 32 * SCOREX, colours[1] * SCOREY, 2 * SCOREX, SCOREY, 32 * SCOREX, 0);
+ XSetClipMask(display, scoreGC, botmaskBitmap);
+ XSetClipOrigin(display, scoreGC, 32 * SCOREX - x, 0 - y);
+ }
+ XCopyArea(display, botPixmap, scorePixmap, scoreGC, x, y, 2 * SCOREX, SCOREY, 32 * SCOREX, 0);
+ if (botmaskBitmap) {
+ XSetClipMask(display, scoreGC, None);
+ }
+}
+
+void title_blitants(unsigned int y)
+{
+ static const char ants_dashes[2] = { 8, 7 };
+
+ xdebug("title_blitants");
+
+ XSetDashes(display, antsGC, colour_anim, ants_dashes, 2);
+ XDrawRectangle(display, screenPixmap, antsGC, 0, y * TILEY, 20 * TILEX - 1, TILEY - 1);
+}
+
+void title_animscreen(void)
+{
+ blitscreen();
+ XFlush(display);
+
+ Random = Random * 129 + 1;
+}
+
+static int ttl_map[] =
+{
+ -1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,
+ -1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,
+ -1,0,-1,-1,-1,-1,-1,1,-1,-1,-1,-1,2,3,4,-1, /* !',-. */
+ 5,6,7,8,9,10,11,12,13,14,15,-1,-1,-1,-1,16, /* 0123456789:? */
+ -1,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31, /* ABCDEFGHIJKLMNO */
+ 32,33,34,35,36,37,38,39,40,41,42,-1,-1,-1,-1,-1, /* PQRSTUVWXYZ */
+ -1,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31, /* abcdefghijklmno */
+ 32,33,34,35,36,37,38,39,40,41,42,-1,-1,-1,-1,-1 /* pqrstuvwxyz */
+};
+
+void title_string(unsigned int y, unsigned int left, unsigned int right,
+ char *string)
+{
+ int i;
+ unsigned int x;
+
+ xdebug("title_string");
+
+ y *= TILEY;
+ left *= SCOREX;
+ right *= SCOREX;
+
+ x = (left + right - strlen(string) * MENUFONTX) / 2;
+ if (x < left || x >= right) x = left;
+
+ /* restore background graphic where text will be drawn */
+ XCopyArea(display, ttlPixmap, screenPixmap, screenGC,
+ left, y, right - left, MENUFONTY, left, y);
+
+ if (ttlmaskBitmap)
+ XSetClipMask(display, screenGC, ttlmaskBitmap);
+
+ for (i = 0; string[i] && x < right; i++)
+ {
+ int ch_pos, ch_x, ch_y;
+
+ ch_pos = ttl_map[string[i] & 127];
+
+ if (ch_pos == -1 || ch_pos > 22 * 2)
+ continue; /* no graphic for this character */
+
+ ch_x = (ch_pos % 22) * GFXMENUFONTX;
+ ch_y = (ch_pos / 22 + 12) * TILEY;
+
+ if (ttlmaskBitmap)
+ XSetClipOrigin(display, screenGC, x - ch_x, y - ch_y);
+
+ XCopyArea(display, ttlPixmap, screenPixmap, screenGC,
+ ch_x, ch_y, MENUFONTX, MENUFONTY, x, y);
+
+ x += MENUFONTX;
+ }
+
+ XSetClipMask(display, screenGC, None);
+}
+
+#endif
--- /dev/null
+/* 2000-08-10T18:03:54Z
+ *
+ * open X11 display and sound
+ */
+
+#if 1
+#include <X11/Xlib.h>
+#include <X11/Xutil.h>
+#include <X11/Xatom.h>
+#include <X11/Xos.h>
+#include <X11/Intrinsic.h>
+#include <X11/keysymdef.h>
+#endif
+
+#include <X11/Xlib.h>
+#include <X11/Xutil.h>
+#include <X11/Xatom.h>
+#include <X11/keysym.h>
+#include <X11/cursorfont.h>
+#include <X11/xpm.h>
+#include <sys/types.h>
+#include <sys/wait.h>
+#include <unistd.h>
+#include <stdlib.h>
+#include <stdio.h>
+#include <signal.h>
+#include <string.h>
+#include <errno.h>
+
+#include "../libgame/platform.h"
+#include "../libgame/libgame.h"
+
+#include "global.h"
+#include "display.h"
+#include "sample.h"
+
+
+#if defined(TARGET_X11)
+
+#if 0
+Display *display;
+Window xwindow;
+#endif
+
+#if 1
+Bitmap *objBitmap;
+Bitmap *botBitmap;
+Bitmap *sprBitmap;
+Bitmap *ttlBitmap;
+#endif
+
+#if 1
+Bitmap *screenBitmap;
+Bitmap *scoreBitmap;
+#endif
+
+Pixmap screenPixmap;
+Pixmap scorePixmap;
+Pixmap spriteBitmap;
+
+Pixmap objPixmap;
+Pixmap objmaskBitmap;
+Pixmap botPixmap;
+Pixmap botmaskBitmap;
+Pixmap sprPixmap;
+Pixmap sprmaskBitmap;
+Pixmap ttlPixmap;
+Pixmap ttlmaskBitmap;
+
+GC screenGC;
+GC scoreGC;
+GC spriteGC;
+GC antsGC;
+
+Atom deleteAtom;
+
+KeySym lastKeySym;
+
+KeyCode northKeyCode[3];
+KeyCode eastKeyCode[3];
+KeyCode southKeyCode[3];
+KeyCode westKeyCode[3];
+KeyCode fireKeyCode[3];
+KeyCode escKeyCode[1];
+
+char play[SAMPLE_MAX];
+
+static int sound_pid = -1;
+int sound_pipe[2] = { -1, -1 }; /* for communication */
+short *sound_data[SAMPLE_MAX]; /* pointer to sound data */
+long sound_length[SAMPLE_MAX]; /* length of sound data */
+
+static Screen *defaultScreen;
+static Visual *defaultVisual;
+static Colormap defaultColourmap;
+static Window defaultRootWindow;
+static unsigned int screenDepth;
+static unsigned int screenWidth;
+static unsigned int screenHeight;
+static unsigned long screenBlackPixel;
+static unsigned long screenWhitePixel;
+
+#if 0
+static XSizeHints sizeHints;
+static XSetWindowAttributes setWindowAttributes;
+static XWMHints wmHints;
+static XVisualInfo visualInfo;
+#endif
+static XGCValues gcValues;
+
+static Colormap privateColourmap;
+static Cursor cursor;
+static XColor *privateColours;
+static unsigned char *privateFlags;
+static int privateNumColours;
+
+static XColor redColour;
+static XColor whiteColour;
+static int gotRed;
+static int gotWhite;
+
+#if 1
+static Bitmap *pcxBitmaps[4];
+static Bitmap *pcxBitmapsX2[4];
+#endif
+
+#if 0
+static Pixmap xpmPixmaps[4];
+static Pixmap xpmBitmaps[4];
+static XpmAttributes xpmAttributes[4];
+static int xpmGot[4];
+#endif
+
+static int xpmAllocColourFunc(Display *, Colormap, char *, XColor *, void *);
+static int xpmFreeColoursFunc(Display *, Colormap, unsigned long *, int, void *);
+
+static KeyCode keycodes[16];
+
+#if 0
+static const char *xpmNames[4] = { "object.xpm", "score.xpm", "sprite.xpm", "title.xpm" };
+#endif
+
+#if 1
+static const char *pcxNames[4] = { "object.pcx", "score.pcx", "sprite.pcx", "title.pcx" };
+#endif
+
+static const int xpmCloseness[4] = { 10000, 10000, 40000, 50000 };
+static const KeySym keysyms[16] = {
+ XK_Up, XK_KP_Up, XK_r, /* north */
+ XK_Right, XK_KP_Right, XK_g, /* east */
+ XK_Down, XK_KP_Down, XK_f, /* south */
+ XK_Left, XK_KP_Left, XK_d, /* west */
+ XK_Shift_L, XK_Control_R, XK_space, /* fire */
+ XK_Escape /* escape */
+};
+static const char *sound_names[SAMPLE_MAX] = {
+ "00.blank.au","01.roll.au","02.stone.au","03.nut.au","04.crack.au",
+ "05.bug.au","06.tank.au","07.android.au","08.spring.au","09.slurp.au",
+ "10.eater.au","11.alien.au","12.collect.au","13.diamond.au","14.squash.au",
+ "15.drip.au","16.push.au","17.dirt.au","18.acid.au","19.ball.au",
+ "20.grow.au","21.wonder.au","22.door.au","23.exit.au","24.dynamite.au",
+ "25.tick.au","26.press.au","27.wheel.au","28.boom.au","29.time.au",
+ "30.die.au"
+};
+static const int sound_volume[SAMPLE_MAX] = {
+ 20,100,100,100,100,20,20,100,100,100,
+ 50,100,100,100,100,100,100,100,100,100,
+ 100,20,100,100,100,100,100,20,100,100,
+ 100
+};
+
+#if 0
+static void xdebug(char *msg)
+{
+#if 1
+ XSync(display, False);
+ printf("EM DEBUG: %s\n", msg);
+#endif
+}
+#endif
+
+int open_all(void)
+{
+ char name[MAXNAME+2];
+#if 0
+ void *dummyptr;
+ int dummyint;
+#endif
+ int i;
+
+#if 0
+ display = XOpenDisplay(arg_display);
+ if(display == 0) {
+ fprintf(stderr, "%s: \"%s\": %s: %s\n", progname, XDisplayName(arg_display), "failed to open display", strerror(errno));
+ return(1);
+ }
+#endif
+
+ defaultScreen = DefaultScreenOfDisplay(display);
+ defaultVisual = DefaultVisualOfScreen(defaultScreen);
+ defaultColourmap = DefaultColormapOfScreen(defaultScreen);
+ defaultRootWindow = RootWindowOfScreen(defaultScreen);
+ screenDepth = DefaultDepthOfScreen(defaultScreen);
+ screenWidth = WidthOfScreen(defaultScreen);
+ screenHeight = HeightOfScreen(defaultScreen);
+ screenBlackPixel = BlackPixelOfScreen(defaultScreen);
+ screenWhitePixel = WhitePixelOfScreen(defaultScreen);
+
+#if 0
+ if(arg_install) {
+ visualInfo.visualid = XVisualIDFromVisual(defaultVisual);
+ dummyptr = XGetVisualInfo(display, VisualIDMask, &visualInfo, &dummyint);
+ if(dummyptr == 0) {
+ fprintf(stderr, "%s: \"%s\": %s: %s\n", progname, XDisplayName(arg_display), "failed to get visual info", strerror(errno));
+ return(1);
+ }
+ memcpy(&visualInfo, dummyptr, sizeof(visualInfo));
+ XFree(dummyptr);
+
+ if(visualInfo.class != PseudoColor) {
+ fprintf(stderr, "%s: \"%s\": %s\n", progname, XDisplayName(arg_display), "private colourmap only supported for pseudocolour display");
+ return(1);
+ }
+
+ privateColourmap = XCreateColormap(display, defaultRootWindow, defaultVisual, AllocAll);
+ if(privateColourmap == 0) {
+ fprintf(stderr, "%s: \"%s\": %s: %s\n", progname, XDisplayName(arg_display), "failed to create colourmap", strerror(errno));
+ return(1);
+ }
+
+ privateNumColours = visualInfo.colormap_size;
+
+ privateColours = malloc(privateNumColours * sizeof(XColor));
+ if(privateColours == 0) {
+ fprintf(stderr, "%s: %s (%d): %s\n", progname, "malloc failed", privateNumColours * sizeof(XColor), strerror(errno));
+ return(1);
+ }
+ for(dummyint = 0; dummyint < privateNumColours; dummyint++) privateColours[dummyint].pixel = dummyint;
+ XQueryColors(display, defaultColourmap, privateColours, privateNumColours);
+ XStoreColors(display, privateColourmap, privateColours, privateNumColours);
+
+ privateFlags = malloc(privateNumColours);
+ if(privateFlags == 0) {
+ fprintf(stderr, "%s: %s (%d): %s\n", progname, "malloc failed", privateNumColours, strerror(errno));
+ return(1);
+ }
+ memset(privateFlags, 0, privateNumColours);
+ privateFlags[0] = 1; /* first two entries (black and white) are already allocated */
+ privateFlags[1] = 1;
+ }
+
+ sizeHints.flags = PSize | PMinSize | PMaxSize;
+ sizeHints.width = 20 * TILEX;
+ sizeHints.height = 12 * TILEY + SCOREY;
+ sizeHints.min_width = sizeHints.max_width = sizeHints.width;
+ sizeHints.min_height = sizeHints.max_height = sizeHints.height;
+ if(arg_geometry) {
+ dummyint = XWMGeometry(display, XScreenNumberOfScreen(defaultScreen), arg_geometry, 0, 2, &sizeHints, &sizeHints.x, &sizeHints.y, &dummyint, &dummyint, &sizeHints.win_gravity);
+ if(dummyint & (XValue | YValue)) sizeHints.flags |= USPosition | PWinGravity;
+ }
+
+ xwindow = XCreateWindow(display, defaultRootWindow, sizeHints.x, sizeHints.y, sizeHints.width, sizeHints.height, 2, screenDepth, InputOutput, CopyFromParent, 0, 0);
+ if(xwindow == 0) {
+ fprintf(stderr, "%s: \"%s\": %s: %s\n", progname, XDisplayName(arg_display), "failed to open window", strerror(errno));
+ return(1);
+ }
+
+ setWindowAttributes.background_pixel = screenBlackPixel;
+ setWindowAttributes.border_pixel = screenWhitePixel;
+ setWindowAttributes.backing_store = NotUseful;
+ setWindowAttributes.override_redirect = False;
+ setWindowAttributes.event_mask = KeyPressMask | EnterWindowMask | LeaveWindowMask | ExposureMask;
+ setWindowAttributes.colormap = privateColourmap ? privateColourmap : defaultColourmap;
+ XChangeWindowAttributes(display, xwindow, CWBackPixel | CWBorderPixel | CWBackingStore | CWOverrideRedirect | CWEventMask | CWColormap, &setWindowAttributes);
+
+ XStoreName(display, xwindow, "Emerald Mine");
+
+ wmHints.flags = InputHint | StateHint;
+ wmHints.input = True;
+ wmHints.initial_state = NormalState;
+ XSetWMHints(display, xwindow, &wmHints);
+
+ XSetWMNormalHints(display, xwindow, &sizeHints);
+
+ deleteAtom = XInternAtom(display, "WM_DELETE_WINDOW", False);
+ XSetWMProtocols(display, xwindow, &deleteAtom, 1);
+
+ cursor = XCreateFontCursor(display, XC_trek);
+ if(cursor) XDefineCursor(display, xwindow, cursor);
+
+ XMapWindow(display, xwindow);
+#endif
+
+#if 0
+ for(i = 0; i < 4; i++) {
+ name[MAXNAME] = 0;
+ if(arg_basedir) {
+ snprintf(name, MAXNAME+2, "%s/%s/%s", arg_basedir, EM_GFX_DIR, xpmNames[i]);
+ } else {
+ snprintf(name, MAXNAME+2, "%s/%s", EM_GFX_DIR, xpmNames[i]);
+ }
+ if(name[MAXNAME]) snprintf_overflow("read graphics/ files");
+
+ xpmAttributes[i].valuemask = XpmColormap | XpmReturnAllocPixels | XpmExactColors | XpmCloseness | XpmAllocColor | XpmFreeColors;
+ xpmAttributes[i].colormap = privateColourmap ? privateColourmap : defaultColourmap;
+ xpmAttributes[i].exactColors = False;
+ xpmAttributes[i].closeness = xpmCloseness[i];
+ xpmAttributes[i].alloc_color = xpmAllocColourFunc;
+ xpmAttributes[i].free_colors = xpmFreeColoursFunc;
+ dummyint = XpmReadFileToPixmap(display, xwindow, name, &xpmPixmaps[i], &xpmBitmaps[i], &xpmAttributes[i]);
+ if(dummyint) {
+ fprintf(stderr, "%s: \"%s\": \"%s\": %s: %s: %s\n", progname, XDisplayName(arg_display), name, "failed to read xpm", XpmGetErrorString(dummyint), strerror(errno));
+ return(1);
+ }
+ xpmGot[i] = 1;
+ }
+#endif
+
+ for(i = 0; i < 4; i++)
+ {
+ name[MAXNAME] = 0;
+ snprintf(name, MAXNAME+2, "%s/%s", EM_GFX_DIR, pcxNames[i]);
+
+ if (name[MAXNAME])
+ snprintf_overflow("read graphics/ files");
+
+ if ((pcxBitmaps[i] = LoadImage(name)) == NULL)
+ {
+ printf("::: LoadImage() failed for file '%s'\n", name);
+ return 1;
+ }
+ }
+
+ objBitmap = pcxBitmaps[0];
+ botBitmap = pcxBitmaps[1];
+ sprBitmap = pcxBitmaps[2];
+ ttlBitmap = pcxBitmaps[3];
+
+#if 0
+ objPixmap = xpmPixmaps[0];
+ botPixmap = xpmPixmaps[1];
+ sprPixmap = xpmPixmaps[2];
+ ttlPixmap = xpmPixmaps[3];
+ objmaskBitmap = xpmBitmaps[0];
+ botmaskBitmap = xpmBitmaps[1];
+ sprmaskBitmap = xpmBitmaps[2];
+ ttlmaskBitmap = xpmBitmaps[3];
+#else
+ objPixmap = pcxBitmaps[0]->drawable;
+ botPixmap = pcxBitmaps[1]->drawable;
+ sprPixmap = pcxBitmaps[2]->drawable;
+ ttlPixmap = pcxBitmaps[3]->drawable;
+ objmaskBitmap = pcxBitmaps[0]->clip_mask;
+ botmaskBitmap = pcxBitmaps[1]->clip_mask;
+ sprmaskBitmap = pcxBitmaps[2]->clip_mask;
+ ttlmaskBitmap = pcxBitmaps[3]->clip_mask;
+#endif
+
+#if 1
+ for (i = 0; i < 4; i++)
+ {
+ Pixmap clip_mask;
+
+ if ((clip_mask = XCreatePixmap(display, window->drawable,
+ pcxBitmaps[i]->width * 2,
+ pcxBitmaps[i]->height * 2, 1))
+ == None)
+ {
+ printf("::: cannot create clip mask");
+ return 1;
+ }
+
+#if 0
+ {
+ XGCValues clip_gc_values;
+ unsigned long clip_gc_valuemask;
+ GC gc;
+
+ clip_gc_values.graphics_exposures = False;
+ clip_gc_valuemask = GCGraphicsExposures;
+ if ((gc = XCreateGC(display, clip_mask,
+ clip_gc_valuemask, &clip_gc_values)) == None)
+ {
+ printf("X CreateGC failed\n");
+ exit(1);
+ }
+
+ XFillRectangle(display, clip_mask, gc, 0, 0,
+ pcxBitmaps[i]->width * 2,
+ pcxBitmaps[i]->height * 2);
+ }
+#endif
+
+#if 0
+ {
+ byte * src_ptr;
+ int src_width = pcxBitmaps[i]->width;
+ int src_height = pcxBitmaps[i]->height;
+
+#if 0
+ printf("::: %d, %d [%ld -> %ld (%ld)]\n",
+ src_width, src_height,
+ src_ptr,
+ src_ptr + src_width * src_height * 1,
+ src_width * src_height * 1);
+#endif
+
+#if 0
+ for (i = src_ptr; i < src_ptr + src_width * src_height * 1; i++)
+ {
+ byte x = *(byte *)i;
+
+ x = x * 1;
+ }
+#endif
+ }
+#endif
+
+ if (ZOOM_FACTOR > 1)
+ pcxBitmapsX2[i] = ZoomBitmap(pcxBitmaps[i],
+ pcxBitmaps[i]->width * ZOOM_FACTOR,
+ pcxBitmaps[i]->height * ZOOM_FACTOR);
+ else
+ pcxBitmapsX2[i] = pcxBitmaps[i];
+
+#if 1
+
+#if 0
+ printf("::: CREATING NEW CLIPMASKS ...\n");
+#endif
+#if 1
+ clip_mask = Pixmap_to_Mask(pcxBitmapsX2[i]->drawable,
+ pcxBitmapsX2[i]->width,
+ pcxBitmapsX2[i]->height);
+#endif
+#if 0
+ printf("::: CREATING NEW CLIPMASKS DONE\n");
+#endif
+
+ pcxBitmapsX2[i]->clip_mask = clip_mask;
+
+#if 0
+ printf("::: %ld, %ld, %ld, %ld, %ld, %ld, %ld\n",
+ pcxBitmaps[i]->gc,
+ pcxBitmaps[i]->clip_mask, pcxBitmapsX2[i]->clip_mask,
+ pcxBitmaps[i]->width, pcxBitmaps[i]->height,
+ pcxBitmapsX2[i]->width, pcxBitmapsX2[i]->height);
+#endif
+
+#if 0
+ ZoomPixmap(display, pcxBitmaps[i]->gc,
+ pcxBitmaps[i]->clip_mask, pcxBitmapsX2[i]->clip_mask,
+ pcxBitmaps[i]->width, pcxBitmaps[i]->height,
+ pcxBitmapsX2[i]->width, pcxBitmapsX2[i]->height);
+#endif
+
+#endif
+ }
+
+ objBitmap = pcxBitmapsX2[0];
+ botBitmap = pcxBitmapsX2[1];
+ sprBitmap = pcxBitmapsX2[2];
+ ttlBitmap = pcxBitmapsX2[3];
+
+ objPixmap = pcxBitmapsX2[0]->drawable;
+ botPixmap = pcxBitmapsX2[1]->drawable;
+ sprPixmap = pcxBitmapsX2[2]->drawable;
+ ttlPixmap = pcxBitmapsX2[3]->drawable;
+#if 1
+ objmaskBitmap = pcxBitmapsX2[0]->clip_mask;
+ botmaskBitmap = pcxBitmapsX2[1]->clip_mask;
+ sprmaskBitmap = pcxBitmapsX2[2]->clip_mask;
+ ttlmaskBitmap = pcxBitmapsX2[3]->clip_mask;
+#endif
+#endif
+
+#if 1
+ screenBitmap = CreateBitmap(22 * TILEX, 14 * TILEY, DEFAULT_DEPTH);
+ scoreBitmap = CreateBitmap(20 * TILEX, SCOREY, DEFAULT_DEPTH);
+#endif
+
+ screenPixmap = XCreatePixmap(display, xwindow, 22 * TILEX, 14 * TILEY, screenDepth);
+ if(screenPixmap == 0) {
+ fprintf(stderr, "%s: \"%s\": %s: %s\n", progname, XDisplayName(arg_display), "failed to create pixmap", strerror(errno));
+ return(1);
+ }
+
+ scorePixmap = XCreatePixmap(display, xwindow, 20 * TILEX, SCOREY, screenDepth);
+ if(scorePixmap == 0) {
+ fprintf(stderr, "%s: \"%s\": %s: %s\n", progname, XDisplayName(arg_display), "failed to create pixmap", strerror(errno));
+ return(1);
+ }
+
+ spriteBitmap = XCreatePixmap(display, xwindow, TILEX, TILEY, 1);
+ if(spriteBitmap == 0) {
+ fprintf(stderr, "%s: \"%s\": %s: %s\n", progname, XDisplayName(arg_display), "failed to create pixmap", strerror(errno));
+ return(1);
+ }
+
+ redColour.pixel = screenWhitePixel;
+ whiteColour.pixel = screenBlackPixel;
+ gotRed = (xpmAllocColourFunc(display, privateColourmap ? privateColourmap : defaultColourmap, "red", &redColour, 0) > 0);
+ gotWhite = (xpmAllocColourFunc(display, privateColourmap ? privateColourmap : defaultColourmap, "white", &whiteColour, 0) > 0);
+
+ gcValues.graphics_exposures = False;
+ screenGC = XCreateGC(display, screenPixmap, GCGraphicsExposures, &gcValues);
+ if(screenGC == 0) {
+ fprintf(stderr, "%s: \"%s\": %s: %s\n", progname, XDisplayName(arg_display), "failed to create graphics context", strerror(errno));
+ return(1);
+ }
+
+ gcValues.graphics_exposures = False;
+ scoreGC = XCreateGC(display, scorePixmap, GCGraphicsExposures, &gcValues);
+ if(scoreGC == 0) {
+ fprintf(stderr, "%s: \"%s\": %s: %s\n", progname, XDisplayName(arg_display), "failed to create graphics context", strerror(errno));
+ return(1);
+ }
+
+ gcValues.function = objmaskBitmap ? GXcopyInverted : sprmaskBitmap ? GXcopy : GXset;
+ gcValues.graphics_exposures = False;
+ spriteGC = XCreateGC(display, spriteBitmap, GCFunction | GCGraphicsExposures, &gcValues);
+ if(spriteGC == 0) {
+ fprintf(stderr, "%s: \"%s\": %s: %s\n", progname, XDisplayName(arg_display), "failed to create graphics context", strerror(errno));
+ return(1);
+ }
+
+ gcValues.foreground = redColour.pixel;
+ gcValues.background = whiteColour.pixel;
+ gcValues.line_style = LineDoubleDash;
+ gcValues.graphics_exposures = False;
+ antsGC = XCreateGC(display, screenPixmap, GCForeground | GCBackground | GCLineStyle | GCGraphicsExposures, &gcValues);
+ if(antsGC == 0) {
+ fprintf(stderr, "%s: \"%s\": %s: %s\n", progname, XDisplayName(arg_display), "failed to create graphics context", strerror(errno));
+ return(1);
+ }
+
+ for(i = 0; i < 16; i++) {
+ keycodes[i] = XKeysymToKeycode(display, keysyms[i]);
+ }
+ for(i = 0; i < 3; i++) northKeyCode[i] = keycodes[i + 0];
+ for(i = 0; i < 3; i++) eastKeyCode[i] = keycodes[i + 3];
+ for(i = 0; i < 3; i++) southKeyCode[i] = keycodes[i + 6];
+ for(i = 0; i < 3; i++) westKeyCode[i] = keycodes[i + 9];
+ for(i = 0; i < 3; i++) fireKeyCode[i] = keycodes[i + 12];
+ for(i = 0; i < 1; i++) escKeyCode[i] = keycodes[i + 15];
+
+ /* ----------------------------------------------------------------- */
+
+#if 0
+ {
+ Bitmap *bm = pcxBitmaps[2];
+ Pixmap clip_mask = bm->clip_mask;
+
+ if (clip_mask)
+ {
+#if 1
+ int width = bm->width;
+ int height = bm->height;
+#else
+ int width = 16 * 4;
+ int height = 16 * 4;
+#endif
+ XImage *src_ximage = XGetImage(display, clip_mask, 0, 0,
+ width, height, AllPlanes, ZPixmap);
+ XImage *dst_ximage = XGetImage(display, xwindow, 0, 0,
+ width, height, AllPlanes, ZPixmap);
+ int x, y;
+
+ if (src_ximage == NULL)
+ {
+ printf("src_ximage failed\n");
+ exit(1);
+ }
+
+ if (dst_ximage == NULL)
+ {
+ printf("dst_ximage failed\n");
+ exit(1);
+ }
+
+ printf("::: DISPLAY CLIP MASK ...\n");
+
+ for (x=0; x<width; x++)
+ {
+ for (y=0; y<height; y++)
+ {
+ unsigned long pixel = XGetPixel(src_ximage, x, y);
+
+ if (pixel != BlackPixel(display, screen))
+ pixel = WhitePixel(display, screen);
+
+ XPutPixel(dst_ximage, x, y, pixel);
+ }
+ }
+
+ printf("::: DISPLAY CLIP MASK NOW\n");
+
+ XPutImage(display, xwindow, screenGC, dst_ximage, 0, 0,
+ 0, 13 * TILEY, width, height);
+
+ printf("::: DISPLAY CLIP MASK DONE\n");
+ }
+ }
+#endif
+
+ /* ----------------------------------------------------------------- */
+
+#if 0
+ {
+ int ii = 2;
+
+ XGCValues clip_gc_values;
+ unsigned long clip_gc_valuemask;
+
+#if 1
+ GC gc = screenGC;
+#else
+#if 1
+ GC gc = pcxBitmaps[ii]->stored_clip_gc;
+#else
+ GC gc = pcxBitmaps[ii]->gc;
+#endif
+#endif
+ Pixmap src_pixmap = pcxBitmaps[ii]->clip_mask;
+ Pixmap dst_pixmap = pcxBitmapsX2[ii]->clip_mask;
+ int src_width = pcxBitmaps[ii]->width;
+ int src_height = pcxBitmaps[ii]->height;
+ int dst_width = pcxBitmapsX2[ii]->width;
+ int dst_height = pcxBitmapsX2[ii]->height;
+
+ XImage *src_ximage, *dst_ximage;
+ byte *src_ptr, *dst_ptr;
+ int bits_per_pixel;
+ int bytes_per_pixel;
+ int x, y, xx, yy, i;
+#if 1
+ boolean scale_down = (src_width > dst_width);
+ int zoom_factor;
+#else
+ int zoom_factor = src_width / dst_width; /* currently very limited! */
+#endif
+ int row_skip, col_skip;
+
+ printf("::: %d\n", scale_down);
+
+ xdebug("::: ZOOM STEP 1");
+
+ clip_gc_values.graphics_exposures = False;
+ clip_gc_valuemask = GCGraphicsExposures;
+ if ((gc = XCreateGC(display, pcxBitmaps[ii]->clip_mask,
+ clip_gc_valuemask, &clip_gc_values)) == None)
+ {
+ printf("XCreateGC failed\n");
+ exit(1);
+ }
+
+ xdebug("::: ZOOM STEP 2");
+
+ if (scale_down)
+ {
+ zoom_factor = src_width / dst_width;
+
+ /* adjust source image size to integer multiple of destination size */
+ src_width = dst_width * zoom_factor;
+ src_height = dst_height * zoom_factor;
+ }
+ else
+ {
+ zoom_factor = dst_width / src_width;
+
+ /* no adjustment needed when scaling up (some pixels may be left blank) */
+ }
+
+ /* copy source pixmap to temporary image */
+ if ((src_ximage = XGetImage(display, src_pixmap, 0, 0, src_width, src_height,
+ AllPlanes, ZPixmap)) == NULL)
+ Error(ERR_EXIT, "ZoomPixmap(): XGetImage() failed");
+
+ bits_per_pixel = src_ximage->bits_per_pixel;
+ bytes_per_pixel = (bits_per_pixel + 7) / 8;
+
+ printf("::: bits_per_pixel == %d\n", bits_per_pixel);
+
+ if ((dst_ximage = XCreateImage(display, visual, src_ximage->depth, ZPixmap,
+ 0, NULL, dst_width, dst_height,
+ 8, dst_width * bytes_per_pixel)) == NULL)
+ Error(ERR_EXIT, "ZoomPixmap(): XCreateImage() failed");
+
+ dst_ximage->data =
+ checked_malloc(dst_width * dst_height * bytes_per_pixel);
+ dst_ximage->byte_order = src_ximage->byte_order;
+
+ src_ptr = (byte *)src_ximage->data;
+ dst_ptr = (byte *)dst_ximage->data;
+
+ if (scale_down)
+ {
+ col_skip = (zoom_factor - 1) * bytes_per_pixel;
+ row_skip = col_skip * src_width;
+
+ /* scale image down by scaling factor 'zoom_factor' */
+ for (y = 0; y < src_height; y += zoom_factor, src_ptr += row_skip)
+ for (x = 0; x < src_width; x += zoom_factor, src_ptr += col_skip)
+ for (i = 0; i < bytes_per_pixel; i++)
+ *dst_ptr++ = *src_ptr++;
+ }
+ else
+ {
+ row_skip = src_width * bytes_per_pixel;
+
+#if 1
+ printf("::: %d, %d -> %d, %d [%d / %d]\n[%ld -> %ld (%ld)] [%ld -> %ld (%ld)]\n",
+ src_width, src_height,
+ dst_width, dst_height,
+ zoom_factor, bytes_per_pixel,
+ src_ptr,
+ src_ptr + src_width * src_height * bytes_per_pixel,
+ src_width * src_height * bytes_per_pixel,
+ dst_ptr,
+ dst_ptr + dst_width * dst_height * bytes_per_pixel,
+ dst_width * dst_height * bytes_per_pixel);
+#endif
+
+#if 0
+ printf("A\n");
+
+ for (i = 0; i < src_width * src_height * bytes_per_pixel;
+ i++)
+ {
+ byte x = *(byte *)(src_ptr + i);
+
+ printf("::: %d ...\n", i);
+
+ x = x * 1;
+ }
+
+ printf("B\n");
+#endif
+
+ /* scale image up by scaling factor 'zoom_factor' */
+ for (y = 0; y < src_height; y++)
+ {
+ for (yy = 0; yy < zoom_factor; yy++)
+ {
+ if (yy > 0)
+ src_ptr -= row_skip;
+
+#if 0
+ printf("::: [%d -> %ld / %ld]\n", y, src_ptr, dst_ptr);
+#endif
+
+ for (x = 0; x < src_width; x++)
+ {
+ for (xx = 0; xx < zoom_factor; xx++)
+ for (i = 0; i < bytes_per_pixel; i++)
+#if 1
+ {
+#if 0
+ printf("::: %d\n", *(src_ptr + i));
+#endif
+
+ *dst_ptr++ = *(src_ptr + i);
+ }
+#else
+ *dst_ptr++ = 0;
+#endif
+
+ src_ptr += i;
+ }
+ }
+ }
+ }
+
+ xdebug("::: ZOOM STEP 9");
+
+ /* copy scaled image to destination pixmap */
+ XPutImage(display, dst_pixmap, gc, dst_ximage, 0, 0, 0, 0,
+ dst_width, dst_height);
+
+ /* free temporary images */
+ X11DestroyImage(src_ximage);
+ X11DestroyImage(dst_ximage);
+
+
+ xdebug("::: ZOOM DONE");
+
+ }
+#endif
+
+ /* ----------------------------------------------------------------- */
+
+#if 0
+ {
+ Bitmap *bm = pcxBitmapsX2[2];
+ Pixmap clip_mask = bm->clip_mask;
+
+ if (clip_mask)
+ {
+#if 0
+ int width = bm->width;
+ int height = bm->height;
+#else
+ int width = 16 * 4;
+ int height = 16 * 4;
+#endif
+ XImage *src_ximage = XGetImage(display, clip_mask, 0, 0,
+ width, height, AllPlanes, ZPixmap);
+ XImage *dst_ximage = XGetImage(display, xwindow, 0, 0,
+ width, height, AllPlanes, ZPixmap);
+ int x, y;
+
+ if (src_ximage == NULL)
+ {
+ printf("src_ximage failed\n");
+ exit(1);
+ }
+
+ if (dst_ximage == NULL)
+ {
+ printf("dst_ximage failed\n");
+ exit(1);
+ }
+
+ printf("::: DISPLAY CLIP MASK ...\n");
+
+ for (x=0; x<width; x++)
+ {
+ for (y=0; y<height; y++)
+ {
+ unsigned long pixel = XGetPixel(src_ximage, x, y);
+
+ if (pixel != BlackPixel(display, screen))
+ pixel = WhitePixel(display, screen);
+
+ XPutPixel(dst_ximage, x, y, pixel);
+ }
+ }
+
+ printf("::: DISPLAY CLIP MASK NOW\n");
+
+ XPutImage(display, xwindow, screenGC, dst_ximage, 0, 0,
+ 0, 13 * TILEY + height, width, height);
+
+ printf("::: DISPLAY CLIP MASK DONE\n");
+ }
+ }
+#endif
+
+ /* ----------------------------------------------------------------- */
+
+#if 0
+ {
+ XImage *dst_ximage;
+
+ printf("::: GET IMAGE ...\n");
+
+ dst_ximage = XGetImage(display, xwindow, 0, 0,
+ 16, 16, AllPlanes, ZPixmap);
+ if (dst_ximage == NULL)
+ {
+ printf("dst_ximage failed\n");
+ exit(1);
+ }
+
+ printf("::: PUT IMAGE ...\n");
+
+ XPutImage(display, xwindow, screenGC, dst_ximage, 0, 0,
+ 0, 13 * TILEY, 10, 10);
+
+ printf("::: PUT IMAGE DONE\n");
+ }
+#endif
+
+ /* ----------------------------------------------------------------- */
+
+#if defined(PLATFORM_LINUX) || defined(PLATFORM_BSD)
+ if(arg_silence == 0) {
+ for(i = 0; i < SAMPLE_MAX; i++) {
+ name[MAXNAME] = 0;
+ if(arg_basedir) {
+ snprintf(name, MAXNAME+2, "%s/%s/%s", arg_basedir, EM_SND_DIR, sound_names[i]);
+ } else {
+ snprintf(name, MAXNAME+2, "%s/%s", EM_SND_DIR, sound_names[i]);
+ }
+ if(name[MAXNAME]) snprintf_overflow("read sounds/ directory");
+
+ if(read_sample(name, &sound_data[i], &sound_length[i])) return(1);
+
+ {
+ short *ptr, *stop;
+ int mult = sound_volume[i] * 65536 / (100 * MIXER_MAX);
+ stop = sound_data[i] + sound_length[i];
+ for(ptr = sound_data[i]; ptr < stop; ptr++) *ptr = (*ptr * mult) / 65536;
+ }
+ }
+
+ if(pipe(sound_pipe) == -1) {
+ fprintf(stderr, "%s: %s: %s\n", progname, "unable to create sound pipe", strerror(errno));
+ return(1);
+ }
+ sound_pid = fork();
+ if(sound_pid == -1) {
+ fprintf(stderr, "%s: %s: %s\n", progname, "unable to fork sound thread", strerror(errno));
+ return(1);
+ }
+ close(sound_pipe[sound_pid == 0]); sound_pipe[sound_pid == 0] = -1;
+ if(sound_pid == 0) _exit(sound_thread());
+ signal(SIGPIPE, SIG_IGN); /* dont crash if sound process dies */
+ }
+#endif /* defined(PLATFORM_LINUX) || defined(PLATFORM_BSD) */
+
+ return(0);
+}
+
+void close_all(void)
+{
+ int i;
+
+ if(sound_pid != -1) {
+ kill(sound_pid, SIGTERM);
+ waitpid(sound_pid, 0, 0);
+ }
+ if(sound_pipe[0] != -1) close(sound_pipe[0]);
+ if(sound_pipe[1] != -1) close(sound_pipe[1]);
+ for(i = 0; i < SAMPLE_MAX; i++) if(sound_data[i]) free(sound_data[i]);
+
+#if 0
+ for(i = 0; i < 4; i++) if(xpmPixmaps[i]) XFreePixmap(display, xpmPixmaps[i]);
+ for(i = 0; i < 4; i++) if(xpmBitmaps[i]) XFreePixmap(display, xpmBitmaps[i]);
+ for(i = 0; i < 4; i++) if(xpmGot[i]) {
+ xpmFreeColoursFunc(display, xpmAttributes[i].colormap, xpmAttributes[i].alloc_pixels, xpmAttributes[i].nalloc_pixels, 0);
+ XpmFreeAttributes(&xpmAttributes[i]);
+ }
+#endif
+
+ if(gotRed) xpmFreeColoursFunc(display, privateColourmap ? privateColourmap : defaultColourmap, &redColour.pixel, 1, 0);
+ if(gotWhite) xpmFreeColoursFunc(display, privateColourmap ? privateColourmap : defaultColourmap, &whiteColour.pixel, 1, 0);
+
+ if(screenGC) XFreeGC(display, screenGC);
+ if(scoreGC) XFreeGC(display, scoreGC);
+ if(spriteGC) XFreeGC(display, spriteGC);
+ if(antsGC) XFreeGC(display, antsGC);
+ if(screenPixmap) XFreePixmap(display, screenPixmap);
+ if(scorePixmap) XFreePixmap(display, scorePixmap);
+ if(spriteBitmap) XFreePixmap(display, spriteBitmap);
+ if(xwindow) XDestroyWindow(display, xwindow);
+ if(cursor) XFreeCursor(display, cursor);
+ if(privateColourmap) XFreeColormap(display, privateColourmap);
+ if(privateColours) free(privateColours);
+ if(privateFlags) free(privateFlags);
+ if(display) XCloseDisplay(display);
+}
+
+/* ---------------------------------------------------------------------- */
+
+void sound_play(void)
+{
+ if(sound_pipe[1] != -1) {
+ if(write(sound_pipe[1], &play, sizeof(play)) == -1) {
+ fprintf(stderr, "%s: %s: %s\n", progname, "write sound", strerror(errno));
+ if(sound_pipe[0] != -1) { close(sound_pipe[0]); sound_pipe[0] = -1; }
+ if(sound_pipe[1] != -1) { close(sound_pipe[1]); sound_pipe[1] = -1; }
+ }
+ }
+ memset(play, 0, sizeof(play));
+}
+
+/* ---------------------------------------------------------------------- */
+
+static int xpmAllocColourFunc(Display *display, Colormap colourmap, char *colourname, XColor *xcolour, void *closure)
+{
+ int i, match;
+ int r,g,b;
+ long best, sum;
+
+ if(colourname) if(XParseColor(display, colourmap, colourname, xcolour) == 0) return(-1); /* invalid name */
+ if(colourmap != privateColourmap) return(XAllocColor(display, colourmap, xcolour) != 0);
+
+/* first try to find an exact match */
+ match = -1;
+ for(i = 0; i < privateNumColours; i++) {
+ if(privateColours[i].red == xcolour->red && privateColours[i].green == xcolour->green && privateColours[i].blue == xcolour->blue) match = i;
+ }
+ if(match != -1) {
+ privateFlags[match] = 1;
+ xcolour->pixel = privateColours[match].pixel;
+ return(1);
+ }
+
+/* then find an unallocated colour that is close to what we want */
+ match = -1;
+ best = 1000000;
+ for(i = 0; i < privateNumColours; i++) {
+ if(privateFlags[i]) continue; /* skip if it is already allocated */
+ r = (privateColours[i].red - xcolour->red) / 256;
+ g = (privateColours[i].green - xcolour->green) / 256;
+ b = (privateColours[i].blue - xcolour->blue) / 256;
+ sum = r * r + g * g + b * b;
+ if(sum < best) {
+ best = sum;
+ match = i;
+ }
+ }
+ if(match != -1) {
+ privateFlags[match] = 1;
+ privateColours[match].red = xcolour->red;
+ privateColours[match].green = xcolour->green;
+ privateColours[match].blue = xcolour->blue;
+ XStoreColor(display, colourmap, &privateColours[match]);
+ xcolour->pixel = privateColours[match].pixel;
+ return(1); /* found a close match */
+ }
+
+/* if all else fails, just find the closest colour and return it */
+ match = -1;
+ best = 1000000;
+ for(i = 0; i < privateNumColours; i++) {
+ r = (privateColours[i].red - xcolour->red) / 256;
+ g = (privateColours[i].green - xcolour->green) / 256;
+ b = (privateColours[i].blue - xcolour->blue) / 256;
+ sum = r * r + g * g + b * b;
+ if(sum < best) {
+ best = sum;
+ match = i;
+ }
+ }
+ if(match != -1) {
+ xcolour->red = privateColours[match].red;
+ xcolour->green = privateColours[match].green;
+ xcolour->blue = privateColours[match].blue;
+ xcolour->pixel = privateColours[match].pixel;
+ return(1); /* best we could do */
+ }
+ return(0); /* still didnt find one, give up */
+}
+
+static int xpmFreeColoursFunc(Display *display, Colormap colourmap, unsigned long *pixels, int npixels, void *closure)
+{
+ if(colourmap != privateColourmap) XFreeColors(display, colourmap, pixels, npixels, 0);
+ return(1); /* non-zero for success */
+}
+
+#endif
--- /dev/null
+/* 2000-08-13T15:29:40Z
+ *
+ * handle input from x11 and keyboard and joystick
+ */
+
+#include <X11/Xlib.h>
+#include <X11/Xutil.h>
+#include <X11/Xatom.h>
+#include <X11/keysym.h>
+#include <sys/time.h>
+#include <sys/types.h>
+#include <unistd.h>
+#include <stdlib.h>
+#include <stdio.h>
+#include <string.h>
+#include <errno.h>
+
+#include "global.h"
+#include "display.h"
+#include "level.h"
+
+
+#if defined(TARGET_X11)
+
+unsigned long Random;
+
+struct PLAYER ply1;
+struct PLAYER ply2;
+struct LEVEL lev;
+
+unsigned short **Boom;
+unsigned short **Cave;
+unsigned short **Next;
+unsigned short **Draw;
+
+static unsigned short *Index[4][HEIGHT];
+static unsigned short Array[4][HEIGHT][WIDTH];
+
+static int input_die;
+static int input_pause;
+static int input_refresh;
+static int input_esc;
+
+static struct timeval tv1;
+static struct timeval tv2;
+
+static unsigned char keymatrix[32];
+
+static int player_mode;
+static char player_name[32];
+static int player_level;
+
+static void drawmenu(int pos)
+{
+ char buffer[256];
+ switch(pos) {
+ case 0:
+ switch(player_mode) {
+ case 0: strcpy(buffer, "quit emerald mine"); break;
+ case 1: strcpy(buffer, "single player"); break;
+ case 2: strcpy(buffer, "teamwork"); break;
+ }
+ title_string(4, 0, 40, buffer);
+ break;
+ case 1:
+ sprintf(buffer, "name: %s", player_name);
+ title_string(5, 0, 40, buffer);
+ break;
+ case 2:
+ sprintf(buffer, "level: %d", player_level);
+ title_string(6, 0, 40, buffer);
+ break;
+ case 3:
+ title_string(7, 0, 40, "highscores");
+ break;
+ case 4:
+ title_string(8, 0, 40, "start");
+ break;
+ case 5:
+ title_string(10, 1, 13, "played");
+ title_string(10, 14, 26, "score");
+ title_string(10, 27, 39, "won");
+ break;
+ case 6:
+ sprintf(buffer, "%d", 0);
+ title_string(11, 1, 13, buffer);
+ sprintf(buffer, "%d", 0);
+ title_string(11, 14, 26, buffer);
+ sprintf(buffer, "%d", 0);
+ title_string(11, 27, 39, buffer);
+ break;
+ }
+}
+
+/* bring it all together */
+int game_start(void)
+{
+ int x,y;
+ char name[MAXNAME+2];
+ int temp;
+ int pos;
+
+ Random = 1684108901;
+
+ for(y = 0; y < HEIGHT; y++) for(x = 0; x < WIDTH; x++) Array[0][y][x] = ZBORDER;
+ for(y = 0; y < HEIGHT; y++) for(x = 0; x < WIDTH; x++) Array[1][y][x] = ZBORDER;
+ for(y = 0; y < HEIGHT; y++) for(x = 0; x < WIDTH; x++) Array[2][y][x] = ZBORDER;
+ for(y = 0; y < HEIGHT; y++) for(x = 0; x < WIDTH; x++) Array[3][y][x] = Xblank;
+
+ for(y = 0; y < HEIGHT; y++) Index[0][y] = Array[0][y];
+ for(y = 0; y < HEIGHT; y++) Index[1][y] = Array[1][y];
+ for(y = 0; y < HEIGHT; y++) Index[2][y] = Array[2][y];
+ for(y = 0; y < HEIGHT; y++) Index[3][y] = Array[3][y];
+
+ Cave = Index[0];
+ Next = Index[1];
+ Draw = Index[2];
+ Boom = Index[3];
+
+ player_mode = 1; /* start off as single player */
+ strcpy(player_name, "dave");
+ player_level = 0;
+
+ input_pause = 1 * 0;
+
+ for(;;) {
+
+ pos = 4;
+
+ title_initscreen();
+
+ for(temp = 0; temp < 7; temp++) drawmenu(temp); /* display all lines */
+ title_blitants(4 + pos);
+
+ title_blitscore();
+ title_animscreen();
+
+#if 0
+ printf("--> M1: xwindow == %ld\n", xwindow);
+#endif
+
+ temp = 1;
+ for(;;) {
+ input_eventloop();
+ if(input_die) return(0);
+ if(input_refresh) blitscreen();
+
+#if 0
+ printf("--> M2: xwindow == %ld\n", xwindow);
+#endif
+
+ if(!input_pause) {
+ title_blitants(4 + pos);
+ title_blitscore();
+ title_animscreen();
+
+#if 0
+ printf("--> M3: xwindow == %ld\n", xwindow);
+#endif
+
+ ply1.joy_n = ply1.joy_e = ply1.joy_s = ply1.joy_w = 0;
+
+ readjoy();
+
+ if(temp == 0) {
+ if(ply1.joy_fire) break;
+
+ if(ply1.joy_e && player_level < 99) {
+ player_level++;
+ drawmenu(2);
+ }
+ if(ply1.joy_w && player_level > 0) {
+ player_level--;
+ drawmenu(2);
+ }
+ if(ply1.joy_n && pos > 0) {
+ drawmenu(pos);
+ pos--;
+ title_blitants(4 + pos);
+ }
+ if(ply1.joy_s && pos < 4) {
+ drawmenu(pos);
+ pos++;
+ title_blitants(4 + pos);
+ }
+ }
+ temp = (ply1.joy_n || ply1.joy_e || ply1.joy_s || ply1.joy_w || ply1.joy_fire);
+ }
+ }
+
+#if 0
+ printf("--> M4: xwindow == %ld\n", xwindow);
+#endif
+
+ name[MAXNAME] = 0;
+ snprintf(name, MAXNAME+2, "%s/lev%02d", EM_LVL_DIR, player_level);
+ if(name[MAXNAME]) snprintf_overflow("read a level in cave/");
+
+ if(cave_convert(name)) continue;
+
+#if 0
+ printf("--> M5: xwindow == %ld\n", xwindow);
+#endif
+
+ game_initscreen();
+#if 0
+ printf("--> M6: xwindow == %ld\n", xwindow);
+#endif
+ game_blitscore();
+#if 0
+ printf("--> M7: xwindow == %ld\n", xwindow);
+#endif
+ game_animscreen();
+
+#if 0
+ printf("--> M8: xwindow == %ld\n", xwindow);
+#endif
+
+ for(;;) {
+ input_eventloop();
+ if(input_die || input_esc) break;
+ if(input_refresh) blitscreen();
+
+ if(!input_pause) {
+ game_animscreen();
+
+ frame = (frame - 1) & 7;
+
+ readjoy();
+
+ if(frame == 7) {
+ synchro_1();
+ synchro_2();
+ }
+ if(frame == 6) {
+ synchro_3();
+ sound_play();
+ game_blitscore();
+ }
+ }
+ }
+ }
+}
+
+/* read input device for players
+ */
+void readjoy(void)
+{
+ unsigned int i;
+ unsigned int north = 0, east = 0, south = 0, west = 0, fire = 0;
+
+ for(i = 0; i < 3; i++) if(keymatrix[northKeyCode[i] >> 3] & 1 << (northKeyCode[i] & 7)) north = 1;
+ for(i = 0; i < 3; i++) if(keymatrix[eastKeyCode[i] >> 3] & 1 << (eastKeyCode[i] & 7)) east = 1;
+ for(i = 0; i < 3; i++) if(keymatrix[southKeyCode[i] >> 3] & 1 << (southKeyCode[i] & 7)) south = 1;
+ for(i = 0; i < 3; i++) if(keymatrix[westKeyCode[i] >> 3] & 1 << (westKeyCode[i] & 7)) west = 1;
+ for(i = 0; i < 3; i++) if(keymatrix[fireKeyCode[i] >> 3] & 1 << (fireKeyCode[i] & 7)) fire = 1;
+
+ ply1.joy_fire = fire;
+ if(ply1.joy_stick || (north | east | south | west)) {
+ ply1.joy_n = north;
+ ply1.joy_e = east;
+ ply1.joy_s = south;
+ ply1.joy_w = west;
+ }
+
+#if 0
+ printf("::: JOY == %d/%d/%d/%d/%d\n",
+ north, east, south, west, fire);
+#endif
+}
+
+/* handle events from x windows and block until the next frame
+ */
+void input_eventloop(void)
+{
+ XEvent event;
+ unsigned int i;
+ unsigned long count;
+
+ if(input_pause) {
+ XPeekEvent(display, &event); /* block until an event arrives */
+
+ if(gettimeofday(&tv1, 0) == -1) tv1.tv_usec = 0;
+ } else {
+ XSync(display, False); /* block until all graphics are drawn */
+
+ if(gettimeofday(&tv2, 0) == -1) tv2.tv_usec = 0;
+ count = tv2.tv_usec + 1000000 - tv1.tv_usec; if(count >= 1000000) count -= 1000000;
+ tv1.tv_usec = tv2.tv_usec;
+ if(count < 25000) {
+ tv2.tv_sec = 0;
+ tv2.tv_usec = 25000 - count;
+#if 1
+ select(0, 0, 0, 0, &tv2); /* sleep a bit */
+#else
+ usleep(tv2.tv_usec);
+#endif
+ }
+ }
+
+ input_die = 0;
+ input_refresh = 0;
+ lastKeySym = NoSymbol;
+ while(XPending(display)) { /* drain the event queue */
+ XNextEvent(display, &event);
+ switch(event.xany.type) {
+ case KeyPress:
+ XLookupString(&event.xkey, (char *)&count, 1, &lastKeySym, 0);
+ break;
+ case Expose:
+ if(event.xexpose.window == xwindow && event.xexpose.count == 0) input_refresh = 1;
+ break;
+ case ClientMessage:
+ if(event.xclient.window == xwindow && (Atom)event.xclient.data.l[0] == deleteAtom) input_die = 1;
+ break;
+ case EnterNotify:
+ if(event.xcrossing.window == xwindow) input_pause = 0;
+ break;
+ case LeaveNotify:
+ if(event.xcrossing.window == xwindow) input_pause = 1;
+ break;
+ }
+ }
+ XQueryKeymap(display, keymatrix); /* read the keyboard */
+
+ input_esc = 0;
+ for(i = 0; i < 1; i++) if(keymatrix[escKeyCode[i] >> 3] & 1 << (escKeyCode[i] & 7)) input_esc = 1;
+}
+
+#endif
--- /dev/null
+#ifndef LEVEL_H
+#define LEVEL_H
+
+#include "tile.h"
+
+#define WIDTH 102
+#define HEIGHT 102
+
+struct LEVEL {
+ unsigned int home; /* number of players that have to go home 0=all players home */
+ unsigned int width; /* world width */
+ unsigned int height; /* world height */
+ unsigned int time; /* time remaining */
+ unsigned int required; /* emeralds needed */
+ unsigned int score; /* score */
+
+/* fill in all below /every/ time you read a level */
+ unsigned int alien_score; /* alien popped by stone/spring score */
+ unsigned int ameuba_time; /* ameuba speed */
+ unsigned int android_move_cnt; /* android move time counter */
+ unsigned int android_move_time; /* android move reset time */
+ unsigned int android_clone_cnt; /* android clone time counter */
+ unsigned int android_clone_time; /* android clone reset time */
+ unsigned int ball_cnt; /* ball time counter */
+ unsigned int ball_pos; /* ball array pos counter */
+ unsigned int ball_random; /* ball is random flag */
+ unsigned int ball_state; /* ball currently on flag */
+ unsigned int ball_time; /* ball reset time */
+ unsigned int bug_score; /* bug popped by stone/spring score */
+ unsigned int diamond_score; /* diamond collect score */
+ unsigned int dynamite_score; /* dynamite collect scoer*/
+ unsigned int eater_pos; /* eater array pos */
+ unsigned int eater_score; /* eater popped by stone/spring score */
+ unsigned int emerald_score; /* emerald collect score */
+ unsigned int exit_score; /* exit score */
+ unsigned int key_score; /* key collect score */
+ unsigned int lenses_cnt; /* lenses time counter */
+ unsigned int lenses_score; /* lenses collect score */
+ unsigned int lenses_time; /* lenses reset time */
+ unsigned int magnify_cnt; /* magnify time counter */
+ unsigned int magnify_score; /* magnify collect score */
+ unsigned int magnify_time; /* magnify reset time */
+ unsigned int nut_score; /* nut crack score */
+ unsigned int shine_cnt; /* shine counter for emerald/diamond */
+ unsigned int slurp_score; /* slurp alien score */
+ unsigned int tank_score; /* tank popped by stone/spring */
+ unsigned int wheel_cnt; /* wheel time counter */
+ unsigned int wheel_x; /* wheel x pos */
+ unsigned int wheel_y; /* wheel y pos */
+ unsigned int wheel_time; /* wheel reset time */
+ unsigned int wind_cnt; /* wind time counter */
+ unsigned int wind_direction; /* wind direction */
+ unsigned int wind_time; /* wind reset time */
+ unsigned int wonderwall_state; /* wonderwall currently on flag */
+ unsigned int wonderwall_time; /* wonderwall time */
+ unsigned short eater_array[8][9]; /* eater data */
+ unsigned short ball_array[8][8]; /* ball data */
+ unsigned short android_array[TILE_MAX]; /* android clone table */
+};
+
+struct PLAYER {
+ unsigned int num;
+ unsigned int alive;
+ unsigned int dynamite;
+ unsigned int dynamite_cnt;
+ unsigned int keys;
+ unsigned int anim;
+ unsigned int x;
+ unsigned int y;
+ unsigned int oldx;
+ unsigned int oldy;
+ unsigned joy_n:1;
+ unsigned joy_e:1;
+ unsigned joy_s:1;
+ unsigned joy_w:1;
+ unsigned joy_fire:1;
+ unsigned joy_stick:1;
+ unsigned joy_spin:1;
+};
+
+extern unsigned long Random;
+
+extern struct PLAYER ply1;
+extern struct PLAYER ply2;
+extern struct LEVEL lev;
+extern unsigned short **Boom;
+extern unsigned short **Cave;
+extern unsigned short **Next;
+extern unsigned short **Draw;
+
+#endif
--- /dev/null
+/* Emerald Mine
+ *
+ * David Tritscher
+ *
+ * v0.0 2000-01-06T06:43:39Z
+ *
+ * set everything up and close everything down
+ */
+
+#include <stdlib.h>
+#include <unistd.h>
+#include <stdio.h>
+#include <string.h>
+#include <errno.h>
+
+#include "global.h"
+
+
+#if defined(TARGET_X11)
+
+char *progname;
+char *arg_basedir;
+char *arg_display;
+char *arg_geometry;
+int arg_install;
+int arg_silence;
+
+extern void tab_generate();
+extern void ulaw_generate();
+
+int em_main_OLD(int argc, char **argv)
+{
+ int result;
+ int option;
+ extern char *optarg;
+
+ /* pre-calculate some data */
+ tab_generate();
+ ulaw_generate();
+
+ progname = strrchr(argv[0], '/'); progname = progname ? progname + 1 : argv[0];
+
+ while((option = getopt(argc, argv, "b:d:g:in")) != -1) {
+ switch(option) {
+ case 'b': arg_basedir = optarg; break;
+ case 'd': arg_display = optarg; break;
+ case 'g': arg_geometry = optarg; break;
+ case 'i': arg_install = 1; break;
+ case 'n': arg_silence = 1; break;
+ default:
+ printf("Emerald Mine for X11 © 2000,2001 David Tritscher\n\n");
+ printf("usage: %s [options]\n", progname);
+ printf("\t-b set base directory\n");
+ printf("\t-d server to contact\n");
+ printf("\t-g geometry\n");
+ printf("\t-i install colourmap\n");
+ printf("\t-n no sounds\n");
+ exit(option == 'h' ? 0 : 1);
+ }
+ }
+ if(arg_basedir == 0) arg_basedir = getenv("EMERALD_BASE");
+
+ result = open_all(); if(result) goto fail;
+ result = game_start(); if(result) goto fail;
+ result = 0;
+fail:
+ close_all();
+ return(result);
+}
+
+int em_main()
+{
+ int result;
+
+ /* pre-calculate some data */
+ tab_generate();
+ ulaw_generate();
+
+ progname = "emerald mine";
+
+ result = open_all();
+ if(result)
+ goto fail;
+
+ result = game_start();
+ if(result)
+ goto fail;
+
+ result = 0;
+fail:
+ close_all();
+ return(result);
+}
+
+/* massive kludge for buffer overflows
+ * i cant think of an elegant way to handle this situation.
+ * oh wait yes i can. dynamically allocate each string. oh well
+ */
+void snprintf_overflow(char *description)
+{
+ fprintf(stderr, "%s: %s\n", progname, "buffer overflow; check EMERALD_BASE environment variable");
+ fprintf(stderr, "%s %s\n", "Fault occured while attempting to", description);
+ abort();
+}
+
+#else
+
+int em_main()
+{
+ /* temporary dummy until X11->SDL conversion finished */
+ return 0;
+}
+
+#endif
--- /dev/null
+#ifndef SAMPLE_H
+#define SAMPLE_H
+
+enum {
+ SAMPLE_blank = 0, /* player walks on blank */
+ SAMPLE_roll, /* player pushes stone/bomb/nut */
+ SAMPLE_stone, /* stone hits ground */
+ SAMPLE_nut, /* nut hits ground */
+ SAMPLE_crack, /* stone hits nut */
+ SAMPLE_bug, /* bug moves */
+ SAMPLE_tank, /* tank moves */
+ SAMPLE_android, /* android places something */
+ SAMPLE_spring, /* spring hits ground/wall/bumper, stone hits spring */
+ SAMPLE_slurp, /* spring kills alien */
+ SAMPLE_eater, /* eater sits/eats diamond */
+ SAMPLE_alien, /* alien moves */
+ SAMPLE_collect, /* player collects diamond/emerald/dynamite/key/lenses/magnify */
+ SAMPLE_diamond, /* diamond/emerald hits ground */
+ SAMPLE_squash, /* stone squashes diamond, stone/emerald/diamond thru wonderwall */
+ SAMPLE_drip, /* drip hits ground */
+ SAMPLE_push, /* player pushes spring/balloon/android */
+ SAMPLE_dirt, /* player walks on dirt */
+ SAMPLE_acid, /* acid splashes */
+ SAMPLE_ball, /* ball places something */
+ SAMPLE_grow, /* growing wall grows */
+ SAMPLE_wonder, /* wonderwall moves */
+ SAMPLE_door, /* player goes thru door */
+ SAMPLE_exit, /* player goes in exit */
+ SAMPLE_dynamite, /* player places dynamite */
+ SAMPLE_tick, /* dynamite ticks */
+ SAMPLE_press, /* player presses wheel/wind/switch */
+ SAMPLE_wheel, /* wheel moves */
+ SAMPLE_boom, /* explosion */
+ SAMPLE_time, /* time runs out */
+ SAMPLE_die, /* player dies */
+ SAMPLE_MAX
+};
+
+extern char play[SAMPLE_MAX];
+extern int sound_pipe[2];
+extern short *sound_data[SAMPLE_MAX];
+extern long sound_length[SAMPLE_MAX];
+
+#define MIXER_MAX 4 /* maximum number of samples we can play at once */
+
+enum { AUDIO_ULAW = 0, AUDIO_U8 };
+
+#endif
--- /dev/null
+/* 2000-08-10T17:39:15Z
+ *
+ * handle sounds in emerald mine
+ */
+
+#include "../libgame/platform.h"
+
+
+#if defined(TARGET_X11)
+
+#if defined(PLATFORM_LINUX) || defined(PLATFORM_BSD)
+
+#ifdef PLATFORM_LINUX
+#include <sys/soundcard.h>
+#endif
+
+#ifdef PLATFORM_BSD
+#include <soundcard.h>
+#endif
+
+#include <sys/time.h>
+#include <sys/types.h>
+#include <sys/stat.h>
+#include <sys/ioctl.h>
+#include <fcntl.h>
+#include <unistd.h>
+#include <stdio.h>
+#include <stdlib.h>
+#include <string.h>
+#include <errno.h>
+
+#include "global.h"
+#include "sample.h"
+
+static char audioname[] = "/dev/audio";
+
+static const int sound_priority[SAMPLE_MAX] = {
+ SAMPLE_exit, SAMPLE_die, SAMPLE_time, SAMPLE_boom, SAMPLE_tick,
+ SAMPLE_collect, SAMPLE_roll, SAMPLE_push, SAMPLE_dynamite, SAMPLE_press,
+ SAMPLE_door, SAMPLE_dirt, SAMPLE_blank, SAMPLE_android, SAMPLE_ball,
+ SAMPLE_grow, SAMPLE_squash, SAMPLE_crack, SAMPLE_slurp, SAMPLE_drip,
+ SAMPLE_wonder, SAMPLE_wheel, SAMPLE_stone, SAMPLE_spring, SAMPLE_diamond,
+ SAMPLE_nut, SAMPLE_bug, SAMPLE_tank, SAMPLE_eater, SAMPLE_alien,
+ SAMPLE_acid
+};
+
+int sound_thread(void)
+{
+ int audio_fd; /* file descriptor of /dev/audio or -1 if not open */
+ int audio_format;
+ int sample_rate;
+ int fragment_size;
+ unsigned char *audio_buffer; /* actual buffer pumped to /dev/audio */
+ short *mix_buffer;
+
+ char sound_play[SAMPLE_MAX]; /* if set, we should be playing these sounds */
+ long sound_pos[SAMPLE_MAX]; /* position in the sound */
+ int mix_play[MIXER_MAX]; /* which sounds we have chosen to mix (calculated each time) */
+ int mix_count;
+
+ int i;
+
+loop:
+ audio_fd = -1;
+ audio_format = AUDIO_ULAW; /* defaults for non-OSS /dev/audio */
+ sample_rate = 8000;
+ fragment_size = 256;
+ audio_buffer = 0;
+ mix_buffer = 0;
+ mix_count = 0;
+
+ memset(sound_play, 0, sizeof(sound_play)); /* not playing any sounds */
+
+ for(;;) {
+ for(;;) {
+
+/* pick sounds to play, if any */
+ if(sound_play[SAMPLE_exit] || sound_play[SAMPLE_die]) sound_play[SAMPLE_boom] = 0; /* no explosions if player goes home */
+ mix_count = 0;
+ for(i = 0; i < SAMPLE_MAX; i++) {
+ if(sound_play[sound_priority[i]]) {
+ mix_play[mix_count++] = sound_priority[i];
+ if(mix_count == MIXER_MAX) break; /* cant mix too many sounds at once */
+ }
+ }
+
+/* check for incoming messages */
+ if(mix_count || audio_fd != -1) { /* dont block if we are playing sounds */
+ fd_set rfds;
+ struct timeval tv;
+ FD_ZERO(&rfds);
+ FD_SET(sound_pipe[0], &rfds);
+ tv.tv_sec = 0;
+ tv.tv_usec = 0; /* (900000 * fragment_size / sample_rate) */
+ i = select(sound_pipe[0] + 1, &rfds, 0, 0, &tv); /* dont block */
+ if(i == -1) {
+ fprintf(stderr, "%s: %s: %s\n", progname, "select failed", strerror(errno));
+ goto fail;
+ }
+ if(i == 0) break; /* no messages */
+ }
+
+/* get a message and start a sound */
+ i = read(sound_pipe[0], &play, sizeof(play));
+ if(i == -1) {
+ fprintf(stderr, "%s: %s: %s\n", progname, "read failed", strerror(errno));
+ goto fail;
+ }
+ if(i == 0) {
+ fprintf(stderr, "%s: %s: %s\n", progname, "read sound", "Broken pipe");
+ goto fail;
+ }
+ if(i != sizeof(play)) {
+ fprintf(stderr, "%s: %s\n", progname, "bad message length");
+ goto fail;
+ }
+ for(i = 0; i < SAMPLE_MAX; i++) {
+ if(play[i]) {
+ sound_play[i] = 1; /* play this sound */
+ sound_pos[i] = 0; /* start it from the start */
+ }
+ }
+ }
+
+/* open the audio device if there are sounds to play */
+ if(mix_count && audio_fd == -1) {
+ audio_fd = open(audioname, O_WRONLY);
+ if(audio_fd == -1) goto reset;
+#ifdef OPEN_SOUND_SYSTEM
+ i = 0x00020008;
+ if(ioctl(audio_fd, SNDCTL_DSP_SETFRAGMENT, &i) == -1) {
+ fprintf(stderr, "%s: \"%s\": %s (%d): %s\n", progname, audioname, "unable to set fragment size", 512, strerror(errno));
+ goto reset;
+ }
+ if(ioctl(audio_fd, SNDCTL_DSP_GETFMTS, &i) == -1) {
+ fprintf(stderr, "%s: \"%s\": %s: %s\n", progname, audioname, "unable to query audio format", strerror(errno));
+ goto reset;
+ }
+ audio_format = (i & AFMT_U8) ? AFMT_U8 : AFMT_MU_LAW; /* prefer 8 bit unsigned and fall back on mu-law */
+ i = audio_format;
+ if(ioctl(audio_fd, SNDCTL_DSP_SETFMT, &i) == -1) {
+ fprintf(stderr, "%s: \"%s\": %s (%d): %s\n", progname, audioname, "unable to set audio format", audio_format, strerror(errno));
+ goto reset;
+ }
+ if(i == AFMT_MU_LAW) {
+ audio_format = AUDIO_ULAW;
+ } else if(i == AFMT_U8) {
+ audio_format = AUDIO_U8;
+ } else {
+ fprintf(stderr, "%s: \"%s\": %s (%d)\n", progname, audioname, "audio format required by device not supported", i);
+ goto reset;
+ }
+ i = 1;
+ if(ioctl(audio_fd, SNDCTL_DSP_CHANNELS, &i) == -1) {
+ fprintf(stderr, "%s: \"%s\": %s: %s\n", progname, audioname, "unable to set channels to mono", strerror(errno));
+ goto reset;
+ }
+ if(i != 1) {
+ fprintf(stderr, "%s: \"%s\": %s (%d)\n", progname, audioname, "channels required by device not supported", i);
+ goto reset;
+ }
+ i = 8000;
+ if(ioctl(audio_fd, SNDCTL_DSP_SPEED, &i) == -1) {
+ fprintf(stderr, "%s: \"%s\": %s: %s\n", progname, audioname, "unable to set sampling rate", strerror(errno));
+ goto reset;
+ }
+ sample_rate = i;
+ if(ioctl(audio_fd, SNDCTL_DSP_GETBLKSIZE, &i) == -1) {
+ fprintf(stderr, "%s: \"%s\": %s: %s\n", progname, audioname, "unable to get block size", strerror(errno));
+ goto reset;
+ }
+ fragment_size = i;
+#else
+ if(fcntl(audio_fd, F_SETFL, O_NONBLOCK) == -1) {
+ fprintf(stderr, "%s: \"%s\": %s: %s\n", progname, audioname, "unable to make audio non blocking", strerror(errno));
+ goto reset;
+ }
+#endif /* OPEN_SOUND_SYSTEM */
+ audio_buffer = malloc(fragment_size * sizeof(*audio_buffer));
+ if(audio_buffer == 0) {
+ fprintf(stderr, "%s: %s (%d): %s\n", progname, "unable to malloc audio buffer", fragment_size * sizeof(*audio_buffer), strerror(errno));
+ goto fail;
+ }
+ mix_buffer = malloc(fragment_size * sizeof(*mix_buffer));
+ if(mix_buffer == 0) {
+ fprintf(stderr, "%s: %s (%d): %s\n", progname, "unable to malloc mixing buffer", fragment_size * sizeof(*mix_buffer), strerror(errno));
+ goto fail;
+ }
+ }
+
+/* close the audio device if no sounds are playing */
+ if(mix_count == 0 && audio_fd != -1) {
+ close(audio_fd);
+ free(audio_buffer);
+ free(mix_buffer);
+ audio_fd = -1;
+ audio_buffer = 0;
+ mix_buffer = 0;
+ }
+
+/* if we are playing sounds and the audio device is open, mix them */
+ if(mix_count && audio_fd != -1) {
+
+ memset(mix_buffer, 0, fragment_size * sizeof(*mix_buffer)); /* prepare mix buffer */
+
+ for(i = 0; i < mix_count; i++) {
+ register short *mix_ptr = mix_buffer;
+ register short *sound_ptr = sound_data[mix_play[i]] + sound_pos[mix_play[i]];
+ register long count = sound_length[mix_play[i]] - sound_pos[mix_play[i]];
+ if(count > fragment_size) count = fragment_size;
+ while(count--) *mix_ptr++ += *sound_ptr++; /* mix the sounds in */
+ }
+ switch(audio_format) {
+ case AUDIO_ULAW:
+ for(i = 0; i < fragment_size; i++) audio_buffer[i] = linear_to_ulaw[mix_buffer[i] + 32768];
+ break;
+ case AUDIO_U8:
+ for(i = 0; i < fragment_size; i++) audio_buffer[i] = (mix_buffer[i] + 32768) >> 8;
+ break;
+ }
+
+/* advance sound pointers */
+ for(i = 0; i < SAMPLE_MAX; i++) {
+ if(sound_play[i]) {
+ if(sound_pos[i] + fragment_size < sound_length[i]) {
+ sound_pos[i] += fragment_size;
+ } else {
+ sound_play[i] = 0;
+ }
+ }
+ }
+
+/* send the data to the audio device */
+ i = write(audio_fd, audio_buffer, fragment_size);
+ if(i == -1) {
+ fprintf(stderr, "%s: %s: %s\n", progname, "write error", strerror(errno));
+ goto reset;
+ }
+ if(i != fragment_size) {
+ fprintf(stderr, "%s: %s\n", progname, "bad write length");
+ goto reset;
+ }
+ }
+ } /* for */
+
+reset:
+ if(audio_fd != -1) close(audio_fd);
+ if(audio_buffer) free(audio_buffer);
+ if(mix_buffer) free(mix_buffer);
+ goto loop; /* back to top */
+
+fail:
+ if(audio_fd != -1) close(audio_fd);
+ if(audio_buffer) free(audio_buffer);
+ if(mix_buffer) free(mix_buffer);
+ return(0);
+}
+
+int read_sample(char *name, short **data, long *length)
+{
+ int result;
+ FILE *file = 0;
+ short *dataptr = 0;
+ long datalength;
+
+ int i, actual, ch;
+ unsigned char buffer[24];
+ unsigned long temp;
+
+ file = fopen(name, "rb");
+ if(file == 0) {
+ fprintf(stderr, "%s: \"%s\": %s: %s\n", progname, name, "open error", strerror(errno));
+ result = 1; goto fail;
+ }
+ actual = fread(buffer, 1, 24, file);
+ if(actual == -1) {
+ fprintf(stderr, "%s: \"%s\": %s: %s\n", progname, name, "read error", strerror(errno));
+ result = 1; goto fail;
+ }
+ if(actual < 24) {
+ fprintf(stderr, "%s: \"%s\": %s\n", progname, name, "premature eof");
+ result = 1; goto fail;
+ }
+ temp = buffer[0] << 24 | buffer[1] << 16 | buffer[2] << 8 | buffer[3]; /* magic */
+ if(temp != 0x2e736e64) {
+ fprintf(stderr, "%s: \"%s\": %s\n", progname, name, "unrecognized file format");
+ result = 1; goto fail;
+ }
+ temp = buffer[4] << 24 | buffer[5] << 16 | buffer[6] << 8 | buffer[7]; /* header length */
+ if(temp < 24) {
+ fprintf(stderr, "%s: \"%s\": %s\n", progname, name, "bad header length");
+ result = 1; goto fail;
+ }
+ actual = temp;
+ for(i = 24; i < actual; i++) { /* skip the rest of the header */
+ ch = fgetc(file);
+ if(ch == EOF) break;
+ }
+
+ temp = buffer[8] << 24 | buffer[9] << 16 | buffer[10] << 8 | buffer[11]; /* data length */
+ datalength = temp;
+ temp = buffer[12] << 24 | buffer[13] << 16 | buffer[14] << 8 | buffer[15]; /* encoding */
+ if(temp != 1) {
+ fprintf(stderr, "%s: \"%s\": %s (%ld != 1)\n", progname, name, "bad encoding type", temp);
+ result = 1; goto fail;
+ }
+ temp = buffer[16] << 24 | buffer[17] << 16 | buffer[18] << 8 | buffer[19]; /* sample rate */
+ if(temp != 8000) {
+ fprintf(stderr, "%s: \"%s\": %s (%ld != 8000)\n", progname, name, "bad sample rate", temp);
+ result = 1; goto fail;
+ }
+ temp = buffer[20] << 24 | buffer[21] << 16 | buffer[22] << 8 | buffer[23]; /* channels */
+ if(temp != 1) {
+ fprintf(stderr, "%s: \"%s\": %s (%ld != 1)\n", progname, name, "unsupported channels", temp);
+ result = 1; goto fail;
+ }
+
+ dataptr = malloc(datalength * sizeof(*dataptr));
+ if(dataptr == 0) {
+ fprintf(stderr, "%s: \"%s\": %s (%ld): %s\n", progname, name, "unable to malloc buffer", datalength * sizeof(*dataptr), strerror(errno));
+ result = 1; goto fail;
+ }
+
+ for(i = 0; i < datalength; i++) {
+ ch = fgetc(file);
+ if(ch == EOF) break;
+ dataptr[i] = ulaw_to_linear[ch];
+ }
+ fclose(file);
+ file = 0;
+
+ *data = dataptr;
+ *length = datalength;
+ result = 0;
+fail:
+ if(file) fclose(file);
+ return(result);
+}
+
+#endif /* defined(PLATFORM_LINUX) || defined(PLATFORM_BSD) */
+
+#endif
--- /dev/null
+/* first part of synchro.
+ *
+ * game logic for players.
+ *
+ * large switch statement for tiles the player interacts with.
+ */
+
+#include "tile.h"
+#include "level.h"
+#include "sample.h"
+
+
+#if defined(TARGET_X11)
+
+static void player(struct PLAYER *);
+static int test(struct PLAYER *);
+static void die(struct PLAYER *);
+
+void synchro_1(void)
+{
+ char ply1_kill = test(&ply1); /* must test for death and actually kill separately */
+ char ply2_kill = test(&ply2);
+ if(ply1.alive && ply1_kill) die(&ply1);
+ if(ply2.alive && ply2_kill) die(&ply2);
+
+#if 0
+ ply1.alive = 1; /* debugging */
+#endif
+
+ ply1.oldx = ply1.x;
+ ply1.oldy = ply1.y;
+ ply1.anim = SPR_still;
+ ply2.oldx = ply2.x;
+ ply2.oldy = ply2.y;
+ ply2.anim = SPR_still;
+
+ if(Random & 256) {
+ if(ply1.alive) player(&ply1);
+ if(ply2.alive) player(&ply2);
+ } else {
+ if(ply2.alive) player(&ply2);
+ if(ply1.alive) player(&ply1);
+ }
+ if(ply1.alive) {
+ if(Cave[ply1.oldy][ply1.oldx] == Zplayer) {
+ Cave[ply1.oldy][ply1.oldx] = Xblank;
+ Next[ply1.oldy][ply1.oldx] = Xblank;
+ }
+ if(Cave[ply1.y][ply1.x] == Xblank) {
+ Cave[ply1.y][ply1.x] = Zplayer;
+ Next[ply1.y][ply1.x] = Zplayer;
+ }
+ }
+ if(ply2.alive) {
+ if(Cave[ply2.oldy][ply2.oldx] == Zplayer) {
+ Cave[ply2.oldy][ply2.oldx] = Xblank;
+ Next[ply2.oldy][ply2.oldx] = Xblank;
+ }
+ if(Cave[ply2.y][ply2.x] == Xblank) {
+ Cave[ply2.y][ply2.x] = Zplayer;
+ Next[ply2.y][ply2.x] = Zplayer;
+ }
+ }
+}
+
+static int test(struct PLAYER *ply)
+{
+ register unsigned int x = ply->x;
+ register unsigned int y = ply->y;
+
+ if(lev.time == 0) return(1);
+
+ switch(Cave[y-1][x]) {
+ case Xbug_n:
+ case Xbug_e:
+ case Xbug_s:
+ case Xbug_w:
+ case Xbug_gon:
+ case Xbug_goe:
+ case Xbug_gos:
+ case Xbug_gow:
+ case Xtank_n:
+ case Xtank_e:
+ case Xtank_s:
+ case Xtank_w:
+ case Xtank_gon:
+ case Xtank_goe:
+ case Xtank_gos:
+ case Xtank_gow:
+ return(1);
+ }
+ switch(Cave[y][x+1]) {
+ case Xbug_n:
+ case Xbug_e:
+ case Xbug_s:
+ case Xbug_w:
+ case Xbug_gon:
+ case Xbug_goe:
+ case Xbug_gos:
+ case Xbug_gow:
+ case Xtank_n:
+ case Xtank_e:
+ case Xtank_s:
+ case Xtank_w:
+ case Xtank_gon:
+ case Xtank_goe:
+ case Xtank_gos:
+ case Xtank_gow:
+ return(1);
+ }
+ switch(Cave[y+1][x]) {
+ case Xbug_n:
+ case Xbug_e:
+ case Xbug_s:
+ case Xbug_w:
+ case Xbug_gon:
+ case Xbug_goe:
+ case Xbug_gos:
+ case Xbug_gow:
+ case Xtank_n:
+ case Xtank_e:
+ case Xtank_s:
+ case Xtank_w:
+ case Xtank_gon:
+ case Xtank_goe:
+ case Xtank_gos:
+ case Xtank_gow:
+ return(1);
+ }
+ switch(Cave[y][x-1]) {
+ case Xbug_n:
+ case Xbug_e:
+ case Xbug_s:
+ case Xbug_w:
+ case Xbug_gon:
+ case Xbug_goe:
+ case Xbug_gos:
+ case Xbug_gow:
+ case Xtank_n:
+ case Xtank_e:
+ case Xtank_s:
+ case Xtank_w:
+ case Xtank_gon:
+ case Xtank_goe:
+ case Xtank_gos:
+ case Xtank_gow:
+ return(1);
+ }
+ switch(Cave[y][x]) {
+ case Xblank:
+ case Yacid_splash_eB:
+ case Yacid_splash_wB:
+ case Zplayer:
+ case Xdynamite_1:
+ case Xdynamite_2:
+ case Xdynamite_3:
+ case Xdynamite_4:
+ return(0);
+ }
+ return(1);
+}
+
+static void die(struct PLAYER *ply)
+{
+ register unsigned int x = ply->x;
+ register unsigned int y = ply->y;
+
+ ply->alive = 0;
+
+ switch(Cave[y-1][x]) {
+ case Xbug_n:
+ case Xbug_e:
+ case Xbug_s:
+ case Xbug_w:
+ case Xbug_gon:
+ case Xbug_goe:
+ case Xbug_gos:
+ case Xbug_gow:
+ Cave[y-1][x] = Xboom_bug; break;
+ case Xtank_n:
+ case Xtank_e:
+ case Xtank_s:
+ case Xtank_w:
+ case Xtank_gon:
+ case Xtank_goe:
+ case Xtank_gos:
+ case Xtank_gow:
+ Cave[y-1][x] = Xboom_bomb; break;
+ }
+ switch(Cave[y][x+1]) {
+ case Xbug_n:
+ case Xbug_e:
+ case Xbug_s:
+ case Xbug_w:
+ case Xbug_gon:
+ case Xbug_goe:
+ case Xbug_gos:
+ case Xbug_gow:
+ Cave[y][x+1] = Xboom_bug; break;
+ case Xtank_n:
+ case Xtank_e:
+ case Xtank_s:
+ case Xtank_w:
+ case Xtank_gon:
+ case Xtank_goe:
+ case Xtank_gos:
+ case Xtank_gow:
+ Cave[y][x+1] = Xboom_bomb; break;
+ }
+ switch(Cave[y+1][x]) {
+ case Xbug_n:
+ case Xbug_e:
+ case Xbug_s:
+ case Xbug_w:
+ case Xbug_gon:
+ case Xbug_goe:
+ case Xbug_gos:
+ case Xbug_gow:
+ Cave[y+1][x] = Xboom_bug; break;
+ case Xtank_n:
+ case Xtank_e:
+ case Xtank_s:
+ case Xtank_w:
+ case Xtank_gon:
+ case Xtank_goe:
+ case Xtank_gos:
+ case Xtank_gow:
+ Cave[y+1][x] = Xboom_bomb; break;
+ }
+ switch(Cave[y][x-1]) {
+ case Xbug_n:
+ case Xbug_e:
+ case Xbug_s:
+ case Xbug_w:
+ case Xbug_gon:
+ case Xbug_goe:
+ case Xbug_gos:
+ case Xbug_gow:
+ Cave[y][x-1] = Xboom_bug; break;
+ case Xtank_n:
+ case Xtank_e:
+ case Xtank_s:
+ case Xtank_w:
+ case Xtank_gon:
+ case Xtank_goe:
+ case Xtank_gos:
+ case Xtank_gow:
+ Cave[y][x-1] = Xboom_bomb; break;
+ }
+ switch(Cave[y][x]) {
+ case Xexit_1:
+ case Xexit_2:
+ case Xexit_3:
+ play[SAMPLE_exit] = 1; break;
+ default:
+ play[SAMPLE_die] = 1; break;
+ }
+ Cave[y][x] = Xboom_1;
+ Boom[y][x] = Xblank;
+}
+
+static void player(struct PLAYER *ply)
+{
+ register unsigned int x = ply->x;
+ register unsigned int y = ply->y;
+ unsigned int anim = 0; /* initialized to make compilers happy */
+ int dx = 0, dy = 0;
+
+ if((ply->joy_spin = !ply->joy_spin)) {
+ if(ply->joy_n) {
+ y--; dy = -1; anim = 0; /* north */
+ } else if(ply->joy_e) {
+ x++; dx = 1; anim = 1; /* east */
+ } else if(ply->joy_s) {
+ y++; dy = 1; anim = 2; /* south */
+ } else if(ply->joy_w) {
+ x--; dx = -1; anim = 3; /* west */
+ }
+ } else {
+ if(ply->joy_w) {
+ x--; dx = -1; anim = 3; /* west */
+ } else if(ply->joy_s) {
+ y++; dy = 1; anim = 2; /* south */
+ } else if(ply->joy_e) {
+ x++; dx = 1; anim = 1; /* east */
+ } else if(ply->joy_n) {
+ y--; dy = -1; anim = 0; /* north */
+ }
+ }
+ if(dx == 0 && dy == 0) {
+ ply->joy_stick = 0;
+ if(ply->joy_fire) {
+ if(++ply->dynamite_cnt == 5 && ply->dynamite) {
+ Cave[y][x] = Xdynamite_1;
+ play[SAMPLE_dynamite] = 1;
+ ply->dynamite--;
+ }
+ } else {
+ ply->dynamite_cnt = 0;
+ }
+ Random += 7; /* bit more random if we dont move */
+ return;
+ }
+ ply->joy_stick = 1;
+ ply->joy_n = ply->joy_e = ply->joy_s = ply->joy_w = 0;
+ ply->dynamite_cnt = 0; /* reset dynamite timer if we move */
+
+ if(ply->joy_fire == 0) {
+ switch(Cave[y][x]) { /* fire is released */
+ case Xblank:
+ case Yacid_splash_eB:
+ case Yacid_splash_wB:
+ Cave[y][x] = Zplayer;
+ Next[y][x] = Zplayer;
+ play[SAMPLE_blank] = 1;
+ ply->anim = SPR_walk + anim;
+ ply->x = x;
+ ply->y = y;
+ break;
+ case Xboom_android:
+ case Xboom_1:
+ case Xbug_n:
+ case Xbug_e:
+ case Xbug_s:
+ case Xbug_w:
+ case Xbug_gon:
+ case Xbug_goe:
+ case Xbug_gos:
+ case Xbug_gow:
+ case Xtank_n:
+ case Xtank_e:
+ case Xtank_s:
+ case Xtank_w:
+ case Xtank_gon:
+ case Xtank_goe:
+ case Xtank_gos:
+ case Xtank_gow:
+ case Xacid_1:
+ case Xacid_2:
+ case Xacid_3:
+ case Xacid_4:
+ case Xacid_5:
+ case Xacid_6:
+ case Xacid_7:
+ case Xacid_8:
+ ply->anim = SPR_walk + anim;
+ ply->x = x;
+ ply->y = y;
+ break;
+ case Xgrass:
+ Cave[y][x] = dy ? (dy < 0 ? Ygrass_nB : Ygrass_sB) : (dx > 0 ? Ygrass_eB : Ygrass_wB);
+ Next[y][x] = Zplayer;
+ play[SAMPLE_dirt] = 1;
+ ply->anim = SPR_walk + anim;
+ ply->x = x;
+ ply->y = y;
+ break;
+ case Xdirt:
+ Cave[y][x] = dy ? (dy < 0 ? Ydirt_nB : Ydirt_sB) : (dx > 0 ? Ydirt_eB : Ydirt_wB);
+ Next[y][x] = Zplayer;
+ play[SAMPLE_dirt] = 1;
+ ply->anim = SPR_walk + anim;
+ ply->x = x;
+ ply->y = y;
+ break;
+ case Xdiamond:
+ case Xdiamond_pause:
+ Cave[y][x] = Ydiamond_eat;
+ Next[y][x] = Zplayer;
+ play[SAMPLE_collect] = 1;
+ lev.score += lev.diamond_score;
+ lev.required = lev.required < 3 ? 0 : lev.required - 3;
+ ply->anim = SPR_walk + anim;
+ ply->x = x;
+ ply->y = y;
+ break;
+ case Xemerald:
+ case Xemerald_pause:
+ Cave[y][x] = Yemerald_eat;
+ Next[y][x] = Zplayer;
+ play[SAMPLE_collect] = 1;
+ lev.score += lev.emerald_score;
+ lev.required = lev.required < 1 ? 0 : lev.required - 1;
+ ply->anim = SPR_walk + anim;
+ ply->x = x;
+ ply->y = y;
+ break;
+ case Xdynamite:
+ Cave[y][x] = Ydynamite_eat;
+ Next[y][x] = Zplayer;
+ play[SAMPLE_collect] = 1;
+ lev.score += lev.dynamite_score;
+ ply->dynamite = ply->dynamite > 9998 ? 9999 : ply->dynamite + 1;
+ ply->anim = SPR_walk + anim;
+ ply->x = x;
+ ply->y = y;
+ break;
+ case Xkey_1:
+ ply->keys |= 0x01; goto key_walk;
+ case Xkey_2:
+ ply->keys |= 0x02; goto key_walk;
+ case Xkey_3:
+ ply->keys |= 0x04; goto key_walk;
+ case Xkey_4:
+ ply->keys |= 0x08; goto key_walk;
+ case Xkey_5:
+ ply->keys |= 0x10; goto key_walk;
+ case Xkey_6:
+ ply->keys |= 0x20; goto key_walk;
+ case Xkey_7:
+ ply->keys |= 0x40; goto key_walk;
+ case Xkey_8:
+ ply->keys |= 0x80; goto key_walk;
+ key_walk:
+ Cave[y][x] = Yball_eat;
+ Next[y][x] = Zplayer;
+ play[SAMPLE_collect] = 1;
+ lev.score += lev.key_score;
+ ply->anim = SPR_walk + anim;
+ ply->x = x;
+ ply->y = y;
+ break;
+ case Xlenses:
+ Cave[y][x] = Yball_eat;
+ Next[y][x] = Zplayer;
+ play[SAMPLE_collect] = 1;
+ lev.score += lev.lenses_score;
+ lev.lenses_cnt = lev.lenses_time;
+ ply->anim = SPR_walk + anim;
+ ply->x = x;
+ ply->y = y;
+ break;
+ case Xmagnify:
+ Cave[y][x] = Yball_eat;
+ Next[y][x] = Zplayer;
+ play[SAMPLE_collect] = 1;
+ lev.score += lev.magnify_score;
+ lev.magnify_cnt = lev.magnify_time;
+ ply->anim = SPR_walk + anim;
+ ply->x = x;
+ ply->y = y;
+ break;
+ case Xstone:
+ if(dy) break;
+ switch(Cave[y][x+dx]) {
+ case Xacid_1:
+ case Xacid_2:
+ case Xacid_3:
+ case Xacid_4:
+ case Xacid_5:
+ case Xacid_6:
+ case Xacid_7:
+ case Xacid_8:
+ if(Cave[y-1][x+dx+1] == Xblank) Cave[y-1][x+dx+1] = Yacid_splash_eB;
+ if(Cave[y-1][x+dx-1] == Xblank) Cave[y-1][x+dx-1] = Yacid_splash_wB;
+ play[SAMPLE_acid] = 1;
+ goto stone_walk;
+ case Xblank:
+ case Yacid_splash_eB:
+ case Yacid_splash_wB:
+ Cave[y][x+dx] = dx > 0 ? Ystone_e : Ystone_w;
+ Next[y][x+dx] = Xstone_pause;
+ stone_walk:
+ Cave[y][x] = dx > 0 ? Ystone_eB : Ystone_wB;
+ Next[y][x] = Zplayer;
+ play[SAMPLE_roll] = 1;
+ ply->x = x;
+ }
+ ply->anim = SPR_push + anim;
+ break;
+ case Xbomb:
+ if(dy) break;
+ switch(Cave[y][x+dx]) {
+ case Xacid_1:
+ case Xacid_2:
+ case Xacid_3:
+ case Xacid_4:
+ case Xacid_5:
+ case Xacid_6:
+ case Xacid_7:
+ case Xacid_8:
+ if(Cave[y-1][x+dx+1] == Xblank) Cave[y-1][x+dx+1] = Yacid_splash_eB;
+ if(Cave[y-1][x+dx-1] == Xblank) Cave[y-1][x+dx-1] = Yacid_splash_wB;
+ play[SAMPLE_acid] = 1;
+ goto bomb_walk;
+ case Xblank:
+ case Yacid_splash_eB:
+ case Yacid_splash_wB:
+ Cave[y][x+dx] = dx > 0 ? Ybomb_e : Ybomb_w;
+ Next[y][x+dx] = Xbomb_pause;
+ bomb_walk:
+ Cave[y][x] = dx > 0 ? Ybomb_eB : Ybomb_wB;
+ Next[y][x] = Zplayer;
+ play[SAMPLE_roll] = 1;
+ ply->x = x;
+ }
+ ply->anim = SPR_push + anim;
+ break;
+ case Xnut:
+ if(dy) break;
+ switch(Cave[y][x+dx]) {
+ case Xacid_1:
+ case Xacid_2:
+ case Xacid_3:
+ case Xacid_4:
+ case Xacid_5:
+ case Xacid_6:
+ case Xacid_7:
+ case Xacid_8:
+ if(Cave[y-1][x+dx+1] == Xblank) Cave[y-1][x+dx+1] = Yacid_splash_eB;
+ if(Cave[y-1][x+dx-1] == Xblank) Cave[y-1][x+dx-1] = Yacid_splash_wB;
+ play[SAMPLE_acid] = 1;
+ goto nut_walk;
+ case Xblank:
+ case Yacid_splash_eB:
+ case Yacid_splash_wB:
+ Cave[y][x+dx] = dx > 0 ? Ynut_e : Ynut_w;
+ Next[y][x+dx] = Xnut_pause;
+ nut_walk:
+ Cave[y][x] = dx > 0 ? Ynut_eB : Ynut_wB;
+ Next[y][x] = Zplayer;
+ play[SAMPLE_roll] = 1;
+ ply->x = x;
+ }
+ ply->anim = SPR_push + anim;
+ break;
+ case Xspring:
+ if(dy) break;
+ switch(Cave[y][x+dx]) {
+ case Xalien:
+ case Xalien_pause:
+ Cave[y][x] = dx > 0 ? Yspring_kill_eB : Yspring_kill_wB;
+ Cave[y][x+dx] = dx > 0 ? Yspring_kill_e : Yspring_kill_w;
+ Next[y][x] = Zplayer;
+ Next[y][x+dx] = dx > 0 ? Xspring_e : Xspring_w;
+ play[SAMPLE_slurp] = 1;
+ lev.score += lev.slurp_score;
+ ply->x = x;
+ break;
+ case Xacid_1:
+ case Xacid_2:
+ case Xacid_3:
+ case Xacid_4:
+ case Xacid_5:
+ case Xacid_6:
+ case Xacid_7:
+ case Xacid_8:
+ if(Cave[y-1][x+dx+1] == Xblank) Cave[y-1][x+dx+1] = Yacid_splash_eB;
+ if(Cave[y-1][x+dx-1] == Xblank) Cave[y-1][x+dx-1] = Yacid_splash_wB;
+ play[SAMPLE_acid] = 1;
+ goto spring_walk;
+ case Xblank:
+ case Yacid_splash_eB:
+ case Yacid_splash_wB:
+ Cave[y][x+dx] = dx > 0 ? Yspring_e : Yspring_w;
+ Next[y][x+dx] = dx > 0 ? Xspring_e : Xspring_w;
+ spring_walk:
+ Cave[y][x] = dx > 0 ? Yspring_eB : Yspring_wB;
+ Next[y][x] = Zplayer;
+ play[SAMPLE_roll] = 1;
+ ply->x = x;
+ }
+ ply->anim = SPR_push + anim;
+ break;
+ case Xspring_pause:
+ case Xstone_pause:
+ case Xbomb_pause:
+ case Xnut_pause:
+ case Xsand_stonein_1:
+ case Xsand_stonein_2:
+ case Xsand_stonein_3:
+ case Xsand_stonein_4:
+ if(dy) break;
+ ply->anim = SPR_push + anim;
+ break;
+ case Xballoon:
+ switch(Cave[y+dy][x+dx]) {
+ case Xacid_1:
+ case Xacid_2:
+ case Xacid_3:
+ case Xacid_4:
+ case Xacid_5:
+ case Xacid_6:
+ case Xacid_7:
+ case Xacid_8:
+ if(Cave[y+dy-1][x+dx+1] == Xblank) Cave[y+dy-1][x+dx+1] = Yacid_splash_eB;
+ if(Cave[y+dy-1][x+dx-1] == Xblank) Cave[y+dy-1][x+dx-1] = Yacid_splash_wB;
+ play[SAMPLE_acid] = 1;
+ goto balloon_walk;
+ case Xblank:
+ case Yacid_splash_eB:
+ case Yacid_splash_wB:
+ Cave[y+dy][x+dx] = dy ? (dy < 0 ? Yballoon_n : Yballoon_s) : (dx > 0 ? Yballoon_e : Yballoon_w);
+ Next[y+dy][x+dx] = Xballoon;
+ balloon_walk:
+ Cave[y][x] = dy ? (dy < 0 ? Yballoon_nB : Yballoon_sB) : (dx > 0 ? Yballoon_eB : Yballoon_wB);
+ Next[y][x] = Zplayer;
+ play[SAMPLE_push] = 1;
+ ply->x = x;
+ ply->y = y;
+ }
+ ply->anim = SPR_push + anim;
+ break;
+ case Xandroid:
+ case Xandroid_1_n:
+ case Xandroid_2_n:
+ case Xandroid_1_e:
+ case Xandroid_2_e:
+ case Xandroid_1_s:
+ case Xandroid_2_s:
+ case Xandroid_1_w:
+ case Xandroid_2_w:
+ switch(Cave[y+dy][x+dx]) {
+ case Xacid_1:
+ case Xacid_2:
+ case Xacid_3:
+ case Xacid_4:
+ case Xacid_5:
+ case Xacid_6:
+ case Xacid_7:
+ case Xacid_8:
+ if(Cave[y+dy-1][x+dx+1] == Xblank) Cave[y+dy-1][x+dx+1] = Yacid_splash_eB;
+ if(Cave[y+dy-1][x+dx-1] == Xblank) Cave[y+dy-1][x+dx-1] = Yacid_splash_wB;
+ play[SAMPLE_acid] = 1;
+ goto android_walk;
+ case Xblank:
+ case Yacid_splash_eB:
+ case Yacid_splash_wB:
+ Cave[y+dy][x+dx] = dy ? (dy < 0 ? Yandroid_n : Yandroid_s) : (dx > 0 ? Yandroid_e : Yandroid_w);
+ Next[y+dy][x+dx] = dy ? (dy < 0 ? Xandroid_2_n : Xandroid_2_s) : (dx > 0 ? Xandroid_2_e : Xandroid_2_w);
+ android_walk:
+ Cave[y][x] = dy ? (dy < 0 ? Yandroid_nB : Yandroid_sB) : (dx > 0 ? Yandroid_eB : Yandroid_wB);
+ Next[y][x] = Zplayer;
+ play[SAMPLE_push] = 1;
+ ply->x = x;
+ ply->y = y;
+ }
+ ply->anim = SPR_push + anim;
+ break;
+ case Xdoor_1:
+ case Xfake_door_1:
+ if(ply->keys & 0x01) goto door_walk; else break;
+ case Xdoor_2:
+ case Xfake_door_2:
+ if(ply->keys & 0x02) goto door_walk; else break;
+ case Xdoor_3:
+ case Xfake_door_3:
+ if(ply->keys & 0x04) goto door_walk; else break;
+ case Xdoor_4:
+ case Xfake_door_4:
+ if(ply->keys & 0x08) goto door_walk; else break;
+ case Xdoor_5:
+ case Xfake_door_5:
+ if(ply->keys & 0x10) goto door_walk; else break;
+ case Xdoor_6:
+ case Xfake_door_6:
+ if(ply->keys & 0x20) goto door_walk; else break;
+ case Xdoor_7:
+ case Xfake_door_7:
+ if(ply->keys & 0x40) goto door_walk; else break;
+ case Xdoor_8:
+ case Xfake_door_8:
+ if(ply->keys & 0x80) goto door_walk; else break;
+ door_walk:
+ if(!tab_blank[Cave[y+dy][x+dx]]) break;
+ Cave[y+dy][x+dx] = Zplayer;
+ Next[y+dy][x+dx] = Zplayer;
+ play[SAMPLE_door] = 1;
+ ply->anim = SPR_walk + anim;
+ ply->x = x + dx;
+ ply->y = y + dy;
+ break;
+ case Xwheel:
+ play[SAMPLE_press] = 1;
+ lev.wheel_cnt = lev.wheel_time;
+ lev.wheel_x = x;
+ lev.wheel_y = y;
+ break;
+ case Xwind_n:
+ lev.wind_direction = 0; goto wind_walk;
+ case Xwind_e:
+ lev.wind_direction = 1; goto wind_walk;
+ case Xwind_s:
+ lev.wind_direction = 2; goto wind_walk;
+ case Xwind_w:
+ lev.wind_direction = 3; goto wind_walk;
+ case Xwind_nesw:
+ lev.wind_direction = dy ? (dy < 0 ? 0 : 2) : (dx > 0 ? 1 : 3); goto wind_walk;
+ wind_walk:
+ play[SAMPLE_press] = 1;
+ lev.wind_cnt = lev.wind_time;
+ break;
+ case Xwind_stop:
+ play[SAMPLE_press] = 1;
+ lev.wind_cnt = 0;
+ break;
+ case Xswitch:
+ play[SAMPLE_press] = 1;
+ lev.ball_cnt = lev.ball_time;
+ lev.ball_state = !lev.ball_state;
+ break;
+ case Xplant:
+ Cave[y][x] = Yplant;
+ Next[y][x] = Xplant;
+ play[SAMPLE_blank] = 1;
+ ply->anim = SPR_walk + anim;
+ ply->x = x;
+ ply->y = y;
+ break;
+ case Xexit_1:
+ case Xexit_2:
+ case Xexit_3:
+ play[SAMPLE_exit] = 1;
+ if(--lev.home == 0) lev.score += lev.time * lev.exit_score / 100;
+ ply->anim = SPR_walk + anim;
+ ply->x = x;
+ ply->y = y;
+ break;
+ }
+ } else {
+ switch(Cave[y][x]) { /* fire is pressed */
+ case Xgrass:
+ case Xdirt:
+ Cave[y][x] = Yball_eat;
+ Next[y][x] = Xblank;
+ play[SAMPLE_dirt] = 1;
+ ply->anim = SPR_spray + anim;
+ break;
+ case Xdiamond:
+ case Xdiamond_pause:
+ Cave[y][x] = Ydiamond_eat;
+ Next[y][x] = Xblank;
+ play[SAMPLE_collect] = 1;
+ lev.score += lev.diamond_score;
+ lev.required = lev.required < 3 ? 0 : lev.required - 3;
+ ply->anim = SPR_walk + anim;
+ break;
+ case Xemerald:
+ case Xemerald_pause:
+ Cave[y][x] = Yemerald_eat;
+ Next[y][x] = Xblank;
+ play[SAMPLE_collect] = 1;
+ lev.score += lev.emerald_score;
+ lev.required = lev.required < 1 ? 0 : lev.required - 1;
+ ply->anim = SPR_walk + anim;
+ break;
+ case Xdynamite:
+ Cave[y][x] = Ydynamite_eat;
+ Next[y][x] = Xblank;
+ play[SAMPLE_collect] = 1;
+ lev.score += lev.dynamite_score;
+ ply->dynamite = ply->dynamite > 9998 ? 9999 : ply->dynamite + 1;
+ ply->anim = SPR_walk + anim;
+ break;
+ case Xkey_1:
+ ply->keys |= 0x01; goto key_shoot;
+ case Xkey_2:
+ ply->keys |= 0x02; goto key_shoot;
+ case Xkey_3:
+ ply->keys |= 0x04; goto key_shoot;
+ case Xkey_4:
+ ply->keys |= 0x08; goto key_shoot;
+ case Xkey_5:
+ ply->keys |= 0x10; goto key_shoot;
+ case Xkey_6:
+ ply->keys |= 0x20; goto key_shoot;
+ case Xkey_7:
+ ply->keys |= 0x40; goto key_shoot;
+ case Xkey_8:
+ ply->keys |= 0x80; goto key_shoot;
+ key_shoot:
+ Cave[y][x] = Yball_eat;
+ Next[y][x] = Xblank;
+ play[SAMPLE_collect] = 1;
+ lev.score += lev.key_score;
+ ply->anim = SPR_walk + anim;
+ break;
+ case Xlenses:
+ Cave[y][x] = Yball_eat;
+ Next[y][x] = Xblank;
+ play[SAMPLE_collect] = 1;
+ lev.score += lev.lenses_score;
+ lev.lenses_cnt = lev.lenses_time;
+ ply->anim = SPR_walk + anim;
+ break;
+ case Xmagnify:
+ Cave[y][x] = Yball_eat;
+ Next[y][x] = Xblank;
+ play[SAMPLE_collect] = 1;
+ lev.score += lev.magnify_score;
+ lev.magnify_cnt = lev.magnify_time;
+ ply->anim = SPR_walk + anim;
+ break;
+ }
+ }
+}
+
+#endif
--- /dev/null
+/* second part of synchro.
+ *
+ * game logic for monsters.
+ *
+ * one giant switch statement to process everything.
+ *
+ * this whole thing is a major bottleneck. the compiler must use registers. compilers suck.
+ */
+
+#include "display.h"
+#include "tile.h"
+#include "level.h"
+#include "sample.h"
+
+
+#if defined(TARGET_X11)
+
+extern unsigned int screen_x;
+extern unsigned int screen_y;
+
+void synchro_2(void)
+{
+ register unsigned int x = 0;
+ register unsigned int y = 1;
+ register unsigned long random = Random;
+ register unsigned short *cave_cache = Cave[y]; /* might be a win */
+ unsigned long score = 0;
+
+ unsigned int temp = 0; /* initialized to make compilers happy */
+ unsigned int left = screen_x / TILEX; /* only needed for sounds */
+ unsigned int top = screen_y / TILEY;
+ unsigned int dx; /* only needed to find closest player */
+ unsigned int dy;
+
+#define RANDOM (random = random << 31 | random >> 1)
+#define PLAY(sample) { if((unsigned int)(y - top) <= 12 && (unsigned int)(x - left) <= 20) play[sample] = 1; }
+
+loop:
+ switch(cave_cache[++x]) {
+ default:
+ goto loop;
+/* ---------------------------------------------------------------------- */
+#ifdef BAD_ROLL
+ case Xstone_force_e:
+ switch(Cave[y][x+1]) {
+ case ZBORDER:
+ case Znormal:
+ case Zdynamite:
+ case Xboom_bug:
+ case Xboom_bomb:
+ case Xboom_android:
+ case Xboom_1:
+ case Zplayer:
+ Cave[y][x] = Xstone;
+ Next[y][x] = Xstone;
+ goto loop;
+ default:
+ Cave[y][x] = Ystone_eB;
+ Cave[y][x+1] = Ystone_e;
+ Next[y][x] = Xblank;
+ Next[y][x+1] = Xstone_pause;
+ goto loop;
+ }
+ case Xstone_force_w:
+ switch(Cave[y][x-1]) {
+ case ZBORDER:
+ case Znormal:
+ case Zdynamite:
+ case Xboom_bug:
+ case Xboom_bomb:
+ case Xboom_android:
+ case Xboom_1:
+ case Zplayer:
+ Cave[y][x] = Xstone;
+ Next[y][x] = Xstone;
+ goto loop;
+ default:
+ Cave[y][x] = Ystone_wB;
+ Cave[y][x-1] = Ystone_w;
+ Next[y][x] = Xblank;
+ Next[y][x-1] = Xstone_pause;
+ goto loop;
+ }
+ case Xnut_force_e:
+ switch(Cave[y][x+1]) {
+ case ZBORDER:
+ case Znormal:
+ case Zdynamite:
+ case Xboom_bug:
+ case Xboom_bomb:
+ case Xboom_android:
+ case Xboom_1:
+ case Zplayer:
+ Cave[y][x] = Xnut;
+ Next[y][x] = Xnut;
+ goto loop;
+ default:
+ Cave[y][x] = Ynut_eB;
+ Cave[y][x+1] = Ynut_e;
+ Next[y][x] = Xblank;
+ Next[y][x+1] = Xnut_pause;
+ goto loop;
+ }
+ case Xnut_force_w:
+ switch(Cave[y][x-1]) {
+ case ZBORDER:
+ case Znormal:
+ case Zdynamite:
+ case Xboom_bug:
+ case Xboom_bomb:
+ case Xboom_android:
+ case Xboom_1:
+ case Zplayer:
+ Cave[y][x] = Xnut;
+ Next[y][x] = Xnut;
+ goto loop;
+ default:
+ Cave[y][x] = Ynut_wB;
+ Cave[y][x-1] = Ynut_w;
+ Next[y][x] = Xblank;
+ Next[y][x-1] = Xnut_pause;
+ goto loop;
+ }
+ case Xspring_force_e:
+ switch(Cave[y][x+1]) {
+ case ZBORDER:
+ case Znormal:
+ case Zdynamite:
+ case Xboom_bug:
+ case Xboom_bomb:
+ case Xboom_android:
+ case Xboom_1:
+ case Zplayer:
+ Cave[y][x] = Xspring;
+ Next[y][x] = Xspring;
+ goto loop;
+ default:
+ Cave[y][x] = Yspring_eB;
+ Cave[y][x+1] = Yspring_e;
+ Next[y][x] = Xblank;
+#ifdef BAD_SPRING
+ Next[y][x+1] = Xspring_e;
+#else
+ Next[y][x+1] = Xspring_pause;
+#endif
+ goto loop;
+ }
+ case Xspring_force_w:
+ switch(Cave[y][x-1]) {
+ case ZBORDER:
+ case Znormal:
+ case Zdynamite:
+ case Xboom_bug:
+ case Xboom_bomb:
+ case Xboom_android:
+ case Xboom_1:
+ case Zplayer:
+ Cave[y][x] = Xspring;
+ Next[y][x] = Xspring;
+ goto loop;
+ default:
+ Cave[y][x] = Yspring_wB;
+ Cave[y][x-1] = Yspring_w;
+ Next[y][x] = Xblank;
+#ifdef BAD_SPRING
+ Next[y][x-1] = Xspring_w;
+#else
+ Next[y][x-1] = Xspring_pause;
+#endif
+ goto loop;
+ }
+ case Xemerald_force_e:
+ switch(Cave[y][x+1]) {
+ case ZBORDER:
+ case Znormal:
+ case Zdynamite:
+ case Xboom_bug:
+ case Xboom_bomb:
+ case Xboom_android:
+ case Xboom_1:
+ case Zplayer:
+ Cave[y][x] = Xemerald;
+ Next[y][x] = Xemerald;
+ goto loop;
+ default:
+ Cave[y][x] = Yemerald_eB;
+ Cave[y][x+1] = Yemerald_e;
+ Next[y][x] = Xblank;
+ Next[y][x+1] = Xemerald_pause;
+ goto loop;
+ }
+ case Xemerald_force_w:
+ switch(Cave[y][x-1]) {
+ case ZBORDER:
+ case Znormal:
+ case Zdynamite:
+ case Xboom_bug:
+ case Xboom_bomb:
+ case Xboom_android:
+ case Xboom_1:
+ case Zplayer:
+ Cave[y][x] = Xemerald;
+ Next[y][x] = Xemerald;
+ goto loop;
+ default:
+ Cave[y][x] = Yemerald_wB;
+ Cave[y][x-1] = Yemerald_w;
+ Next[y][x] = Xblank;
+ Next[y][x-1] = Xemerald_pause;
+ goto loop;
+ }
+ case Xdiamond_force_e:
+ switch(Cave[y][x+1]) {
+ case ZBORDER:
+ case Znormal:
+ case Zdynamite:
+ case Xboom_bug:
+ case Xboom_bomb:
+ case Xboom_android:
+ case Xboom_1:
+ case Zplayer:
+ Cave[y][x] = Xdiamond;
+ Next[y][x] = Xdiamond;
+ goto loop;
+ default:
+ Cave[y][x] = Ydiamond_eB;
+ Cave[y][x+1] = Ydiamond_e;
+ Next[y][x] = Xblank;
+ Next[y][x+1] = Xdiamond_pause;
+ goto loop;
+ }
+ case Xdiamond_force_w:
+ switch(Cave[y][x-1]) {
+ case ZBORDER:
+ case Znormal:
+ case Zdynamite:
+ case Xboom_bug:
+ case Xboom_bomb:
+ case Xboom_android:
+ case Xboom_1:
+ case Zplayer:
+ Cave[y][x] = Xdiamond;
+ Next[y][x] = Xdiamond;
+ goto loop;
+ default:
+ Cave[y][x] = Ydiamond_wB;
+ Cave[y][x-1] = Ydiamond_w;
+ Next[y][x] = Xblank;
+ Next[y][x-1] = Xdiamond_pause;
+ goto loop;
+ }
+ case Xbomb_force_e:
+ switch(Cave[y][x+1]) {
+ case ZBORDER:
+ case Znormal:
+ case Zdynamite:
+ case Xboom_bug:
+ case Xboom_bomb:
+ case Xboom_android:
+ case Xboom_1:
+ case Zplayer:
+ Cave[y][x] = Xbomb;
+ Next[y][x] = Xbomb;
+ goto loop;
+ default:
+ Cave[y][x] = Ybomb_eB;
+ Cave[y][x+1] = Ybomb_e;
+ Next[y][x] = Xblank;
+ Next[y][x+1] = Xbomb_pause;
+ goto loop;
+ }
+ case Xbomb_force_w:
+ switch(Cave[y][x-1]) {
+ case ZBORDER:
+ case Znormal:
+ case Zdynamite:
+ case Xboom_bug:
+ case Xboom_bomb:
+ case Xboom_android:
+ case Xboom_1:
+ case Zplayer:
+ Cave[y][x] = Xbomb;
+ Next[y][x] = Xbomb;
+ goto loop;
+ default:
+ Cave[y][x] = Ybomb_wB;
+ Cave[y][x-1] = Ybomb_w;
+ Next[y][x] = Xblank;
+ Next[y][x-1] = Xbomb_pause;
+ goto loop;
+ }
+#endif
+/* ---------------------------------------------------------------------- */
+ case Xstone:
+ switch(Cave[y+1][x]) {
+ case Xacid_1:
+ case Xacid_2:
+ case Xacid_3:
+ case Xacid_4:
+ case Xacid_5:
+ case Xacid_6:
+ case Xacid_7:
+ case Xacid_8:
+ Cave[y][x] = Ystone_sB;
+ if(Cave[y][x+1] == Xblank) Cave[y][x+1] = Yacid_splash_eB;
+ if(Cave[y][x-1] == Xblank) Cave[y][x-1] = Yacid_splash_wB;
+ Next[y][x] = Xblank;
+ PLAY(SAMPLE_acid);
+ goto loop;
+ case Xblank:
+ case Yacid_splash_eB:
+ case Yacid_splash_wB:
+ case Xplant:
+ case Yplant:
+ Cave[y][x] = Ystone_sB;
+ Cave[y+1][x] = Ystone_s;
+ Next[y][x] = Xblank;
+ Next[y+1][x] = Xstone_fall;
+ goto loop;
+ case Xsand:
+ Cave[y][x] = Xsand_stonein_1;
+ Cave[y+1][x] = Xsand_sandstone_1;
+ Next[y][x] = Xsand_stonein_2;
+ Next[y+1][x] = Xsand_sandstone_2;
+ goto loop;
+ case Xspring:
+ case Xspring_pause:
+ case Xspring_e:
+ case Xspring_w:
+ case Xandroid:
+ case Xandroid_1_n:
+ case Xandroid_2_n:
+ case Xandroid_1_e:
+ case Xandroid_2_e:
+ case Xandroid_1_s:
+ case Xandroid_2_s:
+ case Xandroid_1_w:
+ case Xandroid_2_w:
+ case Xstone:
+ case Xstone_pause:
+ case Xemerald:
+ case Xemerald_pause:
+ case Xdiamond:
+ case Xdiamond_pause:
+ case Xbomb:
+ case Xbomb_pause:
+ case Xballoon:
+ case Xacid_ne:
+ case Xacid_nw:
+ case Xball_1:
+ case Xball_2:
+ case Xnut:
+ case Xnut_pause:
+ case Xgrow_ns:
+ case Xgrow_ew:
+ case Xkey_1:
+ case Xkey_2:
+ case Xkey_3:
+ case Xkey_4:
+ case Xkey_5:
+ case Xkey_6:
+ case Xkey_7:
+ case Xkey_8:
+ case Xbumper:
+ case Xswitch:
+ case Xlenses:
+ case Xmagnify:
+ case Xround_wall_1:
+ case Xround_wall_2:
+ case Xround_wall_3:
+ case Xround_wall_4:
+ if(RANDOM & 1) {
+ if(tab_blank[Cave[y][x+1]] && tab_acid[Cave[y+1][x+1]]) {
+ Cave[y][x] = Ystone_eB;
+ Cave[y][x+1] = Ystone_e;
+ Next[y][x] = Xblank;
+ Next[y][x+1] = Xstone_pause;
+ goto loop;
+ }
+ if(tab_blank[Cave[y][x-1]] && tab_acid[Cave[y+1][x-1]]) {
+ Cave[y][x] = Ystone_wB;
+ Cave[y][x-1] = Ystone_w;
+ Next[y][x] = Xblank;
+ Next[y][x-1] = Xstone_pause;
+ goto loop;
+ }
+ } else {
+ if(tab_blank[Cave[y][x-1]] && tab_acid[Cave[y+1][x-1]]) {
+ Cave[y][x] = Ystone_wB;
+ Cave[y][x-1] = Ystone_w;
+ Next[y][x] = Xblank;
+ Next[y][x-1] = Xstone_pause;
+ goto loop;
+ }
+ if(tab_blank[Cave[y][x+1]] && tab_acid[Cave[y+1][x+1]]) {
+ Cave[y][x] = Ystone_eB;
+ Cave[y][x+1] = Ystone_e;
+ Next[y][x] = Xblank;
+ Next[y][x+1] = Xstone_pause;
+ goto loop;
+ }
+ }
+ default:
+ goto loop;
+ }
+/* ---------------------------------------------------------------------- */
+ case Xstone_pause:
+ switch(Cave[y+1][x]) {
+ case Xacid_1:
+ case Xacid_2:
+ case Xacid_3:
+ case Xacid_4:
+ case Xacid_5:
+ case Xacid_6:
+ case Xacid_7:
+ case Xacid_8:
+ Cave[y][x] = Ystone_sB;
+ if(Cave[y][x+1] == Xblank) Cave[y][x+1] = Yacid_splash_eB;
+ if(Cave[y][x-1] == Xblank) Cave[y][x-1] = Yacid_splash_wB;
+ Next[y][x] = Xblank;
+ PLAY(SAMPLE_acid);
+ goto loop;
+ case Xblank:
+ case Yacid_splash_eB:
+ case Yacid_splash_wB:
+ Cave[y][x] = Ystone_sB;
+ Cave[y+1][x] = Ystone_s;
+ Next[y][x] = Xblank;
+ Next[y+1][x] = Xstone_fall;
+ goto loop;
+ default:
+ Cave[y][x] = Xstone;
+ Next[y][x] = Xstone;
+ goto loop;
+ }
+/* ---------------------------------------------------------------------- */
+ case Xstone_fall:
+ switch(Cave[y+1][x]) {
+ case Xacid_1:
+ case Xacid_2:
+ case Xacid_3:
+ case Xacid_4:
+ case Xacid_5:
+ case Xacid_6:
+ case Xacid_7:
+ case Xacid_8:
+ Cave[y][x] = Ystone_sB;
+ if(Cave[y][x+1] == Xblank) Cave[y][x+1] = Yacid_splash_eB;
+ if(Cave[y][x-1] == Xblank) Cave[y][x-1] = Yacid_splash_wB;
+ Next[y][x] = Xblank;
+ PLAY(SAMPLE_acid);
+ goto loop;
+ case Xblank:
+ case Yacid_splash_eB:
+ case Yacid_splash_wB:
+ case Zplayer:
+ Cave[y][x] = Ystone_sB;
+ Cave[y+1][x] = Ystone_s;
+ Next[y][x] = Xblank;
+ Next[y+1][x] = Xstone_fall;
+ goto loop;
+ case Xnut:
+ case Xnut_pause:
+ Cave[y+1][x] = Yemerald_stone;
+ Next[y][x] = Xstone;
+ Next[y+1][x] = Xemerald;
+ play[SAMPLE_crack] = 1;
+ score += lev.nut_score;
+ goto loop;
+ case Xbug_n:
+ case Xbug_e:
+ case Xbug_s:
+ case Xbug_w:
+ case Xbug_gon:
+ case Xbug_goe:
+ case Xbug_gos:
+ case Xbug_gow:
+ Cave[y][x] = Ystone_sB;
+ Cave[y+1][x] = Ybug_stone;
+ Next[y+1][x] = Znormal;
+ Boom[y][x-1] = Xemerald;
+ Boom[y][x] = Xemerald;
+ Boom[y][x+1] = Xemerald;
+ Boom[y+1][x-1] = Xemerald;
+ Boom[y+1][x] = Xdiamond;
+ Boom[y+1][x+1] = Xemerald;
+ Boom[y+2][x-1] = Xemerald;
+ Boom[y+2][x] = Xemerald;
+ Boom[y+2][x+1] = Xemerald;
+ score += lev.bug_score;
+ goto loop;
+ case Xtank_n:
+ case Xtank_e:
+ case Xtank_s:
+ case Xtank_w:
+ case Xtank_gon:
+ case Xtank_goe:
+ case Xtank_gos:
+ case Xtank_gow:
+ Cave[y][x] = Ystone_sB;
+ Cave[y+1][x] = Ytank_stone;
+ Next[y+1][x] = Znormal;
+ Boom[y][x-1] = Xblank;
+ Boom[y][x] = Xblank;
+ Boom[y][x+1] = Xblank;
+ Boom[y+1][x-1] = Xblank;
+ Boom[y+1][x] = Xblank;
+ Boom[y+1][x+1] = Xblank;
+ Boom[y+2][x-1] = Xblank;
+ Boom[y+2][x] = Xblank;
+ Boom[y+2][x+1] = Xblank;
+ score += lev.tank_score;
+ goto loop;
+ case Xspring:
+ if(RANDOM & 1) {
+ switch(Cave[y+1][x+1]) {
+ case Xblank:
+ case Yacid_splash_eB:
+ case Yacid_splash_wB:
+ case Xalien:
+ case Xalien_pause:
+ Cave[y+1][x] = Xspring_e; break;
+ default:
+ Cave[y+1][x] = Xspring_w; break;
+ }
+ } else {
+ switch(Cave[y+1][x-1]) {
+ case Xblank:
+ case Yacid_splash_eB:
+ case Yacid_splash_wB:
+ case Xalien:
+ case Xalien_pause:
+ Cave[y+1][x] = Xspring_w; break;
+ default:
+ Cave[y+1][x] = Xspring_e; break;
+ }
+ }
+ Next[y][x] = Xstone;
+ goto loop;
+ case Xeater_n:
+ case Xeater_e:
+ case Xeater_s:
+ case Xeater_w:
+ Cave[y][x] = Ystone_sB;
+ Cave[y+1][x] = Yeater_stone;
+ Next[y+1][x] = Znormal;
+ Boom[y][x-1] = lev.eater_array[lev.eater_pos][0];
+ Boom[y][x] = lev.eater_array[lev.eater_pos][1];
+ Boom[y][x+1] = lev.eater_array[lev.eater_pos][2];
+ Boom[y+1][x-1] = lev.eater_array[lev.eater_pos][3];
+ Boom[y+1][x] = lev.eater_array[lev.eater_pos][4];
+ Boom[y+1][x+1] = lev.eater_array[lev.eater_pos][5];
+ Boom[y+2][x-1] = lev.eater_array[lev.eater_pos][6];
+ Boom[y+2][x] = lev.eater_array[lev.eater_pos][7];
+ Boom[y+2][x+1] = lev.eater_array[lev.eater_pos][8];
+ lev.eater_pos = (lev.eater_pos + 1) & 7;
+ score += lev.eater_score;
+ goto loop;
+ case Xalien:
+ case Xalien_pause:
+ Cave[y][x] = Ystone_sB;
+ Cave[y+1][x] = Yalien_stone;
+ Next[y+1][x] = Znormal;
+ Boom[y][x-1] = Xblank;
+ Boom[y][x] = Xblank;
+ Boom[y][x+1] = Xblank;
+ Boom[y+1][x-1] = Xblank;
+ Boom[y+1][x] = Xblank;
+ Boom[y+1][x+1] = Xblank;
+ Boom[y+2][x-1] = Xblank;
+ Boom[y+2][x] = Xblank;
+ Boom[y+2][x+1] = Xblank;
+ score += lev.alien_score;
+ goto loop;
+ case Xdiamond:
+ case Xdiamond_pause:
+ switch(Cave[y+2][x]) {
+ case Xblank:
+ case Yacid_splash_eB:
+ case Yacid_splash_wB:
+ case Zplayer:
+ case Xbug_n:
+ case Xbug_e:
+ case Xbug_s:
+ case Xbug_w:
+ case Xbug_gon:
+ case Xbug_goe:
+ case Xbug_gos:
+ case Xbug_gow:
+ case Xtank_n:
+ case Xtank_e:
+ case Xtank_s:
+ case Xtank_w:
+ case Xtank_gon:
+ case Xtank_goe:
+ case Xtank_gos:
+ case Xtank_gow:
+ case Xspring_fall:
+ case Xandroid:
+ case Xandroid_1_n:
+ case Xandroid_2_n:
+ case Xandroid_1_e:
+ case Xandroid_2_e:
+ case Xandroid_1_s:
+ case Xandroid_2_s:
+ case Xandroid_1_w:
+ case Xandroid_2_w:
+ case Xstone_fall:
+ case Xemerald_fall:
+ case Xdiamond_fall:
+ case Xbomb_fall:
+ case Xacid_s:
+ case Xacid_1:
+ case Xacid_2:
+ case Xacid_3:
+ case Xacid_4:
+ case Xacid_5:
+ case Xacid_6:
+ case Xacid_7:
+ case Xacid_8:
+ case Xnut_fall:
+ case Xplant:
+ case Yplant:
+ Next[y][x] = Xstone;
+ PLAY(SAMPLE_stone);
+ goto loop;
+ }
+ Cave[y][x] = Ystone_sB;
+ Cave[y+1][x] = Ydiamond_stone;
+ Next[y][x] = Xblank;
+ Next[y+1][x] = Xstone_pause;
+ play[SAMPLE_squash] = 1;
+ goto loop;
+ case Xbomb:
+ case Xbomb_pause:
+ Cave[y+1][x] = Ybomb_eat;
+ Next[y+1][x] = Znormal;
+ Boom[y][x-1] = Xblank;
+ Boom[y][x] = Xblank;
+ Boom[y][x+1] = Xblank;
+ Boom[y+1][x-1] = Xblank;
+ Boom[y+1][x] = Xblank;
+ Boom[y+1][x+1] = Xblank;
+ Boom[y+2][x-1] = Xblank;
+ Boom[y+2][x] = Xblank;
+ Boom[y+2][x+1] = Xblank;
+ goto loop;
+ case Xwonderwall:
+ if(lev.wonderwall_time) {
+ lev.wonderwall_state = 1;
+ Cave[y][x] = Ystone_sB;
+ if(tab_blank[Cave[y+2][x]]) {
+ Cave[y+2][x] = Yemerald_s;
+ Next[y+2][x] = Xemerald_fall;
+ }
+ Next[y][x] = Xblank;
+ play[SAMPLE_squash] = 1;
+ goto loop;
+ }
+ default:
+ Cave[y][x] = Xstone;
+ Next[y][x] = Xstone;
+ PLAY(SAMPLE_stone);
+ goto loop;
+ }
+/* ---------------------------------------------------------------------- */
+ case Xnut:
+ switch(Cave[y+1][x]) {
+ case Xacid_1:
+ case Xacid_2:
+ case Xacid_3:
+ case Xacid_4:
+ case Xacid_5:
+ case Xacid_6:
+ case Xacid_7:
+ case Xacid_8:
+ Cave[y][x] = Ynut_sB;
+ if(Cave[y][x+1] == Xblank) Cave[y][x+1] = Yacid_splash_eB;
+ if(Cave[y][x-1] == Xblank) Cave[y][x-1] = Yacid_splash_wB;
+ Next[y][x] = Xblank;
+ PLAY(SAMPLE_acid);
+ goto loop;
+ case Xblank:
+ case Yacid_splash_eB:
+ case Yacid_splash_wB:
+ Cave[y][x] = Ynut_sB;
+ Cave[y+1][x] = Ynut_s;
+ Next[y][x] = Xblank;
+ Next[y+1][x] = Xnut_fall;
+ goto loop;
+ case Xspring:
+ case Xspring_pause:
+ case Xspring_e:
+ case Xspring_w:
+ case Xandroid:
+ case Xandroid_1_n:
+ case Xandroid_2_n:
+ case Xandroid_1_e:
+ case Xandroid_2_e:
+ case Xandroid_1_s:
+ case Xandroid_2_s:
+ case Xandroid_1_w:
+ case Xandroid_2_w:
+ case Xstone:
+ case Xstone_pause:
+ case Xemerald:
+ case Xemerald_pause:
+ case Xdiamond:
+ case Xdiamond_pause:
+ case Xbomb:
+ case Xbomb_pause:
+ case Xballoon:
+ case Xacid_ne:
+ case Xacid_nw:
+ case Xball_1:
+ case Xball_2:
+ case Xnut:
+ case Xnut_pause:
+ case Xgrow_ns:
+ case Xgrow_ew:
+ case Xkey_1:
+ case Xkey_2:
+ case Xkey_3:
+ case Xkey_4:
+ case Xkey_5:
+ case Xkey_6:
+ case Xkey_7:
+ case Xkey_8:
+ case Xbumper:
+ case Xswitch:
+ case Xround_wall_1:
+ case Xround_wall_2:
+ case Xround_wall_3:
+ case Xround_wall_4:
+ if(RANDOM & 1) {
+ if(tab_blank[Cave[y][x+1]] && tab_acid[Cave[y+1][x+1]]) {
+ Cave[y][x] = Ynut_eB;
+ Cave[y][x+1] = Ynut_e;
+ Next[y][x] = Xblank;
+ Next[y][x+1] = Xnut_pause;
+ goto loop;
+ }
+ if(tab_blank[Cave[y][x-1]] && tab_acid[Cave[y+1][x-1]]) {
+ Cave[y][x] = Ynut_wB;
+ Cave[y][x-1] = Ynut_w;
+ Next[y][x] = Xblank;
+ Next[y][x-1] = Xnut_pause;
+ goto loop;
+ }
+ } else {
+ if(tab_blank[Cave[y][x-1]] && tab_acid[Cave[y+1][x-1]]) {
+ Cave[y][x] = Ynut_wB;
+ Cave[y][x-1] = Ynut_w;
+ Next[y][x] = Xblank;
+ Next[y][x-1] = Xnut_pause;
+ goto loop;
+ }
+ if(tab_blank[Cave[y][x+1]] && tab_acid[Cave[y+1][x+1]]) {
+ Cave[y][x] = Ynut_eB;
+ Cave[y][x+1] = Ynut_e;
+ Next[y][x] = Xblank;
+ Next[y][x+1] = Xnut_pause;
+ goto loop;
+ }
+ }
+ default:
+ goto loop;
+ }
+/* ---------------------------------------------------------------------- */
+ case Xnut_pause:
+ switch(Cave[y+1][x]) {
+ case Xacid_1:
+ case Xacid_2:
+ case Xacid_3:
+ case Xacid_4:
+ case Xacid_5:
+ case Xacid_6:
+ case Xacid_7:
+ case Xacid_8:
+ Cave[y][x] = Ynut_sB;
+ if(Cave[y][x+1] == Xblank) Cave[y][x+1] = Yacid_splash_eB;
+ if(Cave[y][x-1] == Xblank) Cave[y][x-1] = Yacid_splash_wB;
+ Next[y][x] = Xblank;
+ PLAY(SAMPLE_acid);
+ goto loop;
+ case Xblank:
+ case Yacid_splash_eB:
+ case Yacid_splash_wB:
+ Cave[y][x] = Ynut_sB;
+ Cave[y+1][x] = Ynut_s;
+ Next[y][x] = Xblank;
+ Next[y+1][x] = Xnut_fall;
+ goto loop;
+ default:
+ Cave[y][x] = Xnut;
+ Next[y][x] = Xnut;
+ goto loop;
+ }
+/* ---------------------------------------------------------------------- */
+ case Xnut_fall:
+ switch(Cave[y+1][x]) {
+ case Xacid_1:
+ case Xacid_2:
+ case Xacid_3:
+ case Xacid_4:
+ case Xacid_5:
+ case Xacid_6:
+ case Xacid_7:
+ case Xacid_8:
+ Cave[y][x] = Ynut_sB;
+ if(Cave[y][x+1] == Xblank) Cave[y][x+1] = Yacid_splash_eB;
+ if(Cave[y][x-1] == Xblank) Cave[y][x-1] = Yacid_splash_wB;
+ Next[y][x] = Xblank;
+ PLAY(SAMPLE_acid);
+ goto loop;
+ case Xblank:
+ case Yacid_splash_eB:
+ case Yacid_splash_wB:
+ case Zplayer:
+ Cave[y][x] = Ynut_sB;
+ Cave[y+1][x] = Ynut_s;
+ Next[y][x] = Xblank;
+ Next[y+1][x] = Xnut_fall;
+ goto loop;
+ default:
+ Cave[y][x] = Xnut;
+ Next[y][x] = Xnut;
+ PLAY(SAMPLE_nut);
+ goto loop;
+ }
+/* ---------------------------------------------------------------------- */
+ case Xbug_n:
+ if(tab_ameuba[Cave[y-1][x]] || tab_ameuba[Cave[y][x+1]] || tab_ameuba[Cave[y+1][x]] || tab_ameuba[Cave[y][x-1]]) goto bug_boom;
+ switch(Cave[y][x+1]) {
+ case Xblank:
+ case Yacid_splash_eB:
+ case Yacid_splash_wB:
+ case Xplant:
+ case Yplant:
+ case Xacid_1:
+ case Xacid_2:
+ case Xacid_3:
+ case Xacid_4:
+ case Xacid_5:
+ case Xacid_6:
+ case Xacid_7:
+ case Xacid_8:
+ case Zplayer:
+ Cave[y][x] = Ybug_n_e;
+ Next[y][x] = Xbug_goe;
+ PLAY(SAMPLE_bug);
+ goto loop;
+ default:
+ goto bug_gon;
+ }
+ case Xbug_gon:
+ if(tab_ameuba[Cave[y-1][x]] || tab_ameuba[Cave[y][x+1]] || tab_ameuba[Cave[y+1][x]] || tab_ameuba[Cave[y][x-1]]) goto bug_boom;
+ bug_gon:
+ switch(Cave[y-1][x]) {
+ case Xacid_1:
+ case Xacid_2:
+ case Xacid_3:
+ case Xacid_4:
+ case Xacid_5:
+ case Xacid_6:
+ case Xacid_7:
+ case Xacid_8:
+ Cave[y][x] = Ybug_nB;
+ if(Cave[y-2][x+1] == Xblank) Cave[y-2][x+1] = Yacid_splash_eB;
+ if(Cave[y-2][x-1] == Xblank) Cave[y-2][x-1] = Yacid_splash_wB;
+ Next[y][x] = Xblank;
+ PLAY(SAMPLE_acid);
+ goto loop;
+ case Xblank:
+ case Yacid_splash_eB:
+ case Yacid_splash_wB:
+ case Xplant:
+ case Yplant:
+ case Zplayer:
+ Cave[y][x] = Ybug_nB;
+ Cave[y-1][x] = Ybug_n;
+ Next[y][x] = Xblank;
+ Next[y-1][x] = Xbug_n;
+ PLAY(SAMPLE_bug);
+ goto loop;
+ default:
+ Cave[y][x] = Ybug_n_w;
+ Next[y][x] = Xbug_gow;
+ PLAY(SAMPLE_bug);
+ goto loop;
+ }
+/* ---------------------------------------------------------------------- */
+ case Xbug_e:
+ if(tab_ameuba[Cave[y-1][x]] || tab_ameuba[Cave[y][x+1]] || tab_ameuba[Cave[y+1][x]] || tab_ameuba[Cave[y][x-1]]) goto bug_boom;
+ switch(Cave[y+1][x]) {
+ case Xblank:
+ case Yacid_splash_eB:
+ case Yacid_splash_wB:
+ case Xplant:
+ case Yplant:
+ case Xacid_1:
+ case Xacid_2:
+ case Xacid_3:
+ case Xacid_4:
+ case Xacid_5:
+ case Xacid_6:
+ case Xacid_7:
+ case Xacid_8:
+ case Zplayer:
+ Cave[y][x] = Ybug_e_s;
+ Next[y][x] = Xbug_gos;
+ PLAY(SAMPLE_bug);
+ goto loop;
+ default:
+ goto bug_goe;
+ }
+ case Xbug_goe:
+ if(tab_ameuba[Cave[y-1][x]] || tab_ameuba[Cave[y][x+1]] || tab_ameuba[Cave[y+1][x]] || tab_ameuba[Cave[y][x-1]]) goto bug_boom;
+ bug_goe:
+ switch(Cave[y][x+1]) {
+ case Xacid_1:
+ case Xacid_2:
+ case Xacid_3:
+ case Xacid_4:
+ case Xacid_5:
+ case Xacid_6:
+ case Xacid_7:
+ case Xacid_8:
+ Cave[y][x] = Ybug_eB;
+ if(Cave[y-1][x+2] == Xblank) Cave[y-1][x+2] = Yacid_splash_eB;
+ if(Cave[y-1][x] == Xblank) Cave[y-1][x] = Yacid_splash_wB;
+ Next[y][x] = Xblank;
+ PLAY(SAMPLE_acid);
+ goto loop;
+ case Xblank:
+ case Yacid_splash_eB:
+ case Yacid_splash_wB:
+ case Xplant:
+ case Yplant:
+ case Zplayer:
+ Cave[y][x] = Ybug_eB;
+ Cave[y][x+1] = Ybug_e;
+ Next[y][x] = Xblank;
+ Next[y][x+1] = Xbug_e;
+ PLAY(SAMPLE_bug);
+ goto loop;
+ default:
+ Cave[y][x] = Ybug_e_n;
+ Next[y][x] = Xbug_gon;
+ PLAY(SAMPLE_bug);
+ goto loop;
+ }
+/* ---------------------------------------------------------------------- */
+ case Xbug_s:
+ if(tab_ameuba[Cave[y-1][x]] || tab_ameuba[Cave[y][x+1]] || tab_ameuba[Cave[y+1][x]] || tab_ameuba[Cave[y][x-1]]) goto bug_boom;
+ switch(Cave[y][x-1]) {
+ case Xblank:
+ case Yacid_splash_eB:
+ case Yacid_splash_wB:
+ case Xplant:
+ case Yplant:
+ case Xacid_1:
+ case Xacid_2:
+ case Xacid_3:
+ case Xacid_4:
+ case Xacid_5:
+ case Xacid_6:
+ case Xacid_7:
+ case Xacid_8:
+ case Zplayer:
+ Cave[y][x] = Ybug_s_w;
+ Next[y][x] = Xbug_gow;
+ PLAY(SAMPLE_bug);
+ goto loop;
+ default:
+ goto bug_gos;
+ }
+ case Xbug_gos:
+ if(tab_ameuba[Cave[y-1][x]] || tab_ameuba[Cave[y][x+1]] || tab_ameuba[Cave[y+1][x]] || tab_ameuba[Cave[y][x-1]]) goto bug_boom;
+ bug_gos:
+ switch(Cave[y+1][x]) {
+ case Xacid_1:
+ case Xacid_2:
+ case Xacid_3:
+ case Xacid_4:
+ case Xacid_5:
+ case Xacid_6:
+ case Xacid_7:
+ case Xacid_8:
+ Cave[y][x] = Ybug_sB;
+ if(Cave[y][x+1] == Xblank) Cave[y][x+1] = Yacid_splash_eB;
+ if(Cave[y][x-1] == Xblank) Cave[y][x-1] = Yacid_splash_wB;
+ Next[y][x] = Xblank;
+ PLAY(SAMPLE_acid);
+ goto loop;
+ case Xblank:
+ case Yacid_splash_eB:
+ case Yacid_splash_wB:
+ case Xplant:
+ case Yplant:
+ case Zplayer:
+ Cave[y][x] = Ybug_sB;
+ Cave[y+1][x] = Ybug_s;
+ Next[y][x] = Xblank;
+ Next[y+1][x] = Xbug_s;
+ PLAY(SAMPLE_bug);
+ goto loop;
+ default:
+ Cave[y][x] = Ybug_s_e;
+ Next[y][x] = Xbug_goe;
+ PLAY(SAMPLE_bug);
+ goto loop;
+ }
+/* ---------------------------------------------------------------------- */
+ case Xbug_w:
+ if(tab_ameuba[Cave[y-1][x]] || tab_ameuba[Cave[y][x+1]] || tab_ameuba[Cave[y+1][x]] || tab_ameuba[Cave[y][x-1]]) goto bug_boom;
+ switch(Cave[y-1][x]) {
+ case Xblank:
+ case Yacid_splash_eB:
+ case Yacid_splash_wB:
+ case Xplant:
+ case Yplant:
+ case Xacid_1:
+ case Xacid_2:
+ case Xacid_3:
+ case Xacid_4:
+ case Xacid_5:
+ case Xacid_6:
+ case Xacid_7:
+ case Xacid_8:
+ case Zplayer:
+ Cave[y][x] = Ybug_w_n;
+ Next[y][x] = Xbug_gon;
+ PLAY(SAMPLE_bug);
+ goto loop;
+ default:
+ goto bug_gow;
+ }
+ case Xbug_gow:
+ if(tab_ameuba[Cave[y-1][x]] || tab_ameuba[Cave[y][x+1]] || tab_ameuba[Cave[y+1][x]] || tab_ameuba[Cave[y][x-1]]) goto bug_boom;
+ bug_gow:
+ switch(Cave[y][x-1]) {
+ case Xacid_1:
+ case Xacid_2:
+ case Xacid_3:
+ case Xacid_4:
+ case Xacid_5:
+ case Xacid_6:
+ case Xacid_7:
+ case Xacid_8:
+ Cave[y][x] = Ybug_wB;
+ if(Cave[y-1][x] == Xblank) Cave[y-1][x] = Yacid_splash_eB;
+ if(Cave[y-1][x-2] == Xblank) Cave[y-1][x-2] = Yacid_splash_wB;
+ Next[y][x] = Xblank;
+ PLAY(SAMPLE_acid);
+ goto loop;
+ case Xblank:
+ case Yacid_splash_eB:
+ case Yacid_splash_wB:
+ case Xplant:
+ case Yplant:
+ case Zplayer:
+ Cave[y][x] = Ybug_wB;
+ Cave[y][x-1] = Ybug_w;
+ Next[y][x] = Xblank;
+ Next[y][x-1] = Xbug_w;
+ PLAY(SAMPLE_bug);
+ goto loop;
+ default:
+ Cave[y][x] = Ybug_w_s;
+ Next[y][x] = Xbug_gos;
+ PLAY(SAMPLE_bug);
+ goto loop;
+ }
+/* ---------------------------------------------------------------------- */
+ case Xtank_n:
+ if(tab_ameuba[Cave[y-1][x]] || tab_ameuba[Cave[y][x+1]] || tab_ameuba[Cave[y+1][x]] || tab_ameuba[Cave[y][x-1]]) goto tank_boom;
+ switch(Cave[y][x-1]) {
+ case Xblank:
+ case Yacid_splash_eB:
+ case Yacid_splash_wB:
+ case Xplant:
+ case Yplant:
+ case Xacid_1:
+ case Xacid_2:
+ case Xacid_3:
+ case Xacid_4:
+ case Xacid_5:
+ case Xacid_6:
+ case Xacid_7:
+ case Xacid_8:
+ case Zplayer:
+ Cave[y][x] = Ytank_n_w;
+ Next[y][x] = Xtank_gow;
+ PLAY(SAMPLE_tank);
+ goto loop;
+ default:
+ goto tank_gon;
+ }
+ case Xtank_gon:
+ if(tab_ameuba[Cave[y-1][x]] || tab_ameuba[Cave[y][x+1]] || tab_ameuba[Cave[y+1][x]] || tab_ameuba[Cave[y][x-1]]) goto tank_boom;
+ tank_gon:
+ switch(Cave[y-1][x]) {
+ case Xacid_1:
+ case Xacid_2:
+ case Xacid_3:
+ case Xacid_4:
+ case Xacid_5:
+ case Xacid_6:
+ case Xacid_7:
+ case Xacid_8:
+ Cave[y][x] = Ytank_nB;
+ if(Cave[y-2][x+1] == Xblank) Cave[y-2][x+1] = Yacid_splash_eB;
+ if(Cave[y-2][x-1] == Xblank) Cave[y-2][x-1] = Yacid_splash_wB;
+ Next[y][x] = Xblank;
+ PLAY(SAMPLE_acid);
+ goto loop;
+ case Xblank:
+ case Yacid_splash_eB:
+ case Yacid_splash_wB:
+ case Xplant:
+ case Yplant:
+ case Zplayer:
+ Cave[y][x] = Ytank_nB;
+ Cave[y-1][x] = Ytank_n;
+ Next[y][x] = Xblank;
+ Next[y-1][x] = Xtank_n;
+ PLAY(SAMPLE_tank);
+ goto loop;
+ default:
+ Cave[y][x] = Ytank_n_e;
+ Next[y][x] = Xtank_goe;
+ PLAY(SAMPLE_tank);
+ goto loop;
+ }
+/* ---------------------------------------------------------------------- */
+ case Xtank_e:
+ if(tab_ameuba[Cave[y-1][x]] || tab_ameuba[Cave[y][x+1]] || tab_ameuba[Cave[y+1][x]] || tab_ameuba[Cave[y][x-1]]) goto tank_boom;
+ switch(Cave[y-1][x]) {
+ case Xblank:
+ case Yacid_splash_eB:
+ case Yacid_splash_wB:
+ case Xplant:
+ case Yplant:
+ case Xacid_1:
+ case Xacid_2:
+ case Xacid_3:
+ case Xacid_4:
+ case Xacid_5:
+ case Xacid_6:
+ case Xacid_7:
+ case Xacid_8:
+ case Zplayer:
+ Cave[y][x] = Ytank_e_n;
+ Next[y][x] = Xtank_gon;
+ PLAY(SAMPLE_tank);
+ goto loop;
+ default:
+ goto tank_goe;
+ }
+ case Xtank_goe:
+ if(tab_ameuba[Cave[y-1][x]] || tab_ameuba[Cave[y][x+1]] || tab_ameuba[Cave[y+1][x]] || tab_ameuba[Cave[y][x-1]]) goto tank_boom;
+ tank_goe:
+ switch(Cave[y][x+1]) {
+ case Xacid_1:
+ case Xacid_2:
+ case Xacid_3:
+ case Xacid_4:
+ case Xacid_5:
+ case Xacid_6:
+ case Xacid_7:
+ case Xacid_8:
+ Cave[y][x] = Ytank_eB;
+ if(Cave[y-1][x+2] == Xblank) Cave[y-1][x+2] = Yacid_splash_eB;
+ if(Cave[y-1][x] == Xblank) Cave[y-1][x] = Yacid_splash_wB;
+ Next[y][x] = Xblank;
+ PLAY(SAMPLE_acid);
+ goto loop;
+ case Xblank:
+ case Yacid_splash_eB:
+ case Yacid_splash_wB:
+ case Xplant:
+ case Yplant:
+ case Zplayer:
+ Cave[y][x] = Ytank_eB;
+ Cave[y][x+1] = Ytank_e;
+ Next[y][x] = Xblank;
+ Next[y][x+1] = Xtank_e;
+ PLAY(SAMPLE_tank);
+ goto loop;
+ default:
+ Cave[y][x] = Ytank_e_s;
+ Next[y][x] = Xtank_gos;
+ PLAY(SAMPLE_tank);
+ goto loop;
+ }
+/* ---------------------------------------------------------------------- */
+ case Xtank_s:
+ if(tab_ameuba[Cave[y-1][x]] || tab_ameuba[Cave[y][x+1]] || tab_ameuba[Cave[y+1][x]] || tab_ameuba[Cave[y][x-1]]) goto tank_boom;
+ switch(Cave[y][x+1]) {
+ case Xblank:
+ case Yacid_splash_eB:
+ case Yacid_splash_wB:
+ case Xplant:
+ case Yplant:
+ case Xacid_1:
+ case Xacid_2:
+ case Xacid_3:
+ case Xacid_4:
+ case Xacid_5:
+ case Xacid_6:
+ case Xacid_7:
+ case Xacid_8:
+ case Zplayer:
+ Cave[y][x] = Ytank_s_e;
+ Next[y][x] = Xtank_goe;
+ PLAY(SAMPLE_tank);
+ goto loop;
+ default:
+ goto tank_gos;
+ }
+ case Xtank_gos:
+ if(tab_ameuba[Cave[y-1][x]] || tab_ameuba[Cave[y][x+1]] || tab_ameuba[Cave[y+1][x]] || tab_ameuba[Cave[y][x-1]]) goto tank_boom;
+ tank_gos:
+ switch(Cave[y+1][x]) {
+ case Xacid_1:
+ case Xacid_2:
+ case Xacid_3:
+ case Xacid_4:
+ case Xacid_5:
+ case Xacid_6:
+ case Xacid_7:
+ case Xacid_8:
+ Cave[y][x] = Ytank_sB;
+ if(Cave[y][x+1] == Xblank) Cave[y][x+1] = Yacid_splash_eB;
+ if(Cave[y][x-1] == Xblank) Cave[y][x-1] = Yacid_splash_wB;
+ Next[y][x] = Xblank;
+ PLAY(SAMPLE_acid);
+ goto loop;
+ case Xblank:
+ case Yacid_splash_eB:
+ case Yacid_splash_wB:
+ case Xplant:
+ case Yplant:
+ case Zplayer:
+ Cave[y][x] = Ytank_sB;
+ Cave[y+1][x] = Ytank_s;
+ Next[y][x] = Xblank;
+ Next[y+1][x] = Xtank_s;
+ PLAY(SAMPLE_tank);
+ goto loop;
+ default:
+ Cave[y][x] = Ytank_s_w;
+ Next[y][x] = Xtank_gow;
+ PLAY(SAMPLE_tank);
+ goto loop;
+ }
+/* ---------------------------------------------------------------------- */
+ case Xtank_w:
+ if(tab_ameuba[Cave[y-1][x]] || tab_ameuba[Cave[y][x+1]] || tab_ameuba[Cave[y+1][x]] || tab_ameuba[Cave[y][x-1]]) goto tank_boom;
+ switch(Cave[y+1][x]) {
+ case Xblank:
+ case Yacid_splash_eB:
+ case Yacid_splash_wB:
+ case Xplant:
+ case Yplant:
+ case Xacid_1:
+ case Xacid_2:
+ case Xacid_3:
+ case Xacid_4:
+ case Xacid_5:
+ case Xacid_6:
+ case Xacid_7:
+ case Xacid_8:
+ case Zplayer:
+ Cave[y][x] = Ytank_w_s;
+ Next[y][x] = Xtank_gos;
+ PLAY(SAMPLE_tank);
+ goto loop;
+ default:
+ goto tank_gow;
+ }
+ case Xtank_gow:
+ if(tab_ameuba[Cave[y-1][x]] || tab_ameuba[Cave[y][x+1]] || tab_ameuba[Cave[y+1][x]] || tab_ameuba[Cave[y][x-1]]) goto tank_boom;
+ tank_gow:
+ switch(Cave[y][x-1]) {
+ case Xacid_1:
+ case Xacid_2:
+ case Xacid_3:
+ case Xacid_4:
+ case Xacid_5:
+ case Xacid_6:
+ case Xacid_7:
+ case Xacid_8:
+ Cave[y][x] = Ytank_wB;
+ if(Cave[y-1][x] == Xblank) Cave[y-1][x] = Yacid_splash_eB;
+ if(Cave[y-1][x-2] == Xblank) Cave[y-1][x-2] = Yacid_splash_wB;
+ Next[y][x] = Xblank;
+ PLAY(SAMPLE_acid);
+ goto loop;
+ case Xblank:
+ case Yacid_splash_eB:
+ case Yacid_splash_wB:
+ case Xplant:
+ case Yplant:
+ case Zplayer:
+ Cave[y][x] = Ytank_wB;
+ Cave[y][x-1] = Ytank_w;
+ Next[y][x] = Xblank;
+ Next[y][x-1] = Xtank_w;
+ PLAY(SAMPLE_tank);
+ goto loop;
+ default:
+ Cave[y][x] = Ytank_w_n;
+ Next[y][x] = Xtank_gon;
+ PLAY(SAMPLE_tank);
+ goto loop;
+ }
+/* ---------------------------------------------------------------------- */
+ case Xandroid:
+ android:
+ if(lev.android_clone_cnt == 0) {
+ if(Cave[y-1][x-1] != Xblank && Cave[y-1][x] != Xblank &&
+ Cave[y-1][x+1] != Xblank && Cave[y][x-1] != Xblank &&
+ Cave[y][x+1] != Xblank && Cave[y+1][x-1] != Xblank &&
+ Cave[y+1][x] != Xblank && Cave[y+1][x+1] != Xblank) goto android_move;
+
+ switch(RANDOM & 7) { /* randomly find an object to clone */
+ case 0: /* S,NE,W,NW,SE,E,SW,N */
+ temp = lev.android_array[Cave[y+1][x]]; if(temp != Xblank) break;
+ temp = lev.android_array[Cave[y-1][x+1]]; if(temp != Xblank) break;
+ temp = lev.android_array[Cave[y][x-1]]; if(temp != Xblank) break;
+ temp = lev.android_array[Cave[y-1][x-1]]; if(temp != Xblank) break;
+ temp = lev.android_array[Cave[y+1][x+1]]; if(temp != Xblank) break;
+ temp = lev.android_array[Cave[y][x+1]]; if(temp != Xblank) break;
+ temp = lev.android_array[Cave[y+1][x-1]]; if(temp != Xblank) break;
+ temp = lev.android_array[Cave[y-1][x]]; if(temp != Xblank) break;
+ goto android_move;
+ case 1: /* NW,SE,N,S,NE,SW,E,W */
+ temp = lev.android_array[Cave[y-1][x-1]]; if(temp != Xblank) break;
+ temp = lev.android_array[Cave[y+1][x+1]]; if(temp != Xblank) break;
+ temp = lev.android_array[Cave[y-1][x]]; if(temp != Xblank) break;
+ temp = lev.android_array[Cave[y+1][x]]; if(temp != Xblank) break;
+ temp = lev.android_array[Cave[y-1][x+1]]; if(temp != Xblank) break;
+ temp = lev.android_array[Cave[y+1][x-1]]; if(temp != Xblank) break;
+ temp = lev.android_array[Cave[y][x+1]]; if(temp != Xblank) break;
+ temp = lev.android_array[Cave[y][x-1]]; if(temp != Xblank) break;
+ goto android_move;
+ case 2: /* SW,E,S,W,N,NW,SE,NE */
+ temp = lev.android_array[Cave[y+1][x-1]]; if(temp != Xblank) break;
+ temp = lev.android_array[Cave[y][x+1]]; if(temp != Xblank) break;
+ temp = lev.android_array[Cave[y+1][x]]; if(temp != Xblank) break;
+ temp = lev.android_array[Cave[y][x-1]]; if(temp != Xblank) break;
+ temp = lev.android_array[Cave[y-1][x]]; if(temp != Xblank) break;
+ temp = lev.android_array[Cave[y-1][x-1]]; if(temp != Xblank) break;
+ temp = lev.android_array[Cave[y+1][x+1]]; if(temp != Xblank) break;
+ temp = lev.android_array[Cave[y-1][x+1]]; if(temp != Xblank) break;
+ goto android_move;
+ case 3: /* N,SE,NE,E,W,S,NW,SW */
+ temp = lev.android_array[Cave[y-1][x]]; if(temp != Xblank) break;
+ temp = lev.android_array[Cave[y+1][x+1]]; if(temp != Xblank) break;
+ temp = lev.android_array[Cave[y-1][x+1]]; if(temp != Xblank) break;
+ temp = lev.android_array[Cave[y][x+1]]; if(temp != Xblank) break;
+ temp = lev.android_array[Cave[y][x-1]]; if(temp != Xblank) break;
+ temp = lev.android_array[Cave[y+1][x]]; if(temp != Xblank) break;
+ temp = lev.android_array[Cave[y-1][x-1]]; if(temp != Xblank) break;
+ temp = lev.android_array[Cave[y+1][x-1]]; if(temp != Xblank) break;
+ goto android_move;
+ case 4: /* SE,NW,E,NE,SW,W,N,S */
+ temp = lev.android_array[Cave[y+1][x+1]]; if(temp != Xblank) break;
+ temp = lev.android_array[Cave[y-1][x-1]]; if(temp != Xblank) break;
+ temp = lev.android_array[Cave[y][x+1]]; if(temp != Xblank) break;
+ temp = lev.android_array[Cave[y-1][x+1]]; if(temp != Xblank) break;
+ temp = lev.android_array[Cave[y+1][x-1]]; if(temp != Xblank) break;
+ temp = lev.android_array[Cave[y][x-1]]; if(temp != Xblank) break;
+ temp = lev.android_array[Cave[y-1][x]]; if(temp != Xblank) break;
+ temp = lev.android_array[Cave[y+1][x]]; if(temp != Xblank) break;
+ goto android_move;
+ case 5: /* NE,W,SE,SW,S,N,E,NW */
+ temp = lev.android_array[Cave[y-1][x+1]]; if(temp != Xblank) break;
+ temp = lev.android_array[Cave[y][x-1]]; if(temp != Xblank) break;
+ temp = lev.android_array[Cave[y+1][x+1]]; if(temp != Xblank) break;
+ temp = lev.android_array[Cave[y+1][x-1]]; if(temp != Xblank) break;
+ temp = lev.android_array[Cave[y+1][x]]; if(temp != Xblank) break;
+ temp = lev.android_array[Cave[y-1][x]]; if(temp != Xblank) break;
+ temp = lev.android_array[Cave[y][x+1]]; if(temp != Xblank) break;
+ temp = lev.android_array[Cave[y-1][x-1]]; if(temp != Xblank) break;
+ goto android_move;
+ case 6: /* E,N,SW,S,NW,NE,SE,W */
+ temp = lev.android_array[Cave[y][x+1]]; if(temp != Xblank) break;
+ temp = lev.android_array[Cave[y-1][x]]; if(temp != Xblank) break;
+ temp = lev.android_array[Cave[y+1][x-1]]; if(temp != Xblank) break;
+ temp = lev.android_array[Cave[y+1][x]]; if(temp != Xblank) break;
+ temp = lev.android_array[Cave[y-1][x-1]]; if(temp != Xblank) break;
+ temp = lev.android_array[Cave[y-1][x+1]]; if(temp != Xblank) break;
+ temp = lev.android_array[Cave[y+1][x+1]]; if(temp != Xblank) break;
+ temp = lev.android_array[Cave[y][x-1]]; if(temp != Xblank) break;
+ goto android_move;
+ case 7: /* W,SW,NW,N,E,SE,NE,S */
+ temp = lev.android_array[Cave[y][x-1]]; if(temp != Xblank) break;
+ temp = lev.android_array[Cave[y+1][x-1]]; if(temp != Xblank) break;
+ temp = lev.android_array[Cave[y-1][x-1]]; if(temp != Xblank) break;
+ temp = lev.android_array[Cave[y-1][x]]; if(temp != Xblank) break;
+ temp = lev.android_array[Cave[y][x+1]]; if(temp != Xblank) break;
+ temp = lev.android_array[Cave[y+1][x+1]]; if(temp != Xblank) break;
+ temp = lev.android_array[Cave[y-1][x+1]]; if(temp != Xblank) break;
+ temp = lev.android_array[Cave[y+1][x]]; if(temp != Xblank) break;
+ goto android_move;
+ }
+ Next[y][x] = temp; /* the item we chose to clone */
+ play[SAMPLE_android] = 1;
+ switch(RANDOM & 7) { /* randomly find a direction to move */
+ case 0: /* S,NE,W,NW,SE,E,SW,N */
+ if(Cave[y+1][x] == Xblank) goto android_s;
+ if(Cave[y-1][x+1] == Xblank) goto android_ne;
+ if(Cave[y][x-1] == Xblank) goto android_w;
+ if(Cave[y-1][x-1] == Xblank) goto android_nw;
+ if(Cave[y+1][x+1] == Xblank) goto android_se;
+ if(Cave[y][x+1] == Xblank) goto android_e;
+ if(Cave[y+1][x-1] == Xblank) goto android_sw;
+ if(Cave[y-1][x] == Xblank) goto android_n;
+ goto android_move;
+ case 1: /* NW,SE,N,S,NE,SW,E,W */
+ if(Cave[y-1][x-1] == Xblank) goto android_nw;
+ if(Cave[y+1][x+1] == Xblank) goto android_se;
+ if(Cave[y-1][x] == Xblank) goto android_n;
+ if(Cave[y+1][x] == Xblank) goto android_s;
+ if(Cave[y-1][x+1] == Xblank) goto android_ne;
+ if(Cave[y+1][x-1] == Xblank) goto android_sw;
+ if(Cave[y][x+1] == Xblank) goto android_e;
+ if(Cave[y][x-1] == Xblank) goto android_w;
+ goto android_move;
+ case 2: /* SW,E,S,W,N,NW,SE,NE */
+ if(Cave[y+1][x-1] == Xblank) goto android_sw;
+ if(Cave[y][x+1] == Xblank) goto android_e;
+ if(Cave[y+1][x] == Xblank) goto android_s;
+ if(Cave[y][x-1] == Xblank) goto android_w;
+ if(Cave[y-1][x] == Xblank) goto android_n;
+ if(Cave[y-1][x-1] == Xblank) goto android_nw;
+ if(Cave[y+1][x+1] == Xblank) goto android_se;
+ if(Cave[y-1][x+1] == Xblank) goto android_ne;
+ goto android_move;
+ case 3: /* N,SE,NE,E,W,S,NW,SW */
+ if(Cave[y-1][x] == Xblank) goto android_n;
+ if(Cave[y+1][x+1] == Xblank) goto android_se;
+ if(Cave[y-1][x+1] == Xblank) goto android_ne;
+ if(Cave[y][x+1] == Xblank) goto android_e;
+ if(Cave[y][x-1] == Xblank) goto android_w;
+ if(Cave[y+1][x] == Xblank) goto android_s;
+ if(Cave[y-1][x-1] == Xblank) goto android_nw;
+ if(Cave[y+1][x-1] == Xblank) goto android_sw;
+ goto android_move;
+ case 4: /* SE,NW,E,NE,SW,W,N,S */
+ if(Cave[y+1][x+1] == Xblank) goto android_se;
+ if(Cave[y-1][x-1] == Xblank) goto android_nw;
+ if(Cave[y][x+1] == Xblank) goto android_e;
+ if(Cave[y-1][x+1] == Xblank) goto android_ne;
+ if(Cave[y+1][x-1] == Xblank) goto android_sw;
+ if(Cave[y][x-1] == Xblank) goto android_w;
+ if(Cave[y-1][x] == Xblank) goto android_n;
+ if(Cave[y+1][x] == Xblank) goto android_s;
+ goto android_move;
+ case 5: /* NE,W,SE,SW,S,N,E,NW */
+ if(Cave[y-1][x+1] == Xblank) goto android_ne;
+ if(Cave[y][x-1] == Xblank) goto android_w;
+ if(Cave[y+1][x+1] == Xblank) goto android_se;
+ if(Cave[y+1][x-1] == Xblank) goto android_sw;
+ if(Cave[y+1][x] == Xblank) goto android_s;
+ if(Cave[y-1][x] == Xblank) goto android_n;
+ if(Cave[y][x+1] == Xblank) goto android_e;
+ if(Cave[y-1][x-1] == Xblank) goto android_nw;
+ goto android_move;
+ case 6: /* E,N,SW,S,NW,NE,SE,W */
+ if(Cave[y][x+1] == Xblank) goto android_e;
+ if(Cave[y-1][x] == Xblank) goto android_n;
+ if(Cave[y+1][x-1] == Xblank) goto android_sw;
+ if(Cave[y+1][x] == Xblank) goto android_s;
+ if(Cave[y-1][x-1] == Xblank) goto android_nw;
+ if(Cave[y-1][x+1] == Xblank) goto android_ne;
+ if(Cave[y+1][x+1] == Xblank) goto android_se;
+ if(Cave[y][x-1] == Xblank) goto android_w;
+ goto android_move;
+ case 7: /* W,SW,NW,N,E,SE,NE,S */
+ if(Cave[y][x-1] == Xblank) goto android_w;
+ if(Cave[y+1][x-1] == Xblank) goto android_sw;
+ if(Cave[y-1][x-1] == Xblank) goto android_nw;
+ if(Cave[y-1][x] == Xblank) goto android_n;
+ if(Cave[y][x+1] == Xblank) goto android_e;
+ if(Cave[y+1][x+1] == Xblank) goto android_se;
+ if(Cave[y-1][x+1] == Xblank) goto android_ne;
+ if(Cave[y+1][x] == Xblank) goto android_s;
+ goto android_move;
+ }
+ }
+ android_move:
+ if(lev.android_move_cnt == 0) {
+ if(Cave[y-1][x-1] == Zplayer || Cave[y-1][x] == Zplayer ||
+ Cave[y-1][x+1] == Zplayer || Cave[y][x-1] == Zplayer ||
+ Cave[y][x+1] == Zplayer || Cave[y+1][x-1] == Zplayer ||
+ Cave[y+1][x] == Zplayer || Cave[y+1][x+1] == Zplayer) goto android_still;
+
+ if(ply1.alive && ply2.alive) {
+ if( (ply1.x > x ? ply1.x - x : x - ply1.x) + (ply1.y > y ? ply1.y - y : y - ply1.y) < (ply2.x > x ? ply2.x - x : x - ply2.x) + (ply2.y > y ? ply2.y - y : y - ply2.y) ) {
+ dx = ply1.x;
+ dy = ply1.y;
+ } else {
+ dx = ply2.x;
+ dy = ply2.y;
+ }
+ } else if(ply1.alive) {
+ dx = ply1.x;
+ dy = ply1.y;
+ } else if(ply2.alive) {
+ dx = ply2.x;
+ dy = ply2.y;
+ } else {
+ dx = 0;
+ dy = 0;
+ }
+ Next[y][x] = Xblank; /* assume we will move */
+ temp = ((x < dx) + 1 - (x > dx)) + ((y < dy) + 1 - (y > dy)) * 3;
+ if(RANDOM & 1) {
+ switch(temp) { /* attempt clockwise move first if direct path is blocked */
+ case 0: /* north west */
+ if(tab_android_move[Cave[y-1][x-1]]) goto android_nw;
+ if(tab_android_move[Cave[y-1][x]]) goto android_n;
+ if(tab_android_move[Cave[y][x-1]]) goto android_w;
+ break;
+ case 1: /* north */
+ if(tab_android_move[Cave[y-1][x]]) goto android_n;
+ if(tab_android_move[Cave[y-1][x+1]]) goto android_ne;
+ if(tab_android_move[Cave[y-1][x-1]]) goto android_nw;
+ break;
+ case 2: /* north east */
+ if(tab_android_move[Cave[y-1][x+1]]) goto android_ne;
+ if(tab_android_move[Cave[y][x+1]]) goto android_e;
+ if(tab_android_move[Cave[y-1][x]]) goto android_n;
+ break;
+ case 3: /* west */
+ if(tab_android_move[Cave[y][x-1]]) goto android_w;
+ if(tab_android_move[Cave[y-1][x-1]]) goto android_nw;
+ if(tab_android_move[Cave[y+1][x-1]]) goto android_sw;
+ break;
+ case 4: /* nowhere */
+ break;
+ case 5: /* east */
+ if(tab_android_move[Cave[y][x+1]]) goto android_e;
+ if(tab_android_move[Cave[y+1][x+1]]) goto android_se;
+ if(tab_android_move[Cave[y-1][x+1]]) goto android_ne;
+ break;
+ case 6: /* south west */
+ if(tab_android_move[Cave[y+1][x-1]]) goto android_sw;
+ if(tab_android_move[Cave[y][x-1]]) goto android_w;
+ if(tab_android_move[Cave[y+1][x]]) goto android_s;
+ break;
+ case 7: /* south */
+ if(tab_android_move[Cave[y+1][x]]) goto android_s;
+ if(tab_android_move[Cave[y+1][x-1]]) goto android_sw;
+ if(tab_android_move[Cave[y+1][x+1]]) goto android_se;
+ break;
+ case 8: /* south east */
+ if(tab_android_move[Cave[y+1][x+1]]) goto android_se;
+ if(tab_android_move[Cave[y+1][x]]) goto android_s;
+ if(tab_android_move[Cave[y][x+1]]) goto android_e;
+ break;
+ }
+ } else {
+ switch(temp) { /* attempt counter clockwise move first if direct path is blocked */
+ case 0: /* north west */
+ if(tab_android_move[Cave[y-1][x-1]]) goto android_nw;
+ if(tab_android_move[Cave[y][x-1]]) goto android_w;
+ if(tab_android_move[Cave[y-1][x]]) goto android_n;
+ break;
+ case 1: /* north */
+ if(tab_android_move[Cave[y-1][x]]) goto android_n;
+ if(tab_android_move[Cave[y-1][x-1]]) goto android_nw;
+ if(tab_android_move[Cave[y-1][x+1]]) goto android_ne;
+ break;
+ case 2: /* north east */
+ if(tab_android_move[Cave[y-1][x+1]]) goto android_ne;
+ if(tab_android_move[Cave[y-1][x]]) goto android_n;
+ if(tab_android_move[Cave[y][x+1]]) goto android_e;
+ break;
+ case 3: /* west */
+ if(tab_android_move[Cave[y][x-1]]) goto android_w;
+ if(tab_android_move[Cave[y+1][x-1]]) goto android_sw;
+ if(tab_android_move[Cave[y-1][x-1]]) goto android_nw;
+ break;
+ case 4: /* nowhere */
+ break;
+ case 5: /* east */
+ if(tab_android_move[Cave[y][x+1]]) goto android_e;
+ if(tab_android_move[Cave[y-1][x+1]]) goto android_ne;
+ if(tab_android_move[Cave[y+1][x+1]]) goto android_se;
+ break;
+ case 6: /* south west */
+ if(tab_android_move[Cave[y+1][x-1]]) goto android_sw;
+ if(tab_android_move[Cave[y+1][x]]) goto android_s;
+ if(tab_android_move[Cave[y][x-1]]) goto android_w;
+ break;
+ case 7: /* south */
+ if(tab_android_move[Cave[y+1][x]]) goto android_s;
+ if(tab_android_move[Cave[y+1][x+1]]) goto android_se;
+ if(tab_android_move[Cave[y+1][x-1]]) goto android_sw;
+ break;
+ case 8: /* south east */
+ if(tab_android_move[Cave[y+1][x+1]]) goto android_se;
+ if(tab_android_move[Cave[y][x+1]]) goto android_e;
+ if(tab_android_move[Cave[y+1][x]]) goto android_s;
+ break;
+ }
+ }
+ }
+ android_still:
+ Next[y][x] = Xandroid;
+ goto loop;
+ android_n:
+ Cave[y][x] = Yandroid_nB;
+ Cave[y-1][x] = Yandroid_n;
+ Next[y-1][x] = Xandroid;
+ PLAY(SAMPLE_tank);
+ goto loop;
+ android_ne:
+ Cave[y][x] = Yandroid_neB;
+ Cave[y-1][x+1] = Yandroid_ne;
+ Next[y-1][x+1] = Xandroid;
+ PLAY(SAMPLE_tank);
+ goto loop;
+ android_e:
+ Cave[y][x] = Yandroid_eB;
+ Cave[y][x+1] = Yandroid_e;
+ Next[y][x+1] = Xandroid;
+ PLAY(SAMPLE_tank);
+ goto loop;
+ android_se:
+ Cave[y][x] = Yandroid_seB;
+ Cave[y+1][x+1] = Yandroid_se;
+ Next[y+1][x+1] = Xandroid;
+ PLAY(SAMPLE_tank);
+ goto loop;
+ android_s:
+ Cave[y][x] = Yandroid_sB;
+ Cave[y+1][x] = Yandroid_s;
+ Next[y+1][x] = Xandroid;
+ PLAY(SAMPLE_tank);
+ goto loop;
+ android_sw:
+ Cave[y][x] = Yandroid_swB;
+ Cave[y+1][x-1] = Yandroid_sw;
+ Next[y+1][x-1] = Xandroid;
+ PLAY(SAMPLE_tank);
+ goto loop;
+ android_w:
+ Cave[y][x] = Yandroid_wB;
+ Cave[y][x-1] = Yandroid_w;
+ Next[y][x-1] = Xandroid;
+ PLAY(SAMPLE_tank);
+ goto loop;
+ android_nw:
+ Cave[y][x] = Yandroid_nwB;
+ Cave[y-1][x-1] = Yandroid_nw;
+ Next[y-1][x-1] = Xandroid;
+ PLAY(SAMPLE_tank);
+ goto loop;
+/* ---------------------------------------------------------------------- */
+ case Xandroid_1_n:
+ switch(Cave[y-1][x]) {
+ case Xacid_1:
+ case Xacid_2:
+ case Xacid_3:
+ case Xacid_4:
+ case Xacid_5:
+ case Xacid_6:
+ case Xacid_7:
+ case Xacid_8:
+ Cave[y][x] = Yandroid_nB;
+ if(Cave[y-2][x+1] == Xblank) Cave[y-2][x+1] = Yacid_splash_eB;
+ if(Cave[y-2][x-1] == Xblank) Cave[y-2][x-1] = Yacid_splash_wB;
+ Next[y][x] = Xblank;
+ PLAY(SAMPLE_acid);
+ goto loop;
+ case Xblank:
+ case Yacid_splash_eB:
+ case Yacid_splash_wB:
+ Cave[y][x] = Yandroid_nB;
+ Cave[y-1][x] = Yandroid_n;
+ Next[y][x] = Xblank;
+ Next[y-1][x] = Xandroid;
+ PLAY(SAMPLE_tank);
+ goto loop;
+ default:
+ goto android;
+ }
+ case Xandroid_2_n:
+ switch(Cave[y-1][x]) {
+ case Xacid_1:
+ case Xacid_2:
+ case Xacid_3:
+ case Xacid_4:
+ case Xacid_5:
+ case Xacid_6:
+ case Xacid_7:
+ case Xacid_8:
+ Cave[y][x] = Yandroid_nB;
+ if(Cave[y-2][x+1] == Xblank) Cave[y-2][x+1] = Yacid_splash_eB;
+ if(Cave[y-2][x-1] == Xblank) Cave[y-2][x-1] = Yacid_splash_wB;
+ Next[y][x] = Xblank;
+ PLAY(SAMPLE_acid);
+ goto loop;
+ case Xblank:
+ case Yacid_splash_eB:
+ case Yacid_splash_wB:
+ Cave[y][x] = Yandroid_nB;
+ Cave[y-1][x] = Yandroid_n;
+ Next[y][x] = Xblank;
+ Next[y-1][x] = Xandroid_1_n;
+ PLAY(SAMPLE_tank);
+ goto loop;
+ default:
+ goto android;
+ }
+/* ---------------------------------------------------------------------- */
+ case Xandroid_1_e:
+ switch(Cave[y][x+1]) {
+ case Xacid_1:
+ case Xacid_2:
+ case Xacid_3:
+ case Xacid_4:
+ case Xacid_5:
+ case Xacid_6:
+ case Xacid_7:
+ case Xacid_8:
+ Cave[y][x] = Yandroid_eB;
+ if(Cave[y-1][x+2] == Xblank) Cave[y-1][x+2] = Yacid_splash_eB;
+ if(Cave[y-1][x] == Xblank) Cave[y-1][x] = Yacid_splash_wB;
+ Next[y][x] = Xblank;
+ PLAY(SAMPLE_acid);
+ goto loop;
+ case Xblank:
+ case Yacid_splash_eB:
+ case Yacid_splash_wB:
+ Cave[y][x] = Yandroid_eB;
+ Cave[y][x+1] = Yandroid_e;
+ Next[y][x] = Xblank;
+ Next[y][x+1] = Xandroid;
+ PLAY(SAMPLE_tank);
+ goto loop;
+ default:
+ goto android;
+ }
+ case Xandroid_2_e:
+ switch(Cave[y][x+1]) {
+ case Xacid_1:
+ case Xacid_2:
+ case Xacid_3:
+ case Xacid_4:
+ case Xacid_5:
+ case Xacid_6:
+ case Xacid_7:
+ case Xacid_8:
+ Cave[y][x] = Yandroid_eB;
+ if(Cave[y-1][x+2] == Xblank) Cave[y-1][x+2] = Yacid_splash_eB;
+ if(Cave[y-1][x] == Xblank) Cave[y-1][x] = Yacid_splash_wB;
+ Next[y][x] = Xblank;
+ PLAY(SAMPLE_acid);
+ goto loop;
+ case Xblank:
+ case Yacid_splash_eB:
+ case Yacid_splash_wB:
+ Cave[y][x] = Yandroid_eB;
+ Cave[y][x+1] = Yandroid_e;
+ Next[y][x] = Xblank;
+ Next[y][x+1] = Xandroid_1_e;
+ PLAY(SAMPLE_tank);
+ goto loop;
+ default:
+ goto android;
+ }
+/* ---------------------------------------------------------------------- */
+ case Xandroid_1_s:
+ switch(Cave[y+1][x]) {
+ case Xacid_1:
+ case Xacid_2:
+ case Xacid_3:
+ case Xacid_4:
+ case Xacid_5:
+ case Xacid_6:
+ case Xacid_7:
+ case Xacid_8:
+ Cave[y][x] = Yandroid_sB;
+ if(Cave[y][x+1] == Xblank) Cave[y][x+1] = Yacid_splash_eB;
+ if(Cave[y][x-1] == Xblank) Cave[y][x-1] = Yacid_splash_wB;
+ Next[y][x] = Xblank;
+ PLAY(SAMPLE_acid);
+ goto loop;
+ case Xblank:
+ case Yacid_splash_eB:
+ case Yacid_splash_wB:
+ Cave[y][x] = Yandroid_sB;
+ Cave[y+1][x] = Yandroid_s;
+ Next[y][x] = Xblank;
+ Next[y+1][x] = Xandroid;
+ PLAY(SAMPLE_tank);
+ goto loop;
+ default:
+ goto android;
+ }
+ case Xandroid_2_s:
+ switch(Cave[y+1][x]) {
+ case Xacid_1:
+ case Xacid_2:
+ case Xacid_3:
+ case Xacid_4:
+ case Xacid_5:
+ case Xacid_6:
+ case Xacid_7:
+ case Xacid_8:
+ Cave[y][x] = Yandroid_sB;
+ if(Cave[y][x+1] == Xblank) Cave[y][x+1] = Yacid_splash_eB;
+ if(Cave[y][x-1] == Xblank) Cave[y][x-1] = Yacid_splash_wB;
+ Next[y][x] = Xblank;
+ PLAY(SAMPLE_acid);
+ goto loop;
+ case Xblank:
+ case Yacid_splash_eB:
+ case Yacid_splash_wB:
+ Cave[y][x] = Yandroid_sB;
+ Cave[y+1][x] = Yandroid_s;
+ Next[y][x] = Xblank;
+ Next[y+1][x] = Xandroid_1_s;
+ PLAY(SAMPLE_tank);
+ goto loop;
+ default:
+ goto android;
+ }
+/* ---------------------------------------------------------------------- */
+ case Xandroid_1_w:
+ switch(Cave[y][x-1]) {
+ case Xacid_1:
+ case Xacid_2:
+ case Xacid_3:
+ case Xacid_4:
+ case Xacid_5:
+ case Xacid_6:
+ case Xacid_7:
+ case Xacid_8:
+ Cave[y][x] = Yandroid_wB;
+ if(Cave[y-1][x] == Xblank) Cave[y-1][x] = Yacid_splash_eB;
+ if(Cave[y-1][x-2] == Xblank) Cave[y-1][x-2] = Yacid_splash_wB;
+ Next[y][x] = Xblank;
+ PLAY(SAMPLE_acid);
+ goto loop;
+ case Xblank:
+ case Yacid_splash_eB:
+ case Yacid_splash_wB:
+ Cave[y][x] = Yandroid_wB;
+ Cave[y][x-1] = Yandroid_w;
+ Next[y][x] = Xblank;
+ Next[y][x-1] = Xandroid;
+ PLAY(SAMPLE_tank);
+ goto loop;
+ default:
+ goto android;
+ }
+ case Xandroid_2_w:
+ switch(Cave[y][x-1]) {
+ case Xacid_1:
+ case Xacid_2:
+ case Xacid_3:
+ case Xacid_4:
+ case Xacid_5:
+ case Xacid_6:
+ case Xacid_7:
+ case Xacid_8:
+ Cave[y][x] = Yandroid_wB;
+ if(Cave[y-1][x] == Xblank) Cave[y-1][x] = Yacid_splash_eB;
+ if(Cave[y-1][x-2] == Xblank) Cave[y-1][x-2] = Yacid_splash_wB;
+ Next[y][x] = Xblank;
+ PLAY(SAMPLE_acid);
+ goto loop;
+ case Xblank:
+ case Yacid_splash_eB:
+ case Yacid_splash_wB:
+ Cave[y][x] = Yandroid_wB;
+ Cave[y][x-1] = Yandroid_w;
+ Next[y][x] = Xblank;
+ Next[y][x-1] = Xandroid_1_w;
+ PLAY(SAMPLE_tank);
+ goto loop;
+ default:
+ goto android;
+ }
+/* ---------------------------------------------------------------------- */
+ case Xspring:
+ switch(Cave[y+1][x]) {
+ case Xacid_1:
+ case Xacid_2:
+ case Xacid_3:
+ case Xacid_4:
+ case Xacid_5:
+ case Xacid_6:
+ case Xacid_7:
+ case Xacid_8:
+ Cave[y][x] = Yspring_sB;
+ if(Cave[y][x+1] == Xblank) Cave[y][x+1] = Yacid_splash_eB;
+ if(Cave[y][x-1] == Xblank) Cave[y][x-1] = Yacid_splash_wB;
+ Next[y][x] = Xblank;
+ PLAY(SAMPLE_acid);
+ goto loop;
+ case Xblank:
+ case Yacid_splash_eB:
+ case Yacid_splash_wB:
+ case Xplant:
+ case Yplant:
+ Cave[y][x] = Yspring_sB;
+ Cave[y+1][x] = Yspring_s;
+ Next[y][x] = Xblank;
+ Next[y+1][x] = Xspring_fall;
+ goto loop;
+ case Xspring:
+ case Xspring_pause:
+ case Xspring_e:
+ case Xspring_w:
+ case Xandroid:
+ case Xandroid_1_n:
+ case Xandroid_2_n:
+ case Xandroid_1_e:
+ case Xandroid_2_e:
+ case Xandroid_1_s:
+ case Xandroid_2_s:
+ case Xandroid_1_w:
+ case Xandroid_2_w:
+ case Xstone:
+ case Xstone_pause:
+ case Xemerald:
+ case Xemerald_pause:
+ case Xdiamond:
+ case Xdiamond_pause:
+ case Xbomb:
+ case Xbomb_pause:
+ case Xballoon:
+ case Xacid_ne:
+ case Xacid_nw:
+ case Xball_1:
+ case Xball_2:
+ case Xnut:
+ case Xnut_pause:
+ case Xgrow_ns:
+ case Xgrow_ew:
+ case Xkey_1:
+ case Xkey_2:
+ case Xkey_3:
+ case Xkey_4:
+ case Xkey_5:
+ case Xkey_6:
+ case Xkey_7:
+ case Xkey_8:
+ case Xbumper:
+ case Xswitch:
+ case Xround_wall_1:
+ case Xround_wall_2:
+ case Xround_wall_3:
+ case Xround_wall_4:
+ if(RANDOM & 1) {
+ if(tab_blank[Cave[y][x+1]] && tab_acid[Cave[y+1][x+1]]) {
+ Cave[y][x] = Yspring_eB;
+ Cave[y][x+1] = Yspring_e;
+ if(Cave[y+1][x] == Xbumper) Cave[y+1][x] = XbumperB;
+ Next[y][x] = Xblank;
+#ifdef BAD_SPRING
+ Next[y][x+1] = Xspring_e;
+#else
+ Next[y][x+1] = Xspring_pause;
+#endif
+ goto loop;
+ }
+ if(tab_blank[Cave[y][x-1]] && tab_acid[Cave[y+1][x-1]]) {
+ Cave[y][x] = Yspring_wB;
+ Cave[y][x-1] = Yspring_w;
+ if(Cave[y+1][x] == Xbumper) Cave[y+1][x] = XbumperB;
+ Next[y][x] = Xblank;
+#ifdef BAD_SPRING
+ Next[y][x-1] = Xspring_w;
+#else
+ Next[y][x-1] = Xspring_pause;
+#endif
+ goto loop;
+ }
+ } else {
+ if(tab_blank[Cave[y][x-1]] && tab_acid[Cave[y+1][x-1]]) {
+ Cave[y][x] = Yspring_wB;
+ Cave[y][x-1] = Yspring_w;
+ if(Cave[y+1][x] == Xbumper) Cave[y+1][x] = XbumperB;
+ Next[y][x] = Xblank;
+#ifdef BAD_SPRING
+ Next[y][x-1] = Xspring_w;
+#else
+ Next[y][x-1] = Xspring_pause;
+#endif
+ goto loop;
+ }
+ if(tab_blank[Cave[y][x+1]] && tab_acid[Cave[y+1][x+1]]) {
+ Cave[y][x] = Yspring_eB;
+ Cave[y][x+1] = Yspring_e;
+ if(Cave[y+1][x] == Xbumper) Cave[y+1][x] = XbumperB;
+ Next[y][x] = Xblank;
+#ifdef BAD_SPRING
+ Next[y][x+1] = Xspring_e;
+#else
+ Next[y][x+1] = Xspring_pause;
+#endif
+ goto loop;
+ }
+ }
+ default:
+ goto loop;
+ }
+/* ---------------------------------------------------------------------- */
+ case Xspring_pause:
+ switch(Cave[y+1][x]) {
+ case Xacid_1:
+ case Xacid_2:
+ case Xacid_3:
+ case Xacid_4:
+ case Xacid_5:
+ case Xacid_6:
+ case Xacid_7:
+ case Xacid_8:
+ Cave[y][x] = Yspring_sB;
+ if(Cave[y][x+1] == Xblank) Cave[y][x+1] = Yacid_splash_eB;
+ if(Cave[y][x-1] == Xblank) Cave[y][x-1] = Yacid_splash_wB;
+ Next[y][x] = Xblank;
+ PLAY(SAMPLE_acid);
+ goto loop;
+ case Xblank:
+ case Yacid_splash_eB:
+ case Yacid_splash_wB:
+ Cave[y][x] = Yspring_sB;
+ Cave[y+1][x] = Yspring_s;
+ Next[y][x] = Xblank;
+ Next[y+1][x] = Xspring_fall;
+ goto loop;
+ default:
+ Cave[y][x] = Xspring;
+ Next[y][x] = Xspring;
+ goto loop;
+ }
+/* ---------------------------------------------------------------------- */
+ case Xspring_e:
+ switch(Cave[y+1][x]) {
+ case Xacid_1:
+ case Xacid_2:
+ case Xacid_3:
+ case Xacid_4:
+ case Xacid_5:
+ case Xacid_6:
+ case Xacid_7:
+ case Xacid_8:
+ Cave[y][x] = Yspring_sB;
+ if(Cave[y][x+1] == Xblank) Cave[y][x+1] = Yacid_splash_eB;
+ if(Cave[y][x-1] == Xblank) Cave[y][x-1] = Yacid_splash_wB;
+ Next[y][x] = Xblank;
+ PLAY(SAMPLE_acid);
+ goto loop;
+ case Xblank:
+ case Yacid_splash_eB:
+ case Yacid_splash_wB:
+ Cave[y][x] = Yspring_sB;
+ Cave[y+1][x] = Yspring_s;
+ Next[y][x] = Xblank;
+ Next[y+1][x] = Xspring_fall;
+ goto loop;
+ case Xbumper:
+ Cave[y+1][x] = XbumperB;
+ }
+ switch(Cave[y][x+1]) {
+ case Xacid_1:
+ case Xacid_2:
+ case Xacid_3:
+ case Xacid_4:
+ case Xacid_5:
+ case Xacid_6:
+ case Xacid_7:
+ case Xacid_8:
+ Cave[y][x] = Yspring_eB;
+ if(Cave[y-1][x+2] == Xblank) Cave[y-1][x+2] = Yacid_splash_eB;
+ if(Cave[y-1][x] == Xblank) Cave[y-1][x] = Yacid_splash_wB;
+ Next[y][x] = Xblank;
+ PLAY(SAMPLE_acid);
+ goto loop;
+ case Xblank:
+ case Yacid_splash_eB:
+ case Yacid_splash_wB:
+ case Yalien_nB:
+ case Yalien_eB:
+ case Yalien_sB:
+ case Yalien_wB:
+ Cave[y][x] = Yspring_eB;
+ Cave[y][x+1] = Yspring_e;
+ Next[y][x] = Xblank;
+ Next[y][x+1] = Xspring_e;
+ goto loop;
+ case Xalien:
+ case Xalien_pause:
+ case Yalien_n:
+ case Yalien_e:
+ case Yalien_s:
+ case Yalien_w:
+ Cave[y][x] = Yspring_kill_eB;
+ Cave[y][x+1] = Yspring_kill_e;
+ Next[y][x] = Xblank;
+ Next[y][x+1] = Xspring_e;
+ play[SAMPLE_slurp] = 1;
+ score += lev.slurp_score;
+ goto loop;
+ case Xbumper:
+ case XbumperB:
+ Cave[y][x+1] = XbumperB;
+ Next[y][x] = Xspring_w;
+ PLAY(SAMPLE_spring);
+ goto loop;
+ default:
+ Cave[y][x] = Xspring;
+ Next[y][x] = Xspring;
+ PLAY(SAMPLE_spring);
+ goto loop;
+ }
+/* ---------------------------------------------------------------------- */
+ case Xspring_w:
+ switch(Cave[y+1][x]) {
+ case Xacid_1:
+ case Xacid_2:
+ case Xacid_3:
+ case Xacid_4:
+ case Xacid_5:
+ case Xacid_6:
+ case Xacid_7:
+ case Xacid_8:
+ Cave[y][x] = Yspring_sB;
+ if(Cave[y][x+1] == Xblank) Cave[y][x+1] = Yacid_splash_eB;
+ if(Cave[y][x-1] == Xblank) Cave[y][x-1] = Yacid_splash_wB;
+ Next[y][x] = Xblank;
+ PLAY(SAMPLE_acid);
+ goto loop;
+ case Xblank:
+ case Yacid_splash_eB:
+ case Yacid_splash_wB:
+ Cave[y][x] = Yspring_sB;
+ Cave[y+1][x] = Yspring_s;
+ Next[y][x] = Xblank;
+ Next[y+1][x] = Xspring_fall;
+ goto loop;
+ case Xbumper:
+ Cave[y+1][x] = XbumperB;
+ }
+ switch(Cave[y][x-1]) {
+ case Xacid_1:
+ case Xacid_2:
+ case Xacid_3:
+ case Xacid_4:
+ case Xacid_5:
+ case Xacid_6:
+ case Xacid_7:
+ case Xacid_8:
+ Cave[y][x] = Yspring_wB;
+ if(Cave[y-1][x] == Xblank) Cave[y-1][x] = Yacid_splash_eB;
+ if(Cave[y-1][x-2] == Xblank) Cave[y-1][x-2] = Yacid_splash_wB;
+ Next[y][x] = Xblank;
+ PLAY(SAMPLE_acid);
+ goto loop;
+ case Xblank:
+ case Yacid_splash_eB:
+ case Yacid_splash_wB:
+ case Yalien_nB:
+ case Yalien_eB:
+ case Yalien_sB:
+ case Yalien_wB:
+ Cave[y][x] = Yspring_wB;
+ Cave[y][x-1] = Yspring_w;
+ Next[y][x] = Xblank;
+ Next[y][x-1] = Xspring_w;
+ goto loop;
+ case Xalien:
+ case Xalien_pause:
+ case Yalien_n:
+ case Yalien_e:
+ case Yalien_s:
+ case Yalien_w:
+ Cave[y][x] = Yspring_kill_wB;
+ Cave[y][x-1] = Yspring_kill_w;
+ Next[y][x] = Xblank;
+ Next[y][x-1] = Xspring_w;
+ play[SAMPLE_slurp] = 1;
+ score += lev.slurp_score;
+ goto loop;
+ case Xbumper:
+ case XbumperB:
+ Cave[y][x-1] = XbumperB;
+ Next[y][x] = Xspring_e;
+ PLAY(SAMPLE_spring);
+ goto loop;
+ default:
+ Cave[y][x] = Xspring;
+ Next[y][x] = Xspring;
+ PLAY(SAMPLE_spring);
+ goto loop;
+ }
+/* ---------------------------------------------------------------------- */
+ case Xspring_fall:
+ switch(Cave[y+1][x]) {
+ case Xacid_1:
+ case Xacid_2:
+ case Xacid_3:
+ case Xacid_4:
+ case Xacid_5:
+ case Xacid_6:
+ case Xacid_7:
+ case Xacid_8:
+ Cave[y][x] = Yspring_sB;
+ if(Cave[y][x+1] == Xblank) Cave[y][x+1] = Yacid_splash_eB;
+ if(Cave[y][x-1] == Xblank) Cave[y][x-1] = Yacid_splash_wB;
+ Next[y][x] = Xblank;
+ PLAY(SAMPLE_acid);
+ goto loop;
+ case Xblank:
+ case Yacid_splash_eB:
+ case Yacid_splash_wB:
+ case Zplayer:
+ Cave[y][x] = Yspring_sB;
+ Cave[y+1][x] = Yspring_s;
+ Next[y][x] = Xblank;
+ Next[y+1][x] = Xspring_fall;
+ goto loop;
+ case Xbomb:
+ case Xbomb_pause:
+ Cave[y+1][x] = Ybomb_eat;
+ Next[y+1][x] = Znormal;
+ Boom[y][x-1] = Xblank;
+ Boom[y][x] = Xblank;
+ Boom[y][x+1] = Xblank;
+ Boom[y+1][x-1] = Xblank;
+ Boom[y+1][x] = Xblank;
+ Boom[y+1][x+1] = Xblank;
+ Boom[y+2][x-1] = Xblank;
+ Boom[y+2][x] = Xblank;
+ Boom[y+2][x+1] = Xblank;
+ goto loop;
+ case Xbug_n:
+ case Xbug_e:
+ case Xbug_s:
+ case Xbug_w:
+ case Xbug_gon:
+ case Xbug_goe:
+ case Xbug_gos:
+ case Xbug_gow:
+ Cave[y][x] = Yspring_sB;
+ Cave[y+1][x] = Ybug_spring;
+ Next[y+1][x] = Znormal;
+ Boom[y][x-1] = Xemerald;
+ Boom[y][x] = Xemerald;
+ Boom[y][x+1] = Xemerald;
+ Boom[y+1][x-1] = Xemerald;
+ Boom[y+1][x] = Xdiamond;
+ Boom[y+1][x+1] = Xemerald;
+ Boom[y+2][x-1] = Xemerald;
+ Boom[y+2][x] = Xemerald;
+ Boom[y+2][x+1] = Xemerald;
+ score += lev.bug_score;
+ goto loop;
+ case Xtank_n:
+ case Xtank_e:
+ case Xtank_s:
+ case Xtank_w:
+ case Xtank_gon:
+ case Xtank_goe:
+ case Xtank_gos:
+ case Xtank_gow:
+ Cave[y][x] = Yspring_sB;
+ Cave[y+1][x] = Ytank_spring;
+ Next[y+1][x] = Znormal;
+ Boom[y][x-1] = Xblank;
+ Boom[y][x] = Xblank;
+ Boom[y][x+1] = Xblank;
+ Boom[y+1][x-1] = Xblank;
+ Boom[y+1][x] = Xblank;
+ Boom[y+1][x+1] = Xblank;
+ Boom[y+2][x-1] = Xblank;
+ Boom[y+2][x] = Xblank;
+ Boom[y+2][x+1] = Xblank;
+ score += lev.tank_score;
+ goto loop;
+ case Xeater_n:
+ case Xeater_e:
+ case Xeater_s:
+ case Xeater_w:
+ Cave[y][x] = Yspring_sB;
+ Cave[y+1][x] = Yeater_spring;
+ Next[y+1][x] = Znormal;
+ Boom[y][x-1] = lev.eater_array[lev.eater_pos][0];
+ Boom[y][x] = lev.eater_array[lev.eater_pos][1];
+ Boom[y][x+1] = lev.eater_array[lev.eater_pos][2];
+ Boom[y+1][x-1] = lev.eater_array[lev.eater_pos][3];
+ Boom[y+1][x] = lev.eater_array[lev.eater_pos][4];
+ Boom[y+1][x+1] = lev.eater_array[lev.eater_pos][5];
+ Boom[y+2][x-1] = lev.eater_array[lev.eater_pos][6];
+ Boom[y+2][x] = lev.eater_array[lev.eater_pos][7];
+ Boom[y+2][x+1] = lev.eater_array[lev.eater_pos][8];
+ lev.eater_pos = (lev.eater_pos + 1) & 7;
+ score += lev.eater_score;
+ goto loop;
+ case Xalien:
+ case Xalien_pause:
+ Cave[y][x] = Yspring_sB;
+ Cave[y+1][x] = Yalien_spring;
+ Next[y+1][x] = Znormal;
+ Boom[y][x-1] = Xblank;
+ Boom[y][x] = Xblank;
+ Boom[y][x+1] = Xblank;
+ Boom[y+1][x-1] = Xblank;
+ Boom[y+1][x] = Xblank;
+ Boom[y+1][x+1] = Xblank;
+ Boom[y+2][x-1] = Xblank;
+ Boom[y+2][x] = Xblank;
+ Boom[y+2][x+1] = Xblank;
+ score += lev.alien_score;
+ goto loop;
+ default:
+ Cave[y][x] = Xspring;
+ Next[y][x] = Xspring;
+ PLAY(SAMPLE_spring);
+ goto loop;
+ }
+/* ---------------------------------------------------------------------- */
+ case Xeater_n:
+ if(Cave[y][x+1] == Xdiamond) {
+ Cave[y][x+1] = Ydiamond_eat;
+ Next[y][x+1] = Xblank;
+ play[SAMPLE_eater] = 1;
+ goto loop;
+ }
+ if(Cave[y+1][x] == Xdiamond) {
+ Cave[y+1][x] = Ydiamond_eat;
+ Next[y+1][x] = Xblank;
+ play[SAMPLE_eater] = 1;
+ goto loop;
+ }
+ if(Cave[y][x-1] == Xdiamond) {
+ Cave[y][x-1] = Ydiamond_eat;
+ Next[y][x-1] = Xblank;
+ play[SAMPLE_eater] = 1;
+ goto loop;
+ }
+ if(Cave[y-1][x] == Xdiamond) {
+ Cave[y-1][x] = Ydiamond_eat;
+ Next[y-1][x] = Xblank;
+ play[SAMPLE_eater] = 1;
+ goto loop;
+ }
+ switch(Cave[y-1][x]) {
+ case Xacid_1:
+ case Xacid_2:
+ case Xacid_3:
+ case Xacid_4:
+ case Xacid_5:
+ case Xacid_6:
+ case Xacid_7:
+ case Xacid_8:
+ Cave[y][x] = Yeater_nB;
+ if(Cave[y-2][x+1] == Xblank) Cave[y-2][x+1] = Yacid_splash_eB;
+ if(Cave[y-2][x-1] == Xblank) Cave[y-2][x-1] = Yacid_splash_wB;
+ Next[y][x] = Xblank;
+ PLAY(SAMPLE_acid);
+ goto loop;
+ case Xblank:
+ case Yacid_splash_eB:
+ case Yacid_splash_wB:
+ case Xplant:
+ case Yplant:
+ case Zplayer:
+ Cave[y][x] = Yeater_nB;
+ Cave[y-1][x] = Yeater_n;
+ Next[y][x] = Xblank;
+ Next[y-1][x] = Xeater_n;
+ goto loop;
+ default:
+ Next[y][x] = RANDOM & 1 ? Xeater_e : Xeater_w;
+ PLAY(SAMPLE_eater);
+ goto loop;
+ }
+/* ---------------------------------------------------------------------- */
+ case Xeater_e:
+ if(Cave[y+1][x] == Xdiamond) {
+ Cave[y+1][x] = Ydiamond_eat;
+ Next[y+1][x] = Xblank;
+ play[SAMPLE_eater] = 1;
+ goto loop;
+ }
+ if(Cave[y][x-1] == Xdiamond) {
+ Cave[y][x-1] = Ydiamond_eat;
+ Next[y][x-1] = Xblank;
+ play[SAMPLE_eater] = 1;
+ goto loop;
+ }
+ if(Cave[y-1][x] == Xdiamond) {
+ Cave[y-1][x] = Ydiamond_eat;
+ Next[y-1][x] = Xblank;
+ play[SAMPLE_eater] = 1;
+ goto loop;
+ }
+ if(Cave[y][x+1] == Xdiamond) {
+ Cave[y][x+1] = Ydiamond_eat;
+ Next[y][x+1] = Xblank;
+ play[SAMPLE_eater] = 1;
+ goto loop;
+ }
+ switch(Cave[y][x+1]) {
+ case Xacid_1:
+ case Xacid_2:
+ case Xacid_3:
+ case Xacid_4:
+ case Xacid_5:
+ case Xacid_6:
+ case Xacid_7:
+ case Xacid_8:
+ Cave[y][x] = Yeater_eB;
+ if(Cave[y-1][x+2] == Xblank) Cave[y-1][x+2] = Yacid_splash_eB;
+ if(Cave[y-1][x] == Xblank) Cave[y-1][x] = Yacid_splash_wB;
+ Next[y][x] = Xblank;
+ PLAY(SAMPLE_acid);
+ goto loop;
+ case Xblank:
+ case Yacid_splash_eB:
+ case Yacid_splash_wB:
+ case Xplant:
+ case Yplant:
+ case Zplayer:
+ Cave[y][x] = Yeater_eB;
+ Cave[y][x+1] = Yeater_e;
+ Next[y][x] = Xblank;
+ Next[y][x+1] = Xeater_e;
+ goto loop;
+ default:
+ Next[y][x] = RANDOM & 1 ? Xeater_n : Xeater_s;
+ PLAY(SAMPLE_eater);
+ goto loop;
+ }
+/* ---------------------------------------------------------------------- */
+ case Xeater_s:
+ if(Cave[y][x-1] == Xdiamond) {
+ Cave[y][x-1] = Ydiamond_eat;
+ Next[y][x-1] = Xblank;
+ play[SAMPLE_eater] = 1;
+ goto loop;
+ }
+ if(Cave[y-1][x] == Xdiamond) {
+ Cave[y-1][x] = Ydiamond_eat;
+ Next[y-1][x] = Xblank;
+ play[SAMPLE_eater] = 1;
+ goto loop;
+ }
+ if(Cave[y][x+1] == Xdiamond) {
+ Cave[y][x+1] = Ydiamond_eat;
+ Next[y][x+1] = Xblank;
+ play[SAMPLE_eater] = 1;
+ goto loop;
+ }
+ if(Cave[y+1][x] == Xdiamond) {
+ Cave[y+1][x] = Ydiamond_eat;
+ Next[y+1][x] = Xblank;
+ play[SAMPLE_eater] = 1;
+ goto loop;
+ }
+ switch(Cave[y+1][x]) {
+ case Xacid_1:
+ case Xacid_2:
+ case Xacid_3:
+ case Xacid_4:
+ case Xacid_5:
+ case Xacid_6:
+ case Xacid_7:
+ case Xacid_8:
+ Cave[y][x] = Yeater_sB;
+ if(Cave[y][x+1] == Xblank) Cave[y][x+1] = Yacid_splash_eB;
+ if(Cave[y][x-1] == Xblank) Cave[y][x-1] = Yacid_splash_wB;
+ Next[y][x] = Xblank;
+ PLAY(SAMPLE_acid);
+ goto loop;
+ case Xblank:
+ case Yacid_splash_eB:
+ case Yacid_splash_wB:
+ case Xplant:
+ case Yplant:
+ case Zplayer:
+ Cave[y][x] = Yeater_sB;
+ Cave[y+1][x] = Yeater_s;
+ Next[y][x] = Xblank;
+ Next[y+1][x] = Xeater_s;
+ goto loop;
+ default:
+ Next[y][x] = RANDOM & 1 ? Xeater_e : Xeater_w;
+ PLAY(SAMPLE_eater);
+ goto loop;
+ }
+/* ---------------------------------------------------------------------- */
+ case Xeater_w:
+ if(Cave[y-1][x] == Xdiamond) {
+ Cave[y-1][x] = Ydiamond_eat;
+ Next[y-1][x] = Xblank;
+ play[SAMPLE_eater] = 1;
+ goto loop;
+ }
+ if(Cave[y][x+1] == Xdiamond) {
+ Cave[y][x+1] = Ydiamond_eat;
+ Next[y][x+1] = Xblank;
+ play[SAMPLE_eater] = 1;
+ goto loop;
+ }
+ if(Cave[y+1][x] == Xdiamond) {
+ Cave[y+1][x] = Ydiamond_eat;
+ Next[y+1][x] = Xblank;
+ play[SAMPLE_eater] = 1;
+ goto loop;
+ }
+ if(Cave[y][x-1] == Xdiamond) {
+ Cave[y][x-1] = Ydiamond_eat;
+ Next[y][x-1] = Xblank;
+ play[SAMPLE_eater] = 1;
+ goto loop;
+ }
+ switch(Cave[y][x-1]) {
+ case Xacid_1:
+ case Xacid_2:
+ case Xacid_3:
+ case Xacid_4:
+ case Xacid_5:
+ case Xacid_6:
+ case Xacid_7:
+ case Xacid_8:
+ Cave[y][x] = Yeater_wB;
+ if(Cave[y-1][x] == Xblank) Cave[y-1][x] = Yacid_splash_eB;
+ if(Cave[y-1][x-2] == Xblank) Cave[y-1][x-2] = Yacid_splash_wB;
+ Next[y][x] = Xblank;
+ PLAY(SAMPLE_acid);
+ goto loop;
+ case Xblank:
+ case Yacid_splash_eB:
+ case Yacid_splash_wB:
+ case Xplant:
+ case Yplant:
+ case Zplayer:
+ Cave[y][x] = Yeater_wB;
+ Cave[y][x-1] = Yeater_w;
+ Next[y][x] = Xblank;
+ Next[y][x-1] = Xeater_w;
+ goto loop;
+ default:
+ Next[y][x] = RANDOM & 1 ? Xeater_n : Xeater_s;
+ PLAY(SAMPLE_eater);
+ goto loop;
+ }
+/* ---------------------------------------------------------------------- */
+ case Xalien:
+ if(lev.wheel_cnt) {
+ dx = lev.wheel_x;
+ dy = lev.wheel_y;
+ } else if(ply1.alive && ply2.alive) {
+ if( (ply1.x > x ? ply1.x - x : x - ply1.x) + (ply1.y > y ? ply1.y - y : y - ply1.y) < (ply2.x > x ? ply2.x - x : x - ply2.x) + (ply2.y > y ? ply2.y - y : y - ply2.y) ) {
+ dx = ply1.x;
+ dy = ply1.y;
+ } else {
+ dx = ply2.x;
+ dy = ply2.y;
+ }
+ } else if(ply1.alive) {
+ dx = ply1.x;
+ dy = ply1.y;
+ } else if(ply2.alive) {
+ dx = ply2.x;
+ dy = ply2.y;
+ } else {
+ dx = 0;
+ dy = 0;
+ }
+ if(RANDOM & 1) {
+ if(y > dy) {
+ switch(Cave[y-1][x]) {
+ case Xacid_1:
+ case Xacid_2:
+ case Xacid_3:
+ case Xacid_4:
+ case Xacid_5:
+ case Xacid_6:
+ case Xacid_7:
+ case Xacid_8:
+ Cave[y][x] = Yalien_nB;
+ if(Cave[y-2][x+1] == Xblank) Cave[y-2][x+1] = Yacid_splash_eB;
+ if(Cave[y-2][x-1] == Xblank) Cave[y-2][x-1] = Yacid_splash_wB;
+ Next[y][x] = Xblank;
+ PLAY(SAMPLE_acid);
+ goto loop;
+ case Xblank:
+ case Yacid_splash_eB:
+ case Yacid_splash_wB:
+ case Xplant:
+ case Yplant:
+ case Zplayer:
+ Cave[y][x] = Yalien_nB;
+ Cave[y-1][x] = Yalien_n;
+ Next[y][x] = Xblank;
+ Next[y-1][x] = Xalien_pause;
+ PLAY(SAMPLE_alien);
+ goto loop;
+ }
+ } else if(y < dy) {
+ switch(Cave[y+1][x]) {
+ case Xacid_1:
+ case Xacid_2:
+ case Xacid_3:
+ case Xacid_4:
+ case Xacid_5:
+ case Xacid_6:
+ case Xacid_7:
+ case Xacid_8:
+ Cave[y][x] = Yalien_sB;
+ Next[y][x] = Xblank;
+ if(Cave[y][x+1] == Xblank) Cave[y][x+1] = Yacid_splash_eB;
+ if(Cave[y][x-1] == Xblank) Cave[y][x-1] = Yacid_splash_wB;
+ PLAY(SAMPLE_acid);
+ goto loop;
+ case Xblank:
+ case Yacid_splash_eB:
+ case Yacid_splash_wB:
+ case Xplant:
+ case Yplant:
+ case Zplayer:
+ Cave[y][x] = Yalien_sB;
+ Cave[y+1][x] = Yalien_s;
+ Next[y][x] = Xblank;
+ Next[y+1][x] = Xalien_pause;
+ PLAY(SAMPLE_alien);
+ goto loop;
+ }
+ }
+ } else {
+ if(x < dx) {
+ switch(Cave[y][x+1]) {
+ case Xacid_1:
+ case Xacid_2:
+ case Xacid_3:
+ case Xacid_4:
+ case Xacid_5:
+ case Xacid_6:
+ case Xacid_7:
+ case Xacid_8:
+ Cave[y][x] = Yalien_eB;
+ if(Cave[y-1][x+2] == Xblank) Cave[y-1][x+2] = Yacid_splash_eB;
+ if(Cave[y-1][x] == Xblank) Cave[y-1][x] = Yacid_splash_wB;
+ Next[y][x] = Xblank;
+ PLAY(SAMPLE_acid);
+ goto loop;
+ case Xblank:
+ case Yacid_splash_eB:
+ case Yacid_splash_wB:
+ case Xplant:
+ case Yplant:
+ case Zplayer:
+ Cave[y][x] = Yalien_eB;
+ Cave[y][x+1] = Yalien_e;
+ Next[y][x] = Xblank;
+ Next[y][x+1] = Xalien_pause;
+ PLAY(SAMPLE_alien);
+ goto loop;
+ }
+ } else if(x > dx) {
+ switch(Cave[y][x-1]) {
+ case Xacid_1:
+ case Xacid_2:
+ case Xacid_3:
+ case Xacid_4:
+ case Xacid_5:
+ case Xacid_6:
+ case Xacid_7:
+ case Xacid_8:
+ Cave[y][x] = Yalien_wB;
+ if(Cave[y-1][x] == Xblank) Cave[y-1][x] = Yacid_splash_eB;
+ if(Cave[y-1][x-2] == Xblank) Cave[y-1][x-2] = Yacid_splash_wB;
+ Next[y][x] = Xblank;
+ PLAY(SAMPLE_acid);
+ goto loop;
+ case Xblank:
+ case Yacid_splash_eB:
+ case Yacid_splash_wB:
+ case Xplant:
+ case Yplant:
+ case Zplayer:
+ Cave[y][x] = Yalien_wB;
+ Cave[y][x-1] = Yalien_w;
+ Next[y][x] = Xblank;
+ Next[y][x-1] = Xalien_pause;
+ PLAY(SAMPLE_alien);
+ goto loop;
+ }
+ }
+ }
+ goto loop;
+ case Xalien_pause:
+ Next[y][x] = Xalien;
+ goto loop;
+/* ---------------------------------------------------------------------- */
+ case Xemerald:
+ switch(Cave[y+1][x]) {
+ case Xacid_1:
+ case Xacid_2:
+ case Xacid_3:
+ case Xacid_4:
+ case Xacid_5:
+ case Xacid_6:
+ case Xacid_7:
+ case Xacid_8:
+ Cave[y][x] = Yemerald_sB;
+ if(Cave[y][x+1] == Xblank) Cave[y][x+1] = Yacid_splash_eB;
+ if(Cave[y][x-1] == Xblank) Cave[y][x-1] = Yacid_splash_wB;
+ Next[y][x] = Xblank;
+ PLAY(SAMPLE_acid);
+ goto loop;
+ case Xblank:
+ case Yacid_splash_eB:
+ case Yacid_splash_wB:
+ Cave[y][x] = Yemerald_sB;
+ Cave[y+1][x] = Yemerald_s;
+ Next[y][x] = Xblank;
+ Next[y+1][x] = Xemerald_fall;
+ goto loop;
+ case Xspring:
+ case Xspring_pause:
+ case Xspring_e:
+ case Xspring_w:
+ case Xandroid:
+ case Xandroid_1_n:
+ case Xandroid_2_n:
+ case Xandroid_1_e:
+ case Xandroid_2_e:
+ case Xandroid_1_s:
+ case Xandroid_2_s:
+ case Xandroid_1_w:
+ case Xandroid_2_w:
+ case Xstone:
+ case Xstone_pause:
+ case Xemerald:
+ case Xemerald_pause:
+ case Xdiamond:
+ case Xdiamond_pause:
+ case Xbomb:
+ case Xbomb_pause:
+ case Xballoon:
+ case Xacid_ne:
+ case Xacid_nw:
+ case Xball_1:
+ case Xball_2:
+ case Xnut:
+ case Xnut_pause:
+ case Xgrow_ns:
+ case Xgrow_ew:
+ case Xwonderwall:
+ case Xkey_1:
+ case Xkey_2:
+ case Xkey_3:
+ case Xkey_4:
+ case Xkey_5:
+ case Xkey_6:
+ case Xkey_7:
+ case Xkey_8:
+ case Xbumper:
+ case Xswitch:
+ case Xsteel_1:
+ case Xsteel_2:
+ case Xsteel_3:
+ case Xsteel_4:
+ case Xwall_1:
+ case Xwall_2:
+ case Xwall_3:
+ case Xwall_4:
+ case Xround_wall_1:
+ case Xround_wall_2:
+ case Xround_wall_3:
+ case Xround_wall_4:
+ if(RANDOM & 1) {
+ if(tab_blank[Cave[y][x+1]] && tab_acid[Cave[y+1][x+1]]) {
+ Cave[y][x] = Yemerald_eB;
+ Cave[y][x+1] = Yemerald_e;
+ Next[y][x] = Xblank;
+ Next[y][x+1] = Xemerald_pause;
+ goto loop;
+ }
+ if(tab_blank[Cave[y][x-1]] && tab_acid[Cave[y+1][x-1]]) {
+ Cave[y][x] = Yemerald_wB;
+ Cave[y][x-1] = Yemerald_w;
+ Next[y][x] = Xblank;
+ Next[y][x-1] = Xemerald_pause;
+ goto loop;
+ }
+ } else {
+ if(tab_blank[Cave[y][x-1]] && tab_acid[Cave[y+1][x-1]]) {
+ Cave[y][x] = Yemerald_wB;
+ Cave[y][x-1] = Yemerald_w;
+ Next[y][x] = Xblank;
+ Next[y][x-1] = Xemerald_pause;
+ goto loop;
+ }
+ if(tab_blank[Cave[y][x+1]] && tab_acid[Cave[y+1][x+1]]) {
+ Cave[y][x] = Yemerald_eB;
+ Cave[y][x+1] = Yemerald_e;
+ Next[y][x] = Xblank;
+ Next[y][x+1] = Xemerald_pause;
+ goto loop;
+ }
+ }
+ default:
+ if(++lev.shine_cnt > 50) {
+ lev.shine_cnt = RANDOM & 7;
+ Cave[y][x] = Xemerald_shine;
+ }
+ goto loop;
+ }
+/* ---------------------------------------------------------------------- */
+ case Xemerald_pause:
+ switch(Cave[y+1][x]) {
+ case Xacid_1:
+ case Xacid_2:
+ case Xacid_3:
+ case Xacid_4:
+ case Xacid_5:
+ case Xacid_6:
+ case Xacid_7:
+ case Xacid_8:
+ Cave[y][x] = Yemerald_sB;
+ if(Cave[y][x+1] == Xblank) Cave[y][x+1] = Yacid_splash_eB;
+ if(Cave[y][x-1] == Xblank) Cave[y][x-1] = Yacid_splash_wB;
+ Next[y][x] = Xblank;
+ PLAY(SAMPLE_acid);
+ goto loop;
+ case Xblank:
+ case Yacid_splash_eB:
+ case Yacid_splash_wB:
+ Cave[y][x] = Yemerald_sB;
+ Cave[y+1][x] = Yemerald_s;
+ Next[y][x] = Xblank;
+ Next[y+1][x] = Xemerald_fall;
+ goto loop;
+ default:
+ Cave[y][x] = Xemerald;
+ Next[y][x] = Xemerald;
+ goto loop;
+ }
+/* ---------------------------------------------------------------------- */
+ case Xemerald_fall:
+ switch(Cave[y+1][x]) {
+ case Xacid_1:
+ case Xacid_2:
+ case Xacid_3:
+ case Xacid_4:
+ case Xacid_5:
+ case Xacid_6:
+ case Xacid_7:
+ case Xacid_8:
+ Cave[y][x] = Yemerald_sB;
+ if(Cave[y][x+1] == Xblank) Cave[y][x+1] = Yacid_splash_eB;
+ if(Cave[y][x-1] == Xblank) Cave[y][x-1] = Yacid_splash_wB;
+ Next[y][x] = Xblank;
+ PLAY(SAMPLE_acid);
+ goto loop;
+ case Xblank:
+ case Yacid_splash_eB:
+ case Yacid_splash_wB:
+ case Zplayer:
+ Cave[y][x] = Yemerald_sB;
+ Cave[y+1][x] = Yemerald_s;
+ Next[y][x] = Xblank;
+ Next[y+1][x] = Xemerald_fall;
+ goto loop;
+ case Xwonderwall:
+ if(lev.wonderwall_time) {
+ lev.wonderwall_state = 1;
+ Cave[y][x] = Yemerald_sB;
+ if(tab_blank[Cave[y+2][x]]) {
+ Cave[y+2][x] = Ydiamond_s;
+ Next[y+2][x] = Xdiamond_fall;
+ }
+ Next[y][x] = Xblank;
+ play[SAMPLE_squash] = 1;
+ goto loop;
+ }
+ default:
+ Cave[y][x] = Xemerald;
+ Next[y][x] = Xemerald;
+ PLAY(SAMPLE_diamond);
+ goto loop;
+ }
+/* ---------------------------------------------------------------------- */
+ case Xdiamond:
+ switch(Cave[y+1][x]) {
+ case Xacid_1:
+ case Xacid_2:
+ case Xacid_3:
+ case Xacid_4:
+ case Xacid_5:
+ case Xacid_6:
+ case Xacid_7:
+ case Xacid_8:
+ Cave[y][x] = Ydiamond_sB;
+ if(Cave[y][x+1] == Xblank) Cave[y][x+1] = Yacid_splash_eB;
+ if(Cave[y][x-1] == Xblank) Cave[y][x-1] = Yacid_splash_wB;
+ Next[y][x] = Xblank;
+ PLAY(SAMPLE_acid);
+ goto loop;
+ case Xblank:
+ case Yacid_splash_eB:
+ case Yacid_splash_wB:
+ Cave[y][x] = Ydiamond_sB;
+ Cave[y+1][x] = Ydiamond_s;
+ Next[y][x] = Xblank;
+ Next[y+1][x] = Xdiamond_fall;
+ goto loop;
+ case Xspring:
+ case Xspring_pause:
+ case Xspring_e:
+ case Xspring_w:
+ case Xandroid:
+ case Xandroid_1_n:
+ case Xandroid_2_n:
+ case Xandroid_1_e:
+ case Xandroid_2_e:
+ case Xandroid_1_s:
+ case Xandroid_2_s:
+ case Xandroid_1_w:
+ case Xandroid_2_w:
+ case Xstone:
+ case Xstone_pause:
+ case Xemerald:
+ case Xemerald_pause:
+ case Xdiamond:
+ case Xdiamond_pause:
+ case Xbomb:
+ case Xbomb_pause:
+ case Xballoon:
+ case Xacid_ne:
+ case Xacid_nw:
+ case Xball_1:
+ case Xball_2:
+ case Xnut:
+ case Xnut_pause:
+ case Xgrow_ns:
+ case Xgrow_ew:
+ case Xwonderwall:
+ case Xkey_1:
+ case Xkey_2:
+ case Xkey_3:
+ case Xkey_4:
+ case Xkey_5:
+ case Xkey_6:
+ case Xkey_7:
+ case Xkey_8:
+ case Xbumper:
+ case Xswitch:
+ case Xsteel_1:
+ case Xsteel_2:
+ case Xsteel_3:
+ case Xsteel_4:
+ case Xwall_1:
+ case Xwall_2:
+ case Xwall_3:
+ case Xwall_4:
+ case Xround_wall_1:
+ case Xround_wall_2:
+ case Xround_wall_3:
+ case Xround_wall_4:
+ if(RANDOM & 1) {
+ if(tab_blank[Cave[y][x+1]] && tab_acid[Cave[y+1][x+1]]) {
+ Cave[y][x] = Ydiamond_eB;
+ Cave[y][x+1] = Ydiamond_e;
+ Next[y][x] = Xblank;
+ Next[y][x+1] = Xdiamond_pause;
+ goto loop;
+ }
+ if(tab_blank[Cave[y][x-1]] && tab_acid[Cave[y+1][x-1]]) {
+ Cave[y][x] = Ydiamond_wB;
+ Cave[y][x-1] = Ydiamond_w;
+ Next[y][x] = Xblank;
+ Next[y][x-1] = Xdiamond_pause;
+ goto loop;
+ }
+ } else {
+ if(tab_blank[Cave[y][x-1]] && tab_acid[Cave[y+1][x-1]]) {
+ Cave[y][x] = Ydiamond_wB;
+ Cave[y][x-1] = Ydiamond_w;
+ Next[y][x] = Xblank;
+ Next[y][x-1] = Xdiamond_pause;
+ goto loop;
+ }
+ if(tab_blank[Cave[y][x+1]] && tab_acid[Cave[y+1][x+1]]) {
+ Cave[y][x] = Ydiamond_eB;
+ Cave[y][x+1] = Ydiamond_e;
+ Next[y][x] = Xblank;
+ Next[y][x+1] = Xdiamond_pause;
+ goto loop;
+ }
+ }
+ default:
+ if(++lev.shine_cnt > 50) {
+ lev.shine_cnt = RANDOM & 7;
+ Cave[y][x] = Xdiamond_shine;
+ }
+ goto loop;
+ }
+/* ---------------------------------------------------------------------- */
+ case Xdiamond_pause:
+ switch(Cave[y+1][x]) {
+ case Xacid_1:
+ case Xacid_2:
+ case Xacid_3:
+ case Xacid_4:
+ case Xacid_5:
+ case Xacid_6:
+ case Xacid_7:
+ case Xacid_8:
+ Cave[y][x] = Ydiamond_sB;
+ if(Cave[y][x+1] == Xblank) Cave[y][x+1] = Yacid_splash_eB;
+ if(Cave[y][x-1] == Xblank) Cave[y][x-1] = Yacid_splash_wB;
+ Next[y][x] = Xblank;
+ PLAY(SAMPLE_acid);
+ goto loop;
+ case Xblank:
+ case Yacid_splash_eB:
+ case Yacid_splash_wB:
+ Cave[y][x] = Ydiamond_sB;
+ Cave[y+1][x] = Ydiamond_s;
+ Next[y][x] = Xblank;
+ Next[y+1][x] = Xdiamond_fall;
+ goto loop;
+ default:
+ Cave[y][x] = Xdiamond;
+ Next[y][x] = Xdiamond;
+ goto loop;
+ }
+/* ---------------------------------------------------------------------- */
+ case Xdiamond_fall:
+ switch(Cave[y+1][x]) {
+ case Xacid_1:
+ case Xacid_2:
+ case Xacid_3:
+ case Xacid_4:
+ case Xacid_5:
+ case Xacid_6:
+ case Xacid_7:
+ case Xacid_8:
+ Cave[y][x] = Ydiamond_sB;
+ if(Cave[y][x+1] == Xblank) Cave[y][x+1] = Yacid_splash_eB;
+ if(Cave[y][x-1] == Xblank) Cave[y][x-1] = Yacid_splash_wB;
+ Next[y][x] = Xblank;
+ PLAY(SAMPLE_acid);
+ goto loop;
+ case Xblank:
+ case Yacid_splash_eB:
+ case Yacid_splash_wB:
+ case Zplayer:
+ Cave[y][x] = Ydiamond_sB;
+ Cave[y+1][x] = Ydiamond_s;
+ Next[y][x] = Xblank;
+ Next[y+1][x] = Xdiamond_fall;
+ goto loop;
+ case Xwonderwall:
+ if(lev.wonderwall_time) {
+ lev.wonderwall_state = 1;
+ Cave[y][x] = Ydiamond_sB;
+ if(tab_blank[Cave[y+2][x]]) {
+ Cave[y+2][x] = Ystone_s;
+ Next[y+2][x] = Xstone_fall;
+ }
+ Next[y][x] = Xblank;
+ play[SAMPLE_squash] = 1;
+ goto loop;
+ }
+ default:
+ Cave[y][x] = Xdiamond;
+ Next[y][x] = Xdiamond;
+ PLAY(SAMPLE_diamond);
+ goto loop;
+ }
+/* ---------------------------------------------------------------------- */
+ case Xdrip_fall:
+ switch(Cave[y+1][x]) {
+ case Xacid_1:
+ case Xacid_2:
+ case Xacid_3:
+ case Xacid_4:
+ case Xacid_5:
+ case Xacid_6:
+ case Xacid_7:
+ case Xacid_8:
+ Cave[y][x] = Ydrip_s1B;
+ if(Cave[y][x+1] == Xblank) Cave[y][x+1] = Yacid_splash_eB;
+ if(Cave[y][x-1] == Xblank) Cave[y][x-1] = Yacid_splash_wB;
+ Next[y][x] = Xdrip_stretchB;
+ PLAY(SAMPLE_acid);
+ goto loop;
+ case Xblank:
+ case Yacid_splash_eB:
+ case Yacid_splash_wB:
+ case Xplant:
+ case Yplant:
+ case Zplayer:
+ Cave[y][x] = Ydrip_s1B;
+ Cave[y+1][x] = Ydrip_s1;
+ Next[y][x] = Xdrip_stretchB;
+ Next[y+1][x] = Xdrip_stretch;
+ goto loop;
+ default:
+ switch(RANDOM & 7) {
+ case 0: temp = Xameuba_1; break;
+ case 1: temp = Xameuba_2; break;
+ case 2: temp = Xameuba_3; break;
+ case 3: temp = Xameuba_4; break;
+ case 4: temp = Xameuba_5; break;
+ case 5: temp = Xameuba_6; break;
+ case 6: temp = Xameuba_7; break;
+ case 7: temp = Xameuba_8; break;
+ }
+ Cave[y][x] = temp;
+ Next[y][x] = temp;
+ play[SAMPLE_drip] = 1;
+ goto loop;
+ }
+/* ---------------------------------------------------------------------- */
+ case Xdrip_stretch:
+ Cave[y][x] = Ydrip_s2;
+ Next[y][x] = Xdrip_fall;
+ goto loop;
+ case Xdrip_stretchB:
+ Cave[y][x] = Ydrip_s2B;
+ Next[y][x] = Xblank;
+ goto loop;
+ case Xdrip_eat:
+ Next[y][x] = Xdrip_fall;
+ goto loop;
+/* ---------------------------------------------------------------------- */
+ case Xbomb:
+ switch(Cave[y+1][x]) {
+ case Xacid_1:
+ case Xacid_2:
+ case Xacid_3:
+ case Xacid_4:
+ case Xacid_5:
+ case Xacid_6:
+ case Xacid_7:
+ case Xacid_8:
+ Cave[y][x] = Ybomb_sB;
+ if(Cave[y][x+1] == Xblank) Cave[y][x+1] = Yacid_splash_eB;
+ if(Cave[y][x-1] == Xblank) Cave[y][x-1] = Yacid_splash_wB;
+ Next[y][x] = Xblank;
+ PLAY(SAMPLE_acid);
+ goto loop;
+ case Xblank:
+ case Yacid_splash_eB:
+ case Yacid_splash_wB:
+ Cave[y][x] = Ybomb_sB;
+ Cave[y+1][x] = Ybomb_s;
+ Next[y][x] = Xblank;
+ Next[y+1][x] = Xbomb_fall;
+ goto loop;
+ case Xspring:
+ case Xspring_pause:
+ case Xspring_e:
+ case Xspring_w:
+ case Xandroid:
+ case Xandroid_1_n:
+ case Xandroid_2_n:
+ case Xandroid_1_e:
+ case Xandroid_2_e:
+ case Xandroid_1_s:
+ case Xandroid_2_s:
+ case Xandroid_1_w:
+ case Xandroid_2_w:
+ case Xstone:
+ case Xstone_pause:
+ case Xemerald:
+ case Xemerald_pause:
+ case Xdiamond:
+ case Xdiamond_pause:
+ case Xbomb:
+ case Xbomb_pause:
+ case Xballoon:
+ case Xacid_ne:
+ case Xacid_nw:
+ case Xball_1:
+ case Xball_2:
+ case Xnut:
+ case Xnut_pause:
+ case Xgrow_ns:
+ case Xgrow_ew:
+ case Xkey_1:
+ case Xkey_2:
+ case Xkey_3:
+ case Xkey_4:
+ case Xkey_5:
+ case Xkey_6:
+ case Xkey_7:
+ case Xkey_8:
+ case Xbumper:
+ case Xswitch:
+ case Xround_wall_1:
+ case Xround_wall_2:
+ case Xround_wall_3:
+ case Xround_wall_4:
+ if(RANDOM & 1) {
+ if(tab_blank[Cave[y][x+1]] && tab_acid[Cave[y+1][x+1]]) {
+ Cave[y][x] = Ybomb_eB;
+ Cave[y][x+1] = Ybomb_e;
+ Next[y][x] = Xblank;
+ Next[y][x+1] = Xbomb_pause;
+ goto loop;
+ }
+ if(tab_blank[Cave[y][x-1]] && tab_acid[Cave[y+1][x-1]]) {
+ Cave[y][x] = Ybomb_wB;
+ Cave[y][x-1] = Ybomb_w;
+ Next[y][x] = Xblank;
+ Next[y][x-1] = Xbomb_pause;
+ goto loop;
+ }
+ } else {
+ if(tab_blank[Cave[y][x-1]] && tab_acid[Cave[y+1][x-1]]) {
+ Cave[y][x] = Ybomb_wB;
+ Cave[y][x-1] = Ybomb_w;
+ Next[y][x] = Xblank;
+ Next[y][x-1] = Xbomb_pause;
+ goto loop;
+ }
+ if(tab_blank[Cave[y][x+1]] && tab_acid[Cave[y+1][x+1]]) {
+ Cave[y][x] = Ybomb_eB;
+ Cave[y][x+1] = Ybomb_e;
+ Next[y][x] = Xblank;
+ Next[y][x+1] = Xbomb_pause;
+ goto loop;
+ }
+ }
+ default:
+ goto loop;
+ }
+/* ---------------------------------------------------------------------- */
+ case Xbomb_pause:
+ switch(Cave[y+1][x]) {
+ case Xacid_1:
+ case Xacid_2:
+ case Xacid_3:
+ case Xacid_4:
+ case Xacid_5:
+ case Xacid_6:
+ case Xacid_7:
+ case Xacid_8:
+ Cave[y][x] = Ybomb_sB;
+ if(Cave[y][x+1] == Xblank) Cave[y][x+1] = Yacid_splash_eB;
+ if(Cave[y][x-1] == Xblank) Cave[y][x-1] = Yacid_splash_wB;
+ Next[y][x] = Xblank;
+ PLAY(SAMPLE_acid);
+ goto loop;
+ case Xblank:
+ case Yacid_splash_eB:
+ case Yacid_splash_wB:
+ Cave[y][x] = Ybomb_sB;
+ Cave[y+1][x] = Ybomb_s;
+ Next[y][x] = Xblank;
+ Next[y+1][x] = Xbomb_fall;
+ goto loop;
+ default:
+ Cave[y][x] = Xbomb;
+ Next[y][x] = Xbomb;
+ goto loop;
+ }
+/* ---------------------------------------------------------------------- */
+ case Xbomb_fall:
+ switch(Cave[y+1][x]) {
+ case Xacid_1:
+ case Xacid_2:
+ case Xacid_3:
+ case Xacid_4:
+ case Xacid_5:
+ case Xacid_6:
+ case Xacid_7:
+ case Xacid_8:
+ Cave[y][x] = Ybomb_sB;
+ if(Cave[y][x+1] == Xblank) Cave[y][x+1] = Yacid_splash_eB;
+ if(Cave[y][x-1] == Xblank) Cave[y][x-1] = Yacid_splash_wB;
+ Next[y][x] = Xblank;
+ PLAY(SAMPLE_acid);
+ goto loop;
+ case Xblank:
+ case Yacid_splash_eB:
+ case Yacid_splash_wB:
+ Cave[y][x] = Ybomb_sB;
+ Cave[y+1][x] = Ybomb_s;
+ Next[y][x] = Xblank;
+ Next[y+1][x] = Xbomb_fall;
+ goto loop;
+ default:
+ Cave[y][x] = Ybomb_eat;
+ Next[y][x] = Znormal;
+ Boom[y-1][x-1] = Xblank;
+ Boom[y-1][x] = Xblank;
+ Boom[y-1][x+1] = Xblank;
+ Boom[y][x-1] = Xblank;
+ Boom[y][x] = Xblank;
+ Boom[y][x+1] = Xblank;
+ Boom[y+1][x-1] = Xblank;
+ Boom[y+1][x] = Xblank;
+ Boom[y+1][x+1] = Xblank;
+ goto loop;
+ }
+/* ---------------------------------------------------------------------- */
+ case Xballoon:
+ if(lev.wind_cnt == 0) goto loop;
+ switch(lev.wind_direction) {
+ case 0: /* north */
+ switch(Cave[y-1][x]) {
+ case Xacid_1:
+ case Xacid_2:
+ case Xacid_3:
+ case Xacid_4:
+ case Xacid_5:
+ case Xacid_6:
+ case Xacid_7:
+ case Xacid_8:
+ Cave[y][x] = Yballoon_nB;
+ if(Cave[y-2][x+1] == Xblank) Cave[y-2][x+1] = Yacid_splash_eB;
+ if(Cave[y-2][x-1] == Xblank) Cave[y-2][x-1] = Yacid_splash_wB;
+ Next[y][x] = Xblank;
+ PLAY(SAMPLE_acid);
+ goto loop;
+ case Xblank:
+ case Yacid_splash_eB:
+ case Yacid_splash_wB:
+ Cave[y][x] = Yballoon_nB;
+ Cave[y-1][x] = Yballoon_n;
+ Next[y][x] = Xblank;
+ Next[y-1][x] = Xballoon;
+ goto loop;
+ default:
+ goto loop;
+ }
+ case 1: /* east */
+ switch(Cave[y][x+1]) {
+ case Xacid_1:
+ case Xacid_2:
+ case Xacid_3:
+ case Xacid_4:
+ case Xacid_5:
+ case Xacid_6:
+ case Xacid_7:
+ case Xacid_8:
+ Cave[y][x] = Yballoon_eB;
+ if(Cave[y-1][x+2] == Xblank) Cave[y-1][x+2] = Yacid_splash_eB;
+ if(Cave[y-1][x] == Xblank) Cave[y-1][x] = Yacid_splash_wB;
+ Next[y][x] = Xblank;
+ PLAY(SAMPLE_acid);
+ goto loop;
+ case Xblank:
+ case Yacid_splash_eB:
+ case Yacid_splash_wB:
+ Cave[y][x] = Yballoon_eB;
+ Cave[y][x+1] = Yballoon_e;
+ Next[y][x] = Xblank;
+ Next[y][x+1] = Xballoon;
+ goto loop;
+ default:
+ goto loop;
+ }
+ case 2: /* south */
+ switch(Cave[y+1][x]) {
+ case Xacid_1:
+ case Xacid_2:
+ case Xacid_3:
+ case Xacid_4:
+ case Xacid_5:
+ case Xacid_6:
+ case Xacid_7:
+ case Xacid_8:
+ Cave[y][x] = Yballoon_sB;
+ if(Cave[y][x+1] == Xblank) Cave[y][x+1] = Yacid_splash_eB;
+ if(Cave[y][x-1] == Xblank) Cave[y][x-1] = Yacid_splash_wB;
+ Next[y][x] = Xblank;
+ PLAY(SAMPLE_acid);
+ goto loop;
+ case Xblank:
+ case Yacid_splash_eB:
+ case Yacid_splash_wB:
+ Cave[y][x] = Yballoon_sB;
+ Cave[y+1][x] = Yballoon_s;
+ Next[y][x] = Xblank;
+ Next[y+1][x] = Xballoon;
+ goto loop;
+ default:
+ goto loop;
+ }
+ case 3: /* west */
+ switch(Cave[y][x-1]) {
+ case Xacid_1:
+ case Xacid_2:
+ case Xacid_3:
+ case Xacid_4:
+ case Xacid_5:
+ case Xacid_6:
+ case Xacid_7:
+ case Xacid_8:
+ Cave[y][x] = Yballoon_wB;
+ if(Cave[y-1][x] == Xblank) Cave[y-1][x] = Yacid_splash_eB;
+ if(Cave[y-1][x-2] == Xblank) Cave[y-1][x-2] = Yacid_splash_wB;
+ Next[y][x] = Xblank;
+ PLAY(SAMPLE_acid);
+ goto loop;
+ case Xblank:
+ case Yacid_splash_eB:
+ case Yacid_splash_wB:
+ Cave[y][x] = Yballoon_wB;
+ Cave[y][x-1] = Yballoon_w;
+ Next[y][x] = Xblank;
+ Next[y][x-1] = Xballoon;
+ goto loop;
+ default:
+ goto loop;
+ }
+ }
+/* ---------------------------------------------------------------------- */
+ case Xacid_1:
+ Next[y][x] = Xacid_2;
+ goto loop;
+ case Xacid_2:
+ Next[y][x] = Xacid_3;
+ goto loop;
+ case Xacid_3:
+ Next[y][x] = Xacid_4;
+ goto loop;
+ case Xacid_4:
+ Next[y][x] = Xacid_5;
+ goto loop;
+ case Xacid_5:
+ Next[y][x] = Xacid_6;
+ goto loop;
+ case Xacid_6:
+ Next[y][x] = Xacid_7;
+ goto loop;
+ case Xacid_7:
+ Next[y][x] = Xacid_8;
+ goto loop;
+ case Xacid_8:
+ Next[y][x] = Xacid_1;
+ goto loop;
+/* ---------------------------------------------------------------------- */
+ case Xball_1:
+ if(lev.ball_state == 0) goto loop;
+ Cave[y][x] = Xball_1B;
+ Next[y][x] = Xball_2;
+ if(lev.ball_cnt) goto loop;
+ goto ball_common;
+ case Xball_2:
+ if(lev.ball_state == 0) goto loop;
+ Cave[y][x] = Xball_2B;
+ Next[y][x] = Xball_1;
+ if(lev.ball_cnt) goto loop;
+ goto ball_common;
+ ball_common:
+ play[SAMPLE_ball] = 1;
+ if(lev.ball_random) {
+ switch(RANDOM & 7) {
+ case 0:
+ if(lev.ball_array[lev.ball_pos][0] != Xblank && tab_blank[Cave[y-1][x-1]]) {
+ Cave[y-1][x-1] = Yball_eat;
+ Next[y-1][x-1] = lev.ball_array[lev.ball_pos][0];
+ }
+ break;
+ case 1:
+ if(lev.ball_array[lev.ball_pos][1] != Xblank && tab_blank[Cave[y-1][x]]) {
+ Cave[y-1][x] = Yball_eat;
+ Next[y-1][x] = lev.ball_array[lev.ball_pos][1];
+ }
+ break;
+ case 2:
+ if(lev.ball_array[lev.ball_pos][2] != Xblank && tab_blank[Cave[y-1][x+1]]) {
+ Cave[y-1][x+1] = Yball_eat;
+ Next[y-1][x+1] = lev.ball_array[lev.ball_pos][2];
+ }
+ break;
+ case 3:
+ if(lev.ball_array[lev.ball_pos][3] != Xblank && tab_blank[Cave[y][x-1]]) {
+ Cave[y][x-1] = Yball_eat;
+ Next[y][x-1] = lev.ball_array[lev.ball_pos][3];
+ }
+ break;
+ case 4:
+ if(lev.ball_array[lev.ball_pos][4] != Xblank && tab_blank[Cave[y][x+1]]) {
+ Cave[y][x+1] = Yball_eat;
+ Next[y][x+1] = lev.ball_array[lev.ball_pos][4];
+ }
+ break;
+ case 5:
+ if(lev.ball_array[lev.ball_pos][5] != Xblank && tab_blank[Cave[y+1][x-1]]) {
+ Cave[y+1][x-1] = Yball_eat;
+ Next[y+1][x-1] = lev.ball_array[lev.ball_pos][5];
+ }
+ break;
+ case 6:
+ if(lev.ball_array[lev.ball_pos][6] != Xblank && tab_blank[Cave[y+1][x]]) {
+ Cave[y+1][x] = Yball_eat;
+ Next[y+1][x] = lev.ball_array[lev.ball_pos][6];
+ }
+ break;
+ case 7:
+ if(lev.ball_array[lev.ball_pos][7] != Xblank && tab_blank[Cave[y+1][x+1]]) {
+ Cave[y+1][x+1] = Yball_eat;
+ Next[y+1][x+1] = lev.ball_array[lev.ball_pos][7];
+ }
+ break;
+ }
+ } else {
+ if(lev.ball_array[lev.ball_pos][0] != Xblank && tab_blank[Cave[y-1][x-1]]) {
+ Cave[y-1][x-1] = Yball_eat;
+ Next[y-1][x-1] = lev.ball_array[lev.ball_pos][0];
+ }
+ if(lev.ball_array[lev.ball_pos][1] != Xblank && tab_blank[Cave[y-1][x]]) {
+ Cave[y-1][x] = Yball_eat;
+ Next[y-1][x] = lev.ball_array[lev.ball_pos][1];
+ }
+ if(lev.ball_array[lev.ball_pos][2] != Xblank && tab_blank[Cave[y-1][x+1]]) {
+ Cave[y-1][x+1] = Yball_eat;
+ Next[y-1][x+1] = lev.ball_array[lev.ball_pos][2];
+ }
+ if(lev.ball_array[lev.ball_pos][3] != Xblank && tab_blank[Cave[y][x-1]]) {
+ Cave[y][x-1] = Yball_eat;
+ Next[y][x-1] = lev.ball_array[lev.ball_pos][3];
+ }
+ if(lev.ball_array[lev.ball_pos][4] != Xblank && tab_blank[Cave[y][x+1]]) {
+ Cave[y][x+1] = Yball_eat;
+ Next[y][x+1] = lev.ball_array[lev.ball_pos][4];
+ }
+ if(lev.ball_array[lev.ball_pos][5] != Xblank && tab_blank[Cave[y+1][x-1]]) {
+ Cave[y+1][x-1] = Yball_eat;
+ Next[y+1][x-1] = lev.ball_array[lev.ball_pos][5];
+ }
+ if(lev.ball_array[lev.ball_pos][6] != Xblank && tab_blank[Cave[y+1][x]]) {
+ Cave[y+1][x] = Yball_eat;
+ Next[y+1][x] = lev.ball_array[lev.ball_pos][6];
+ }
+ if(lev.ball_array[lev.ball_pos][7] != Xblank && tab_blank[Cave[y+1][x+1]]) {
+ Cave[y+1][x+1] = Yball_eat;
+ Next[y+1][x+1] = lev.ball_array[lev.ball_pos][7];
+ }
+ }
+ lev.ball_pos = (lev.ball_pos + 1) & 7;
+ goto loop;
+/* ---------------------------------------------------------------------- */
+ case Xgrow_ns:
+ if(tab_blank[Cave[y-1][x]]) {
+ Cave[y-1][x] = Ygrow_ns_eat;
+ Next[y-1][x] = Xgrow_ns;
+ play[SAMPLE_grow] = 1;
+ }
+ if(tab_blank[Cave[y+1][x]]) {
+ Cave[y+1][x] = Ygrow_ns_eat;
+ Next[y+1][x] = Xgrow_ns;
+ play[SAMPLE_grow] = 1;
+ }
+ goto loop;
+ case Xgrow_ew:
+ if(tab_blank[Cave[y][x+1]]) {
+ Cave[y][x+1] = Ygrow_ew_eat;
+ Next[y][x+1] = Xgrow_ew;
+ play[SAMPLE_grow] = 1;
+ }
+ if(tab_blank[Cave[y][x-1]]) {
+ Cave[y][x-1] = Ygrow_ew_eat;
+ Next[y][x-1] = Xgrow_ew;
+ play[SAMPLE_grow] = 1;
+ }
+ goto loop;
+/* ---------------------------------------------------------------------- */
+ case Xwonderwall:
+ if(lev.wonderwall_time && lev.wonderwall_state) {
+ Cave[y][x] = XwonderwallB;
+ play[SAMPLE_wonder] = 1;
+ }
+ goto loop;
+/* ---------------------------------------------------------------------- */
+ case Xexit:
+ if(lev.required > 0) goto loop;
+ temp = RANDOM & 63;
+ if(temp < 21) {
+ Cave[y][x] = Xexit_1;
+ Next[y][x] = Xexit_2;
+ } else if(temp < 42) {
+ Cave[y][x] = Xexit_2;
+ Next[y][x] = Xexit_3;
+ } else {
+ Cave[y][x] = Xexit_3;
+ Next[y][x] = Xexit_1;
+ }
+ goto loop;
+ case Xexit_1:
+ Next[y][x] = Xexit_2;
+ goto loop;
+ case Xexit_2:
+ Next[y][x] = Xexit_3;
+ goto loop;
+ case Xexit_3:
+ Next[y][x] = Xexit_1;
+ goto loop;
+/* ---------------------------------------------------------------------- */
+ case Xdynamite_1:
+ play[SAMPLE_tick] = 1;
+ Next[y][x] = Xdynamite_2;
+ goto loop;
+ case Xdynamite_2:
+ play[SAMPLE_tick] = 1;
+ Next[y][x] = Xdynamite_3;
+ goto loop;
+ case Xdynamite_3:
+ play[SAMPLE_tick] = 1;
+ Next[y][x] = Xdynamite_4;
+ goto loop;
+ case Xdynamite_4:
+ play[SAMPLE_tick] = 1;
+ Next[y][x] = Zdynamite;
+ Boom[y-1][x-1] = Xblank;
+ Boom[y-1][x] = Xblank;
+ Boom[y-1][x+1] = Xblank;
+ Boom[y][x-1] = Xblank;
+ Boom[y][x] = Xblank;
+ Boom[y][x+1] = Xblank;
+ Boom[y+1][x-1] = Xblank;
+ Boom[y+1][x] = Xblank;
+ Boom[y+1][x+1] = Xblank;
+ goto loop;
+/* ---------------------------------------------------------------------- */
+ case Xwheel:
+ if(lev.wheel_cnt && x == lev.wheel_x && y == lev.wheel_y) Cave[y][x] = XwheelB;
+ goto loop;
+/* ---------------------------------------------------------------------- */
+ case Xswitch:
+ if(lev.ball_state) Cave[y][x] = XswitchB;
+ goto loop;
+/* ---------------------------------------------------------------------- */
+ case Xsand_stone:
+ switch(Cave[y+1][x]) {
+ case Xacid_1:
+ case Xacid_2:
+ case Xacid_3:
+ case Xacid_4:
+ case Xacid_5:
+ case Xacid_6:
+ case Xacid_7:
+ case Xacid_8:
+ Cave[y][x] = Xsand_stonesand_3;
+ if(Cave[y][x+1] == Xblank) Cave[y][x+1] = Yacid_splash_eB;
+ if(Cave[y][x-1] == Xblank) Cave[y][x-1] = Yacid_splash_wB;
+ Next[y][x] = Xsand_stonesand_4;
+ PLAY(SAMPLE_acid);
+ goto loop;
+ case Xblank:
+ case Yacid_splash_eB:
+ case Yacid_splash_wB:
+ Cave[y][x] = Xsand_stonesand_3;
+ Cave[y+1][x] = Xsand_stoneout_1;
+ Next[y][x] = Xsand_stonesand_4;
+ Next[y+1][x] = Xsand_stoneout_2;
+ goto loop;
+ case Xsand:
+ Cave[y][x] = Xsand_stonesand_1;
+ Cave[y+1][x] = Xsand_sandstone_1;
+ Next[y][x] = Xsand_stonesand_2;
+ Next[y+1][x] = Xsand_sandstone_2;
+ goto loop;
+ default:
+ goto loop;
+ }
+ case Xsand_stonein_1:
+ Next[y][x] = Xsand_stonein_2;
+ goto loop;
+ case Xsand_stonein_2:
+ Next[y][x] = Xsand_stonein_3;
+ goto loop;
+ case Xsand_stonein_3:
+ Next[y][x] = Xsand_stonein_4;
+ goto loop;
+ case Xsand_stonein_4:
+ Next[y][x] = Xblank;
+ goto loop;
+ case Xsand_stonesand_1:
+ Next[y][x] = Xsand_stonesand_2;
+ goto loop;
+ case Xsand_stonesand_2:
+ Next[y][x] = Xsand_stonesand_3;
+ goto loop;
+ case Xsand_stonesand_3:
+ Next[y][x] = Xsand_stonesand_4;
+ goto loop;
+ case Xsand_stonesand_4:
+ Next[y][x] = Xsand;
+ goto loop;
+ case Xsand_stoneout_1:
+ Next[y][x] = Xsand_stoneout_2;
+ goto loop;
+ case Xsand_stoneout_2:
+ Next[y][x] = Xstone_fall;
+ goto loop;
+ case Xsand_sandstone_1:
+ Next[y][x] = Xsand_sandstone_2;
+ goto loop;
+ case Xsand_sandstone_2:
+ Next[y][x] = Xsand_sandstone_3;
+ goto loop;
+ case Xsand_sandstone_3:
+ Next[y][x] = Xsand_sandstone_4;
+ goto loop;
+ case Xsand_sandstone_4:
+ Next[y][x] = Xsand_stone;
+ goto loop;
+/* ---------------------------------------------------------------------- */
+ case Xdripper:
+ if(lev.lenses_cnt) Cave[y][x] = XdripperB;
+ goto loop;
+/* ---------------------------------------------------------------------- */
+ case Xfake_blank:
+ if(lev.lenses_cnt) Cave[y][x] = Xfake_blankB;
+ goto loop;
+/* ---------------------------------------------------------------------- */
+ case Xfake_grass:
+ if(lev.magnify_cnt) Cave[y][x] = Xfake_grassB;
+ goto loop;
+/* ---------------------------------------------------------------------- */
+ case Xfake_door_1:
+ if(lev.magnify_cnt) Cave[y][x] = Xdoor_1;
+ goto loop;
+ case Xfake_door_2:
+ if(lev.magnify_cnt) Cave[y][x] = Xdoor_2;
+ goto loop;
+ case Xfake_door_3:
+ if(lev.magnify_cnt) Cave[y][x] = Xdoor_3;
+ goto loop;
+ case Xfake_door_4:
+ if(lev.magnify_cnt) Cave[y][x] = Xdoor_4;
+ goto loop;
+ case Xfake_door_5:
+ if(lev.magnify_cnt) Cave[y][x] = Xdoor_5;
+ goto loop;
+ case Xfake_door_6:
+ if(lev.magnify_cnt) Cave[y][x] = Xdoor_6;
+ goto loop;
+ case Xfake_door_7:
+ if(lev.magnify_cnt) Cave[y][x] = Xdoor_7;
+ goto loop;
+ case Xfake_door_8:
+ if(lev.magnify_cnt) Cave[y][x] = Xdoor_8;
+ goto loop;
+/* ---------------------------------------------------------------------- */
+ case Xboom_bug:
+ bug_boom:
+ Next[y][x] = Znormal;
+ Boom[y-1][x-1] = Xemerald;
+ Boom[y-1][x] = Xemerald;
+ Boom[y-1][x+1] = Xemerald;
+ Boom[y][x-1] = Xemerald;
+ Boom[y][x] = Xdiamond;
+ Boom[y][x+1] = Xemerald;
+ Boom[y+1][x-1] = Xemerald;
+ Boom[y+1][x] = Xemerald;
+ Boom[y+1][x+1] = Xemerald;
+ goto loop;
+ case Xboom_bomb:
+ tank_boom:
+ Next[y][x] = Znormal;
+ Boom[y-1][x-1] = Xblank;
+ Boom[y-1][x] = Xblank;
+ Boom[y-1][x+1] = Xblank;
+ Boom[y][x-1] = Xblank;
+ Boom[y][x] = Xblank;
+ Boom[y][x+1] = Xblank;
+ Boom[y+1][x-1] = Xblank;
+ Boom[y+1][x] = Xblank;
+ Boom[y+1][x+1] = Xblank;
+ goto loop;
+ case Xboom_android:
+ case Xboom_1:
+ Next[y][x] = Xboom_2;
+ play[SAMPLE_boom] = 1;
+ goto loop;
+ case Xboom_2:
+ Next[y][x] = Boom[y][x];
+ goto loop;
+/* ---------------------------------------------------------------------- */
+ case ZBORDER:
+ if(++y < HEIGHT - 1) {
+ x = 0;
+ cave_cache = Cave[y];
+ goto loop;
+ }
+ goto done;
+ }
+
+#undef RANDOM
+#undef PLAY
+#undef PLAY_FORCE
+
+done:
+ if(ply1.alive || ply2.alive) lev.score += score; /* only get a score if someone is alive */
+ Random = random;
+ {
+ void *temp = Cave; Cave = Next; Next = Draw; Draw = temp; /* triple buffering */
+ }
+}
+
+#endif
--- /dev/null
+/* third part of synchro.
+ *
+ * handle global elements.
+ *
+ * this should be spread over the frames for reduced cpu load.
+ */
+
+#include "tile.h"
+#include "level.h"
+#include "sample.h"
+
+
+#if defined(TARGET_X11)
+
+void synchro_3(void)
+{
+ register unsigned int x;
+ register unsigned int y;
+ register unsigned int count;
+ register unsigned long random;
+
+/* update variables */
+ if(lev.score > 9999) lev.score = 9999;
+
+ if(lev.time) lev.time--;
+ if(lev.android_move_cnt-- == 0) lev.android_move_cnt = lev.android_move_time;
+ if(lev.android_clone_cnt-- == 0) lev.android_clone_cnt = lev.android_clone_time;
+ if(lev.ball_state) if(lev.ball_cnt-- == 0) lev.ball_cnt = lev.ball_time;
+ if(lev.lenses_cnt) lev.lenses_cnt--;
+ if(lev.magnify_cnt) lev.magnify_cnt--;
+ if(lev.wheel_cnt) lev.wheel_cnt--;
+ if(lev.wind_cnt) lev.wind_cnt--;
+ if(lev.wonderwall_time && lev.wonderwall_state) lev.wonderwall_time--;
+
+ if(lev.time > 0 && lev.time <= 50 && lev.time % 5 == 0) play[SAMPLE_time] = 1;
+ if(lev.wheel_cnt) play[SAMPLE_wheel] = 1;
+
+/* grow ameuba */
+ random = Random;
+ for(count = lev.ameuba_time; count--;) {
+ x = (random >> 10) % (WIDTH - 2);
+ y = (random >> 20) % (HEIGHT - 2);
+ switch(Cave[y][x]) {
+ case Xblank:
+ case Yacid_splash_eB:
+ case Yacid_splash_wB:
+ case Xgrass:
+ case Xdirt:
+ case Xsand:
+ case Xplant:
+ case Yplant:
+ if(tab_ameuba[Cave[y-1][x]] || tab_ameuba[Cave[y][x+1]] || tab_ameuba[Cave[y+1][x]] || tab_ameuba[Cave[y][x-1]]) Cave[y][x] = Xdrip_eat;
+ }
+ random = random * 129 + 1;
+ }
+ Random = random;
+
+/* handle explosions */
+ for(y = 1; y < HEIGHT - 1; y++) for(x = 1; x < WIDTH - 1; x++) {
+ switch(Cave[y][x]) {
+ case Znormal:
+ Cave[y][x] = Xboom_1;
+ Cave[y-1][x] = tab_explode_normal[Cave[y-1][x]];
+ Cave[y][x-1] = tab_explode_normal[Cave[y][x-1]];
+ Cave[y][x+1] = tab_explode_normal[Cave[y][x+1]];
+ Cave[y+1][x] = tab_explode_normal[Cave[y+1][x]];
+ Cave[y-1][x-1] = tab_explode_normal[Cave[y-1][x-1]];
+ Cave[y-1][x+1] = tab_explode_normal[Cave[y-1][x+1]];
+ Cave[y+1][x-1] = tab_explode_normal[Cave[y+1][x-1]];
+ Cave[y+1][x+1] = tab_explode_normal[Cave[y+1][x+1]];
+ break;
+ case Zdynamite:
+ Cave[y][x] = Xboom_1;
+ Cave[y-1][x] = tab_explode_dynamite[Cave[y-1][x]];
+ Cave[y][x-1] = tab_explode_dynamite[Cave[y][x-1]];
+ Cave[y][x+1] = tab_explode_dynamite[Cave[y][x+1]];
+ Cave[y+1][x] = tab_explode_dynamite[Cave[y+1][x]];
+ Cave[y-1][x-1] = tab_explode_dynamite[Cave[y-1][x-1]];
+ Cave[y-1][x+1] = tab_explode_dynamite[Cave[y-1][x+1]];
+ Cave[y+1][x-1] = tab_explode_dynamite[Cave[y+1][x-1]];
+ Cave[y+1][x+1] = tab_explode_dynamite[Cave[y+1][x+1]];
+ break;
+ }
+ }
+
+/* triple buffering */
+ for(y = 0; y < HEIGHT; y++) for(x = 0; x < WIDTH; x++) {
+ Next[y][x] = Cave[y][x];
+ }
+}
+
+#endif
--- /dev/null
+/* 2000-04-19T13:26:05Z
+ *
+ * construct some tables to be included directly in emerald mine source.
+ * i made this because dynamically building the tables every time sucks and i
+ * need to be able to easily modify tile.h.
+ *
+ * this is key data which almost everything depends on.
+ *
+ * this is supposed to be fairly easy to read and modify. the tab values
+ * are still hard coded constants but that should be less of a problem to
+ * modify.
+ */
+
+#include <stdio.h>
+#include "tile.h"
+
+
+#if defined(TARGET_X11)
+
+/* ---------------------------------------------------------------------- */
+
+/* 0=stop 1=blank */
+int tile_blank[] = {
+ Xblank, 1,
+ Yacid_splash_eB, 1,
+ Yacid_splash_wB, 1,
+ TILE_MAX
+};
+/* 0=stop 1=acid */
+int tile_acid[] = {
+ Xblank, 1,
+ Yacid_splash_eB, 1,
+ Yacid_splash_wB, 1,
+ Xacid_1, 1,
+ Xacid_2, 1,
+ Xacid_3, 1,
+ Xacid_4, 1,
+ Xacid_5, 1,
+ Xacid_6, 1,
+ Xacid_7, 1,
+ Xacid_8, 1,
+ TILE_MAX
+};
+/* 0=stop 1=ameuba */
+int tile_ameuba[] = {
+ Xdripper, 1,
+ XdripperB, 1,
+ Xameuba_1, 1,
+ Xameuba_2, 1,
+ Xameuba_3, 1,
+ Xameuba_4, 1,
+ Xameuba_5, 1,
+ Xameuba_6, 1,
+ Xameuba_7, 1,
+ Xameuba_8, 1,
+ TILE_MAX
+};
+/* 0=stop 1=move */
+int tile_android_move[] = {
+ Xblank, 1,
+ Yacid_splash_eB, 1,
+ Yacid_splash_wB, 1,
+ Xplant, 1,
+ TILE_MAX
+};
+
+/* ---------------------------------------------------------------------- */
+
+/* explosions: special format */
+/* everything is initially filled with Xboom_1 */
+int tile_explode[] = {
+ ZBORDER,
+ Znormal,
+ Zdynamite,
+ Xboom_bug,
+ Xboom_bomb,
+ Xboom_android,
+ Xandroid,
+ Xandroid_1_n,
+ Xandroid_2_n,
+ Xandroid_1_e,
+ Xandroid_2_e,
+ Xandroid_1_s,
+ Xandroid_2_s,
+ Xandroid_1_w,
+ Xandroid_2_w,
+ Xacid_ne,
+ Xacid_nw,
+ Xacid_s,
+ Xacid_se,
+ Xacid_sw,
+ Xacid_1,
+ Xacid_2,
+ Xacid_3,
+ Xacid_4,
+ Xacid_5,
+ Xacid_6,
+ Xacid_7,
+ Xacid_8,
+ Xdoor_1,
+ Xdoor_2,
+ Xdoor_3,
+ Xdoor_4,
+ Xdoor_5,
+ Xdoor_6,
+ Xdoor_7,
+ Xdoor_8,
+ Xplant,
+ Yplant,
+ Xfake_door_1,
+ Xfake_door_2,
+ Xfake_door_3,
+ Xfake_door_4,
+ Xfake_door_5,
+ Xfake_door_6,
+ Xfake_door_7,
+ Xfake_door_8,
+ Xsteel_1,
+ Xsteel_2,
+ Xsteel_3,
+ Xsteel_4,
+ TILE_MAX, /* up till here are indestructable */
+ Xbug_n, Xboom_bug,
+ Xbug_e, Xboom_bug,
+ Xbug_s, Xboom_bug,
+ Xbug_w, Xboom_bug,
+ Xbug_gon, Xboom_bug,
+ Xbug_goe, Xboom_bug,
+ Xbug_gos, Xboom_bug,
+ Xbug_gow, Xboom_bug,
+ Xbomb, Xboom_bomb,
+ Xbomb_pause, Xboom_bomb,
+ Xbomb_fall, Xboom_bomb,
+ TILE_MAX, /* up till here are special explosions */
+ Xandroid, Xboom_android,
+ Xandroid_1_n, Xboom_android,
+ Xandroid_2_n, Xboom_android,
+ Xandroid_1_e, Xboom_android,
+ Xandroid_2_e, Xboom_android,
+ Xandroid_1_s, Xboom_android,
+ Xandroid_2_s, Xboom_android,
+ Xandroid_1_w, Xboom_android,
+ Xandroid_2_w, Xboom_android,
+ TILE_MAX /* up until here are dynamite explosions */
+};
+
+/* ---------------------------------------------------------------------- */
+
+/* map the graphics file to internal tiles and animations
+ *
+ * one graphics icon maps to many tiles and animations
+ */
+
+int obj_map[] = {
+
+/* special */
+
+Ystone_sB,7 ,
+Xsand_stonein_4,7 ,
+-1,
+Xsand_stonein_4,5 ,
+Xsand_stonein_4,6 ,
+-1,
+Ystone_sB,6 ,
+Xsand_stonein_4,3 ,
+Xsand_stonein_4,4 ,
+-1,
+Xsand_stonein_4,1 ,
+Xsand_stonein_4,2 ,
+-1,
+Ystone_sB,5 ,
+Xsand_stonein_3,7 ,
+Xsand_stonein_4,0 ,
+-1,
+Xsand_stonein_3,5 ,
+Xsand_stonein_3,6 ,
+-1,
+Ystone_sB,4 ,
+Xsand_stonein_3,3 ,
+Xsand_stonein_3,4 ,
+-1,
+Xsand_stonein_3,1 ,
+Xsand_stonein_3,2 ,
+-1,
+Ystone_sB,3 ,
+Xsand_stonein_2,7 ,
+Xsand_stonein_3,0 ,
+-1,
+Xsand_stonein_2,5 ,
+Xsand_stonein_2,6 ,
+-1,
+Ystone_sB,2 ,
+Xsand_stonein_2,3 ,
+Xsand_stonein_2,4 ,
+-1,
+Xsand_stonein_2,1 ,
+Xsand_stonein_2,2 ,
+-1,
+Ystone_sB,1 ,
+Xsand_stonein_1,7 ,
+Xsand_stonein_2,0 ,
+-1,
+Xsand_stonein_1,5 ,
+Xsand_stonein_1,6 ,
+-1,
+Ystone_sB,0 ,
+Xsand_stonein_1,3 ,
+Xsand_stonein_1,4 ,
+-1,
+Xsand_stonein_1,1 ,
+Xsand_stonein_1,2 ,
+-1,
+Xstone,0 ,
+Xstone,1 ,
+Xstone,2 ,
+Xstone,3 ,
+Xstone,4 ,
+Xstone,5 ,
+Xstone,6 ,
+Xstone,7 ,
+Xstone_pause,0 ,
+Xstone_pause,1 ,
+Xstone_pause,2 ,
+Xstone_pause,3 ,
+Xstone_pause,4 ,
+Xstone_pause,5 ,
+Xstone_pause,6 ,
+Xstone_pause,7 ,
+Xstone_fall,0 ,
+Xstone_fall,1 ,
+Xstone_fall,2 ,
+Xstone_fall,3 ,
+Xstone_fall,4 ,
+Xstone_fall,5 ,
+Xstone_fall,6 ,
+Xstone_fall,7 ,
+#ifdef BAD_ROLL
+Xstone_force_e,0 ,
+Xstone_force_e,1 ,
+Xstone_force_e,2 ,
+Xstone_force_e,3 ,
+Xstone_force_e,4 ,
+Xstone_force_e,5 ,
+Xstone_force_e,6 ,
+Xstone_force_e,7 ,
+Xstone_force_w,0 ,
+Xstone_force_w,1 ,
+Xstone_force_w,2 ,
+Xstone_force_w,3 ,
+Xstone_force_w,4 ,
+Xstone_force_w,5 ,
+Xstone_force_w,6 ,
+Xstone_force_w,7 ,
+#endif
+Ystone_s,7 ,
+Xsand_stoneout_2,7 ,
+Xsand_stonein_1,0 ,
+Ystone_e,7 ,
+Ystone_w,7 ,
+Ydiamond_stone,7 ,
+-1,
+-1,
+Ystone_s,6 ,
+Xsand_stoneout_2,6 ,
+-1,
+-1,
+Ystone_s,5 ,
+Xsand_stoneout_2,5 ,
+-1,
+-1,
+Ystone_s,4 ,
+Xsand_stoneout_2,4 ,
+-1,
+Xsand_stoneout_2,3 ,
+-1,
+Ystone_s,3 ,
+Xsand_stoneout_2,2 ,
+-1,
+Xsand_stoneout_2,1 ,
+-1,
+Ystone_s,2 ,
+Xsand_stoneout_2,0 ,
+-1,
+Xsand_stoneout_1,7 ,
+Xsand_stoneout_1,6 ,
+-1,
+Ystone_s,1 ,
+Xsand_stoneout_1,5 ,
+-1,
+Xsand_stoneout_1,4 ,
+Xsand_stoneout_1,3 ,
+-1,
+Ystone_s,0 ,
+Xsand_stoneout_1,2 ,
+-1,
+Xsand_stoneout_1,1 ,
+Xsand_stoneout_1,0 ,
+-1,
+Ynut_sB,7 ,
+-1,
+-1,
+Ynut_sB,6 ,
+-1,
+-1,
+Ynut_sB,5 ,
+-1,
+-1,
+Ynut_sB,4 ,
+-1,
+-1,
+Ynut_sB,3 ,
+-1,
+-1,
+Ynut_sB,2 ,
+-1,
+-1,
+Ynut_sB,1 ,
+-1,
+-1,
+Ynut_sB,0 ,
+-1,
+-1,
+Ynut_s,7 ,
+Ynut_e,7 ,
+Ynut_w,7 ,
+Xnut,0 ,
+Xnut,1 ,
+Xnut,2 ,
+Xnut,3 ,
+Xnut,4 ,
+Xnut,5 ,
+Xnut,6 ,
+Xnut,7 ,
+Xnut_pause,0 ,
+Xnut_pause,1 ,
+Xnut_pause,2 ,
+Xnut_pause,3 ,
+Xnut_pause,4 ,
+Xnut_pause,5 ,
+Xnut_pause,6 ,
+Xnut_pause,7 ,
+Xnut_fall,0 ,
+Xnut_fall,1 ,
+Xnut_fall,2 ,
+Xnut_fall,3 ,
+Xnut_fall,4 ,
+Xnut_fall,5 ,
+Xnut_fall,6 ,
+Xnut_fall,7 ,
+#ifdef BAD_ROLL
+Xnut_force_e,0 ,
+Xnut_force_e,1 ,
+Xnut_force_e,2 ,
+Xnut_force_e,3 ,
+Xnut_force_e,4 ,
+Xnut_force_e,5 ,
+Xnut_force_e,6 ,
+Xnut_force_e,7 ,
+Xnut_force_w,0 ,
+Xnut_force_w,1 ,
+Xnut_force_w,2 ,
+Xnut_force_w,3 ,
+Xnut_force_w,4 ,
+Xnut_force_w,5 ,
+Xnut_force_w,6 ,
+Xnut_force_w,7 ,
+#endif
+-1,
+-1,
+Ynut_s,6 ,
+-1,
+-1,
+Ynut_s,5 ,
+-1,
+-1,
+Ynut_s,4 ,
+-1,
+-1,
+Ynut_s,3 ,
+-1,
+-1,
+Ynut_s,2 ,
+-1,
+-1,
+Ynut_s,1 ,
+-1,
+-1,
+Ynut_s,0 ,
+-1,
+-1,
+
+/* normal */
+
+Xblank,0 ,
+Xblank,1 ,
+Xblank,2 ,
+Xblank,3 ,
+Xblank,4 ,
+Xblank,5 ,
+Xblank,6 ,
+Xblank,7 ,
+Xfake_blank,0 ,
+Xfake_blank,1 ,
+Xfake_blank,2 ,
+Xfake_blank,3 ,
+Xfake_blank,4 ,
+Xfake_blank,5 ,
+Xfake_blank,6 ,
+Xfake_blank,7 ,
+Xdripper,0 ,
+Xdripper,1 ,
+Xdripper,2 ,
+Xdripper,3 ,
+Xdripper,4 ,
+Xdripper,5 ,
+Xdripper,6 ,
+Xdripper,7 ,
+Zplayer,0 ,
+Zplayer,1 ,
+Zplayer,2 ,
+Zplayer,3 ,
+Zplayer,4 ,
+Zplayer,5 ,
+Zplayer,6 ,
+Zplayer,7 ,
+Ydynamite_eat,3 ,
+Ydynamite_eat,4 ,
+Ydynamite_eat,5 ,
+Ydynamite_eat,6 ,
+Ydynamite_eat,7 ,
+-1,
+-1,
+-1,
+-1,
+-1,
+
+Ystone_eB,6 ,
+Ystone_w,0 ,
+-1,
+Ystone_e,6 ,
+Ystone_wB,0 ,
+-1,
+Ystone_eB,5 ,
+Ystone_w,1 ,
+-1,
+Ystone_e,5 ,
+Ystone_wB,1 ,
+-1,
+Ystone_eB,4 ,
+Ystone_w,2 ,
+-1,
+Ystone_e,4 ,
+Ystone_wB,2 ,
+-1,
+Ystone_eB,3 ,
+Ystone_w,3 ,
+-1,
+Ystone_e,3 ,
+Ystone_wB,3 ,
+-1,
+Ystone_eB,2 ,
+Ystone_w,4 ,
+-1,
+Ystone_e,2 ,
+Ystone_wB,4 ,
+-1,
+Ystone_eB,1 ,
+Ystone_w,5 ,
+-1,
+Ystone_e,1 ,
+Ystone_wB,5 ,
+-1,
+Ystone_eB,0 ,
+Ystone_w,6 ,
+-1,
+Ystone_e,0 ,
+Ystone_wB,6 ,
+-1,
+
+Ynut_eB,6 ,
+Ynut_w,0 ,
+-1,
+Ynut_e,6 ,
+Ynut_wB,0 ,
+-1,
+Ynut_eB,5 ,
+Ynut_w,1 ,
+-1,
+Ynut_e,5 ,
+Ynut_wB,1 ,
+-1,
+Ynut_eB,4 ,
+Ynut_w,2 ,
+-1,
+Ynut_e,4 ,
+Ynut_wB,2 ,
+-1,
+Ynut_eB,3 ,
+Ynut_w,3 ,
+-1,
+Ynut_e,3 ,
+Ynut_wB,3 ,
+-1,
+Ynut_eB,2 ,
+Ynut_w,4 ,
+-1,
+Ynut_e,2 ,
+Ynut_wB,4 ,
+-1,
+Ynut_eB,1 ,
+Ynut_w,5 ,
+-1,
+Ynut_e,1 ,
+Ynut_wB,5 ,
+-1,
+Ynut_eB,0 ,
+Ynut_w,6 ,
+-1,
+Ynut_e,0 ,
+Ynut_wB,6 ,
+-1,
+
+Ybug_w_n,7 ,
+Ybug_e_n,7 ,
+Ybug_n,7 ,
+Xbug_n,0 ,
+Xbug_n,1 ,
+Xbug_n,2 ,
+Xbug_n,3 ,
+Xbug_n,4 ,
+Xbug_n,5 ,
+Xbug_n,6 ,
+Xbug_n,7 ,
+Xbug_gon,0 ,
+Xbug_gon,1 ,
+Xbug_gon,2 ,
+Xbug_gon,3 ,
+Xbug_gon,4 ,
+Xbug_gon,5 ,
+Xbug_gon,6 ,
+Xbug_gon,7 ,
+-1,
+Ybug_n_e,7 ,
+Ybug_s_e,7 ,
+Ybug_e,7 ,
+Xbug_e,0 ,
+Xbug_e,1 ,
+Xbug_e,2 ,
+Xbug_e,3 ,
+Xbug_e,4 ,
+Xbug_e,5 ,
+Xbug_e,6 ,
+Xbug_e,7 ,
+Xbug_goe,0 ,
+Xbug_goe,1 ,
+Xbug_goe,2 ,
+Xbug_goe,3 ,
+Xbug_goe,4 ,
+Xbug_goe,5 ,
+Xbug_goe,6 ,
+Xbug_goe,7 ,
+-1,
+Ybug_e_s,7 ,
+Ybug_w_s,7 ,
+Ybug_s,7 ,
+Xbug_s,0 ,
+Xbug_s,1 ,
+Xbug_s,2 ,
+Xbug_s,3 ,
+Xbug_s,4 ,
+Xbug_s,5 ,
+Xbug_s,6 ,
+Xbug_s,7 ,
+Xbug_gos,0 ,
+Xbug_gos,1 ,
+Xbug_gos,2 ,
+Xbug_gos,3 ,
+Xbug_gos,4 ,
+Xbug_gos,5 ,
+Xbug_gos,6 ,
+Xbug_gos,7 ,
+-1,
+Ybug_n_w,7 ,
+Ybug_s_w,7 ,
+Ybug_w,7 ,
+Xbug_w,0 ,
+Xbug_w,1 ,
+Xbug_w,2 ,
+Xbug_w,3 ,
+Xbug_w,4 ,
+Xbug_w,5 ,
+Xbug_w,6 ,
+Xbug_w,7 ,
+Xbug_gow,0 ,
+Xbug_gow,1 ,
+Xbug_gow,2 ,
+Xbug_gow,3 ,
+Xbug_gow,4 ,
+Xbug_gow,5 ,
+Xbug_gow,6 ,
+Xbug_gow,7 ,
+-1,
+Ybug_n,0 ,
+-1,
+Ybug_nB,0 ,
+-1,
+Ybug_n,1 ,
+-1,
+Ybug_nB,1 ,
+-1,
+Ybug_n,2 ,
+-1,
+Ybug_nB,2 ,
+-1,
+Ybug_n,3 ,
+-1,
+Ybug_nB,3 ,
+-1,
+Ybug_n,4 ,
+-1,
+Ybug_nB,4 ,
+-1,
+Ybug_n,5 ,
+-1,
+Ybug_nB,5 ,
+-1,
+Ybug_n,6 ,
+-1,
+Ybug_nB,6 ,
+-1,
+Ybug_eB,6 ,
+-1,
+Ybug_e,6 ,
+-1,
+Ybug_eB,5 ,
+-1,
+Ybug_e,5 ,
+-1,
+Ybug_eB,4 ,
+-1,
+Ybug_e,4 ,
+-1,
+Ybug_eB,3 ,
+-1,
+Ybug_e,3 ,
+-1,
+Ybug_eB,2 ,
+-1,
+Ybug_e,2 ,
+-1,
+Ybug_eB,1 ,
+-1,
+Ybug_e,1 ,
+-1,
+Ybug_eB,0 ,
+-1,
+Ybug_e,0 ,
+-1,
+Ybug_sB,6 ,
+-1,
+Ybug_s,6 ,
+-1,
+Ybug_sB,5 ,
+-1,
+Ybug_s,5 ,
+-1,
+Ybug_sB,4 ,
+-1,
+Ybug_s,4 ,
+-1,
+Ybug_sB,3 ,
+-1,
+Ybug_s,3 ,
+-1,
+Ybug_sB,2 ,
+-1,
+Ybug_s,2 ,
+-1,
+Ybug_sB,1 ,
+-1,
+Ybug_s,1 ,
+-1,
+Ybug_sB,0 ,
+-1,
+Ybug_s,0 ,
+-1,
+Ybug_w,0 ,
+-1,
+Ybug_wB,0 ,
+-1,
+Ybug_w,1 ,
+-1,
+Ybug_wB,1 ,
+-1,
+Ybug_w,2 ,
+-1,
+Ybug_wB,2 ,
+-1,
+Ybug_w,3 ,
+-1,
+Ybug_wB,3 ,
+-1,
+Ybug_w,4 ,
+-1,
+Ybug_wB,4 ,
+-1,
+Ybug_w,5 ,
+-1,
+Ybug_wB,5 ,
+-1,
+Ybug_w,6 ,
+-1,
+Ybug_wB,6 ,
+-1,
+Ybug_n_e,0 ,
+Ybug_e_n,6 ,
+-1,
+Ybug_n_e,1 ,
+Ybug_e_n,5 ,
+-1,
+Ybug_n_e,2 ,
+Ybug_e_n,4 ,
+-1,
+Ybug_n_e,3 ,
+Ybug_e_n,3 ,
+-1,
+Ybug_n_e,4 ,
+Ybug_e_n,2 ,
+-1,
+Ybug_n_e,5 ,
+Ybug_e_n,1 ,
+-1,
+Ybug_n_e,6 ,
+Ybug_e_n,0 ,
+-1,
+Ybug_e_s,0 ,
+Ybug_s_e,6 ,
+-1,
+Ybug_e_s,1 ,
+Ybug_s_e,5 ,
+-1,
+Ybug_e_s,2 ,
+Ybug_s_e,4 ,
+-1,
+Ybug_e_s,3 ,
+Ybug_s_e,3 ,
+-1,
+Ybug_e_s,4 ,
+Ybug_s_e,2 ,
+-1,
+Ybug_e_s,5 ,
+Ybug_s_e,1 ,
+-1,
+Ybug_e_s,6 ,
+Ybug_s_e,0 ,
+-1,
+Ybug_s_w,0 ,
+Ybug_w_s,6 ,
+-1,
+Ybug_s_w,1 ,
+Ybug_w_s,5 ,
+-1,
+Ybug_s_w,2 ,
+Ybug_w_s,4 ,
+-1,
+Ybug_s_w,3 ,
+Ybug_w_s,3 ,
+-1,
+Ybug_s_w,4 ,
+Ybug_w_s,2 ,
+-1,
+Ybug_s_w,5 ,
+Ybug_w_s,1 ,
+-1,
+Ybug_s_w,6 ,
+Ybug_w_s,0 ,
+-1,
+Ybug_n_w,6 ,
+Ybug_w_n,0 ,
+-1,
+Ybug_n_w,5 ,
+Ybug_w_n,1 ,
+-1,
+Ybug_n_w,4 ,
+Ybug_w_n,2 ,
+-1,
+Ybug_n_w,3 ,
+Ybug_w_n,3 ,
+-1,
+Ybug_n_w,2 ,
+Ybug_w_n,4 ,
+-1,
+Ybug_n_w,1 ,
+Ybug_w_n,5 ,
+-1,
+Ybug_n_w,0 ,
+Ybug_w_n,6 ,
+-1,
+Ybug_stone,0 ,
+-1,
+Ybug_stone,1 ,
+-1,
+Ybug_stone,2 ,
+-1,
+Ybug_stone,3 ,
+-1,
+Ybug_stone,4 ,
+-1,
+Ybug_stone,5 ,
+-1,
+Ybug_stone,6 ,
+-1,
+Ybug_spring,0 ,
+-1,
+Ybug_spring,1 ,
+-1,
+Ybug_spring,2 ,
+-1,
+Ybug_spring,3 ,
+-1,
+Ybug_spring,4 ,
+-1,
+Ybug_spring,5 ,
+-1,
+Ybug_spring,6 ,
+-1,
+
+Ytank_w_n,7 ,
+Ytank_e_n,7 ,
+Ytank_n,7 ,
+Xtank_n,0 ,
+Xtank_n,1 ,
+Xtank_n,2 ,
+Xtank_n,3 ,
+Xtank_n,4 ,
+Xtank_n,5 ,
+Xtank_n,6 ,
+Xtank_n,7 ,
+Xtank_gon,0 ,
+Xtank_gon,1 ,
+Xtank_gon,2 ,
+Xtank_gon,3 ,
+Xtank_gon,4 ,
+Xtank_gon,5 ,
+Xtank_gon,6 ,
+Xtank_gon,7 ,
+-1,
+Ytank_n_e,7 ,
+Ytank_s_e,7 ,
+Ytank_e,7 ,
+Xtank_e,0 ,
+Xtank_e,1 ,
+Xtank_e,2 ,
+Xtank_e,3 ,
+Xtank_e,4 ,
+Xtank_e,5 ,
+Xtank_e,6 ,
+Xtank_e,7 ,
+Xtank_goe,0 ,
+Xtank_goe,1 ,
+Xtank_goe,2 ,
+Xtank_goe,3 ,
+Xtank_goe,4 ,
+Xtank_goe,5 ,
+Xtank_goe,6 ,
+Xtank_goe,7 ,
+-1,
+Ytank_e_s,7 ,
+Ytank_w_s,7 ,
+Ytank_s,7 ,
+Xtank_s,0 ,
+Xtank_s,1 ,
+Xtank_s,2 ,
+Xtank_s,3 ,
+Xtank_s,4 ,
+Xtank_s,5 ,
+Xtank_s,6 ,
+Xtank_s,7 ,
+Xtank_gos,0 ,
+Xtank_gos,1 ,
+Xtank_gos,2 ,
+Xtank_gos,3 ,
+Xtank_gos,4 ,
+Xtank_gos,5 ,
+Xtank_gos,6 ,
+Xtank_gos,7 ,
+-1,
+Ytank_n_w,7 ,
+Ytank_s_w,7 ,
+Ytank_w,7 ,
+Xtank_w,0 ,
+Xtank_w,1 ,
+Xtank_w,2 ,
+Xtank_w,3 ,
+Xtank_w,4 ,
+Xtank_w,5 ,
+Xtank_w,6 ,
+Xtank_w,7 ,
+Xtank_gow,0 ,
+Xtank_gow,1 ,
+Xtank_gow,2 ,
+Xtank_gow,3 ,
+Xtank_gow,4 ,
+Xtank_gow,5 ,
+Xtank_gow,6 ,
+Xtank_gow,7 ,
+-1,
+Ytank_n,0 ,
+-1,
+Ytank_nB,0 ,
+-1,
+Ytank_n,1 ,
+-1,
+Ytank_nB,1 ,
+-1,
+Ytank_n,2 ,
+-1,
+Ytank_nB,2 ,
+-1,
+Ytank_n,3 ,
+-1,
+Ytank_nB,3 ,
+-1,
+Ytank_n,4 ,
+-1,
+Ytank_nB,4 ,
+-1,
+Ytank_n,5 ,
+-1,
+Ytank_nB,5 ,
+-1,
+Ytank_n,6 ,
+-1,
+Ytank_nB,6 ,
+-1,
+Ytank_eB,6 ,
+-1,
+Ytank_e,6 ,
+-1,
+Ytank_eB,5 ,
+-1,
+Ytank_e,5 ,
+-1,
+Ytank_eB,4 ,
+-1,
+Ytank_e,4 ,
+-1,
+Ytank_eB,3 ,
+-1,
+Ytank_e,3 ,
+-1,
+Ytank_eB,2 ,
+-1,
+Ytank_e,2 ,
+-1,
+Ytank_eB,1 ,
+-1,
+Ytank_e,1 ,
+-1,
+Ytank_eB,0 ,
+-1,
+Ytank_e,0 ,
+-1,
+Ytank_sB,6 ,
+-1,
+Ytank_s,6 ,
+-1,
+Ytank_sB,5 ,
+-1,
+Ytank_s,5 ,
+-1,
+Ytank_sB,4 ,
+-1,
+Ytank_s,4 ,
+-1,
+Ytank_sB,3 ,
+-1,
+Ytank_s,3 ,
+-1,
+Ytank_sB,2 ,
+-1,
+Ytank_s,2 ,
+-1,
+Ytank_sB,1 ,
+-1,
+Ytank_s,1 ,
+-1,
+Ytank_sB,0 ,
+-1,
+Ytank_s,0 ,
+-1,
+Ytank_w,0 ,
+-1,
+Ytank_wB,0 ,
+-1,
+Ytank_w,1 ,
+-1,
+Ytank_wB,1 ,
+-1,
+Ytank_w,2 ,
+-1,
+Ytank_wB,2 ,
+-1,
+Ytank_w,3 ,
+-1,
+Ytank_wB,3 ,
+-1,
+Ytank_w,4 ,
+-1,
+Ytank_wB,4 ,
+-1,
+Ytank_w,5 ,
+-1,
+Ytank_wB,5 ,
+-1,
+Ytank_w,6 ,
+-1,
+Ytank_wB,6 ,
+-1,
+Ytank_n_e,0 ,
+Ytank_e_n,6 ,
+-1,
+Ytank_n_e,1 ,
+Ytank_e_n,5 ,
+-1,
+Ytank_n_e,2 ,
+Ytank_e_n,4 ,
+-1,
+Ytank_n_e,3 ,
+Ytank_e_n,3 ,
+-1,
+Ytank_n_e,4 ,
+Ytank_e_n,2 ,
+-1,
+Ytank_n_e,5 ,
+Ytank_e_n,1 ,
+-1,
+Ytank_n_e,6 ,
+Ytank_e_n,0 ,
+-1,
+Ytank_e_s,0 ,
+Ytank_s_e,6 ,
+-1,
+Ytank_e_s,1 ,
+Ytank_s_e,5 ,
+-1,
+Ytank_e_s,2 ,
+Ytank_s_e,4 ,
+-1,
+Ytank_e_s,3 ,
+Ytank_s_e,3 ,
+-1,
+Ytank_e_s,4 ,
+Ytank_s_e,2 ,
+-1,
+Ytank_e_s,5 ,
+Ytank_s_e,1 ,
+-1,
+Ytank_e_s,6 ,
+Ytank_s_e,0 ,
+-1,
+Ytank_s_w,0 ,
+Ytank_w_s,6 ,
+-1,
+Ytank_s_w,1 ,
+Ytank_w_s,5 ,
+-1,
+Ytank_s_w,2 ,
+Ytank_w_s,4 ,
+-1,
+Ytank_s_w,3 ,
+Ytank_w_s,3 ,
+-1,
+Ytank_s_w,4 ,
+Ytank_w_s,2 ,
+-1,
+Ytank_s_w,5 ,
+Ytank_w_s,1 ,
+-1,
+Ytank_s_w,6 ,
+Ytank_w_s,0 ,
+-1,
+Ytank_n_w,6 ,
+Ytank_w_n,0 ,
+-1,
+Ytank_n_w,5 ,
+Ytank_w_n,1 ,
+-1,
+Ytank_n_w,4 ,
+Ytank_w_n,2 ,
+-1,
+Ytank_n_w,3 ,
+Ytank_w_n,3 ,
+-1,
+Ytank_n_w,2 ,
+Ytank_w_n,4 ,
+-1,
+Ytank_n_w,1 ,
+Ytank_w_n,5 ,
+-1,
+Ytank_n_w,0 ,
+Ytank_w_n,6 ,
+-1,
+Ytank_stone,0 ,
+-1,
+Ytank_stone,1 ,
+-1,
+Ytank_stone,2 ,
+-1,
+Ytank_stone,3 ,
+-1,
+Ytank_stone,4 ,
+-1,
+Ytank_stone,5 ,
+-1,
+Ytank_stone,6 ,
+-1,
+Ytank_spring,0 ,
+-1,
+Ytank_spring,1 ,
+-1,
+Ytank_spring,2 ,
+-1,
+Ytank_spring,3 ,
+-1,
+Ytank_spring,4 ,
+-1,
+Ytank_spring,5 ,
+-1,
+Ytank_spring,6 ,
+-1,
+
+Yandroid_n,7 ,
+Yandroid_ne,7 ,
+Yandroid_e,7 ,
+Yandroid_se,7 ,
+Yandroid_s,7 ,
+Yandroid_sw,7 ,
+Yandroid_w,7 ,
+Yandroid_nw,7 ,
+Xandroid,7 ,
+Xandroid_1_n,7 ,
+Xandroid_2_n,7 ,
+Xandroid_1_e,7 ,
+Xandroid_2_e,7 ,
+Xandroid_1_w,7 ,
+Xandroid_2_w,7 ,
+Xandroid_1_s,7 ,
+Xandroid_2_s,7 ,
+-1,
+Xandroid,0 ,
+Xandroid_1_n,0 ,
+Xandroid_2_n,0 ,
+Xandroid_1_e,0 ,
+Xandroid_2_e,0 ,
+Xandroid_1_w,0 ,
+Xandroid_2_w,0 ,
+Xandroid_1_s,0 ,
+Xandroid_2_s,0 ,
+-1,
+Xandroid,1 ,
+Xandroid_1_n,1 ,
+Xandroid_2_n,1 ,
+Xandroid_1_e,1 ,
+Xandroid_2_e,1 ,
+Xandroid_1_w,1 ,
+Xandroid_2_w,1 ,
+Xandroid_1_s,1 ,
+Xandroid_2_s,1 ,
+-1,
+Xandroid,2 ,
+Xandroid_1_n,2 ,
+Xandroid_2_n,2 ,
+Xandroid_1_e,2 ,
+Xandroid_2_e,2 ,
+Xandroid_1_w,2 ,
+Xandroid_2_w,2 ,
+Xandroid_1_s,2 ,
+Xandroid_2_s,2 ,
+-1,
+Xandroid,3 ,
+Xandroid_1_n,3 ,
+Xandroid_2_n,3 ,
+Xandroid_1_e,3 ,
+Xandroid_2_e,3 ,
+Xandroid_1_w,3 ,
+Xandroid_2_w,3 ,
+Xandroid_1_s,3 ,
+Xandroid_2_s,3 ,
+-1,
+Xandroid,4 ,
+Xandroid_1_n,4 ,
+Xandroid_2_n,4 ,
+Xandroid_1_e,4 ,
+Xandroid_2_e,4 ,
+Xandroid_1_w,4 ,
+Xandroid_2_w,4 ,
+Xandroid_1_s,4 ,
+Xandroid_2_s,4 ,
+-1,
+Xandroid,5 ,
+Xandroid_1_n,5 ,
+Xandroid_2_n,5 ,
+Xandroid_1_e,5 ,
+Xandroid_2_e,5 ,
+Xandroid_1_w,5 ,
+Xandroid_2_w,5 ,
+Xandroid_1_s,5 ,
+Xandroid_2_s,5 ,
+-1,
+Xandroid,6 ,
+Xandroid_1_n,6 ,
+Xandroid_2_n,6 ,
+Xandroid_1_e,6 ,
+Xandroid_2_e,6 ,
+Xandroid_1_w,6 ,
+Xandroid_2_w,6 ,
+Xandroid_1_s,6 ,
+Xandroid_2_s,6 ,
+-1,
+Yandroid_n,0 ,
+Yandroid_sB,6 ,
+-1,
+Yandroid_nB,0 ,
+Yandroid_s,6 ,
+-1,
+Yandroid_n,1 ,
+Yandroid_sB,5 ,
+-1,
+Yandroid_nB,1 ,
+Yandroid_s,5 ,
+-1,
+Yandroid_n,2 ,
+Yandroid_sB,4 ,
+Xboom_android,0 ,
+-1,
+Yandroid_nB,2 ,
+Yandroid_s,4 ,
+Xboom_android,1 ,
+-1,
+Yandroid_n,3 ,
+Yandroid_sB,3 ,
+Xboom_android,2 ,
+-1,
+Yandroid_nB,3 ,
+Yandroid_s,3 ,
+Xboom_android,3 ,
+-1,
+Yandroid_n,4 ,
+Yandroid_sB,2 ,
+Xboom_android,4 ,
+-1,
+Yandroid_nB,4 ,
+Yandroid_s,2 ,
+Xboom_android,5 ,
+-1,
+Yandroid_n,5 ,
+Yandroid_sB,1 ,
+Xboom_android,6 ,
+-1,
+Yandroid_nB,5 ,
+Yandroid_s,1 ,
+-1,
+Yandroid_n,6 ,
+Yandroid_sB,0 ,
+-1,
+Yandroid_nB,6 ,
+Yandroid_s,0 ,
+-1,
+Yandroid_eB,6 ,
+Yandroid_w,0 ,
+-1,
+Yandroid_e,6 ,
+Yandroid_wB,0 ,
+-1,
+Yandroid_eB,5 ,
+Yandroid_w,1 ,
+-1,
+Yandroid_e,5 ,
+Yandroid_wB,1 ,
+-1,
+Yandroid_eB,4 ,
+Yandroid_w,2 ,
+-1,
+Yandroid_e,4 ,
+Yandroid_wB,2 ,
+-1,
+Yandroid_eB,3 ,
+Yandroid_w,3 ,
+-1,
+Yandroid_e,3 ,
+Yandroid_wB,3 ,
+-1,
+Yandroid_eB,2 ,
+Yandroid_w,4 ,
+-1,
+Yandroid_e,2 ,
+Yandroid_wB,4 ,
+-1,
+Yandroid_eB,1 ,
+Yandroid_w,5 ,
+-1,
+Yandroid_e,1 ,
+Yandroid_wB,5 ,
+-1,
+Yandroid_eB,0 ,
+Yandroid_w,6 ,
+-1,
+Yandroid_e,0 ,
+Yandroid_wB,6 ,
+-1,
+Yandroid_neB,6 ,
+Yandroid_sw,0 ,
+-1,
+Yandroid_ne,6 ,
+Yandroid_swB,0 ,
+-1,
+Yandroid_neB,5 ,
+Yandroid_sw,1 ,
+-1,
+Yandroid_ne,5 ,
+Yandroid_swB,1 ,
+-1,
+Yandroid_neB,4 ,
+Yandroid_sw,2 ,
+-1,
+Yandroid_ne,4 ,
+Yandroid_swB,2 ,
+-1,
+Yandroid_neB,3 ,
+Yandroid_sw,3 ,
+-1,
+Yandroid_ne,3 ,
+Yandroid_swB,3 ,
+-1,
+Yandroid_neB,2 ,
+Yandroid_sw,4 ,
+-1,
+Yandroid_ne,2 ,
+Yandroid_swB,4 ,
+-1,
+Yandroid_neB,1 ,
+Yandroid_sw,5 ,
+-1,
+Yandroid_ne,1 ,
+Yandroid_swB,5 ,
+-1,
+Yandroid_neB,0 ,
+Yandroid_sw,6 ,
+-1,
+Yandroid_ne,0 ,
+Yandroid_swB,6 ,
+-1,
+Yandroid_nw,0 ,
+Yandroid_seB,6 ,
+-1,
+Yandroid_nwB,0 ,
+Yandroid_se,6 ,
+-1,
+Yandroid_nw,1 ,
+Yandroid_seB,5 ,
+-1,
+Yandroid_nwB,1 ,
+Yandroid_se,5 ,
+-1,
+Yandroid_nw,2 ,
+Yandroid_seB,4 ,
+-1,
+Yandroid_nwB,2 ,
+Yandroid_se,4 ,
+-1,
+Yandroid_nw,3 ,
+Yandroid_seB,3 ,
+-1,
+Yandroid_nwB,3 ,
+Yandroid_se,3 ,
+-1,
+Yandroid_nw,4 ,
+Yandroid_seB,2 ,
+-1,
+Yandroid_nwB,4 ,
+Yandroid_se,2 ,
+-1,
+Yandroid_nw,5 ,
+Yandroid_seB,1 ,
+-1,
+Yandroid_nwB,5 ,
+Yandroid_se,1 ,
+-1,
+Yandroid_nw,6 ,
+Yandroid_seB,0 ,
+-1,
+Yandroid_nwB,6 ,
+Yandroid_se,0 ,
+-1,
+
+Yspring_e,7 ,
+Yspring_w,7 ,
+Yspring_kill_e,7 ,
+Yspring_kill_w,7 ,
+Yspring_s,7 ,
+Xspring,0 ,
+Xspring,1 ,
+Xspring,2 ,
+Xspring,3 ,
+Xspring,4 ,
+Xspring,5 ,
+Xspring,6 ,
+Xspring,7 ,
+Xspring_pause,0 ,
+Xspring_pause,1 ,
+Xspring_pause,2 ,
+Xspring_pause,3 ,
+Xspring_pause,4 ,
+Xspring_pause,5 ,
+Xspring_pause,6 ,
+Xspring_pause,7 ,
+Xspring_e,0 ,
+Xspring_e,1 ,
+Xspring_e,2 ,
+Xspring_e,3 ,
+Xspring_e,4 ,
+Xspring_e,5 ,
+Xspring_e,6 ,
+Xspring_e,7 ,
+Xspring_w,0 ,
+Xspring_w,1 ,
+Xspring_w,2 ,
+Xspring_w,3 ,
+Xspring_w,4 ,
+Xspring_w,5 ,
+Xspring_w,6 ,
+Xspring_w,7 ,
+Xspring_fall,0 ,
+Xspring_fall,1 ,
+Xspring_fall,2 ,
+Xspring_fall,3 ,
+Xspring_fall,4 ,
+Xspring_fall,5 ,
+Xspring_fall,6 ,
+Xspring_fall,7 ,
+#ifdef BAD_ROLL
+Xspring_force_e,0 ,
+Xspring_force_e,1 ,
+Xspring_force_e,2 ,
+Xspring_force_e,3 ,
+Xspring_force_e,4 ,
+Xspring_force_e,5 ,
+Xspring_force_e,6 ,
+Xspring_force_e,7 ,
+Xspring_force_w,0 ,
+Xspring_force_w,1 ,
+Xspring_force_w,2 ,
+Xspring_force_w,3 ,
+Xspring_force_w,4 ,
+Xspring_force_w,5 ,
+Xspring_force_w,6 ,
+Xspring_force_w,7 ,
+#endif
+-1,
+Yspring_sB,6 ,
+-1,
+Yspring_s,6 ,
+-1,
+Yspring_sB,5 ,
+-1,
+Yspring_s,5 ,
+-1,
+Yspring_sB,4 ,
+-1,
+Yspring_s,4 ,
+-1,
+Yspring_sB,3 ,
+-1,
+Yspring_s,3 ,
+-1,
+Yspring_sB,2 ,
+-1,
+Yspring_s,2 ,
+-1,
+Yspring_sB,1 ,
+-1,
+Yspring_s,1 ,
+-1,
+Yspring_sB,0 ,
+-1,
+Yspring_s,0 ,
+-1,
+Yspring_eB,6 ,
+Yspring_w,0 ,
+-1,
+Yspring_e,6 ,
+Yspring_wB,0 ,
+-1,
+Yspring_eB,5 ,
+Yspring_w,1 ,
+-1,
+Yspring_e,5 ,
+Yspring_wB,1 ,
+-1,
+Yspring_eB,4 ,
+Yspring_w,2 ,
+-1,
+Yspring_e,4 ,
+Yspring_wB,2 ,
+-1,
+Yspring_eB,3 ,
+Yspring_w,3 ,
+-1,
+Yspring_e,3 ,
+Yspring_wB,3 ,
+-1,
+Yspring_eB,2 ,
+Yspring_w,4 ,
+-1,
+Yspring_e,2 ,
+Yspring_wB,4 ,
+-1,
+Yspring_eB,1 ,
+Yspring_w,5 ,
+-1,
+Yspring_e,1 ,
+Yspring_wB,5 ,
+-1,
+Yspring_eB,0 ,
+Yspring_w,6 ,
+-1,
+Yspring_e,0 ,
+Yspring_wB,6 ,
+-1,
+Yspring_kill_eB,6 ,
+-1,
+Yspring_kill_e,6 ,
+-1,
+Yspring_kill_eB,5 ,
+-1,
+Yspring_kill_e,5 ,
+-1,
+Yspring_kill_eB,4 ,
+-1,
+Yspring_kill_e,4 ,
+-1,
+Yspring_kill_eB,3 ,
+-1,
+Yspring_kill_e,3 ,
+-1,
+Yspring_kill_eB,2 ,
+-1,
+Yspring_kill_e,2 ,
+-1,
+Yspring_kill_eB,1 ,
+-1,
+Yspring_kill_e,1 ,
+-1,
+Yspring_kill_eB,0 ,
+-1,
+Yspring_kill_e,0 ,
+-1,
+Yspring_kill_w,0 ,
+-1,
+Yspring_kill_wB,0 ,
+-1,
+Yspring_kill_w,1 ,
+-1,
+Yspring_kill_wB,1 ,
+-1,
+Yspring_kill_w,2 ,
+-1,
+Yspring_kill_wB,2 ,
+-1,
+Yspring_kill_w,3 ,
+-1,
+Yspring_kill_wB,3 ,
+-1,
+Yspring_kill_w,4 ,
+-1,
+Yspring_kill_wB,4 ,
+-1,
+Yspring_kill_w,5 ,
+-1,
+Yspring_kill_wB,5 ,
+-1,
+Yspring_kill_w,6 ,
+-1,
+Yspring_kill_wB,6 ,
+-1,
+
+Xeater_n,0 ,
+Xeater_e,0 ,
+Xeater_w,0 ,
+Xeater_s,0 ,
+Xeater_n,7 ,
+Xeater_e,7 ,
+Xeater_s,7 ,
+Xeater_w,7 ,
+Yeater_n,7 ,
+Yeater_e,7 ,
+Yeater_s,7 ,
+Yeater_w,7 ,
+-1,
+Xeater_n,1 ,
+Xeater_e,1 ,
+Xeater_w,1 ,
+Xeater_s,1 ,
+Xeater_n,6 ,
+Xeater_e,6 ,
+Xeater_w,6 ,
+Xeater_s,6 ,
+-1,
+Xeater_n,2 ,
+Xeater_e,2 ,
+Xeater_w,2 ,
+Xeater_s,2 ,
+Xeater_n,5 ,
+Xeater_e,5 ,
+Xeater_w,5 ,
+Xeater_s,5 ,
+-1,
+Xeater_n,3 ,
+Xeater_e,3 ,
+Xeater_w,3 ,
+Xeater_s,3 ,
+Xeater_n,4 ,
+Xeater_e,4 ,
+Xeater_w,4 ,
+Xeater_s,4 ,
+-1,
+Yeater_n,0 ,
+Yeater_sB,6 ,
+-1,
+Yeater_nB,0 ,
+Yeater_s,6 ,
+-1,
+Yeater_n,1 ,
+Yeater_sB,5 ,
+-1,
+Yeater_nB,1 ,
+Yeater_s,5 ,
+-1,
+Yeater_n,2 ,
+Yeater_sB,4 ,
+-1,
+Yeater_nB,2 ,
+Yeater_s,4 ,
+-1,
+Yeater_n,3 ,
+Yeater_sB,3 ,
+-1,
+Yeater_nB,3 ,
+Yeater_s,3 ,
+-1,
+Yeater_n,4 ,
+Yeater_sB,2,
+-1,
+Yeater_nB,4 ,
+Yeater_s,2 ,
+-1,
+Yeater_n,5 ,
+Yeater_sB,1 ,
+-1,
+Yeater_nB,5 ,
+Yeater_s,1 ,
+-1,
+Yeater_n,6 ,
+Yeater_sB,0 ,
+-1,
+Yeater_nB,6 ,
+Yeater_s,0 ,
+-1,
+Yeater_eB,6 ,
+Yeater_w,0 ,
+-1,
+Yeater_e,6 ,
+Yeater_wB,0 ,
+-1,
+Yeater_eB,5 ,
+Yeater_w,1 ,
+-1,
+Yeater_e,5 ,
+Yeater_wB,1 ,
+-1,
+Yeater_eB,4 ,
+Yeater_w,2 ,
+-1,
+Yeater_e,4 ,
+Yeater_wB,2 ,
+-1,
+Yeater_eB,3 ,
+Yeater_w,3 ,
+-1,
+Yeater_e,3 ,
+Yeater_wB,3 ,
+-1,
+Yeater_eB,2 ,
+Yeater_w,4 ,
+-1,
+Yeater_e,2 ,
+Yeater_wB,4 ,
+-1,
+Yeater_eB,1 ,
+Yeater_w,5 ,
+-1,
+Yeater_e,1 ,
+Yeater_wB,5 ,
+-1,
+Yeater_eB,0 ,
+Yeater_w,6 ,
+-1,
+Yeater_e,0 ,
+Yeater_wB,6 ,
+-1,
+Yeater_stone,0 ,
+-1,
+Yeater_stone,1 ,
+-1,
+Yeater_stone,2 ,
+-1,
+Yeater_stone,3 ,
+-1,
+Yeater_stone,4 ,
+-1,
+Yeater_stone,5 ,
+-1,
+Yeater_stone,6 ,
+-1,
+Yeater_spring,0 ,
+-1,
+Yeater_spring,1 ,
+-1,
+Yeater_spring,2 ,
+-1,
+Yeater_spring,3 ,
+-1,
+Yeater_spring,4 ,
+-1,
+Yeater_spring,5 ,
+-1,
+Yeater_spring,6 ,
+-1,
+
+Xalien,0 ,
+Xalien_pause,0 ,
+Xalien,7 ,
+Xalien_pause,7 ,
+Yalien_n,7 ,
+Yalien_e,7 ,
+Yalien_s,7 ,
+Yalien_w,7 ,
+-1,
+Xalien,1 ,
+Xalien_pause,1 ,
+Xalien,6 ,
+Xalien_pause,6 ,
+-1,
+Xalien,2 ,
+Xalien_pause,2 ,
+Xalien,5 ,
+Xalien_pause,5 ,
+-1,
+Xalien,3 ,
+Xalien_pause,3 ,
+Xalien,4 ,
+Xalien_pause,4 ,
+-1,
+Yalien_n,0 ,
+Yalien_sB,6 ,
+-1,
+Yalien_nB,0 ,
+Yalien_s,6 ,
+-1,
+Yalien_n,1 ,
+Yalien_sB,5 ,
+-1,
+Yalien_nB,1 ,
+Yalien_s,5 ,
+-1,
+Yalien_n,2 ,
+Yalien_sB,4 ,
+-1,
+Yalien_nB,2 ,
+Yalien_s,4 ,
+-1,
+Yalien_n,3 ,
+Yalien_sB,3 ,
+-1,
+Yalien_nB,3 ,
+Yalien_s,3 ,
+-1,
+Yalien_n,4 ,
+Yalien_sB,2 ,
+-1,
+Yalien_nB,4 ,
+Yalien_s,2 ,
+-1,
+Yalien_n,5 ,
+Yalien_sB,1 ,
+-1,
+Yalien_nB,5 ,
+Yalien_s,1 ,
+-1,
+Yalien_n,6 ,
+Yalien_sB,0 ,
+-1,
+Yalien_nB,6 ,
+Yalien_s,0 ,
+-1,
+Yalien_eB,6 ,
+Yalien_w,0 ,
+-1,
+Yalien_e,6 ,
+Yalien_wB,0 ,
+-1,
+Yalien_eB,5 ,
+Yalien_w,1 ,
+-1,
+Yalien_e,5 ,
+Yalien_wB,1 ,
+-1,
+Yalien_eB,4 ,
+Yalien_w,2 ,
+-1,
+Yalien_e,4 ,
+Yalien_wB,2 ,
+-1,
+Yalien_eB,3 ,
+Yalien_w,3 ,
+-1,
+Yalien_e,3 ,
+Yalien_wB,3 ,
+-1,
+Yalien_eB,2 ,
+Yalien_w,4 ,
+-1,
+Yalien_e,2 ,
+Yalien_wB,4 ,
+-1,
+Yalien_eB,1 ,
+Yalien_w,5 ,
+-1,
+Yalien_e,1 ,
+Yalien_wB,5 ,
+-1,
+Yalien_eB,0 ,
+Yalien_w,6 ,
+-1,
+Yalien_e,0 ,
+Yalien_wB,6 ,
+-1,
+Yalien_stone,0 ,
+-1,
+Yalien_stone,1 ,
+-1,
+Yalien_stone,2 ,
+-1,
+Yalien_stone,3 ,
+-1,
+Yalien_stone,4 ,
+-1,
+Yalien_stone,5 ,
+-1,
+Yalien_stone,6 ,
+-1,
+Yalien_spring,0 ,
+-1,
+Yalien_spring,1 ,
+-1,
+Yalien_spring,2 ,
+-1,
+Yalien_spring,3 ,
+-1,
+Yalien_spring,4 ,
+-1,
+Yalien_spring,5 ,
+-1,
+Yalien_spring,6 ,
+-1,
+
+Xemerald,0 ,
+Xemerald,1 ,
+Xemerald,2 ,
+Xemerald,3 ,
+Xemerald,4 ,
+Xemerald,5 ,
+Xemerald,6 ,
+Xemerald,7 ,
+Xemerald_pause,0 ,
+Xemerald_pause,1 ,
+Xemerald_pause,2 ,
+Xemerald_pause,3 ,
+Xemerald_pause,4 ,
+Xemerald_pause,5 ,
+Xemerald_pause,6 ,
+Xemerald_pause,7 ,
+Xemerald_fall,0 ,
+Xemerald_fall,1 ,
+Xemerald_fall,2 ,
+Xemerald_fall,3 ,
+Xemerald_fall,4 ,
+Xemerald_fall,5 ,
+Xemerald_fall,6 ,
+Xemerald_fall,7 ,
+#ifdef BAD_ROLL
+Xemerald_force_e,0 ,
+Xemerald_force_e,1 ,
+Xemerald_force_e,2 ,
+Xemerald_force_e,3 ,
+Xemerald_force_e,4 ,
+Xemerald_force_e,5 ,
+Xemerald_force_e,6 ,
+Xemerald_force_e,7 ,
+Xemerald_force_w,0 ,
+Xemerald_force_w,1 ,
+Xemerald_force_w,2 ,
+Xemerald_force_w,3 ,
+Xemerald_force_w,4 ,
+Xemerald_force_w,5 ,
+Xemerald_force_w,6 ,
+Xemerald_force_w,7 ,
+#endif
+Xemerald_shine,0 ,
+Xemerald_shine,7 ,
+Yemerald_stone,7 ,
+Yemerald_s,7 ,
+Yemerald_e,7 ,
+Yemerald_w,7 ,
+-1,
+Xemerald_shine,1 ,
+Xemerald_shine,6 ,
+-1,
+Xemerald_shine,2 ,
+Xemerald_shine,5 ,
+-1,
+Xemerald_shine,3 ,
+Xemerald_shine,4 ,
+-1,
+Yemerald_sB,6 ,
+-1,
+Yemerald_s,6 ,
+-1,
+Yemerald_sB,5 ,
+-1,
+Yemerald_s,5 ,
+-1,
+Yemerald_sB,4 ,
+-1,
+Yemerald_s,4 ,
+-1,
+Yemerald_sB,3 ,
+-1,
+Yemerald_s,3 ,
+-1,
+Yemerald_sB,2 ,
+-1,
+Yemerald_s,2 ,
+-1,
+Yemerald_sB,1 ,
+-1,
+Yemerald_s,1 ,
+-1,
+Yemerald_sB,0 ,
+-1,
+Yemerald_s,0 ,
+-1,
+Yemerald_eB,6 ,
+Yemerald_w,0 ,
+-1,
+Yemerald_e,6 ,
+Yemerald_wB,0 ,
+-1,
+Yemerald_eB,5 ,
+Yemerald_w,1 ,
+-1,
+Yemerald_e,5 ,
+Yemerald_wB,1 ,
+-1,
+Yemerald_eB,4 ,
+Yemerald_w,2 ,
+-1,
+Yemerald_e,4 ,
+Yemerald_wB,2 ,
+-1,
+Yemerald_eB,3 ,
+Yemerald_w,3 ,
+-1,
+Yemerald_e,3 ,
+Yemerald_wB,3 ,
+-1,
+Yemerald_eB,2 ,
+Yemerald_w,4 ,
+-1,
+Yemerald_e,2 ,
+Yemerald_wB,4 ,
+-1,
+Yemerald_eB,1 ,
+Yemerald_w,5 ,
+-1,
+Yemerald_e,1 ,
+Yemerald_wB,5 ,
+-1,
+Yemerald_eB,0 ,
+Yemerald_w,6 ,
+-1,
+Yemerald_e,0 ,
+Yemerald_wB,6 ,
+-1,
+Yemerald_eat,6 ,
+-1,
+Yemerald_eat,5 ,
+-1,
+Yemerald_eat,4 ,
+-1,
+Yemerald_eat,3 ,
+-1,
+Yemerald_eat,2 ,
+-1,
+Yemerald_eat,1 ,
+-1,
+Yemerald_eat,0 ,
+-1,
+Yemerald_stone,0 ,
+-1,
+Yemerald_stone,1 ,
+-1,
+Yemerald_stone,2 ,
+-1,
+Yemerald_stone,3 ,
+-1,
+Yemerald_stone,4 ,
+-1,
+Yemerald_stone,5 ,
+-1,
+Yemerald_stone,6 ,
+-1,
+
+Xdiamond,0 ,
+Xdiamond,1 ,
+Xdiamond,2 ,
+Xdiamond,3 ,
+Xdiamond,4 ,
+Xdiamond,5 ,
+Xdiamond,6 ,
+Xdiamond,7 ,
+Xdiamond_pause,0 ,
+Xdiamond_pause,1 ,
+Xdiamond_pause,2 ,
+Xdiamond_pause,3 ,
+Xdiamond_pause,4 ,
+Xdiamond_pause,5 ,
+Xdiamond_pause,6 ,
+Xdiamond_pause,7 ,
+Xdiamond_fall,0 ,
+Xdiamond_fall,1 ,
+Xdiamond_fall,2 ,
+Xdiamond_fall,3 ,
+Xdiamond_fall,4 ,
+Xdiamond_fall,5 ,
+Xdiamond_fall,6 ,
+Xdiamond_fall,7 ,
+#ifdef BAD_ROLL
+Xdiamond_force_e,0 ,
+Xdiamond_force_e,1 ,
+Xdiamond_force_e,2 ,
+Xdiamond_force_e,3 ,
+Xdiamond_force_e,4 ,
+Xdiamond_force_e,5 ,
+Xdiamond_force_e,6 ,
+Xdiamond_force_e,7 ,
+Xdiamond_force_w,0 ,
+Xdiamond_force_w,1 ,
+Xdiamond_force_w,2 ,
+Xdiamond_force_w,3 ,
+Xdiamond_force_w,4 ,
+Xdiamond_force_w,5 ,
+Xdiamond_force_w,6 ,
+Xdiamond_force_w,7 ,
+#endif
+Xdiamond_shine,0 ,
+Xdiamond_shine,7 ,
+Ydiamond_s,7 ,
+Ydiamond_e,7 ,
+Ydiamond_w,7 ,
+-1,
+Xdiamond_shine,1 ,
+Xdiamond_shine,6 ,
+-1,
+Xdiamond_shine,2 ,
+Xdiamond_shine,5 ,
+-1,
+Xdiamond_shine,3 ,
+Xdiamond_shine,4 ,
+-1,
+Ydiamond_sB,6 ,
+-1,
+Ydiamond_s,6 ,
+-1,
+Ydiamond_sB,5 ,
+-1,
+Ydiamond_s,5 ,
+-1,
+Ydiamond_sB,4 ,
+-1,
+Ydiamond_s,4 ,
+-1,
+Ydiamond_sB,3 ,
+-1,
+Ydiamond_s,3 ,
+-1,
+Ydiamond_sB,2 ,
+-1,
+Ydiamond_s,2 ,
+-1,
+Ydiamond_sB,1 ,
+-1,
+Ydiamond_s,1 ,
+-1,
+Ydiamond_sB,0 ,
+-1,
+Ydiamond_s,0 ,
+-1,
+Ydiamond_eB,6 ,
+Ydiamond_w,0 ,
+-1,
+Ydiamond_e,6 ,
+Ydiamond_wB,0 ,
+-1,
+Ydiamond_eB,5 ,
+Ydiamond_w,1 ,
+-1,
+Ydiamond_e,5 ,
+Ydiamond_wB,1 ,
+-1,
+Ydiamond_eB,4 ,
+Ydiamond_w,2 ,
+-1,
+Ydiamond_e,4 ,
+Ydiamond_wB,2 ,
+-1,
+Ydiamond_eB,3 ,
+Ydiamond_w,3 ,
+-1,
+Ydiamond_e,3 ,
+Ydiamond_wB,3 ,
+-1,
+Ydiamond_eB,2 ,
+Ydiamond_w,4 ,
+-1,
+Ydiamond_e,2 ,
+Ydiamond_wB,4 ,
+-1,
+Ydiamond_eB,1 ,
+Ydiamond_w,5 ,
+-1,
+Ydiamond_e,1 ,
+Ydiamond_wB,5 ,
+-1,
+Ydiamond_eB,0 ,
+Ydiamond_w,6 ,
+-1,
+Ydiamond_e,0 ,
+Ydiamond_wB,6 ,
+-1,
+Ydiamond_eat,6 ,
+-1,
+Ydiamond_eat,5 ,
+-1,
+Ydiamond_eat,4 ,
+-1,
+Ydiamond_eat,3 ,
+-1,
+Ydiamond_eat,2 ,
+-1,
+Ydiamond_eat,1 ,
+-1,
+Ydiamond_eat,0 ,
+-1,
+Ydiamond_stone,0 ,
+-1,
+Ydiamond_stone,1 ,
+-1,
+Ydiamond_stone,2 ,
+-1,
+Ydiamond_stone,3 ,
+-1,
+Ydiamond_stone,4 ,
+-1,
+Ydiamond_stone,5 ,
+-1,
+Ydiamond_stone,6 ,
+-1,
+
+Xdrip_fall,0 ,
+Xdrip_fall,1 ,
+Xdrip_fall,2 ,
+Xdrip_fall,3 ,
+Xdrip_fall,4 ,
+Xdrip_fall,5 ,
+Xdrip_fall,6 ,
+Xdrip_fall,7 ,
+Xdrip_eat,7 ,
+Ydrip_s2,7 ,
+-1,
+Ydrip_s2B,6 ,
+-1,
+Ydrip_s2,6 ,
+-1,
+Ydrip_s2B,5 ,
+-1,
+Ydrip_s2,5 ,
+-1,
+Ydrip_s2B,4 ,
+-1,
+Ydrip_s2,4 ,
+-1,
+Ydrip_s2B,3 ,
+-1,
+Ydrip_s2,3 ,
+-1,
+Ydrip_s2B,2 ,
+-1,
+Ydrip_s2,2 ,
+-1,
+Ydrip_s2B,1 ,
+-1,
+Ydrip_s2,1 ,
+-1,
+Ydrip_s2B,0 ,
+-1,
+Ydrip_s2,0 ,
+-1,
+Xdrip_stretchB,0 ,
+Xdrip_stretchB,1 ,
+Xdrip_stretchB,2 ,
+Xdrip_stretchB,3 ,
+Xdrip_stretchB,4 ,
+Xdrip_stretchB,5 ,
+Xdrip_stretchB,6 ,
+Xdrip_stretchB,7 ,
+Ydrip_s1B,7 ,
+-1,
+Xdrip_stretch,0 ,
+Xdrip_stretch,1 ,
+Xdrip_stretch,2 ,
+Xdrip_stretch,3 ,
+Xdrip_stretch,4 ,
+Xdrip_stretch,5 ,
+Xdrip_stretch,6 ,
+Xdrip_stretch,7 ,
+Ydrip_s1,7 ,
+-1,
+Ydrip_s1B,6 ,
+-1,
+Ydrip_s1,6 ,
+-1,
+Ydrip_s1B,5 ,
+-1,
+Ydrip_s1,5 ,
+-1,
+Ydrip_s1B,4 ,
+-1,
+Ydrip_s1,4 ,
+-1,
+Ydrip_s1B,3 ,
+-1,
+Ydrip_s1,3 ,
+-1,
+Ydrip_s1B,2 ,
+-1,
+Ydrip_s1,2 ,
+-1,
+Ydrip_s1B,1 ,
+-1,
+Ydrip_s1,1 ,
+-1,
+Ydrip_s1B,0 ,
+-1,
+Ydrip_s1,0 ,
+-1,
+Xdrip_eat,0 ,
+-1,
+Xdrip_eat,1 ,
+-1,
+Xdrip_eat,2 ,
+-1,
+Xdrip_eat,3 ,
+-1,
+Xdrip_eat,4 ,
+-1,
+Xdrip_eat,5 ,
+-1,
+Xdrip_eat,6 ,
+-1,
+
+Xbomb,0 ,
+Xbomb,1 ,
+Xbomb,2 ,
+Xbomb,3 ,
+Xbomb,4 ,
+Xbomb,5 ,
+Xbomb,6 ,
+Xbomb,7 ,
+Xbomb_pause,0 ,
+Xbomb_pause,1 ,
+Xbomb_pause,2 ,
+Xbomb_pause,3 ,
+Xbomb_pause,4 ,
+Xbomb_pause,5 ,
+Xbomb_pause,6 ,
+Xbomb_pause,7 ,
+Xbomb_fall,0 ,
+Xbomb_fall,1 ,
+Xbomb_fall,2 ,
+Xbomb_fall,3 ,
+Xbomb_fall,4 ,
+Xbomb_fall,5 ,
+Xbomb_fall,6 ,
+Xbomb_fall,7 ,
+#ifdef BAD_ROLL
+Xbomb_force_e,0 ,
+Xbomb_force_e,1 ,
+Xbomb_force_e,2 ,
+Xbomb_force_e,3 ,
+Xbomb_force_e,4 ,
+Xbomb_force_e,5 ,
+Xbomb_force_e,6 ,
+Xbomb_force_e,7 ,
+Xbomb_force_w,0 ,
+Xbomb_force_w,1 ,
+Xbomb_force_w,2 ,
+Xbomb_force_w,3 ,
+Xbomb_force_w,4 ,
+Xbomb_force_w,5 ,
+Xbomb_force_w,6 ,
+Xbomb_force_w,7 ,
+#endif
+Ybomb_s,7 ,
+Ybomb_e,7 ,
+Ybomb_w,7 ,
+-1,
+Ybomb_sB,6 ,
+-1,
+Ybomb_s,6 ,
+-1,
+Ybomb_sB,5 ,
+-1,
+Ybomb_s,5 ,
+-1,
+Ybomb_sB,4 ,
+-1,
+Ybomb_s,4 ,
+-1,
+Ybomb_sB,3 ,
+-1,
+Ybomb_s,3 ,
+-1,
+Ybomb_sB,2 ,
+-1,
+Ybomb_s,2 ,
+-1,
+Ybomb_sB,1 ,
+-1,
+Ybomb_s,1 ,
+-1,
+Ybomb_sB,0 ,
+-1,
+Ybomb_s,0 ,
+-1,
+Ybomb_eB,6 ,
+Ybomb_w,0 ,
+-1,
+Ybomb_e,6 ,
+Ybomb_wB,0 ,
+-1,
+Ybomb_eB,5 ,
+Ybomb_w,1 ,
+-1,
+Ybomb_e,5 ,
+Ybomb_wB,1 ,
+-1,
+Ybomb_eB,4 ,
+Ybomb_w,2 ,
+-1,
+Ybomb_e,4 ,
+Ybomb_wB,2 ,
+-1,
+Ybomb_eB,3 ,
+Ybomb_w,3 ,
+-1,
+Ybomb_e,3 ,
+Ybomb_wB,3 ,
+-1,
+Ybomb_eB,2 ,
+Ybomb_w,4 ,
+-1,
+Ybomb_e,2 ,
+Ybomb_wB,4 ,
+-1,
+Ybomb_eB,1 ,
+Ybomb_w,5 ,
+-1,
+Ybomb_e,1 ,
+Ybomb_wB,5 ,
+-1,
+Ybomb_eB,0 ,
+Ybomb_w,6 ,
+-1,
+Ybomb_e,0 ,
+Ybomb_wB,6 ,
+-1,
+Ybomb_eat,6 ,
+-1,
+Ybomb_eat,5 ,
+-1,
+Ybomb_eat,4 ,
+-1,
+Ybomb_eat,3 ,
+-1,
+Ybomb_eat,2 ,
+-1,
+Ybomb_eat,1 ,
+-1,
+Ybomb_eat,0 ,
+-1,
+
+Yballoon_n,7 ,
+Yballoon_e,7 ,
+Yballoon_s,7 ,
+Yballoon_w,7 ,
+Xballoon,0 ,
+Xballoon,1 ,
+Xballoon,2 ,
+Xballoon,3 ,
+Xballoon,4 ,
+Xballoon,5 ,
+Xballoon,6 ,
+Xballoon,7 ,
+-1,
+Yballoon_n,0 ,
+Yballoon_sB,6 ,
+-1,
+Yballoon_nB,0 ,
+Yballoon_s,6 ,
+-1,
+Yballoon_n,1 ,
+Yballoon_sB,5 ,
+-1,
+Yballoon_nB,1 ,
+Yballoon_s,5 ,
+-1,
+Yballoon_n,2 ,
+Yballoon_sB,4 ,
+-1,
+Yballoon_nB,2 ,
+Yballoon_s,4 ,
+-1,
+Yballoon_n,3 ,
+Yballoon_sB,3 ,
+-1,
+Yballoon_nB,3 ,
+Yballoon_s,3 ,
+-1,
+Yballoon_n,4 ,
+Yballoon_sB,2 ,
+-1,
+Yballoon_nB,4 ,
+Yballoon_s,2 ,
+-1,
+Yballoon_n,5 ,
+Yballoon_sB,1 ,
+-1,
+Yballoon_nB,5 ,
+Yballoon_s,1 ,
+-1,
+Yballoon_n,6 ,
+Yballoon_sB,0 ,
+-1,
+Yballoon_nB,6 ,
+Yballoon_s,0 ,
+-1,
+Yballoon_eB,6 ,
+Yballoon_w,0 ,
+-1,
+Yballoon_e,6 ,
+Yballoon_wB,0 ,
+-1,
+Yballoon_eB,5 ,
+Yballoon_w,1 ,
+-1,
+Yballoon_e,5 ,
+Yballoon_wB,1 ,
+-1,
+Yballoon_eB,4 ,
+Yballoon_w,2 ,
+-1,
+Yballoon_e,4 ,
+Yballoon_wB,2 ,
+-1,
+Yballoon_eB,3 ,
+Yballoon_w,3 ,
+-1,
+Yballoon_e,3 ,
+Yballoon_wB,3 ,
+-1,
+Yballoon_eB,2 ,
+Yballoon_w,4 ,
+-1,
+Yballoon_e,2 ,
+Yballoon_wB,4 ,
+-1,
+Yballoon_eB,1 ,
+Yballoon_w,5 ,
+-1,
+Yballoon_e,1 ,
+Yballoon_wB,5 ,
+-1,
+Yballoon_eB,0 ,
+Yballoon_w,6 ,
+-1,
+Yballoon_e,0 ,
+Yballoon_wB,6 ,
+-1,
+
+Xgrass,0 ,
+Xgrass,1 ,
+Xgrass,2 ,
+Xgrass,3 ,
+Xgrass,4 ,
+Xgrass,5 ,
+Xgrass,6 ,
+Xgrass,7 ,
+Xfake_grass,0 ,
+Xfake_grass,1 ,
+Xfake_grass,2 ,
+Xfake_grass,3 ,
+Xfake_grass,4 ,
+Xfake_grass,5 ,
+Xfake_grass,6 ,
+Xfake_grass,7 ,
+-1,
+Ygrass_nB,6 ,
+-1,
+Ygrass_nB,5 ,
+-1,
+Ygrass_nB,4 ,
+-1,
+Ygrass_nB,3 ,
+-1,
+Ygrass_nB,2 ,
+-1,
+Ygrass_nB,1 ,
+-1,
+Ygrass_nB,0 ,
+-1,
+Ygrass_eB,6 ,
+-1,
+Ygrass_eB,5 ,
+-1,
+Ygrass_eB,4 ,
+-1,
+Ygrass_eB,3 ,
+-1,
+Ygrass_eB,2 ,
+-1,
+Ygrass_eB,1 ,
+-1,
+Ygrass_eB,0 ,
+-1,
+Ygrass_sB,6 ,
+-1,
+Ygrass_sB,5 ,
+-1,
+Ygrass_sB,4 ,
+-1,
+Ygrass_sB,3 ,
+-1,
+Ygrass_sB,2 ,
+-1,
+Ygrass_sB,1 ,
+-1,
+Ygrass_sB,0 ,
+-1,
+Ygrass_wB,6 ,
+-1,
+Ygrass_wB,5 ,
+-1,
+Ygrass_wB,4 ,
+-1,
+Ygrass_wB,3 ,
+-1,
+Ygrass_wB,2 ,
+-1,
+Ygrass_wB,1 ,
+-1,
+Ygrass_wB,0 ,
+-1,
+
+Xdirt,0 ,
+Xdirt,1 ,
+Xdirt,2 ,
+Xdirt,3 ,
+Xdirt,4 ,
+Xdirt,5 ,
+Xdirt,6 ,
+Xdirt,7 ,
+-1,
+Ydirt_nB,6 ,
+-1,
+Ydirt_nB,5 ,
+-1,
+Ydirt_nB,4 ,
+-1,
+Ydirt_nB,3 ,
+-1,
+Ydirt_nB,2 ,
+-1,
+Ydirt_nB,1 ,
+-1,
+Ydirt_nB,0 ,
+-1,
+Ydirt_eB,6 ,
+-1,
+Ydirt_eB,5 ,
+-1,
+Ydirt_eB,4 ,
+-1,
+Ydirt_eB,3 ,
+-1,
+Ydirt_eB,2 ,
+-1,
+Ydirt_eB,1 ,
+-1,
+Ydirt_eB,0 ,
+-1,
+Ydirt_sB,6 ,
+-1,
+Ydirt_sB,5 ,
+-1,
+Ydirt_sB,4 ,
+-1,
+Ydirt_sB,3 ,
+-1,
+Ydirt_sB,2 ,
+-1,
+Ydirt_sB,1 ,
+-1,
+Ydirt_sB,0 ,
+-1,
+Ydirt_wB,6 ,
+-1,
+Ydirt_wB,5 ,
+-1,
+Ydirt_wB,4 ,
+-1,
+Ydirt_wB,3 ,
+-1,
+Ydirt_wB,2 ,
+-1,
+Ydirt_wB,1 ,
+-1,
+Ydirt_wB,0 ,
+-1,
+
+Xacid_nw,0 ,
+Xacid_nw,1 ,
+Xacid_nw,2 ,
+Xacid_nw,3 ,
+Xacid_nw,4 ,
+Xacid_nw,5 ,
+Xacid_nw,6 ,
+Xacid_nw,7 ,
+-1,
+Xacid_ne,0 ,
+Xacid_ne,1 ,
+Xacid_ne,2 ,
+Xacid_ne,3 ,
+Xacid_ne,4 ,
+Xacid_ne,5 ,
+Xacid_ne,6 ,
+Xacid_ne,7 ,
+-1,
+Xacid_sw,0 ,
+Xacid_sw,1 ,
+Xacid_sw,2 ,
+Xacid_sw,3 ,
+Xacid_sw,4 ,
+Xacid_sw,5 ,
+Xacid_sw,6 ,
+Xacid_sw,7 ,
+-1,
+Xacid_s,0 ,
+Xacid_s,1 ,
+Xacid_s,2 ,
+Xacid_s,3 ,
+Xacid_s,4 ,
+Xacid_s,5 ,
+Xacid_s,6 ,
+Xacid_s,7 ,
+-1,
+Xacid_se,0 ,
+Xacid_se,1 ,
+Xacid_se,2 ,
+Xacid_se,3 ,
+Xacid_se,4 ,
+Xacid_se,5 ,
+Xacid_se,6 ,
+Xacid_se,7 ,
+-1,
+Xacid_1,0 ,
+Xacid_1,1 ,
+Xacid_1,2 ,
+Xacid_1,3 ,
+Xacid_1,4 ,
+Xacid_1,5 ,
+Xacid_1,6 ,
+Xacid_1,7 ,
+-1,
+Xacid_2,0 ,
+Xacid_2,1 ,
+Xacid_2,2 ,
+Xacid_2,3 ,
+Xacid_2,4 ,
+Xacid_2,5 ,
+Xacid_2,6 ,
+Xacid_2,7 ,
+-1,
+Xacid_3,0 ,
+Xacid_3,1 ,
+Xacid_3,2 ,
+Xacid_3,3 ,
+Xacid_3,4 ,
+Xacid_3,5 ,
+Xacid_3,6 ,
+Xacid_3,7 ,
+-1,
+Xacid_4,0 ,
+Xacid_4,1 ,
+Xacid_4,2 ,
+Xacid_4,3 ,
+Xacid_4,4 ,
+Xacid_4,5 ,
+Xacid_4,6 ,
+Xacid_4,7 ,
+-1,
+Xacid_5,0 ,
+Xacid_5,1 ,
+Xacid_5,2 ,
+Xacid_5,3 ,
+Xacid_5,4 ,
+Xacid_5,5 ,
+Xacid_5,6 ,
+Xacid_5,7 ,
+-1,
+Xacid_6,0 ,
+Xacid_6,1 ,
+Xacid_6,2 ,
+Xacid_6,3 ,
+Xacid_6,4 ,
+Xacid_6,5 ,
+Xacid_6,6 ,
+Xacid_6,7 ,
+-1,
+Xacid_7,0 ,
+Xacid_7,1 ,
+Xacid_7,2 ,
+Xacid_7,3 ,
+Xacid_7,4 ,
+Xacid_7,5 ,
+Xacid_7,6 ,
+Xacid_7,7 ,
+-1,
+Xacid_8,0 ,
+Xacid_8,1 ,
+Xacid_8,2 ,
+Xacid_8,3 ,
+Xacid_8,4 ,
+Xacid_8,5 ,
+Xacid_8,6 ,
+Xacid_8,7 ,
+-1,
+Yacid_splash_wB,4 ,
+Yacid_splash_wB,5 ,
+-1,
+Yacid_splash_wB,2 ,
+Yacid_splash_wB,3 ,
+-1,
+Yacid_splash_wB,0 ,
+Yacid_splash_wB,1 ,
+-1,
+Yacid_splash_eB,4 ,
+Yacid_splash_eB,5 ,
+-1,
+Yacid_splash_eB,2 ,
+Yacid_splash_eB,3 ,
+-1,
+Yacid_splash_eB,0 ,
+Yacid_splash_eB,1 ,
+-1,
+
+Xball_2B,7 ,
+Xball_1,0 ,
+Xball_1,1 ,
+Xball_1,2 ,
+Xball_1,3 ,
+Xball_1,4 ,
+Xball_1,5 ,
+Xball_1,6 ,
+Xball_1,7 ,
+-1,
+Xball_1B,0 ,
+-1,
+Xball_1B,1 ,
+-1,
+Xball_1B,2 ,
+-1,
+Xball_1B,3 ,
+-1,
+Xball_1B,4 ,
+-1,
+Xball_1B,5 ,
+-1,
+Xball_1B,6 ,
+-1,
+Xball_1B,7 ,
+Xball_2,0 ,
+Xball_2,1 ,
+Xball_2,2 ,
+Xball_2,3 ,
+Xball_2,4 ,
+Xball_2,5 ,
+Xball_2,6 ,
+Xball_2,7 ,
+-1,
+Xball_2B,0 ,
+-1,
+Xball_2B,1 ,
+-1,
+Xball_2B,2 ,
+-1,
+Xball_2B,3 ,
+-1,
+Xball_2B,4 ,
+-1,
+Xball_2B,5 ,
+-1,
+Xball_2B,6 ,
+-1,
+
+Ygrow_ew_eat,7 ,
+Xgrow_ew,0 ,
+Xgrow_ew,1 ,
+Xgrow_ew,2 ,
+Xgrow_ew,3 ,
+Xgrow_ew,4 ,
+Xgrow_ew,5 ,
+Xgrow_ew,6 ,
+Xgrow_ew,7 ,
+-1,
+Ygrow_ew_eat,0 ,
+-1,
+Ygrow_ew_eat,1 ,
+-1,
+Ygrow_ew_eat,2 ,
+-1,
+Ygrow_ew_eat,3 ,
+-1,
+Ygrow_ew_eat,4 ,
+-1,
+Ygrow_ew_eat,5 ,
+-1,
+Ygrow_ew_eat,6 ,
+-1,
+Ygrow_ns_eat,7 ,
+Xgrow_ns,0 ,
+Xgrow_ns,1 ,
+Xgrow_ns,2 ,
+Xgrow_ns,3 ,
+Xgrow_ns,4 ,
+Xgrow_ns,5 ,
+Xgrow_ns,6 ,
+Xgrow_ns,7 ,
+-1,
+Ygrow_ns_eat,0 ,
+-1,
+Ygrow_ns_eat,1 ,
+-1,
+Ygrow_ns_eat,2 ,
+-1,
+Ygrow_ns_eat,3 ,
+-1,
+Ygrow_ns_eat,4 ,
+-1,
+Ygrow_ns_eat,5 ,
+-1,
+Ygrow_ns_eat,6 ,
+-1,
+
+XwonderwallB,7 ,
+Xwonderwall,0 ,
+Xwonderwall,1 ,
+Xwonderwall,2 ,
+Xwonderwall,3 ,
+Xwonderwall,4 ,
+Xwonderwall,5 ,
+Xwonderwall,6 ,
+Xwonderwall,7 ,
+-1,
+XwonderwallB,0 ,
+-1,
+XwonderwallB,1 ,
+-1,
+XwonderwallB,2 ,
+-1,
+XwonderwallB,3 ,
+-1,
+XwonderwallB,4 ,
+-1,
+XwonderwallB,5 ,
+-1,
+XwonderwallB,6 ,
+-1,
+
+Xameuba_1,0 ,
+Xameuba_1,1 ,
+Xameuba_1,2 ,
+Xameuba_1,3 ,
+Xameuba_1,4 ,
+Xameuba_1,5 ,
+Xameuba_1,6 ,
+Xameuba_1,7 ,
+-1,
+Xameuba_2,0 ,
+Xameuba_2,1 ,
+Xameuba_2,2 ,
+Xameuba_2,3 ,
+Xameuba_2,4 ,
+Xameuba_2,5 ,
+Xameuba_2,6 ,
+Xameuba_2,7 ,
+-1,
+Xameuba_3,0 ,
+Xameuba_3,1 ,
+Xameuba_3,2 ,
+Xameuba_3,3 ,
+Xameuba_3,4 ,
+Xameuba_3,5 ,
+Xameuba_3,6 ,
+Xameuba_3,7 ,
+-1,
+Xameuba_4,0 ,
+Xameuba_4,1 ,
+Xameuba_4,2 ,
+Xameuba_4,3 ,
+Xameuba_4,4 ,
+Xameuba_4,5 ,
+Xameuba_4,6 ,
+Xameuba_4,7 ,
+-1,
+Xameuba_5,0 ,
+Xameuba_5,1 ,
+Xameuba_5,2 ,
+Xameuba_5,3 ,
+Xameuba_5,4 ,
+Xameuba_5,5 ,
+Xameuba_5,6 ,
+Xameuba_5,7 ,
+-1,
+Xameuba_6,0 ,
+Xameuba_6,1 ,
+Xameuba_6,2 ,
+Xameuba_6,3 ,
+Xameuba_6,4 ,
+Xameuba_6,5 ,
+Xameuba_6,6 ,
+Xameuba_6,7 ,
+-1,
+Xameuba_7,0 ,
+Xameuba_7,1 ,
+Xameuba_7,2 ,
+Xameuba_7,3 ,
+Xameuba_7,4 ,
+Xameuba_7,5 ,
+Xameuba_7,6 ,
+Xameuba_7,7 ,
+-1,
+Xameuba_8,0 ,
+Xameuba_8,1 ,
+Xameuba_8,2 ,
+Xameuba_8,3 ,
+Xameuba_8,4 ,
+Xameuba_8,5 ,
+Xameuba_8,6 ,
+Xameuba_8,7 ,
+-1,
+
+Xdoor_1,0 ,
+Xdoor_1,1 ,
+Xdoor_1,2 ,
+Xdoor_1,3 ,
+Xdoor_1,4 ,
+Xdoor_1,5 ,
+Xdoor_1,6 ,
+Xdoor_1,7 ,
+-1,
+Xdoor_2,0 ,
+Xdoor_2,1 ,
+Xdoor_2,2 ,
+Xdoor_2,3 ,
+Xdoor_2,4 ,
+Xdoor_2,5 ,
+Xdoor_2,6 ,
+Xdoor_2,7 ,
+-1,
+Xdoor_3,0 ,
+Xdoor_3,1 ,
+Xdoor_3,2 ,
+Xdoor_3,3 ,
+Xdoor_3,4 ,
+Xdoor_3,5 ,
+Xdoor_3,6 ,
+Xdoor_3,7 ,
+-1,
+Xdoor_4,0 ,
+Xdoor_4,1 ,
+Xdoor_4,2 ,
+Xdoor_4,3 ,
+Xdoor_4,4 ,
+Xdoor_4,5 ,
+Xdoor_4,6 ,
+Xdoor_4,7 ,
+-1,
+Xdoor_5,0 ,
+Xdoor_5,1 ,
+Xdoor_5,2 ,
+Xdoor_5,3 ,
+Xdoor_5,4 ,
+Xdoor_5,5 ,
+Xdoor_5,6 ,
+Xdoor_5,7 ,
+-1,
+Xdoor_6,0 ,
+Xdoor_6,1 ,
+Xdoor_6,2 ,
+Xdoor_6,3 ,
+Xdoor_6,4 ,
+Xdoor_6,5 ,
+Xdoor_6,6 ,
+Xdoor_6,7 ,
+-1,
+Xdoor_7,0 ,
+Xdoor_7,1 ,
+Xdoor_7,2 ,
+Xdoor_7,3 ,
+Xdoor_7,4 ,
+Xdoor_7,5 ,
+Xdoor_7,6 ,
+Xdoor_7,7 ,
+-1,
+Xdoor_8,0 ,
+Xdoor_8,1 ,
+Xdoor_8,2 ,
+Xdoor_8,3 ,
+Xdoor_8,4 ,
+Xdoor_8,5 ,
+Xdoor_8,6 ,
+Xdoor_8,7 ,
+-1,
+Xkey_1,0 ,
+Xkey_1,1 ,
+Xkey_1,2 ,
+Xkey_1,3 ,
+Xkey_1,4 ,
+Xkey_1,5 ,
+Xkey_1,6 ,
+Xkey_1,7 ,
+-1,
+Xkey_2,0 ,
+Xkey_2,1 ,
+Xkey_2,2 ,
+Xkey_2,3 ,
+Xkey_2,4 ,
+Xkey_2,5 ,
+Xkey_2,6 ,
+Xkey_2,7 ,
+-1,
+Xkey_3,0 ,
+Xkey_3,1 ,
+Xkey_3,2 ,
+Xkey_3,3 ,
+Xkey_3,4 ,
+Xkey_3,5 ,
+Xkey_3,6 ,
+Xkey_3,7 ,
+-1,
+Xkey_4,0 ,
+Xkey_4,1 ,
+Xkey_4,2 ,
+Xkey_4,3 ,
+Xkey_4,4 ,
+Xkey_4,5 ,
+Xkey_4,6 ,
+Xkey_4,7 ,
+-1,
+Xkey_5,0 ,
+Xkey_5,1 ,
+Xkey_5,2 ,
+Xkey_5,3 ,
+Xkey_5,4 ,
+Xkey_5,5 ,
+Xkey_5,6 ,
+Xkey_5,7 ,
+-1,
+Xkey_6,0 ,
+Xkey_6,1 ,
+Xkey_6,2 ,
+Xkey_6,3 ,
+Xkey_6,4 ,
+Xkey_6,5 ,
+Xkey_6,6 ,
+Xkey_6,7 ,
+-1,
+Xkey_7,0 ,
+Xkey_7,1 ,
+Xkey_7,2 ,
+Xkey_7,3 ,
+Xkey_7,4 ,
+Xkey_7,5 ,
+Xkey_7,6 ,
+Xkey_7,7 ,
+-1,
+Xkey_8,0 ,
+Xkey_8,1 ,
+Xkey_8,2 ,
+Xkey_8,3 ,
+Xkey_8,4 ,
+Xkey_8,5 ,
+Xkey_8,6 ,
+Xkey_8,7 ,
+-1,
+
+Xwind_n,0 ,
+Xwind_n,1 ,
+Xwind_n,2 ,
+Xwind_n,3 ,
+Xwind_n,4 ,
+Xwind_n,5 ,
+Xwind_n,6 ,
+Xwind_n,7 ,
+-1,
+Xwind_e,0 ,
+Xwind_e,1 ,
+Xwind_e,2 ,
+Xwind_e,3 ,
+Xwind_e,4 ,
+Xwind_e,5 ,
+Xwind_e,6 ,
+Xwind_e,7 ,
+-1,
+Xwind_s,0 ,
+Xwind_s,1 ,
+Xwind_s,2 ,
+Xwind_s,3 ,
+Xwind_s,4 ,
+Xwind_s,5 ,
+Xwind_s,6 ,
+Xwind_s,7 ,
+-1,
+Xwind_w,0 ,
+Xwind_w,1 ,
+Xwind_w,2 ,
+Xwind_w,3 ,
+Xwind_w,4 ,
+Xwind_w,5 ,
+Xwind_w,6 ,
+Xwind_w,7 ,
+-1,
+Xwind_nesw,0 ,
+Xwind_nesw,1 ,
+Xwind_nesw,2 ,
+Xwind_nesw,3 ,
+Xwind_nesw,4 ,
+Xwind_nesw,5 ,
+Xwind_nesw,6 ,
+Xwind_nesw,7 ,
+-1,
+Xwind_stop,0 ,
+Xwind_stop,1 ,
+Xwind_stop,2 ,
+Xwind_stop,3 ,
+Xwind_stop,4 ,
+Xwind_stop,5 ,
+Xwind_stop,6 ,
+Xwind_stop,7 ,
+-1,
+
+Xexit,0 ,
+Xexit,1 ,
+Xexit,2 ,
+Xexit,3 ,
+Xexit,4 ,
+Xexit,5 ,
+Xexit,6 ,
+Xexit,7 ,
+-1,
+Xexit_1,0 ,
+Xexit_1,1 ,
+Xexit_1,2 ,
+-1,
+Xexit_1,3 ,
+Xexit_1,4 ,
+Xexit_1,5 ,
+Xexit_3,7 ,
+Xexit_3,6 ,
+Xexit_3,5 ,
+-1,
+Xexit_1,6 ,
+Xexit_1,7 ,
+Xexit_2,0 ,
+Xexit_3,4 ,
+Xexit_3,3 ,
+Xexit_3,2 ,
+-1,
+Xexit_2,1 ,
+Xexit_2,2 ,
+Xexit_2,3 ,
+Xexit_3,1 ,
+Xexit_3,0 ,
+Xexit_2,7 ,
+-1,
+Xexit_2,4 ,
+Xexit_2,5 ,
+Xexit_2,6 ,
+-1,
+
+Ydynamite_eat,0 ,
+Ydynamite_eat,1 ,
+Ydynamite_eat,2 ,
+Xdynamite,0 ,
+Xdynamite,1 ,
+Xdynamite,2 ,
+Xdynamite,3 ,
+Xdynamite,4 ,
+Xdynamite,5 ,
+Xdynamite,6 ,
+Xdynamite,7 ,
+-1,
+Xdynamite_4,0 ,
+Xdynamite_4,1 ,
+Xdynamite_4,2 ,
+Xdynamite_4,3 ,
+Xdynamite_4,4 ,
+Xdynamite_4,5 ,
+Xdynamite_4,6 ,
+Xdynamite_4,7 ,
+-1,
+Xdynamite_3,0 ,
+Xdynamite_3,1 ,
+Xdynamite_3,2 ,
+Xdynamite_3,3 ,
+Xdynamite_3,4 ,
+Xdynamite_3,5 ,
+Xdynamite_3,6 ,
+Xdynamite_3,7 ,
+-1,
+Xdynamite_2,0 ,
+Xdynamite_2,1 ,
+Xdynamite_2,2 ,
+Xdynamite_2,3 ,
+Xdynamite_2,4 ,
+Xdynamite_2,5 ,
+Xdynamite_2,6 ,
+Xdynamite_2,7 ,
+-1,
+Xdynamite_1,0 ,
+Xdynamite_1,1 ,
+Xdynamite_1,2 ,
+Xdynamite_1,3 ,
+Xdynamite_1,4 ,
+Xdynamite_1,5 ,
+Xdynamite_1,6 ,
+Xdynamite_1,7 ,
+-1,
+
+Xbumper,0 ,
+Xbumper,1 ,
+Xbumper,2 ,
+Xbumper,3 ,
+Xbumper,4 ,
+Xbumper,5 ,
+Xbumper,6 ,
+Xbumper,7 ,
+XbumperB,0 ,
+XbumperB,7 ,
+-1,
+XbumperB,1 ,
+XbumperB,6 ,
+-1,
+XbumperB,2 ,
+XbumperB,5 ,
+-1,
+XbumperB,3 ,
+XbumperB,4 ,
+-1,
+
+Xwheel,0 ,
+Xwheel,1 ,
+Xwheel,2 ,
+Xwheel,3 ,
+Xwheel,4 ,
+Xwheel,5 ,
+Xwheel,6 ,
+Xwheel,7 ,
+XwheelB,7 ,
+XwheelB,6 ,
+XwheelB,5 ,
+XwheelB,4 ,
+-1,
+XwheelB,3 ,
+XwheelB,2 ,
+XwheelB,1 ,
+XwheelB,0 ,
+-1,
+
+XswitchB,0 ,
+XswitchB,1 ,
+XswitchB,2 ,
+XswitchB,3 ,
+XswitchB,4 ,
+XswitchB,5 ,
+XswitchB,6 ,
+XswitchB,7 ,
+-1,
+Xswitch,0 ,
+Xswitch,1 ,
+Xswitch,2 ,
+Xswitch,3 ,
+Xswitch,4 ,
+Xswitch,5 ,
+Xswitch,6 ,
+Xswitch,7 ,
+-1,
+
+Xsand,0 ,
+Xsand,1 ,
+Xsand,2 ,
+Xsand,3 ,
+Xsand,4 ,
+Xsand,5 ,
+Xsand,6 ,
+Xsand,7 ,
+Xsand_stone,0 ,
+Xsand_stone,1 ,
+Xsand_stone,2 ,
+Xsand_stone,3 ,
+Xsand_stone,4 ,
+Xsand_stone,5 ,
+Xsand_stone,6 ,
+Xsand_stone,7 ,
+Xsand_stonesand_1,0 ,
+Xsand_stonesand_1,1 ,
+Xsand_stonesand_1,2 ,
+Xsand_stonesand_1,3 ,
+Xsand_stonesand_1,4 ,
+Xsand_stonesand_1,5 ,
+Xsand_stonesand_1,6 ,
+Xsand_stonesand_1,7 ,
+Xsand_stonesand_2,0 ,
+Xsand_stonesand_2,1 ,
+Xsand_stonesand_2,2 ,
+Xsand_stonesand_2,3 ,
+Xsand_stonesand_2,4 ,
+Xsand_stonesand_2,5 ,
+Xsand_stonesand_2,6 ,
+Xsand_stonesand_2,7 ,
+Xsand_stonesand_3,0 ,
+Xsand_stonesand_3,1 ,
+Xsand_stonesand_3,2 ,
+Xsand_stonesand_3,3 ,
+Xsand_stonesand_3,4 ,
+Xsand_stonesand_3,5 ,
+Xsand_stonesand_3,6 ,
+Xsand_stonesand_3,7 ,
+Xsand_stonesand_4,0 ,
+Xsand_stonesand_4,1 ,
+Xsand_stonesand_4,2 ,
+Xsand_stonesand_4,3 ,
+Xsand_stonesand_4,4 ,
+Xsand_stonesand_4,5 ,
+Xsand_stonesand_4,6 ,
+Xsand_stonesand_4,7 ,
+Xsand_sandstone_1,0 ,
+Xsand_sandstone_1,1 ,
+Xsand_sandstone_1,2 ,
+Xsand_sandstone_1,3 ,
+Xsand_sandstone_1,4 ,
+Xsand_sandstone_1,5 ,
+Xsand_sandstone_1,6 ,
+Xsand_sandstone_1,7 ,
+Xsand_sandstone_2,0 ,
+Xsand_sandstone_2,1 ,
+Xsand_sandstone_2,2 ,
+Xsand_sandstone_2,3 ,
+Xsand_sandstone_2,4 ,
+Xsand_sandstone_2,5 ,
+Xsand_sandstone_2,6 ,
+Xsand_sandstone_2,7 ,
+Xsand_sandstone_3,0 ,
+Xsand_sandstone_3,1 ,
+Xsand_sandstone_3,2 ,
+Xsand_sandstone_3,3 ,
+Xsand_sandstone_3,4 ,
+Xsand_sandstone_3,5 ,
+Xsand_sandstone_3,6 ,
+Xsand_sandstone_3,7 ,
+Xsand_sandstone_4,0 ,
+Xsand_sandstone_4,1 ,
+Xsand_sandstone_4,2 ,
+Xsand_sandstone_4,3 ,
+Xsand_sandstone_4,4 ,
+Xsand_sandstone_4,5 ,
+Xsand_sandstone_4,6 ,
+Xsand_sandstone_4,7 ,
+-1,
+
+Xplant,0 ,
+Xplant,1 ,
+Xplant,2 ,
+Xplant,3 ,
+Xplant,4 ,
+Xplant,5 ,
+Xplant,6 ,
+Xplant,7 ,
+Yplant,0 ,
+Yplant,1 ,
+Yplant,2 ,
+Yplant,3 ,
+Yplant,4 ,
+Yplant,5 ,
+Yplant,6 ,
+Yplant,7 ,
+-1,
+
+Xlenses,0 ,
+Xlenses,1 ,
+Xlenses,2 ,
+Xlenses,3 ,
+Xlenses,4 ,
+Xlenses,5 ,
+Xlenses,6 ,
+Xlenses,7 ,
+-1,
+
+Xmagnify,0 ,
+Xmagnify,1 ,
+Xmagnify,2 ,
+Xmagnify,3 ,
+Xmagnify,4 ,
+Xmagnify,5 ,
+Xmagnify,6 ,
+Xmagnify,7 ,
+-1,
+
+XdripperB,0 ,
+XdripperB,1 ,
+XdripperB,2 ,
+XdripperB,3 ,
+XdripperB,4 ,
+XdripperB,5 ,
+XdripperB,6 ,
+XdripperB,7 ,
+-1,
+
+Xfake_blankB,0 ,
+Xfake_blankB,1 ,
+Xfake_blankB,2 ,
+Xfake_blankB,3 ,
+Xfake_blankB,4 ,
+Xfake_blankB,5 ,
+Xfake_blankB,6 ,
+Xfake_blankB,7 ,
+-1,
+
+Xfake_grassB,0 ,
+Xfake_grassB,1 ,
+Xfake_grassB,2 ,
+Xfake_grassB,3 ,
+Xfake_grassB,4 ,
+Xfake_grassB,5 ,
+Xfake_grassB,6 ,
+Xfake_grassB,7 ,
+-1,
+
+Xfake_door_1,0 ,
+Xfake_door_1,1 ,
+Xfake_door_1,2 ,
+Xfake_door_1,3 ,
+Xfake_door_1,4 ,
+Xfake_door_1,5 ,
+Xfake_door_1,6 ,
+Xfake_door_1,7 ,
+Xfake_door_2,0 ,
+Xfake_door_2,1 ,
+Xfake_door_2,2 ,
+Xfake_door_2,3 ,
+Xfake_door_2,4 ,
+Xfake_door_2,5 ,
+Xfake_door_2,6 ,
+Xfake_door_2,7 ,
+Xfake_door_3,0 ,
+Xfake_door_3,1 ,
+Xfake_door_3,2 ,
+Xfake_door_3,3 ,
+Xfake_door_3,4 ,
+Xfake_door_3,5 ,
+Xfake_door_3,6 ,
+Xfake_door_3,7 ,
+Xfake_door_4,0 ,
+Xfake_door_4,1 ,
+Xfake_door_4,2 ,
+Xfake_door_4,3 ,
+Xfake_door_4,4 ,
+Xfake_door_4,5 ,
+Xfake_door_4,6 ,
+Xfake_door_4,7 ,
+Xfake_door_5,0 ,
+Xfake_door_5,1 ,
+Xfake_door_5,2 ,
+Xfake_door_5,3 ,
+Xfake_door_5,4 ,
+Xfake_door_5,5 ,
+Xfake_door_5,6 ,
+Xfake_door_5,7 ,
+Xfake_door_6,0 ,
+Xfake_door_6,1 ,
+Xfake_door_6,2 ,
+Xfake_door_6,3 ,
+Xfake_door_6,4 ,
+Xfake_door_6,5 ,
+Xfake_door_6,6 ,
+Xfake_door_6,7 ,
+Xfake_door_7,0 ,
+Xfake_door_7,1 ,
+Xfake_door_7,2 ,
+Xfake_door_7,3 ,
+Xfake_door_7,4 ,
+Xfake_door_7,5 ,
+Xfake_door_7,6 ,
+Xfake_door_7,7 ,
+Xfake_door_8,0 ,
+Xfake_door_8,1 ,
+Xfake_door_8,2 ,
+Xfake_door_8,3 ,
+Xfake_door_8,4 ,
+Xfake_door_8,5 ,
+Xfake_door_8,6 ,
+Xfake_door_8,7 ,
+-1,
+
+Xsteel_1,0 ,
+Xsteel_1,1 ,
+Xsteel_1,2 ,
+Xsteel_1,3 ,
+Xsteel_1,4 ,
+Xsteel_1,5 ,
+Xsteel_1,6 ,
+Xsteel_1,7 ,
+-1,
+Xsteel_2,0 ,
+Xsteel_2,1 ,
+Xsteel_2,2 ,
+Xsteel_2,3 ,
+Xsteel_2,4 ,
+Xsteel_2,5 ,
+Xsteel_2,6 ,
+Xsteel_2,7 ,
+-1,
+Xsteel_3,0 ,
+Xsteel_3,1 ,
+Xsteel_3,2 ,
+Xsteel_3,3 ,
+Xsteel_3,4 ,
+Xsteel_3,5 ,
+Xsteel_3,6 ,
+Xsteel_3,7 ,
+-1,
+Xsteel_4,0 ,
+Xsteel_4,1 ,
+Xsteel_4,2 ,
+Xsteel_4,3 ,
+Xsteel_4,4 ,
+Xsteel_4,5 ,
+Xsteel_4,6 ,
+Xsteel_4,7 ,
+-1,
+Xwall_1,0 ,
+Xwall_1,1 ,
+Xwall_1,2 ,
+Xwall_1,3 ,
+Xwall_1,4 ,
+Xwall_1,5 ,
+Xwall_1,6 ,
+Xwall_1,7 ,
+-1,
+Xwall_2,0 ,
+Xwall_2,1 ,
+Xwall_2,2 ,
+Xwall_2,3 ,
+Xwall_2,4 ,
+Xwall_2,5 ,
+Xwall_2,6 ,
+Xwall_2,7 ,
+-1,
+Xwall_3,0 ,
+Xwall_3,1 ,
+Xwall_3,2 ,
+Xwall_3,3 ,
+Xwall_3,4 ,
+Xwall_3,5 ,
+Xwall_3,6 ,
+Xwall_3,7 ,
+-1,
+Xwall_4,0 ,
+Xwall_4,1 ,
+Xwall_4,2 ,
+Xwall_4,3 ,
+Xwall_4,4 ,
+Xwall_4,5 ,
+Xwall_4,6 ,
+Xwall_4,7 ,
+-1,
+Xround_wall_1,0 ,
+Xround_wall_1,1 ,
+Xround_wall_1,2 ,
+Xround_wall_1,3 ,
+Xround_wall_1,4 ,
+Xround_wall_1,5 ,
+Xround_wall_1,6 ,
+Xround_wall_1,7 ,
+-1,
+Xround_wall_2,0 ,
+Xround_wall_2,1 ,
+Xround_wall_2,2 ,
+Xround_wall_2,3 ,
+Xround_wall_2,4 ,
+Xround_wall_2,5 ,
+Xround_wall_2,6 ,
+Xround_wall_2,7 ,
+-1,
+Xround_wall_3,0 ,
+Xround_wall_3,1 ,
+Xround_wall_3,2 ,
+Xround_wall_3,3 ,
+Xround_wall_3,4 ,
+Xround_wall_3,5 ,
+Xround_wall_3,6 ,
+Xround_wall_3,7 ,
+-1,
+Xround_wall_4,0 ,
+Xround_wall_4,1 ,
+Xround_wall_4,2 ,
+Xround_wall_4,3 ,
+Xround_wall_4,4 ,
+Xround_wall_4,5 ,
+Xround_wall_4,6 ,
+Xround_wall_4,7 ,
+-1,
+Xdecor_1,0 ,
+Xdecor_1,1 ,
+Xdecor_1,2 ,
+Xdecor_1,3 ,
+Xdecor_1,4 ,
+Xdecor_1,5 ,
+Xdecor_1,6 ,
+Xdecor_1,7 ,
+-1,
+Xdecor_2,0 ,
+Xdecor_2,1 ,
+Xdecor_2,2 ,
+Xdecor_2,3 ,
+Xdecor_2,4 ,
+Xdecor_2,5 ,
+Xdecor_2,6 ,
+Xdecor_2,7 ,
+-1,
+Xdecor_3,0 ,
+Xdecor_3,1 ,
+Xdecor_3,2 ,
+Xdecor_3,3 ,
+Xdecor_3,4 ,
+Xdecor_3,5 ,
+Xdecor_3,6 ,
+Xdecor_3,7 ,
+-1,
+Xdecor_4,0 ,
+Xdecor_4,1 ,
+Xdecor_4,2 ,
+Xdecor_4,3 ,
+Xdecor_4,4 ,
+Xdecor_4,5 ,
+Xdecor_4,6 ,
+Xdecor_4,7 ,
+-1,
+Xdecor_5,0 ,
+Xdecor_5,1 ,
+Xdecor_5,2 ,
+Xdecor_5,3 ,
+Xdecor_5,4 ,
+Xdecor_5,5 ,
+Xdecor_5,6 ,
+Xdecor_5,7 ,
+-1,
+Xdecor_6,0 ,
+Xdecor_6,1 ,
+Xdecor_6,2 ,
+Xdecor_6,3 ,
+Xdecor_6,4 ,
+Xdecor_6,5 ,
+Xdecor_6,6 ,
+Xdecor_6,7 ,
+-1,
+Xdecor_7,0 ,
+Xdecor_7,1 ,
+Xdecor_7,2 ,
+Xdecor_7,3 ,
+Xdecor_7,4 ,
+Xdecor_7,5 ,
+Xdecor_7,6 ,
+Xdecor_7,7 ,
+-1,
+Xdecor_8,0 ,
+Xdecor_8,1 ,
+Xdecor_8,2 ,
+Xdecor_8,3 ,
+Xdecor_8,4 ,
+Xdecor_8,5 ,
+Xdecor_8,6 ,
+Xdecor_8,7 ,
+-1,
+Xdecor_9,0 ,
+Xdecor_9,1 ,
+Xdecor_9,2 ,
+Xdecor_9,3 ,
+Xdecor_9,4 ,
+Xdecor_9,5 ,
+Xdecor_9,6 ,
+Xdecor_9,7 ,
+-1,
+Xdecor_10,0 ,
+Xdecor_10,1 ,
+Xdecor_10,2 ,
+Xdecor_10,3 ,
+Xdecor_10,4 ,
+Xdecor_10,5 ,
+Xdecor_10,6 ,
+Xdecor_10,7 ,
+-1,
+Xdecor_11,0 ,
+Xdecor_11,1 ,
+Xdecor_11,2 ,
+Xdecor_11,3 ,
+Xdecor_11,4 ,
+Xdecor_11,5 ,
+Xdecor_11,6 ,
+Xdecor_11,7 ,
+-1,
+Xdecor_12,0 ,
+Xdecor_12,1 ,
+Xdecor_12,2 ,
+Xdecor_12,3 ,
+Xdecor_12,4 ,
+Xdecor_12,5 ,
+Xdecor_12,6 ,
+Xdecor_12,7 ,
+-1,
+Xalpha_excla,0 ,
+Xalpha_excla,1 ,
+Xalpha_excla,2 ,
+Xalpha_excla,3 ,
+Xalpha_excla,4 ,
+Xalpha_excla,5 ,
+Xalpha_excla,6 ,
+Xalpha_excla,7 ,
+-1,
+Xalpha_quote,0 ,
+Xalpha_quote,1 ,
+Xalpha_quote,2 ,
+Xalpha_quote,3 ,
+Xalpha_quote,4 ,
+Xalpha_quote,5 ,
+Xalpha_quote,6 ,
+Xalpha_quote,7 ,
+-1,
+Xalpha_comma,0 ,
+Xalpha_comma,1 ,
+Xalpha_comma,2 ,
+Xalpha_comma,3 ,
+Xalpha_comma,4 ,
+Xalpha_comma,5 ,
+Xalpha_comma,6 ,
+Xalpha_comma,7 ,
+-1,
+Xalpha_minus,0 ,
+Xalpha_minus,1 ,
+Xalpha_minus,2 ,
+Xalpha_minus,3 ,
+Xalpha_minus,4 ,
+Xalpha_minus,5 ,
+Xalpha_minus,6 ,
+Xalpha_minus,7 ,
+-1,
+Xalpha_perio,0 ,
+Xalpha_perio,1 ,
+Xalpha_perio,2 ,
+Xalpha_perio,3 ,
+Xalpha_perio,4 ,
+Xalpha_perio,5 ,
+Xalpha_perio,6 ,
+Xalpha_perio,7 ,
+-1,
+Xalpha_0,0 ,
+Xalpha_0,1 ,
+Xalpha_0,2 ,
+Xalpha_0,3 ,
+Xalpha_0,4 ,
+Xalpha_0,5 ,
+Xalpha_0,6 ,
+Xalpha_0,7 ,
+-1,
+Xalpha_1,0 ,
+Xalpha_1,1 ,
+Xalpha_1,2 ,
+Xalpha_1,3 ,
+Xalpha_1,4 ,
+Xalpha_1,5 ,
+Xalpha_1,6 ,
+Xalpha_1,7 ,
+-1,
+Xalpha_2,0 ,
+Xalpha_2,1 ,
+Xalpha_2,2 ,
+Xalpha_2,3 ,
+Xalpha_2,4 ,
+Xalpha_2,5 ,
+Xalpha_2,6 ,
+Xalpha_2,7 ,
+-1,
+Xalpha_3,0 ,
+Xalpha_3,1 ,
+Xalpha_3,2 ,
+Xalpha_3,3 ,
+Xalpha_3,4 ,
+Xalpha_3,5 ,
+Xalpha_3,6 ,
+Xalpha_3,7 ,
+-1,
+Xalpha_4,0 ,
+Xalpha_4,1 ,
+Xalpha_4,2 ,
+Xalpha_4,3 ,
+Xalpha_4,4 ,
+Xalpha_4,5 ,
+Xalpha_4,6 ,
+Xalpha_4,7 ,
+-1,
+Xalpha_5,0 ,
+Xalpha_5,1 ,
+Xalpha_5,2 ,
+Xalpha_5,3 ,
+Xalpha_5,4 ,
+Xalpha_5,5 ,
+Xalpha_5,6 ,
+Xalpha_5,7 ,
+-1,
+Xalpha_6,0 ,
+Xalpha_6,1 ,
+Xalpha_6,2 ,
+Xalpha_6,3 ,
+Xalpha_6,4 ,
+Xalpha_6,5 ,
+Xalpha_6,6 ,
+Xalpha_6,7 ,
+-1,
+Xalpha_7,0 ,
+Xalpha_7,1 ,
+Xalpha_7,2 ,
+Xalpha_7,3 ,
+Xalpha_7,4 ,
+Xalpha_7,5 ,
+Xalpha_7,6 ,
+Xalpha_7,7 ,
+-1,
+Xalpha_8,0 ,
+Xalpha_8,1 ,
+Xalpha_8,2 ,
+Xalpha_8,3 ,
+Xalpha_8,4 ,
+Xalpha_8,5 ,
+Xalpha_8,6 ,
+Xalpha_8,7 ,
+-1,
+Xalpha_9,0 ,
+Xalpha_9,1 ,
+Xalpha_9,2 ,
+Xalpha_9,3 ,
+Xalpha_9,4 ,
+Xalpha_9,5 ,
+Xalpha_9,6 ,
+Xalpha_9,7 ,
+-1,
+Xalpha_colon,0 ,
+Xalpha_colon,1 ,
+Xalpha_colon,2 ,
+Xalpha_colon,3 ,
+Xalpha_colon,4 ,
+Xalpha_colon,5 ,
+Xalpha_colon,6 ,
+Xalpha_colon,7 ,
+-1,
+Xalpha_arrow_w,0 ,
+Xalpha_arrow_w,1 ,
+Xalpha_arrow_w,2 ,
+Xalpha_arrow_w,3 ,
+Xalpha_arrow_w,4 ,
+Xalpha_arrow_w,5 ,
+Xalpha_arrow_w,6 ,
+Xalpha_arrow_w,7 ,
+-1,
+Xalpha_arrow_e,0 ,
+Xalpha_arrow_e,1 ,
+Xalpha_arrow_e,2 ,
+Xalpha_arrow_e,3 ,
+Xalpha_arrow_e,4 ,
+Xalpha_arrow_e,5 ,
+Xalpha_arrow_e,6 ,
+Xalpha_arrow_e,7 ,
+-1,
+Xalpha_quest,0 ,
+Xalpha_quest,1 ,
+Xalpha_quest,2 ,
+Xalpha_quest,3 ,
+Xalpha_quest,4 ,
+Xalpha_quest,5 ,
+Xalpha_quest,6 ,
+Xalpha_quest,7 ,
+-1,
+Xalpha_a,0 ,
+Xalpha_a,1 ,
+Xalpha_a,2 ,
+Xalpha_a,3 ,
+Xalpha_a,4 ,
+Xalpha_a,5 ,
+Xalpha_a,6 ,
+Xalpha_a,7 ,
+-1,
+Xalpha_b,0 ,
+Xalpha_b,1 ,
+Xalpha_b,2 ,
+Xalpha_b,3 ,
+Xalpha_b,4 ,
+Xalpha_b,5 ,
+Xalpha_b,6 ,
+Xalpha_b,7 ,
+-1,
+Xalpha_c,0 ,
+Xalpha_c,1 ,
+Xalpha_c,2 ,
+Xalpha_c,3 ,
+Xalpha_c,4 ,
+Xalpha_c,5 ,
+Xalpha_c,6 ,
+Xalpha_c,7 ,
+-1,
+Xalpha_d,0 ,
+Xalpha_d,1 ,
+Xalpha_d,2 ,
+Xalpha_d,3 ,
+Xalpha_d,4 ,
+Xalpha_d,5 ,
+Xalpha_d,6 ,
+Xalpha_d,7 ,
+-1,
+Xalpha_e,0 ,
+Xalpha_e,1 ,
+Xalpha_e,2 ,
+Xalpha_e,3 ,
+Xalpha_e,4 ,
+Xalpha_e,5 ,
+Xalpha_e,6 ,
+Xalpha_e,7 ,
+-1,
+Xalpha_f,0 ,
+Xalpha_f,1 ,
+Xalpha_f,2 ,
+Xalpha_f,3 ,
+Xalpha_f,4 ,
+Xalpha_f,5 ,
+Xalpha_f,6 ,
+Xalpha_f,7 ,
+-1,
+Xalpha_g,0 ,
+Xalpha_g,1 ,
+Xalpha_g,2 ,
+Xalpha_g,3 ,
+Xalpha_g,4 ,
+Xalpha_g,5 ,
+Xalpha_g,6 ,
+Xalpha_g,7 ,
+-1,
+Xalpha_h,0 ,
+Xalpha_h,1 ,
+Xalpha_h,2 ,
+Xalpha_h,3 ,
+Xalpha_h,4 ,
+Xalpha_h,5 ,
+Xalpha_h,6 ,
+Xalpha_h,7 ,
+-1,
+Xalpha_i,0 ,
+Xalpha_i,1 ,
+Xalpha_i,2 ,
+Xalpha_i,3 ,
+Xalpha_i,4 ,
+Xalpha_i,5 ,
+Xalpha_i,6 ,
+Xalpha_i,7 ,
+-1,
+Xalpha_j,0 ,
+Xalpha_j,1 ,
+Xalpha_j,2 ,
+Xalpha_j,3 ,
+Xalpha_j,4 ,
+Xalpha_j,5 ,
+Xalpha_j,6 ,
+Xalpha_j,7 ,
+-1,
+Xalpha_k,0 ,
+Xalpha_k,1 ,
+Xalpha_k,2 ,
+Xalpha_k,3 ,
+Xalpha_k,4 ,
+Xalpha_k,5 ,
+Xalpha_k,6 ,
+Xalpha_k,7 ,
+-1,
+Xalpha_l,0 ,
+Xalpha_l,1 ,
+Xalpha_l,2 ,
+Xalpha_l,3 ,
+Xalpha_l,4 ,
+Xalpha_l,5 ,
+Xalpha_l,6 ,
+Xalpha_l,7 ,
+-1,
+Xalpha_m,0 ,
+Xalpha_m,1 ,
+Xalpha_m,2 ,
+Xalpha_m,3 ,
+Xalpha_m,4 ,
+Xalpha_m,5 ,
+Xalpha_m,6 ,
+Xalpha_m,7 ,
+-1,
+Xalpha_n,0 ,
+Xalpha_n,1 ,
+Xalpha_n,2 ,
+Xalpha_n,3 ,
+Xalpha_n,4 ,
+Xalpha_n,5 ,
+Xalpha_n,6 ,
+Xalpha_n,7 ,
+-1,
+Xalpha_o,0 ,
+Xalpha_o,1 ,
+Xalpha_o,2 ,
+Xalpha_o,3 ,
+Xalpha_o,4 ,
+Xalpha_o,5 ,
+Xalpha_o,6 ,
+Xalpha_o,7 ,
+-1,
+Xalpha_p,0 ,
+Xalpha_p,1 ,
+Xalpha_p,2 ,
+Xalpha_p,3 ,
+Xalpha_p,4 ,
+Xalpha_p,5 ,
+Xalpha_p,6 ,
+Xalpha_p,7 ,
+-1,
+Xalpha_q,0 ,
+Xalpha_q,1 ,
+Xalpha_q,2 ,
+Xalpha_q,3 ,
+Xalpha_q,4 ,
+Xalpha_q,5 ,
+Xalpha_q,6 ,
+Xalpha_q,7 ,
+-1,
+Xalpha_r,0 ,
+Xalpha_r,1 ,
+Xalpha_r,2 ,
+Xalpha_r,3 ,
+Xalpha_r,4 ,
+Xalpha_r,5 ,
+Xalpha_r,6 ,
+Xalpha_r,7 ,
+-1,
+Xalpha_s,0 ,
+Xalpha_s,1 ,
+Xalpha_s,2 ,
+Xalpha_s,3 ,
+Xalpha_s,4 ,
+Xalpha_s,5 ,
+Xalpha_s,6 ,
+Xalpha_s,7 ,
+-1,
+Xalpha_t,0 ,
+Xalpha_t,1 ,
+Xalpha_t,2 ,
+Xalpha_t,3 ,
+Xalpha_t,4 ,
+Xalpha_t,5 ,
+Xalpha_t,6 ,
+Xalpha_t,7 ,
+-1,
+Xalpha_u,0 ,
+Xalpha_u,1 ,
+Xalpha_u,2 ,
+Xalpha_u,3 ,
+Xalpha_u,4 ,
+Xalpha_u,5 ,
+Xalpha_u,6 ,
+Xalpha_u,7 ,
+-1,
+Xalpha_v,0 ,
+Xalpha_v,1 ,
+Xalpha_v,2 ,
+Xalpha_v,3 ,
+Xalpha_v,4 ,
+Xalpha_v,5 ,
+Xalpha_v,6 ,
+Xalpha_v,7 ,
+-1,
+Xalpha_w,0 ,
+Xalpha_w,1 ,
+Xalpha_w,2 ,
+Xalpha_w,3 ,
+Xalpha_w,4 ,
+Xalpha_w,5 ,
+Xalpha_w,6 ,
+Xalpha_w,7 ,
+-1,
+Xalpha_x,0 ,
+Xalpha_x,1 ,
+Xalpha_x,2 ,
+Xalpha_x,3 ,
+Xalpha_x,4 ,
+Xalpha_x,5 ,
+Xalpha_x,6 ,
+Xalpha_x,7 ,
+-1,
+Xalpha_y,0 ,
+Xalpha_y,1 ,
+Xalpha_y,2 ,
+Xalpha_y,3 ,
+Xalpha_y,4 ,
+Xalpha_y,5 ,
+Xalpha_y,6 ,
+Xalpha_y,7 ,
+-1,
+Xalpha_z,0 ,
+Xalpha_z,1 ,
+Xalpha_z,2 ,
+Xalpha_z,3 ,
+Xalpha_z,4 ,
+Xalpha_z,5 ,
+Xalpha_z,6 ,
+Xalpha_z,7 ,
+-1,
+Xalpha_copyr,0 ,
+Xalpha_copyr,1 ,
+Xalpha_copyr,2 ,
+Xalpha_copyr,3 ,
+Xalpha_copyr,4 ,
+Xalpha_copyr,5 ,
+Xalpha_copyr,6 ,
+Xalpha_copyr,7 ,
+-1,
+
+Yball_eat,7 ,
+Yball_eat,6 ,
+Yball_eat,5 ,
+Xboom_2,7 ,
+Xboom_2,6 ,
+Xboom_2,5 ,
+-1,
+Yball_eat,4 ,
+Yball_eat,3 ,
+Yball_eat,2 ,
+Xboom_2,4 ,
+Xboom_2,3 ,
+Xboom_2,2 ,
+-1,
+Yball_eat,1 ,
+Yball_eat,0 ,
+Xboom_2,1 ,
+Xboom_2,0 ,
+Xboom_1,7 ,
+-1,
+Xboom_1,6 ,
+Xboom_1,5 ,
+Xboom_android,7 ,
+-1,
+Xboom_1,4 ,
+Xboom_1,3 ,
+Xboom_bug,4 ,
+Xboom_bomb,4 ,
+Xboom_bug,3 ,
+Xboom_bomb,3 ,
+-1,
+Xboom_1,2 ,
+Xboom_1,1 ,
+Xboom_bug,6 ,
+Xboom_bomb,6 ,
+Xboom_bug,5 ,
+Xboom_bomb,5 ,
+Xboom_bug,2 ,
+Xboom_bomb,2 ,
+Xboom_bug,1 ,
+Xboom_bomb,1 ,
+-1,
+Xboom_bug,0 ,
+Xboom_bug,7 ,
+Xboom_bomb,0 ,
+Xboom_bomb,7 ,
+Xboom_1,0 ,
+Ybug_stone,7 ,
+Ybug_spring,7 ,
+Ytank_stone,7 ,
+Ytank_spring,7 ,
+Yeater_stone,7 ,
+Yeater_spring,7 ,
+Yalien_stone,7 ,
+Yalien_spring,7 ,
+Ybomb_eat,7 ,
+-1
+};
+
+int spr_map[] = {
+SPR_walk+0,0, 0,1,2,3,4,5,6,7,
+SPR_walk+1,0, 8,9,10,11,12,13,14,15,
+SPR_walk+2,0, 16,17,18,19,20,21,22,23,
+SPR_walk+3,0, 24,25,26,27,28,29,30,31,
+SPR_push+0,0, 32,33,34,35,36,35,34,33,
+SPR_push+1,0, 37,38,39,40,41,40,39,38,
+SPR_push+2,0, 42,43,44,45,46,45,44,43,
+SPR_push+3,0, 47,48,49,50,51,50,49,48,
+SPR_spray+0,0, 52,52,52,52,52,52,52,52,
+SPR_spray+1,0, 53,53,53,53,53,53,53,53,
+SPR_spray+2,0, 54,54,54,54,54,54,54,54,
+SPR_spray+3,0, 55,55,55,55,55,55,55,55,
+SPR_walk+0,1, 56,57,58,59,60,61,62,63,
+SPR_walk+1,1, 64,65,66,67,68,69,70,71,
+SPR_walk+2,1, 72,73,74,75,76,77,78,79,
+SPR_walk+3,1, 80,81,82,83,84,85,86,87,
+SPR_push+0,1, 88,89,90,91,92,91,90,89,
+SPR_push+1,1, 93,94,95,96,97,96,95,94,
+SPR_push+2,1, 98,99,100,101,102,101,100,99,
+SPR_push+3,1, 103,104,105,106,107,106,105,104,
+SPR_spray+0,1, 108,108,108,108,108,108,108,108,
+SPR_spray+1,1, 109,109,109,109,109,109,109,109,
+SPR_spray+2,1, 110,110,110,110,110,110,110,110,
+SPR_spray+3,1, 111,111,111,111,111,111,111,111,
+SPR_still,0, 112,112,112,112,112,112,112,112,
+SPR_still,1, 113,113,113,113,113,113,113,113,
+SPR_MAX
+};
+
+#if 0
+int ttl_map[] = {
+-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,
+-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,
+-1,0,-1,-1,-1,-1,-1,1,-1,-1,-1,-1,2,3,4,-1, /* !',-. */
+5,6,7,8,9,10,11,12,13,14,15,-1,-1,-1,-1,16, /* 0123456789:? */
+-1,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31, /* ABCDEFGHIJKLMNO */
+32,33,34,35,36,37,38,39,40,41,42,-1,-1,-1,-1,-1, /* PQRSTUVWXYZ */
+-1,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31, /* abcdefghijklmno */
+32,33,34,35,36,37,38,39,40,41,42,-1,-1,-1,-1,-1 /* pqrstuvwxyz */
+};
+#endif
+
+/* ---------------------------------------------------------------------- */
+
+#if 0
+
+/* quick and dirty code to format the data semi nicely */
+
+void print_buffer(int *buffer, int count)
+{
+ int i,j;
+ j = 0;
+ for(i = 0; i < count;) {
+ if(j > 80) { j=0; printf("\n"); }
+ if(j == 0) printf("\t");
+ j += printf("%d", buffer[i]);
+ j += printf("%s", ++i == count ? "" : ",");
+ }
+ if(j) printf("\n");
+}
+void print_tab(int *invert, char *varname, char *comment)
+{
+ int i;
+ int buffer[TILE_MAX];
+
+ for(i = 0; i < TILE_MAX; i++) buffer[i] = 0;
+ for(;invert[0] < TILE_MAX; invert += 2) buffer[invert[0]] = invert[1];
+
+ printf("/* %s */\n", comment);
+ printf("const unsigned char %s[%d] = {\n", varname, TILE_MAX);
+ print_buffer(buffer, TILE_MAX);
+ printf("};\n");
+}
+void print_explode(void)
+{
+ int i;
+ int *tile = tile_explode;
+ int buffer[TILE_MAX];
+
+ for(i = 0; i < TILE_MAX; i++) buffer[i] = Xboom_1;
+ while((i = *tile++) < TILE_MAX) buffer[i] = i; /* these tiles are indestructable */
+ while((i = *tile++) < TILE_MAX) buffer[i] = *tile++; /* these tiles are special */
+
+ printf("/* normal explosion */\n");
+ printf("const unsigned short tab_explode_normal[%d] = {\n", TILE_MAX);
+ print_buffer(buffer, TILE_MAX);
+ printf("};\n");
+
+ while((i = *tile++) < TILE_MAX) buffer[i] = *tile++; /* these tiles for dynamite */
+
+ printf("/* dynamite explosion */\n");
+ printf("const unsigned short tab_explode_dynamite[%d] = {\n", TILE_MAX);
+ print_buffer(buffer, TILE_MAX);
+ printf("};\n");
+}
+void print_obj(void)
+{
+ int i,j;
+ int *map = obj_map;
+ int buffer[8][TILE_MAX];
+
+#if 0
+ int debug=0;
+ for(i = 0; i < 8; i++) for(j = 0; j < TILE_MAX; j++) buffer[i][j] = 0;
+ for(i = 0; i < 64; i++) {
+ for(;*map != -1; map += 2) {
+ if(map[0] < 0 || map[0] >= TILE_MAX || map[1] < 0 || map[1] >= 8) { fprintf(stderr, "obj_map: bad tile (%d,%d) @ %d+%d\n", map[0], map[1], i / 16, i % 16); debug = 1; continue; }
+ buffer[map[1]][map[0]]++;
+ }
+ map++;
+ }
+ for(i = 0; i < 896; i++) {
+ for(;*map != -1; map += 2) {
+ if(map[0] < 0 || map[0] >= TILE_MAX || map[1] < 0 || map[1] >= 8) { fprintf(stderr, "obj_map: bad tile (%d,%d) @ %d\n", map[0], map[1], i); debug = 1; continue; }
+ buffer[map[1]][map[0]]++;
+ }
+ map++;
+ }
+ for(i = 0; i < TILE_MAX; i++) for(j = 0; j < 8; j++) {
+ switch(buffer[j][i]) {
+ case 0: fprintf(stderr, "obj_map: uninitialized (%d,%d)\n", i, j); debug = 1; break;
+ case 1: break; /* good */
+ default: fprintf(stderr, "obj_map: duplicate (%d,%d)\n", i, j); debug = 1; break;
+ }
+ }
+ if(sizeof(obj_map) / sizeof(*obj_map) != map - obj_map) { fprintf(stderr, "obj_map: bad end (%d != %d)\n", sizeof(obj_map) / sizeof(*obj_map), map - obj_map); debug = 1; }
+ if(debug == 0) fprintf(stderr, "obj_map: looks good, now disable debug code\n");
+ abort();
+#else
+
+ for(i = 0; i < 8; i++) for(j = 0; j < TILE_MAX; j++) buffer[i][j] = Xblank;
+
+/* special case for first 64 entries */
+ for(i = 0; i < 64; i++) {
+ for(;*map != -1; map += 2) buffer[map[1]][map[0]] = i;
+ map++;
+ }
+
+/* now regular entries */
+ for(i = 0; i < 896 * 16; i += 16) {
+ for(;*map != -1; map += 2) buffer[map[1]][map[0]] = i;
+ map++;
+ }
+
+ printf("/* map tiles to coords */\n");
+ printf("const unsigned short map_obj[8][%d] = {\n", TILE_MAX);
+ for(i = 0; i < 8;) {
+ printf("{\n");
+ print_buffer(buffer[7 - i], TILE_MAX);
+ printf("}%s", ++i == 8 ? "\n" : ",");
+ }
+ printf("};\n");
+#endif
+}
+void print_spr(void)
+{
+ int i,j,k;
+ int *map = spr_map;
+ int buffer[2][8][SPR_MAX];
+
+ while(*map < SPR_MAX) {
+ i = *map++;
+ j = *map++;
+ for(k = 0; k < 8; k++) buffer[j][k][i] = *map++;
+ }
+
+ printf("/* map sprites to coords */\n");
+ printf("const unsigned short map_spr[2][8][%d] = {\n", SPR_MAX);
+ for(i = 0; i < 2;) {
+ printf("{\n");
+ for(j = 0; j < 8;) {
+ printf("\t{ ");
+ for(k = 0; k < SPR_MAX;) {
+ printf("%d", buffer[i][7 - j][k]);
+ printf("%s", ++k == SPR_MAX ? "" : ",");
+ }
+ printf(" }%s\n", ++j == 8 ? "" : ",");
+ }
+ printf("}%s", ++i == 2 ? "\n" : ",");
+ }
+ printf("};\n");
+}
+void print_ttl(void)
+{
+ int i,j,k;
+ int buffer[128];
+
+ for(i = 0; i < 128; i++) {
+ if(ttl_map[i] == -1) {
+ buffer[i] = -1;
+ } else {
+ j = (ttl_map[i] % 22) * 14;
+ k = (ttl_map[i] / 22);
+ buffer[i] = k * 320 + j;
+ }
+ }
+ printf("/* map ascii to coords */\n");
+ printf("const unsigned short map_ttl[128] = {\n");
+ print_buffer(buffer, 128);
+ printf("};\n");
+}
+int main_OLD(void)
+{
+ printf("/* THIS FILE AUTOMATICALLY GENERATED */\n\n");
+ print_tab(tile_blank, "tab_blank", "0=stop 1=blank");
+ print_tab(tile_acid, "tab_acid", "0=stop 1=acid");
+ print_tab(tile_ameuba, "tab_ameuba", "0=stop 1=ameuba");
+ print_tab(tile_android_move, "tab_android_move", "0=stop 1=move");
+ print_explode();
+ print_obj();
+ print_spr();
+ print_ttl();
+ return(0);
+}
+
+#endif
+
+/* ------------------------------------------------------------------------- */
+
+/* 0=stop 1=blank */
+unsigned char tab_blank[TILE_MAX];
+
+/* 0=stop 1=acid */
+unsigned char tab_acid[TILE_MAX];
+
+/* 0=stop 1=ameuba */
+unsigned char tab_ameuba[TILE_MAX];
+
+/* 0=stop 1=move */
+unsigned char tab_android_move[TILE_MAX];
+
+/* normal explosion */
+unsigned short tab_explode_normal[TILE_MAX];
+
+/* dynamite explosion */
+unsigned short tab_explode_dynamite[TILE_MAX];
+
+/* map tiles to coords */
+unsigned short map_obj[8][TILE_MAX];
+
+/* map sprites to coords */
+unsigned short map_spr[2][8][13];
+
+/* map ascii to coords */
+unsigned short map_ttl[128];
+
+void create_tab(int *invert, unsigned char *array)
+{
+ int i;
+ int buffer[TILE_MAX];
+
+ for(i = 0; i < TILE_MAX; i++)
+ buffer[i] = 0;
+
+ for(;invert[0] < TILE_MAX; invert += 2)
+ buffer[invert[0]] = invert[1];
+
+ for(i = 0; i < TILE_MAX; i++)
+ array[i] = buffer[i];
+}
+
+void create_explode()
+{
+ int i;
+ int *tile = tile_explode;
+ int buffer[TILE_MAX];
+
+ for(i = 0; i < TILE_MAX; i++)
+ buffer[i] = Xboom_1;
+ while((i = *tile++) < TILE_MAX)
+ buffer[i] = i; /* these tiles are indestructable */
+ while((i = *tile++) < TILE_MAX)
+ buffer[i] = *tile++; /* these tiles are special */
+
+ for(i = 0; i < TILE_MAX; i++)
+ tab_explode_normal[i] = buffer[i];
+
+ while((i = *tile++) < TILE_MAX)
+ buffer[i] = *tile++; /* these tiles for dynamite */
+
+ for(i = 0; i < TILE_MAX; i++)
+ tab_explode_dynamite[i] = buffer[i];
+}
+
+void create_obj()
+{
+ int i, j;
+ int *map = obj_map;
+ int buffer[8][TILE_MAX];
+
+#if 0
+
+ int debug = 0;
+ for(i = 0; i < 8; i++)
+ for(j = 0; j < TILE_MAX; j++)
+ buffer[i][j] = 0;
+ for(i = 0; i < 64; i++)
+ {
+ for(;*map != -1; map += 2)
+ {
+ if (map[0] < 0 || map[0] >= TILE_MAX || map[1] < 0 || map[1] >= 8)
+ {
+ fprintf(stderr, "obj_map: bad tile (%d,%d) @ %d+%d\n",
+ map[0], map[1], i / 16, i % 16);
+ debug = 1;
+ continue;
+ }
+ buffer[map[1]][map[0]]++;
+ }
+ map++;
+ }
+ for(i = 0; i < 896; i++)
+ {
+ for(;*map != -1; map += 2)
+ {
+ if (map[0] < 0 || map[0] >= TILE_MAX || map[1] < 0 || map[1] >= 8)
+ {
+ fprintf(stderr, "obj_map: bad tile (%d,%d) @ %d\n", map[0], map[1], i);
+ debug = 1;
+ continue;
+ }
+ buffer[map[1]][map[0]]++;
+ }
+ map++;
+ }
+ for(i = 0; i < TILE_MAX; i++)
+ {
+ for(j = 0; j < 8; j++)
+ {
+ switch(buffer[j][i])
+ {
+ case 0:
+ fprintf(stderr, "obj_map: uninitialized (%d,%d)\n", i, j);
+ debug = 1;
+ break;
+ case 1:
+ break; /* good */
+ default:
+ fprintf(stderr, "obj_map: duplicate (%d,%d)\n", i, j);
+ debug = 1;
+ break;
+ }
+ }
+ }
+
+ if(sizeof(obj_map) / sizeof(*obj_map) != map - obj_map)
+ {
+ fprintf(stderr, "obj_map: bad end (%d != %d)\n",
+ sizeof(obj_map) / sizeof(*obj_map), map - obj_map);
+ debug = 1;
+ }
+ if(debug == 0)
+ fprintf(stderr, "obj_map: looks good, now disable debug code\n");
+ abort();
+
+#else
+
+ for(i = 0; i < 8; i++)
+ for(j = 0; j < TILE_MAX; j++)
+ buffer[i][j] = Xblank;
+
+ /* special case for first 64 entries */
+ for(i = 0; i < 64; i++)
+ {
+ for(;*map != -1; map += 2)
+ buffer[map[1]][map[0]] = i;
+ map++;
+ }
+
+ /* now regular entries */
+ for(i = 0; i < 896 * 16; i += 16)
+ {
+ for(;*map != -1; map += 2)
+ buffer[map[1]][map[0]] = i;
+ map++;
+ }
+
+ for(i = 0; i < 8; i++)
+ for(j = 0; j < TILE_MAX; j++)
+ map_obj[i][j] = buffer[7 - i][j];
+
+#endif
+}
+
+void create_spr()
+{
+ int i, j, k;
+ int *map = spr_map;
+ int buffer[2][8][SPR_MAX];
+
+ while(*map < SPR_MAX)
+ {
+ i = *map++;
+ j = *map++;
+ for(k = 0; k < 8; k++)
+ buffer[j][k][i] = *map++;
+ }
+
+ for(i = 0; i < 2; i++)
+ for(j = 0; j < 8; j++)
+ for(k = 0; k < SPR_MAX; k++)
+ map_spr[i][j][k] = buffer[i][7 - j][k];
+}
+
+void create_ttl()
+{
+#if 0
+ int i, j, k;
+ int buffer[128];
+
+ for(i = 0; i < 128; i++)
+ {
+ if(ttl_map[i] == -1)
+ {
+ buffer[i] = -1;
+ }
+ else
+ {
+#if 1
+ j = (ttl_map[i] % 22) * (14 * 2);
+ k = (ttl_map[i] / 22);
+ buffer[i] = k * (320 * 2) + j;
+#else
+ j = (ttl_map[i] % 22) * 14;
+ k = (ttl_map[i] / 22);
+ buffer[i] = k * 320 + j;
+#endif
+ }
+ }
+
+ for (i = 0; i < 128; i++)
+ map_ttl[i] = buffer[i];
+#endif
+}
+
+void tab_generate()
+{
+ create_tab(tile_blank, tab_blank);
+ create_tab(tile_acid, tab_acid);
+ create_tab(tile_ameuba, tab_ameuba);
+ create_tab(tile_android_move, tab_android_move);
+ create_explode();
+ create_obj();
+ create_spr();
+ create_ttl();
+}
+
+#endif
--- /dev/null
+#ifndef TILE_H
+#define TILE_H
+
+/* 2000-07-30T11:06:03Z
+ */
+
+/* define these for backwards compatibility */
+#define BAD_ROLL
+#define BAD_SPRING
+
+enum {
+ Xblank = 0, /* still */
+ Yacid_splash_eB, /* hmm */
+ Yacid_splash_wB, /* hmm */
+
+#ifdef BAD_ROLL
+ Xstone_force_e, /* only use these in eater */
+ Xstone_force_w,
+ Xnut_force_e,
+ Xnut_force_w,
+ Xspring_force_e,
+ Xspring_force_w,
+ Xemerald_force_e,
+ Xemerald_force_w,
+ Xdiamond_force_e,
+ Xdiamond_force_w,
+ Xbomb_force_e,
+ Xbomb_force_w,
+#endif
+
+ Xstone,
+ Xstone_pause,
+ Xstone_fall,
+ Ystone_s,
+ Ystone_sB,
+ Ystone_e,
+ Ystone_eB,
+ Ystone_w,
+ Ystone_wB,
+ Xnut,
+ Xnut_pause,
+ Xnut_fall,
+ Ynut_s,
+ Ynut_sB,
+ Ynut_e,
+ Ynut_eB,
+ Ynut_w,
+ Ynut_wB,
+ Xbug_n,
+ Xbug_e,
+ Xbug_s,
+ Xbug_w,
+ Xbug_gon,
+ Xbug_goe,
+ Xbug_gos,
+ Xbug_gow,
+ Ybug_n,
+ Ybug_nB,
+ Ybug_e,
+ Ybug_eB,
+ Ybug_s,
+ Ybug_sB,
+ Ybug_w,
+ Ybug_wB,
+ Ybug_w_n,
+ Ybug_n_e,
+ Ybug_e_s,
+ Ybug_s_w,
+ Ybug_e_n,
+ Ybug_s_e,
+ Ybug_w_s,
+ Ybug_n_w,
+ Ybug_stone,
+ Ybug_spring,
+ Xtank_n,
+ Xtank_e,
+ Xtank_s,
+ Xtank_w,
+ Xtank_gon,
+ Xtank_goe,
+ Xtank_gos,
+ Xtank_gow,
+ Ytank_n,
+ Ytank_nB,
+ Ytank_e,
+ Ytank_eB,
+ Ytank_s,
+ Ytank_sB,
+ Ytank_w,
+ Ytank_wB,
+ Ytank_w_n,
+ Ytank_n_e,
+ Ytank_e_s,
+ Ytank_s_w,
+ Ytank_e_n,
+ Ytank_s_e,
+ Ytank_w_s,
+ Ytank_n_w,
+ Ytank_stone,
+ Ytank_spring,
+ Xandroid,
+ Xandroid_1_n,
+ Xandroid_2_n,
+ Xandroid_1_e,
+ Xandroid_2_e,
+ Xandroid_1_w,
+ Xandroid_2_w,
+ Xandroid_1_s,
+ Xandroid_2_s,
+ Yandroid_n,
+ Yandroid_nB,
+ Yandroid_ne,
+ Yandroid_neB,
+ Yandroid_e,
+ Yandroid_eB,
+ Yandroid_se,
+ Yandroid_seB,
+ Yandroid_s,
+ Yandroid_sB,
+ Yandroid_sw,
+ Yandroid_swB,
+ Yandroid_w,
+ Yandroid_wB,
+ Yandroid_nw,
+ Yandroid_nwB,
+ Xspring,
+ Xspring_pause,
+ Xspring_e,
+ Xspring_w,
+ Xspring_fall,
+ Yspring_s,
+ Yspring_sB,
+ Yspring_e,
+ Yspring_eB,
+ Yspring_w,
+ Yspring_wB,
+ Yspring_kill_e,
+ Yspring_kill_eB,
+ Yspring_kill_w,
+ Yspring_kill_wB,
+ Xeater_n,
+ Xeater_e,
+ Xeater_w,
+ Xeater_s,
+ Yeater_n,
+ Yeater_nB,
+ Yeater_e,
+ Yeater_eB,
+ Yeater_s,
+ Yeater_sB,
+ Yeater_w,
+ Yeater_wB,
+ Yeater_stone,
+ Yeater_spring,
+ Xalien,
+ Xalien_pause,
+ Yalien_n,
+ Yalien_nB,
+ Yalien_e,
+ Yalien_eB,
+ Yalien_s,
+ Yalien_sB,
+ Yalien_w,
+ Yalien_wB,
+ Yalien_stone,
+ Yalien_spring,
+ Xemerald,
+ Xemerald_pause,
+ Xemerald_fall,
+ Xemerald_shine,
+ Yemerald_s,
+ Yemerald_sB,
+ Yemerald_e,
+ Yemerald_eB,
+ Yemerald_w,
+ Yemerald_wB,
+ Yemerald_eat,
+ Yemerald_stone,
+ Xdiamond,
+ Xdiamond_pause,
+ Xdiamond_fall,
+ Xdiamond_shine,
+ Ydiamond_s,
+ Ydiamond_sB,
+ Ydiamond_e,
+ Ydiamond_eB,
+ Ydiamond_w,
+ Ydiamond_wB,
+ Ydiamond_eat,
+ Ydiamond_stone,
+ Xdrip_fall,
+ Xdrip_stretch,
+ Xdrip_stretchB,
+ Xdrip_eat,
+ Ydrip_s1,
+ Ydrip_s1B,
+ Ydrip_s2,
+ Ydrip_s2B,
+ Xbomb,
+ Xbomb_pause,
+ Xbomb_fall,
+ Ybomb_s,
+ Ybomb_sB,
+ Ybomb_e,
+ Ybomb_eB,
+ Ybomb_w,
+ Ybomb_wB,
+ Ybomb_eat,
+ Xballoon,
+ Yballoon_n,
+ Yballoon_nB,
+ Yballoon_e,
+ Yballoon_eB,
+ Yballoon_s,
+ Yballoon_sB,
+ Yballoon_w,
+ Yballoon_wB,
+ Xgrass,
+ Ygrass_nB,
+ Ygrass_eB,
+ Ygrass_sB,
+ Ygrass_wB,
+ Xdirt,
+ Ydirt_nB,
+ Ydirt_eB,
+ Ydirt_sB,
+ Ydirt_wB,
+ Xacid_ne,
+ Xacid_se,
+ Xacid_s,
+ Xacid_sw,
+ Xacid_nw,
+ Xacid_1,
+ Xacid_2,
+ Xacid_3,
+ Xacid_4,
+ Xacid_5,
+ Xacid_6,
+ Xacid_7,
+ Xacid_8,
+ Xball_1,
+ Xball_1B,
+ Xball_2,
+ Xball_2B,
+ Yball_eat,
+ Xgrow_ns,
+ Ygrow_ns_eat,
+ Xgrow_ew,
+ Ygrow_ew_eat,
+ Xwonderwall,
+ XwonderwallB,
+ Xameuba_1,
+ Xameuba_2,
+ Xameuba_3,
+ Xameuba_4,
+ Xameuba_5,
+ Xameuba_6,
+ Xameuba_7,
+ Xameuba_8,
+ Xdoor_1,
+ Xdoor_2,
+ Xdoor_3,
+ Xdoor_4,
+ Xdoor_5,
+ Xdoor_6,
+ Xdoor_7,
+ Xdoor_8,
+ Xkey_1,
+ Xkey_2,
+ Xkey_3,
+ Xkey_4,
+ Xkey_5,
+ Xkey_6,
+ Xkey_7,
+ Xkey_8,
+ Xwind_n,
+ Xwind_e,
+ Xwind_s,
+ Xwind_w,
+ Xwind_nesw,
+ Xwind_stop,
+ Xexit,
+ Xexit_1,
+ Xexit_2,
+ Xexit_3,
+ Xdynamite,
+ Ydynamite_eat,
+ Xdynamite_1,
+ Xdynamite_2,
+ Xdynamite_3,
+ Xdynamite_4,
+ Xbumper,
+ XbumperB,
+ Xwheel,
+ XwheelB,
+ Xswitch,
+ XswitchB,
+ Xsand,
+ Xsand_stone,
+ Xsand_stonein_1,
+ Xsand_stonein_2,
+ Xsand_stonein_3,
+ Xsand_stonein_4,
+ Xsand_stonesand_1,
+ Xsand_stonesand_2,
+ Xsand_stonesand_3,
+ Xsand_stonesand_4,
+ Xsand_stoneout_1,
+ Xsand_stoneout_2,
+ Xsand_sandstone_1,
+ Xsand_sandstone_2,
+ Xsand_sandstone_3,
+ Xsand_sandstone_4,
+ Xplant,
+ Yplant,
+ Xlenses,
+ Xmagnify,
+ Xdripper,
+ XdripperB,
+ Xfake_blank,
+ Xfake_blankB,
+ Xfake_grass,
+ Xfake_grassB,
+ Xfake_door_1,
+ Xfake_door_2,
+ Xfake_door_3,
+ Xfake_door_4,
+ Xfake_door_5,
+ Xfake_door_6,
+ Xfake_door_7,
+ Xfake_door_8,
+ Xsteel_1,
+ Xsteel_2,
+ Xsteel_3,
+ Xsteel_4,
+ Xwall_1,
+ Xwall_2,
+ Xwall_3,
+ Xwall_4,
+ Xround_wall_1,
+ Xround_wall_2,
+ Xround_wall_3,
+ Xround_wall_4,
+ Xdecor_1,
+ Xdecor_2,
+ Xdecor_3,
+ Xdecor_4,
+ Xdecor_5,
+ Xdecor_6,
+ Xdecor_7,
+ Xdecor_8,
+ Xdecor_9,
+ Xdecor_10,
+ Xdecor_11,
+ Xdecor_12,
+ Xalpha_0,
+ Xalpha_1,
+ Xalpha_2,
+ Xalpha_3,
+ Xalpha_4,
+ Xalpha_5,
+ Xalpha_6,
+ Xalpha_7,
+ Xalpha_8,
+ Xalpha_9,
+ Xalpha_excla,
+ Xalpha_quote,
+ Xalpha_comma,
+ Xalpha_minus,
+ Xalpha_perio,
+ Xalpha_colon,
+ Xalpha_quest,
+ 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_arrow_e,
+ Xalpha_arrow_w,
+ Xalpha_copyr,
+
+ Xboom_bug, /* passed from explode to synchro (linked explosion); transition to explode_normal */
+ Xboom_bomb, /* passed from explode to synchro (linked explosion); transition to explode_normal */
+ Xboom_android, /* passed from explode to synchro; transition to boom_2 */
+ Xboom_1, /* passed from explode to synchro; transition to boom_2 */
+ Xboom_2, /* transition to boom[] */
+
+ Znormal, /* no picture */ /* this tile is passed from synchro to explode, only in next[] */
+ Zdynamite, /* no picture */ /* this tile is passed from synchro to explode, only in next[] */
+ Zplayer, /* no picture */ /* special code to indicate player */
+ ZBORDER, /* no picture */ /* special code to indicate border */
+
+ TILE_MAX
+};
+
+enum {
+ SPR_still = 0,
+ SPR_walk = 1,
+ SPR_push = 5,
+ SPR_spray = 9,
+ SPR_MAX = 13
+};
+
+extern unsigned char tab_blank[TILE_MAX];
+extern unsigned char tab_acid[TILE_MAX];
+extern unsigned char tab_ameuba[TILE_MAX];
+extern unsigned char tab_android_move[TILE_MAX];
+extern unsigned short tab_explode_normal[TILE_MAX];
+extern unsigned short tab_explode_dynamite[TILE_MAX];
+
+extern unsigned short map_obj[8][TILE_MAX];
+extern unsigned short map_spr[2][8][SPR_MAX];
+extern unsigned short map_ttl[128];
+
+#endif
--- /dev/null
+/* 2000-08-10T04:29:10Z
+ *
+ * generate ulaw<->linear conversion tables to be included
+ * directly in emerald mine source
+ */
+
+#include "../libgame/platform.h"
+
+
+#if defined(TARGET_X11)
+
+#if defined(PLATFORM_LINUX) || defined(PLATFORM_BSD)
+
+#include <stdio.h>
+
+int calc_ulaw_to_linear(unsigned char);
+unsigned char calc_linear_to_ulaw(int);
+
+int buffer[65536];
+
+#if 0
+
+void print_buffer(int *buffer, int count)
+{
+ int i,j;
+ j = 0;
+ for(i = 0; i < count;) {
+ if(j > 80) { j=0; printf("\n"); }
+ if(j == 0) printf("\t");
+ j += printf("%d", buffer[i]);
+ j += printf("%s", ++i == count ? "" : ",");
+ }
+ if(j) printf("\n");
+}
+int main_OLD(void)
+{
+ int i;
+ printf("/* THIS FILE AUTOMATICALLY GENERATED */\n");
+ printf("\n#if defined(LINUX) || defined(BSD)\n");
+ printf("\n/* convert from 8 bit ulaw to signed 16 bit linear */\n");
+ printf("const short ulaw_to_linear[256] = {\n");
+ for(i = 0; i < 256; i++) {
+ buffer[i] = calc_ulaw_to_linear(i);
+ }
+ print_buffer(buffer, 256);
+ printf("};\n");
+ printf("\n/* convert from signed 16 bit linear to 8 bit ulaw */\n");
+ printf("const unsigned char linear_to_ulaw[65536] = {\n");
+ for(i = -32768; i < 32768; i++) {
+ buffer[i + 32768] = calc_linear_to_ulaw(i);
+ }
+ print_buffer(buffer, 65536);
+ printf("};\n");
+ printf("\n#endif /* defined(LINUX) || defined(BSD) */\n");
+ return(0);
+}
+
+#endif
+
+/* convert from 8 bit ulaw to signed 16 bit linear */
+short ulaw_to_linear[256];
+
+/* convert from signed 16 bit linear to 8 bit ulaw */
+unsigned char linear_to_ulaw[65536];
+
+void ulaw_generate()
+{
+ int i;
+
+ for(i = 0; i < 256; i++)
+ ulaw_to_linear[i] = calc_ulaw_to_linear(i);
+
+ for(i = -32768; i < 32768; i++)
+ linear_to_ulaw[i + 32768] = calc_linear_to_ulaw(i);
+}
+
+/*
+** This routine converts from ulaw to 16 bit linear.
+**
+** Craig Reese: IDA/Supercomputing Research Center
+** 29 September 1989
+**
+** References:
+** 1) CCITT Recommendation G.711 (very difficult to follow)
+** 2) MIL-STD-188-113,"Interoperability and Performance Standards
+** for Analog-to_Digital Conversion Techniques,"
+** 17 February 1987
+**
+** Input: 8 bit ulaw sample
+** Output: signed 16 bit linear sample
+*/
+
+int calc_ulaw_to_linear(unsigned char ulawbyte)
+{
+ static int exp_lut[8] = { 0, 132, 396, 924, 1980, 4092, 8316, 16764 };
+ int sign, exponent, mantissa, sample;
+
+ ulawbyte = ~ ulawbyte;
+ sign = ( ulawbyte & 0x80 );
+ exponent = ( ulawbyte >> 4 ) & 0x07;
+ mantissa = ulawbyte & 0x0F;
+ sample = exp_lut[exponent] + ( mantissa << ( exponent + 3 ) );
+ if (sign != 0)
+ sample = -sample;
+
+ return(sample);
+}
+
+/*
+** This routine converts from linear to ulaw.
+**
+** Craig Reese: IDA/Supercomputing Research Center
+** Joe Campbell: Department of Defense
+** 29 September 1989
+**
+** References:
+** 1) CCITT Recommendation G.711 (very difficult to follow)
+** 2) "A New Digital Technique for Implementation of Any
+** Continuous PCM Companding Law," Villeret, Michel,
+** et al. 1973 IEEE Int. Conf. on Communications, Vol 1,
+** 1973, pg. 11.12-11.17
+** 3) MIL-STD-188-113,"Interoperability and Performance Standards
+** for Analog-to_Digital Conversion Techniques,"
+** 17 February 1987
+**
+** Input: Signed 16 bit linear sample
+** Output: 8 bit ulaw sample
+*/
+
+#define ZEROTRAP /* turn on the trap as per the MIL-STD */
+#define BIAS 0x84 /* define the add-in bias for 16 bit samples */
+#define CLIP 32635
+
+unsigned char calc_linear_to_ulaw(int sample)
+{
+ static int exp_lut[256] =
+ {
+ 0,0,1,1,2,2,2,2,3,3,3,3,3,3,3,3,
+ 4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,
+ 5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,
+ 5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,
+ 6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,
+ 6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,
+ 6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,
+ 6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,
+ 7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,
+ 7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,
+ 7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,
+ 7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,
+ 7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,
+ 7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,
+ 7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,
+ 7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,7
+ };
+
+ int sign, exponent, mantissa;
+ unsigned char ulawbyte;
+
+/* Get the sample into sign-magnitude. */
+ sign = (sample >> 8) & 0x80; /* set aside the sign */
+ if (sign != 0)
+ sample = -sample; /* get magnitude */
+ if (sample > CLIP)
+ sample = CLIP; /* clip the magnitude */
+
+/* Convert from 16 bit linear to ulaw. */
+ sample = sample + BIAS;
+ exponent = exp_lut[( sample >> 7 ) & 0xFF];
+ mantissa = ( sample >> ( exponent + 3 ) ) & 0x0F;
+ ulawbyte = ~ ( sign | ( exponent << 4 ) | mantissa );
+#ifdef ZEROTRAP
+ if (ulawbyte == 0)
+ ulawbyte = 0x02; /* optional CCITT trap */
+#endif
+
+ return(ulawbyte);
+}
+
+#endif /* defined(PLATFORM_LINUX) || defined(PLATFORM_BSD) */
+
+#endif
+++ /dev/null
-# =============================================================================
-# Rocks'n'Diamonds Makefile (libem)
-# -----------------------------------------------------------------------------
-# (c) 1995-2004 Holger Schemel <info@artsoft.org>
-# -----------------------------------------------------------------------------
-# Emerald Mine for X11 © 2000,2001 David Tritscher
-# =============================================================================
-
-# -----------------------------------------------------------------------------
-# configuration
-# -----------------------------------------------------------------------------
-
-SRCS = cave.c \
- convert.c \
- graphics.c \
- init.c \
- input.c \
- main.c \
- sound.c \
- synchro_1.c \
- synchro_2.c \
- synchro_3.c \
- tab_generate.c \
- ulaw_generate.c
-
-OBJS = cave.o \
- convert.o \
- graphics.o \
- init.o \
- input.o \
- main.o \
- sound.o \
- synchro_1.o \
- synchro_2.o \
- synchro_3.o \
- tab_generate.o \
- ulaw_generate.o
-
-LIBEM = libem.a
-
-
-# -----------------------------------------------------------------------------
-# build targets
-# -----------------------------------------------------------------------------
-
-all: $(LIBEM)
-
-$(LIBEM): $(OBJS)
- $(AR) cru $(LIBEM) $(OBJS)
- $(RANLIB) $(LIBEM)
-
-.c.o:
- $(CC) $(PROFILING) $(CFLAGS) -c $*.c
-
-clean:
- $(RM) $(OBJS)
- $(RM) $(LIBEM)
-
-
-# -----------------------------------------------------------------------------
-# development only
-# -----------------------------------------------------------------------------
-
-depend:
- for i in $(SRCS); do $(CPP) $(CFLAGS) -M $$i; done > .depend
-
-ifeq (.depend,$(wildcard .depend))
-include .depend
-endif
+++ /dev/null
-
-#if defined(TARGET_X11)
-
-/* 2000-08-10T16:43:50Z
- *
- * cave data structures
- */
-
-#include <sys/types.h>
-#include <dirent.h>
-#include <stdlib.h>
-#include <stdio.h>
-#include <string.h>
-#include <errno.h>
-
-#include "global.h"
-#include "tile.h"
-#include "level.h"
-#include "file.h"
-
-struct cave_node *cave_list;
-
-static void clear(void);
-
-/* attempt load a cave
- *
- * completely initializes the level structure, ready for a game
- */
-int cave_convert(char *filename)
-{
- int result;
- FILE *file;
- int actual;
- unsigned long length;
- unsigned char buffer[16384];
-
- clear();
-
- file = fopen(filename, "rb");
- if(file == 0) {
- fprintf(stderr, "%s: \"%s\": %s: %s\n", progname, filename, "open error", strerror(errno));
- result = 1;
- goto fail;
- }
- actual = fread(buffer, 1, 16384, file);
- if(actual == -1) {
- fprintf(stderr, "%s: \"%s\": %s: %s\n", progname, filename, "read error", strerror(errno));
- result = 1;
- goto fail;
- }
- length = actual;
- fclose(file);
- file = 0;
-
- if(clean_emerald(buffer, &length)) {
- fprintf(stderr, "%s: \"%s\": %s\n", progname, filename, "unrecognized format");
- result = 1; goto fail;
- }
- convert_emerald(buffer);
-
- result = 0;
-fail:
- if(file) fclose(file);
- return(result);
-}
-
-static void clear(void)
-{
- lev.home = 1; /* number of players */
- lev.width = 0;
- lev.height = 0;
- lev.time = 0;
- lev.required = 0;
- lev.score = 0;
-
- ply1.num = 0;
- ply1.alive = (lev.home >= 1);
- ply1.dynamite = 0;
- ply1.dynamite_cnt = 0;
- ply1.keys = 0;
- ply1.anim = 0;
- ply1.oldx = ply1.x = 0;
- ply1.oldy = ply1.y = 0;
- ply1.joy_n = ply1.joy_e = ply1.joy_s = ply1.joy_w = ply1.joy_fire = ply1.joy_stick = ply1.joy_spin = 0;
- ply2.num = 1;
- ply2.alive = (lev.home >= 2);
- ply2.dynamite = 0;
- ply2.dynamite_cnt = 0;
- ply2.keys = 0;
- ply2.anim = 0;
- ply2.oldx = ply2.x = 0;
- ply2.oldy = ply2.y = 0;
- ply2.joy_n = ply2.joy_e = ply2.joy_s = ply2.joy_w = ply2.joy_fire = ply2.joy_stick = ply2.joy_spin = 0;
-}
-
-void read_cave_list(void)
-{
- char name[MAXNAME+2];
- struct cave_node *node, **prev;
- DIR *dir;
- struct dirent *entry;
- char *cut;
- int len;
-
- free_cave_list(); /* delete old list if i forgot to before */
-
- name[MAXNAME] = 0;
- if(arg_basedir) {
- snprintf(name, MAXNAME+2, "%s/%s", arg_basedir, EM_LVL_DIR);
- } else {
- snprintf(name, MAXNAME+2, "%s", EM_LVL_DIR);
- }
- if(name[MAXNAME]) snprintf_overflow("read cave/ directory");
-
- dir = opendir(name);
- if(dir) {
- prev = &cave_list;
- while((entry = readdir(dir))) {
- if(strcmp(entry->d_name, ".") == 0 || strcmp(entry->d_name, "..") == 0) continue;
-
- node = malloc(sizeof(*node)); if(node == 0) break;
- *prev = node; prev = &node->next;
-
- node->path[MAXNAME] = 0;
- snprintf(node->path, MAXNAME+2, "%s/%s", name, entry->d_name);
- if(node->path[MAXNAME]) snprintf_overflow("read cave/ directory");
-
- cut = strrchr(node->path, '/'); cut = cut ? cut + 1 : node->path;
- len = strlen(cut);
- if(len <= 32) {
- strncpy(node->name, cut, 32);
- } else {
- snprintf(node->name, 32, "%.8s..%s", cut, cut + len - 16);
- }
- }
- *prev = 0;
- closedir(dir);
- } else {
- fprintf(stderr, "%s: \"%s\": %s: %s\n", progname, name, "failed to open directory", strerror(errno));
- }
-}
-
-void free_cave_list(void)
-{
- struct cave_node *node, *next;
-
- for(node = cave_list; node; node = next) {
- next = node->next;
- free(node);
- }
- cave_list = 0;
-}
-
-#endif
+++ /dev/null
-
-#if defined(TARGET_X11)
-
-/* 2000-08-20T09:41:18Z
- *
- * identify all emerald mine caves and turn them into v6 format.
- * fixes illegal tiles, acid, wheel, limits times, cleans flags.
- *
- * these tables weed out bad tiles for older caves (eg. wheel on -> wheel off)
- * and clean up v6 caves (acid, number limits) which should(!) be inconsequential,
- * but no doubt it will break some caves.
- */
-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
-};
-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
-};
-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
-};
-static unsigned char remap_v4eater[28] = { /* filter crap for v4 */
- 128,18,2,0,4,8,16,20,28,37,41,45,130,129,131,132,133,134,135,136,146,147,175,65,66,
- 64,2,18
-};
-
-int clean_emerald(unsigned char *src, unsigned long *length)
-{
- unsigned int i;
- if(*length >= 2172 && src[2106] == 255 && src[2107] == 54 && src[2108] == 48 && src[2109] == 48) {
- 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) {
- 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) {
- 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) {
- unsigned char j = 94;
- 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];
- goto v3;
- }
- return(1); /* unrecognized cave */
-v3:
-v4:
-v5:
- src[2106] = 255; src[2107] = 54; src[2108] = 48; src[2109] = 48; /* id */
- i = src[2094] * 10; src[2110] = i >> 8; src[2111] = i; /* time */
- for(i = 2148; i < 2172; i++) src[i] = 0;
- src[2159] = 128; /* ball data */
-v6:
- for(i = 0; i < 2048; i++) if(src[i] == 40) break; /* fix wheel */
- for(i++; i < 2048; i++) if(src[i] == 40) src[i] = 147;
- for(i = 64; i < 2048; i++) if(src[i] == 63) src[i - 64] = 101; /* fix acid */
- for(i = 2051; i < 2057; i++) if(src[i] == 63) src[i - 3] = 101; /* fix acid in eater 1 */
- for(i = 2060; i < 2066; i++) if(src[i] == 63) src[i - 3] = 101; /* fix acid in eater 2 */
- for(i = 2069; i < 2075; i++) if(src[i] == 63) src[i - 3] = 101; /* fix acid in eater 3 */
- for(i = 2078; i < 2084; i++) if(src[i] == 63) src[i - 3] = 101; /* fix acid in eater 4 */
- for(i = 2115; i < 2121; i++) if(src[i] == 63) src[i - 3] = 101; /* fix acid in eater 5 */
- for(i = 2124; i < 2130; i++) if(src[i] == 63) src[i - 3] = 101; /* fix acid in eater 6 */
- for(i = 2133; i < 2139; i++) if(src[i] == 63) src[i - 3] = 101; /* fix acid in eater 7 */
- for(i = 2142; i < 2148; i++) if(src[i] == 63) src[i - 3] = 101; /* fix acid in eater 8 */
- src[2094] = 0; /* old style time */
- src[2096] &= 7; src[src[2096] << 8 | src[2097]] = 128; /* player 1 pos */
- src[2098] &= 7; src[src[2098] << 8 | src[2099]] = 128; /* player 2 pos */
- if((src[2100] << 8 | src[2101]) > 9999) { src[2100] = 39; src[2101] = 15; } /* ameuba speed */
- if((src[2102] << 8 | src[2103]) > 9999) { src[2102] = 39; src[2103] = 15; } /* time wonderwall */
- if((src[2110] << 8 | src[2111]) > 9999) { src[2110] = 39; src[2111] = 15; } /* time */
- i = src[2149]; i &= 15; i &= -i; src[2149] = i; /* wind direction */
- if((src[2154] << 8 | src[2155]) > 9999) { src[2154] = 39; src[2155] = 15; } /* time lenses */
- if((src[2156] << 8 | src[2157]) > 9999) { src[2156] = 39; src[2157] = 15; } /* time magnify */
- src[2158] = 0; src[2159] = remap_v6[src[2159]]; /* ball object */
- if((src[2160] << 8 | src[2161]) > 9999) { src[2160] = 39; src[2161] = 15; } /* ball pause */
- src[2162] &= 129; if(src[2162] & 1) src[2163] = 0; /* ball data */
- if((src[2164] << 8 | src[2165]) > 9999) { src[2164] = 39; src[2165] = 15; } /* android move pause */
- if((src[2166] << 8 | src[2167]) > 9999) { src[2166] = 39; src[2167] = 15; } /* android clone pause */
- src[2168] &= 31; /* android data */
-
- *length = 2172; /* size of v6 cave */
- return(0);
-}
-
-/* 2000-07-30T00:26:00Z
- *
- * Read emerald mine caves version 6
- *
- * v4 and v5 emerald mine caves are converted to v6 (which completely supports older versions)
- *
- * converting to the internal format loses /significant/ information which can breaks lots of caves.
- *
- * major incompatibilities:
- * borderless caves behave completely differently, the player no longer "warps" to the other side.
- * a compile time option for spring can make it behave differently when it 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.
- *
- * so far all below have not broken any caves:
- *
- * active wheel inside an eater will not function, eater explosions will not change settings.
- * initial collect objects (emerald, diamond, dynamite) dont exist.
- * initial rolling objects will be moved manually and made into sitting objects.
- * drips always appear from dots.
- * more than one thing can fall into acid at the same time.
- * acid explodes when the player walks into it, rather than splashing.
- * simultaneous explosions may be in a slightly different order.
- * quicksand states have been reduced.
- * acid base is effectively an indestructable wall now which can affect eater explosions.
- * android can clone forever with a clone pause of 0 (emeralds, diamonds, nuts, stones, bombs, springs).
- *
- * 2001-03-12T02:46:55Z
- * rolling stuff is now allowed in the cave, i didn't like making this decision.
- * if BAD_ROLL is not defined, initial rolling objects are moved by hand.
- * initial collect objects break some cave in elvis mine 5.
- * different timing for wonderwall break some cave in exception mine 2.
- * i think i'm pretty locked into always using the bad roll. *sigh*
- * rolling spring is now turned into regular spring. it appears the emc editor only uses
- * the force code for initially moving spring. i will follow this in my editor.
- */
-
-#include "tile.h"
-#include "level.h"
-
-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,
-#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,
-#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,
-#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,
-};
-
-void convert_emerald(unsigned char *src)
-{
- unsigned int x, y, temp;
-
- lev.width = 64;
- lev.height = 32;
- temp = ((src[0x83E] << 8 | src[0x83F]) * 25 + 3) / 4; if(temp == 0 || temp > 9999) temp = 9999;
- lev.time = temp;
- lev.required = src[0x82F];
-
- temp = src[0x830] << 8 | src[0x831];
- ply1.oldx = ply1.x = (temp & 63) + 1;
- ply1.oldy = ply1.y = (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];
- 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.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.diamond_score = src[0x825];
- lev.dynamite_score = src[0x82B];
- lev.eater_pos = 0;
- lev.eater_score = src[0x829];
- lev.emerald_score = src[0x824];
- lev.exit_score = src[0x82D] * 8 / 5;
- lev.key_score = src[0x82C];
- lev.lenses_cnt = 0;
- 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.wheel_time = src[0x838] << 8 | src[0x839];
- lev.wind_cnt = src[0x865] & 15 ? 9999 : 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]];
- temp = remap_emerald[src[0x86F]];
- for(y = 0; y < 8; y++) {
- if(src[0x872] & 1) {
- for(x = 0; x < 8; x++) lev.ball_array[y][x] = temp;
- } 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][7] = (src[0x873] & 16) ? temp : Xblank; /* south east */
- lev.ball_array[y][5] = (src[0x873] & 32) ? temp : Xblank; /* south west */
- lev.ball_array[y][2] = (src[0x873] & 64) ? temp : Xblank; /* north east */
- lev.ball_array[y][0] = (src[0x873] & 128) ? temp : Xblank; /* north west */
- }
- }
- for(temp = 0; temp < TILE_MAX; temp++) lev.android_array[temp] = Xblank;
- temp = src[0x878] << 8 | src[0x879];
- if(temp & 1) {
- lev.android_array[Xemerald] = lev.android_array[Xemerald_pause] =
- lev.android_array[Xemerald_fall] = lev.android_array[Yemerald_sB] =
- lev.android_array[Yemerald_eB] = lev.android_array[Yemerald_wB] = Xemerald;
- }
- if(temp & 2) {
- lev.android_array[Xdiamond] = lev.android_array[Xdiamond_pause] =
- lev.android_array[Xdiamond_fall] = lev.android_array[Ydiamond_sB] =
- lev.android_array[Ydiamond_eB] = lev.android_array[Ydiamond_wB] = Xdiamond;
- }
- if(temp & 4) {
- lev.android_array[Xstone] = lev.android_array[Xstone_pause] =
- lev.android_array[Xstone_fall] = lev.android_array[Ystone_sB] =
- lev.android_array[Ystone_eB] = lev.android_array[Ystone_wB] = Xstone;
- }
- if(temp & 8) {
- lev.android_array[Xbomb] = lev.android_array[Xbomb_pause] =
- lev.android_array[Xbomb_fall] = lev.android_array[Ybomb_sB] =
- lev.android_array[Ybomb_eB] = lev.android_array[Ybomb_wB] = Xbomb;
- }
- if(temp & 16) {
- lev.android_array[Xnut] = lev.android_array[Xnut_pause] =
- lev.android_array[Xnut_fall] = lev.android_array[Ynut_sB] =
- lev.android_array[Ynut_eB] = lev.android_array[Ynut_wB] = Xnut;
- }
- if(temp & 32) {
- lev.android_array[Xtank_n] = lev.android_array[Xtank_gon] = lev.android_array[Ytank_nB] =
- lev.android_array[Ytank_n_e] = lev.android_array[Ytank_n_w] = Xtank_n;
- lev.android_array[Xtank_e] = lev.android_array[Xtank_goe] = lev.android_array[Ytank_eB] =
- lev.android_array[Ytank_e_s] = lev.android_array[Ytank_e_n] = Xtank_e;
- lev.android_array[Xtank_s] = lev.android_array[Xtank_gos] = lev.android_array[Ytank_sB] =
- lev.android_array[Ytank_s_w] = lev.android_array[Ytank_s_e] = Xtank_s;
- lev.android_array[Xtank_w] = lev.android_array[Xtank_gow] = lev.android_array[Ytank_wB] =
- lev.android_array[Ytank_w_n] = lev.android_array[Ytank_w_s] = Xtank_w;
- }
- if(temp & 64) {
- lev.android_array[Xeater_n] = lev.android_array[Yeater_nB] = Xeater_n;
- lev.android_array[Xeater_e] = lev.android_array[Yeater_eB] = Xeater_e;
- lev.android_array[Xeater_s] = lev.android_array[Yeater_sB] = Xeater_s;
- lev.android_array[Xeater_w] = lev.android_array[Yeater_wB] = Xeater_w;
- }
- if(temp & 128) {
- lev.android_array[Xbug_n] = lev.android_array[Xbug_gon] = lev.android_array[Ybug_nB] =
- lev.android_array[Ybug_n_e] = lev.android_array[Ybug_n_w] = Xbug_gon;
- lev.android_array[Xbug_e] = lev.android_array[Xbug_goe] = lev.android_array[Ybug_eB] =
- lev.android_array[Ybug_e_s] = lev.android_array[Ybug_e_n] = Xbug_goe;
- lev.android_array[Xbug_s] = lev.android_array[Xbug_gos] = lev.android_array[Ybug_sB] =
- lev.android_array[Ybug_s_w] = lev.android_array[Ybug_s_e] = Xbug_gos;
- lev.android_array[Xbug_w] = lev.android_array[Xbug_gow] = lev.android_array[Ybug_wB] =
- lev.android_array[Ybug_w_n] = lev.android_array[Ybug_w_s] = Xbug_gow;
- }
- if(temp & 256) {
- lev.android_array[Xalien] = lev.android_array[Xalien_pause] =
- lev.android_array[Yalien_nB] = lev.android_array[Yalien_eB] =
- lev.android_array[Yalien_sB] = lev.android_array[Yalien_wB] = Xalien;
- }
- if(temp & 512) {
- lev.android_array[Xspring] = lev.android_array[Xspring_pause] =
- lev.android_array[Xspring_e] = lev.android_array[Yspring_eB] = lev.android_array[Yspring_kill_eB] =
- lev.android_array[Xspring_w] = lev.android_array[Yspring_wB] = lev.android_array[Yspring_kill_wB] =
- lev.android_array[Xspring_fall] = lev.android_array[Yspring_sB] = Xspring;
- }
- if(temp & 1024) {
- lev.android_array[Yballoon_nB] = lev.android_array[Yballoon_eB] =
- lev.android_array[Yballoon_sB] = lev.android_array[Yballoon_wB] =
- lev.android_array[Xballoon] = Xballoon;
- }
- if(temp & 2048) {
- 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;
- }
- if(temp & 4096) {
- lev.android_array[Xdynamite] = Xdynamite;
- }
-
- for(temp = 1; temp < 2047; temp++) {
- switch(src[temp]) {
- case 0x24: lev.wonderwall_state = 1; lev.wonderwall_time = 9999; break; /* wonderwall */
- case 0x28: lev.wheel_x = temp & 63; lev.wheel_y = temp >> 6; lev.wheel_cnt = lev.wheel_time; break; /* wheel */
-#ifndef BAD_ROLL
- case 0x63: src[temp - 1] = 0x45; src[temp] = 0x80; break; /* spring roll left */
- case 0x64: src[temp + 1] = 0x45; src[temp] = 0x80; break; /* spring roll right */
- case 0x72: src[temp - 1] = 0x25; src[temp] = 0x80; break; /* nut roll left */
- case 0x73: src[temp + 1] = 0x25; src[temp] = 0x80; break; /* nut roll right */
- case 0x77: src[temp - 1] = 0x10; src[temp] = 0x80; break; /* bomb roll left */
- case 0x78: src[temp + 1] = 0x10; src[temp] = 0x80; break; /* bomb roll right */
- case 0x79: src[temp - 1] = 0x00; src[temp] = 0x80; break; /* stone roll left */
- case 0x7A: src[temp + 1] = 0x00; src[temp] = 0x80; break; /* stone roll right */
-#endif
- case 0xA3: lev.lenses_cnt = 9999; break; /* fake blank */
- case 0xA4: lev.magnify_cnt = 9999; break; /* fake grass */
- }
- }
- for(y = 0; y < HEIGHT; y++) for(x = 0; x < WIDTH; x++) Cave[y][x] = ZBORDER;
- 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++]];
- }
- if(ply1.alive) Cave[ply1.y][ply1.x] = Zplayer;
- if(ply2.alive) Cave[ply2.y][ply2.x] = Zplayer;
- for(y = 0; y < HEIGHT; y++) for(x = 0; x < WIDTH; x++) Next[y][x] = Cave[y][x];
- for(y = 0; y < HEIGHT; y++) for(x = 0; x < WIDTH; x++) Draw[y][x] = Cave[y][x];
-}
-
-#endif
+++ /dev/null
-#ifndef DISPLAY_H
-#define DISPLAY_H
-
-#if 1
-#define TILEX 32
-#define TILEY 32
-#else
-#define TILEX 16
-#define TILEY 16
-#endif
-#define SCOREX 8
-#define SCOREY 9
-
-#include <X11/Xlib.h>
-#include <X11/Xutil.h>
-#include <X11/Xatom.h>
-#include <X11/keysym.h>
-
-#if 0
-
-extern Display *display;
-extern Window window;
-#define xwindow window
-
-#else
-
-#include "../libgame/system.h"
-
-#define xwindow (window->drawable)
-
-#endif
-
-#if 1
-
-extern Bitmap *screenBitmap;
-extern Bitmap *scoreBitmap;
-
-extern Bitmap *objBitmap;
-extern Bitmap *sprBitmap;
-extern Bitmap *ttlBitmap;
-extern Bitmap *botBitmap;
-
-#endif
-
-extern Pixmap screenPixmap;
-extern Pixmap scorePixmap;
-extern Pixmap spriteBitmap;
-
-extern Pixmap objPixmap;
-extern Pixmap objmaskBitmap;
-extern Pixmap sprPixmap;
-extern Pixmap sprmaskBitmap;
-extern Pixmap ttlPixmap;
-extern Pixmap ttlmaskBitmap;
-extern Pixmap botPixmap;
-extern Pixmap botmaskBitmap;
-
-extern GC screenGC;
-extern GC scoreGC;
-extern GC spriteGC;
-extern GC antsGC;
-
-extern Atom deleteAtom;
-
-extern KeySym lastKeySym;
-
-extern KeyCode northKeyCode[];
-extern KeyCode eastKeyCode[];
-extern KeyCode southKeyCode[];
-extern KeyCode westKeyCode[];
-extern KeyCode fireKeyCode[];
-extern KeyCode escKeyCode[];
-
-#endif
+++ /dev/null
-#ifndef FILE_H
-#define FILE_H
-
-/* 2000-09-28T09:07:50Z
- */
-
-#include "global.h"
-
-struct cave_node {
- struct cave_node *next;
- char path[MAXNAME+2];
- char name[32];
-};
-
-extern struct cave_node *cave_list;
-
-#endif
+++ /dev/null
-#ifndef GLOBAL_H
-#define GLOBAL_H
-
-#define EM_GFX_DIR "graphics.EM"
-#define EM_SND_DIR "sounds.EM"
-#define EM_LVL_DIR "levels.EM"
-
-#define MAXNAME 1024 /* arbitrary maximum length of filenames (cos i am lazy) */
-extern void snprintf_overflow(char *);
-
-extern int debug;
-extern char *progname;
-extern char *arg_basedir;
-extern char *arg_display;
-extern char *arg_geometry;
-extern int arg_install;
-extern int arg_silence;
-
-extern unsigned int frame;
-
-extern short ulaw_to_linear[256];
-extern unsigned char linear_to_ulaw[65536];
-
-/* all global function prototypes */
-
-int open_all(void);
-void close_all(void);
-
-void readjoy(void);
-void input_eventloop(void);
-
-void blitscreen(void);
-void game_initscreen(void);
-void game_blitscore(void);
-void game_animscreen(void);
-void title_initscreen(void);
-void title_blitscore(void);
-void title_animscreen(void);
-void title_blitants(unsigned int y);
-void title_string(unsigned int y, unsigned int left, unsigned int right, char *string);
-
-void sound_play(void);
-
-int cave_convert(char *filename);
-
-int game_start(void);
-void synchro_1(void);
-void synchro_2(void);
-void synchro_3(void);
-
-int clean_emerald(unsigned char *src, unsigned long *length);
-void convert_emerald(unsigned char *src);
-
-int sound_thread(void);
-int read_sample(char *name, short **data, long *length);
-
-void read_cave_list(void);
-void free_cave_list(void);
-
-#endif
+++ /dev/null
-
-#if defined(TARGET_X11)
-
-/* 2000-08-13T14:36:17Z
- *
- * graphics manipulation crap
- */
-
-#include <X11/Xlib.h>
-#include <X11/Xutil.h>
-
-#include "global.h"
-#include "display.h"
-#include "level.h"
-
-#include <stdio.h>
-
-unsigned int frame; /* current frame */
-unsigned int screen_x; /* current scroll position */
-unsigned int screen_y;
-
-static unsigned short screentiles[14][22]; /* tiles currently on screen */
-
-static unsigned int colours[8];
-static unsigned int colour_anim;
-
-static void xdebug(char *msg)
-{
-#if 0
- XSync(display, False);
- printf("EM DEBUG: %s\n", msg);
-#endif
-}
-
-static void colour_shuffle(void)
-{
- unsigned int i, j, k;
- for (i = 0; i < 8; i++) colours[i] = i;
- for (i = 0; i < 8; i++) {
- Random = Random * 129 + 1;
- j = (Random >> 10) & 7;
- k = colours[i];
- colours[i] = colours[j];
- colours[j] = k;
- }
-}
-
-/* copy the entire screen to the window at the scroll position
- *
- * perhaps use mit-shm to speed this up
- */
-void blitscreen(void)
-{
- unsigned int x = screen_x % (22 * TILEX);
- unsigned int y = screen_y % (14 * TILEY);
-
- xdebug("blitscreen");
-
-#if 0
- printf("::: %d, %d [%d, %d]\n", x, y, TILEX, TILEY);
-#endif
-
- if (x < 2 * TILEX && y < 2 * TILEY) {
-
-#if 0
- printf("!!! %ld, %ld, %ld, %ld\n",
- display, screenPixmap, xwindow, screenGC);
-#endif
-
- XCopyArea(display, screenPixmap, xwindow, screenGC, x, y, 20 * TILEX, 12 * TILEY, 0, 0);
- } else if (x < 2 * TILEX && y >= 2 * TILEY) {
- XCopyArea(display, screenPixmap, xwindow, screenGC, x, y, 20 * TILEX, 14 * TILEY - y, 0, 0);
- XCopyArea(display, screenPixmap, xwindow, screenGC, x, 0, 20 * TILEX, y - 2 * TILEY, 0, 14 * TILEY - y);
- } else if (x >= 2 * TILEX && y < 2 * TILEY) {
- XCopyArea(display, screenPixmap, xwindow, screenGC, x, y, 22 * TILEX - x, 12 * TILEY, 0, 0);
- XCopyArea(display, screenPixmap, xwindow, screenGC, 0, y, x - 2 * TILEX, 12 * TILEY, 22 * TILEX - x, 0);
- } else {
- XCopyArea(display, screenPixmap, xwindow, screenGC, x, y, 22 * TILEX - x, 14 * TILEY - y, 0, 0);
- XCopyArea(display, screenPixmap, xwindow, screenGC, 0, y, x - 2 * TILEX, 14 * TILEY - y, 22 * TILEX - x, 0);
- XCopyArea(display, screenPixmap, xwindow, screenGC, x, 0, 22 * TILEX - x, y - 2 * TILEY, 0, 14 * TILEY - y);
- XCopyArea(display, screenPixmap, xwindow, screenGC, 0, 0, x - 2 * TILEX, y - 2 * TILEY, 22 * TILEX - x, 14 * TILEY - y);
- }
-
- XCopyArea(display, scorePixmap, xwindow, scoreGC, 0, 0, 20 * TILEX, SCOREY, 0, 12 * TILEY);
- XFlush(display);
-
- xdebug("blitscreen - done");
-}
-
-/* draw differences between game tiles and screen tiles
- *
- * implicitly handles scrolling and restoring background under the sprites
- *
- * perhaps use mit-shm to speed this up
- */
-static void animscreen(void)
-{
- unsigned int x, y, dx, dy;
- unsigned short obj;
- unsigned int left = screen_x / TILEX;
- unsigned int top = screen_y / TILEY;
-
- xdebug("animscreen");
-
- for (y = top; y < top + 14; y++) {
- dy = y % 14;
- for (x = left; x < left + 22; x++) {
- dx = x % 22;
- obj = map_obj[frame][Draw[y][x]];
- if (screentiles[dy][dx] != obj) {
- screentiles[dy][dx] = obj;
- XCopyArea(display, objPixmap, screenPixmap, screenGC, (obj / 512) * TILEX, (obj % 512) * TILEY / 16, TILEX, TILEY, dx * TILEX, dy * TILEY);
- }
- }
- }
-}
-
-/* blit players to the screen
- *
- * handles transparency and movement
- */
-static void blitplayer(struct PLAYER *ply)
-{
- unsigned int x, y, dx, dy;
- unsigned short obj, spr;
-
- xdebug("blitplayer");
-
- if (ply->alive)
- {
- x = (frame * ply->oldx + (8 - frame) * ply->x) * TILEX / 8;
- y = (frame * ply->oldy + (8 - frame) * ply->y) * TILEY / 8;
- dx = x + TILEX - 1;
- dy = y + TILEY - 1;
-
- if ((unsigned int)(dx - screen_x) < (21 * TILEX - 1) &&
- (unsigned int)(dy - screen_y) < (13 * TILEY - 1))
- {
- spr = map_spr[ply->num][frame][ply->anim];
- x %= 22 * TILEX;
- y %= 14 * TILEY;
- dx %= 22 * TILEX;
- dy %= 14 * TILEY;
-
- if (objmaskBitmap)
- {
- obj = screentiles[y / TILEY][x / TILEX];
- XCopyArea(display, objmaskBitmap, spriteBitmap, spriteGC,
- (obj / 512) * TILEX, (obj % 512) * TILEY / 16, TILEX, TILEY,
- -(x % TILEX), -(y % TILEY));
-
- obj = screentiles[dy / TILEY][dx / TILEX];
- XCopyArea(display, objmaskBitmap, spriteBitmap, spriteGC,
- (obj / 512) * TILEX, (obj % 512) * TILEY / 16, TILEX, TILEY,
- (22 * TILEX - x) % TILEX, (14 * TILEY - y) % TILEY);
- }
- else if (sprmaskBitmap)
- {
- XCopyArea(display, sprmaskBitmap, spriteBitmap, spriteGC,
- (spr / 8) * TILEX, (spr % 8) * TILEY, TILEX, TILEY, 0, 0);
- }
- else
- {
- XFillRectangle(display, spriteBitmap, spriteGC, 0, 0, TILEX, TILEY);
- }
-
- screentiles[y / TILEY][x / TILEX] = -1; /* mark screen as dirty */
- screentiles[dy / TILEY][dx / TILEX] = -1;
-
- XSetClipMask(display, screenGC, spriteBitmap);
- XSetClipOrigin(display, screenGC, x, y);
- XCopyArea(display, sprPixmap, screenPixmap, screenGC,
- (spr / 8) * TILEX, (spr % 8) * TILEY, TILEX, TILEY,
- x, y);
- XSetClipOrigin(display, screenGC, x - 22 * TILEX, y);
- XCopyArea(display, sprPixmap, screenPixmap, screenGC,
- (spr / 8) * TILEX, (spr % 8) * TILEY, TILEX, TILEY,
- x - 22 * TILEX, y);
- XSetClipOrigin(display, screenGC, x, y - 14 * TILEY);
- XCopyArea(display, sprPixmap, screenPixmap, screenGC,
- (spr / 8) * TILEX, (spr % 8) * TILEY, TILEX, TILEY,
- x, y - 14 * TILEY);
- XSetClipMask(display, screenGC, None);
- }
-
-
-#if 0
-
-#if 0
- printf("::: %ld, %ld\n", objmaskBitmap, sprmaskBitmap);
-#endif
-
- if (sprmaskBitmap)
- {
- int width = 16 * 4;
- int height = 16 * 4;
- XImage *src_ximage = XGetImage(display, sprmaskBitmap, 0, 0,
- width, height, AllPlanes, ZPixmap);
- XImage *dst_ximage = XGetImage(display, xwindow, 0, 0,
- width, height, AllPlanes, ZPixmap);
- int x, y;
-
- if (src_ximage == NULL)
- {
- printf("src_ximage failed\n");
- exit(1);
- }
-
- if (dst_ximage == NULL)
- {
- printf("dst_ximage failed\n");
- exit(1);
- }
-
- for (x=0; x<width; x++)
- {
- for (y=0; y<height; y++)
- {
- unsigned long pixel = XGetPixel(src_ximage, x, y);
-
- if (pixel != BlackPixel(display, screen))
- pixel = WhitePixel(display, screen);
-
- XPutPixel(dst_ximage, x, y, pixel);
- }
- }
-
- XPutImage(display, xwindow, screenGC, dst_ximage, 0, 0, 0, 13 * TILEY,
- width, height);
- }
-#endif
-
-
- }
-}
-
-void game_initscreen(void)
-{
- unsigned int x,y;
-
- xdebug("game_initscreen");
-
-#if 0
- printf("--> M5.1: xwindow == %ld\n", xwindow);
-#endif
-
- frame = 6;
- screen_x = 0;
- screen_y = 0;
-
-#if 0
- printf("--> M5.2: &window == %ld\n", &window);
- printf("--> M5.2: xwindow == %ld\n", xwindow);
- printf("--> M5.2: &xwindow == %ld\n", &xwindow);
- printf("--> M5.2: screen == %ld\n", screen);
- printf("--> M5.2: &screentiles[0][0] == %ld\n", &screentiles[0][0]);
-#endif
-
- for (y = 0; y < 14; y++) {
- for (x = 0; x < 22; x++) {
-#if 0
- printf("--> M5.2.A: xwindow == %ld [%d,%d]\n", xwindow, x,y);
-#endif
- screentiles[y][x] = -1;
-#if 0
- printf("--> M5.2.B: xwindow == %ld [%d,%d]\n", xwindow, x,y);
-#endif
- }
- }
-
-#if 0
- printf("--> M5.3: xwindow == %ld\n", xwindow);
-#endif
-
- colour_shuffle();
- colours[0] += 16;
- colours[1] += 16;
- colours[2] += 16;
- colour_anim = 0;
-
-#if 0
- printf("--> M5.4: xwindow == %ld\n", xwindow);
-#endif
-
- XFillRectangle(display, scorePixmap, scoreGC, 0, 0, 20 * TILEX, SCOREY);
- XCopyArea(display, botPixmap, scorePixmap, scoreGC, 11 * SCOREX, colours[0] * SCOREY, 3 * SCOREX, SCOREY, 1 * SCOREX, 0); /* 0-63 time */
- XCopyArea(display, botPixmap, scorePixmap, scoreGC, 18 * SCOREX, colours[0] * SCOREY, 6 * SCOREX, SCOREY, 15 * SCOREX, 0); /* 112-207 diamonds */
- XCopyArea(display, botPixmap, scorePixmap, scoreGC, 14 * SCOREX, colours[0] * SCOREY, 4 * SCOREX, SCOREY, 32 * SCOREX, 0); /* 256-319 score */
-
-#if 0
- printf("--> M5.X: xwindow == %ld\n", xwindow);
-#endif
-}
-
-void game_blitscore(void)
-{
- unsigned int i;
-
- xdebug("game_blitscore");
-
- i = (lev.time + 4) / 5;
- XCopyArea(display, botPixmap, scorePixmap, scoreGC, (i % 10) * SCOREX, colours[1] * SCOREY, SCOREX, SCOREY, 7 * SCOREX, 0); i /= 10;
- XCopyArea(display, botPixmap, scorePixmap, scoreGC, (i % 10) * SCOREX, colours[1] * SCOREY, SCOREX, SCOREY, 6 * SCOREX, 0); i /= 10;
- XCopyArea(display, botPixmap, scorePixmap, scoreGC, (i % 10) * SCOREX, colours[1] * SCOREY, SCOREX, SCOREY, 5 * SCOREX, 0); i /= 10;
- XCopyArea(display, botPixmap, scorePixmap, scoreGC, (i % 10) * SCOREX, colours[1] * SCOREY, SCOREX, SCOREY, 4 * SCOREX, 0);
- i = lev.score;
- XCopyArea(display, botPixmap, scorePixmap, scoreGC, (i % 10) * SCOREX, colours[1] * SCOREY, SCOREX, SCOREY, 39 * SCOREX, 0); i /= 10;
- XCopyArea(display, botPixmap, scorePixmap, scoreGC, (i % 10) * SCOREX, colours[1] * SCOREY, SCOREX, SCOREY, 38 * SCOREX, 0); i /= 10;
- XCopyArea(display, botPixmap, scorePixmap, scoreGC, (i % 10) * SCOREX, colours[1] * SCOREY, SCOREX, SCOREY, 37 * SCOREX, 0); i /= 10;
- XCopyArea(display, botPixmap, scorePixmap, scoreGC, (i % 10) * SCOREX, colours[1] * SCOREY, SCOREX, SCOREY, 36 * SCOREX, 0);
- if (lev.home == 0) {
- XCopyArea(display, botPixmap, scorePixmap, scoreGC, 12 * SCOREX, 24 * SCOREY, 12 * SCOREX, SCOREY, 14 * SCOREX, 0); /* relax */
- goto done;
- }
- if (ply1.alive + ply2.alive >= lev.home && lev.required == 0) {
- XCopyArea(display, botPixmap, scorePixmap, scoreGC, 24 * SCOREX, colours[2] * SCOREY, 12 * SCOREX, SCOREY, 14 * SCOREX, 0); /* find the exit */
- goto done;
- }
- if (ply1.alive + ply2.alive < lev.home) {
- if (++colour_anim > 11) colour_anim = 0;
- if (colour_anim < 6) {
- XCopyArea(display, botPixmap, scorePixmap, scoreGC, 0, 24 * SCOREY, 12 * SCOREX, SCOREY, 14 * SCOREX, 0); /* forget it */
- goto done;
- }
- XCopyArea(display, botPixmap, scorePixmap, scoreGC, 18 * SCOREX, colours[0] * SCOREY, 6 * SCOREX, SCOREY, 15 * SCOREX, 0); /* diamonds */
- }
- i = lev.required;
- XCopyArea(display, botPixmap, scorePixmap, scoreGC, (i % 10) * SCOREX, colours[1] * SCOREY, SCOREX, SCOREY, 24 * SCOREX, 0); i /= 10;
- XCopyArea(display, botPixmap, scorePixmap, scoreGC, (i % 10) * SCOREX, colours[1] * SCOREY, SCOREX, SCOREY, 23 * SCOREX, 0); i /= 10;
- XCopyArea(display, botPixmap, scorePixmap, scoreGC, (i % 10) * SCOREX, colours[1] * SCOREY, SCOREX, SCOREY, 22 * SCOREX, 0); i /= 10;
- XCopyArea(display, botPixmap, scorePixmap, scoreGC, (i % 10) * SCOREX, colours[1] * SCOREY, SCOREX, SCOREY, 21 * SCOREX, 0);
-done:
-}
-
-void game_animscreen(void)
-{
- unsigned int x,y;
-
- xdebug("game_animscreen");
-
- x = (frame * ply1.oldx + (8 - frame) * ply1.x) * TILEX / 8 + (19 * TILEX) / 2;
- y = (frame * ply1.oldy + (8 - frame) * ply1.y) * TILEY / 8 + (11 * TILEY) / 2;
- if (x > lev.width * TILEX) x = lev.width * TILEX;
- if (y > lev.height * TILEY) y = lev.height * TILEY;
- if (x < 20 * TILEX) x = 20 * TILEY;
- if (y < 12 * TILEY) y = 12 * TILEY;
- screen_x = x - 19 * TILEX;
- screen_y = y - 11 * TILEY;
-
- animscreen();
- blitplayer(&ply1);
- blitplayer(&ply2);
- blitscreen();
- XFlush(display);
-
- Random = Random * 129 + 1;
-}
-
-void title_initscreen(void)
-{
- xdebug("title_initscreen");
-
- screen_x = 0;
- screen_y = 0;
-
- colour_shuffle();
- colours[1] += 8;
- colour_anim = 0;
-
- XCopyArea(display, ttlPixmap, screenPixmap, screenGC, 0, 0, 20 * TILEX, 12 * TILEY, 0, 0);
- if (botmaskBitmap) {
- XCopyArea(display, botPixmap, scorePixmap, scoreGC, 0, colours[1] * SCOREY, 20 * TILEX, SCOREY, 0, 0);
- XSetClipMask(display, scoreGC, botmaskBitmap);
- XSetClipOrigin(display, scoreGC, 0, 0 - colours[0] * SCOREY);
- }
- XCopyArea(display, botPixmap, scorePixmap, scoreGC, 0, colours[0] * SCOREY, 20 * TILEX, SCOREY, 0, 0);
- if (botmaskBitmap) {
- XSetClipMask(display, scoreGC, None);
- }
-}
-
-void title_blitscore(void)
-{
- unsigned int x, y, i;
-
- xdebug("title_blitscore");
-
- if (++colour_anim > 30) colour_anim = 0;
- i = colour_anim >= 16 ? 31 - colour_anim : colour_anim;
- x = (i / 8 + 18) * 2 * SCOREX;
- y = (i % 8 + 16) * SCOREY;
-
- if (botmaskBitmap) {
- XCopyArea(display, botPixmap, scorePixmap, scoreGC, 32 * SCOREX, colours[1] * SCOREY, 2 * SCOREX, SCOREY, 32 * SCOREX, 0);
- XSetClipMask(display, scoreGC, botmaskBitmap);
- XSetClipOrigin(display, scoreGC, 32 * SCOREX - x, 0 - y);
- }
- XCopyArea(display, botPixmap, scorePixmap, scoreGC, x, y, 2 * SCOREX, SCOREY, 32 * SCOREX, 0);
- if (botmaskBitmap) {
- XSetClipMask(display, scoreGC, None);
- }
-}
-
-void title_blitants(unsigned int y)
-{
- static const char ants_dashes[2] = { 8, 7 };
-
- xdebug("title_blitants");
-
- XSetDashes(display, antsGC, colour_anim, ants_dashes, 2);
- XDrawRectangle(display, screenPixmap, antsGC, 0, y * TILEY, 20 * TILEX - 1, TILEY - 1);
-}
-
-void title_animscreen(void)
-{
- blitscreen();
- XFlush(display);
-
- Random = Random * 129 + 1;
-}
-
-void title_string(unsigned int y, unsigned int left, unsigned int right, char *string)
-{
- int i;
- unsigned int x;
-
- xdebug("title_string");
-
- y *= TILEY; left *= SCOREX; right *= SCOREX;
- x = (left + right - strlen(string) * 12) / 2;
- if (x < left || x >= right) x = left;
-
- XCopyArea(display, ttlPixmap, screenPixmap, screenGC, left, y, right - left, TILEY, left, y);
- if (ttlmaskBitmap) XSetClipMask(display, screenGC, ttlmaskBitmap);
- for (i = 0; string[i] && x < right; i++) {
- unsigned short ch_pos, ch_x, ch_y;
- ch_pos = map_ttl[string[i] & 127];
- if (ch_pos < 640) {
- ch_x = (ch_pos % 320);
- ch_y = (ch_pos / 320 + 12) * TILEY;
- if (ttlmaskBitmap) XSetClipOrigin(display, screenGC, x - ch_x, y - ch_y);
- XCopyArea(display, ttlPixmap, screenPixmap, screenGC, ch_x, ch_y, 12, TILEY, x, y);
- }
- x += 12;
- }
- XSetClipMask(display, screenGC, None);
-}
-
-#endif
+++ /dev/null
-
-#if defined(TARGET_X11)
-
-/* 2000-08-10T18:03:54Z
- *
- * open X11 display and sound
- */
-
-#if 1
-#include <X11/Xlib.h>
-#include <X11/Xutil.h>
-#include <X11/Xatom.h>
-#include <X11/Xos.h>
-#include <X11/Intrinsic.h>
-#include <X11/keysymdef.h>
-#endif
-
-#include <X11/Xlib.h>
-#include <X11/Xutil.h>
-#include <X11/Xatom.h>
-#include <X11/keysym.h>
-#include <X11/cursorfont.h>
-#include <X11/xpm.h>
-#include <sys/types.h>
-#include <sys/wait.h>
-#include <unistd.h>
-#include <stdlib.h>
-#include <stdio.h>
-#include <signal.h>
-#include <string.h>
-#include <errno.h>
-
-#include "../libgame/platform.h"
-#include "../libgame/libgame.h"
-
-#include "global.h"
-#include "display.h"
-#include "sample.h"
-
-#if 0
-Display *display;
-Window xwindow;
-#endif
-
-#if 1
-Bitmap *objBitmap;
-Bitmap *botBitmap;
-Bitmap *sprBitmap;
-Bitmap *ttlBitmap;
-#endif
-
-#if 1
-Bitmap *screenBitmap;
-Bitmap *scoreBitmap;
-#endif
-
-Pixmap screenPixmap;
-Pixmap scorePixmap;
-Pixmap spriteBitmap;
-
-Pixmap objPixmap;
-Pixmap objmaskBitmap;
-Pixmap botPixmap;
-Pixmap botmaskBitmap;
-Pixmap sprPixmap;
-Pixmap sprmaskBitmap;
-Pixmap ttlPixmap;
-Pixmap ttlmaskBitmap;
-
-GC screenGC;
-GC scoreGC;
-GC spriteGC;
-GC antsGC;
-
-Atom deleteAtom;
-
-KeySym lastKeySym;
-
-KeyCode northKeyCode[3];
-KeyCode eastKeyCode[3];
-KeyCode southKeyCode[3];
-KeyCode westKeyCode[3];
-KeyCode fireKeyCode[3];
-KeyCode escKeyCode[1];
-
-char play[SAMPLE_MAX];
-
-static int sound_pid = -1;
-int sound_pipe[2] = { -1, -1 }; /* for communication */
-short *sound_data[SAMPLE_MAX]; /* pointer to sound data */
-long sound_length[SAMPLE_MAX]; /* length of sound data */
-
-static Screen *defaultScreen;
-static Visual *defaultVisual;
-static Colormap defaultColourmap;
-static Window defaultRootWindow;
-static unsigned int screenDepth;
-static unsigned int screenWidth;
-static unsigned int screenHeight;
-static unsigned long screenBlackPixel;
-static unsigned long screenWhitePixel;
-
-#if 0
-static XSizeHints sizeHints;
-static XSetWindowAttributes setWindowAttributes;
-static XWMHints wmHints;
-static XVisualInfo visualInfo;
-#endif
-static XGCValues gcValues;
-
-static Colormap privateColourmap;
-static Cursor cursor;
-static XColor *privateColours;
-static unsigned char *privateFlags;
-static int privateNumColours;
-
-static XColor redColour;
-static XColor whiteColour;
-static int gotRed;
-static int gotWhite;
-
-#if 1
-static Bitmap *pcxBitmaps[4];
-static Bitmap *pcxBitmapsX2[4];
-#endif
-
-#if 0
-static Pixmap xpmPixmaps[4];
-static Pixmap xpmBitmaps[4];
-static XpmAttributes xpmAttributes[4];
-static int xpmGot[4];
-#endif
-
-static int xpmAllocColourFunc(Display *, Colormap, char *, XColor *, void *);
-static int xpmFreeColoursFunc(Display *, Colormap, unsigned long *, int, void *);
-
-static KeyCode keycodes[16];
-
-#if 0
-static const char *xpmNames[4] = { "object.xpm", "score.xpm", "sprite.xpm", "title.xpm" };
-#endif
-
-#if 1
-static const char *pcxNames[4] = { "object.pcx", "score.pcx", "sprite.pcx", "title.pcx" };
-#endif
-
-static const int xpmCloseness[4] = { 10000, 10000, 40000, 50000 };
-static const KeySym keysyms[16] = {
- XK_Up, XK_KP_Up, XK_r, /* north */
- XK_Right, XK_KP_Right, XK_g, /* east */
- XK_Down, XK_KP_Down, XK_f, /* south */
- XK_Left, XK_KP_Left, XK_d, /* west */
- XK_Shift_L, XK_Control_R, XK_space, /* fire */
- XK_Escape /* escape */
-};
-static const char *sound_names[SAMPLE_MAX] = {
- "00.blank.au","01.roll.au","02.stone.au","03.nut.au","04.crack.au",
- "05.bug.au","06.tank.au","07.android.au","08.spring.au","09.slurp.au",
- "10.eater.au","11.alien.au","12.collect.au","13.diamond.au","14.squash.au",
- "15.drip.au","16.push.au","17.dirt.au","18.acid.au","19.ball.au",
- "20.grow.au","21.wonder.au","22.door.au","23.exit.au","24.dynamite.au",
- "25.tick.au","26.press.au","27.wheel.au","28.boom.au","29.time.au",
- "30.die.au"
-};
-static const int sound_volume[SAMPLE_MAX] = {
- 20,100,100,100,100,20,20,100,100,100,
- 50,100,100,100,100,100,100,100,100,100,
- 100,20,100,100,100,100,100,20,100,100,
- 100
-};
-
-static void xdebug(char *msg)
-{
-#if 1
- XSync(display, False);
- printf("EM DEBUG: %s\n", msg);
-#endif
-}
-
-int open_all(void)
-{
- char name[MAXNAME+2];
-#if 0
- void *dummyptr;
- int dummyint;
-#endif
- int i;
-
-#if 0
- display = XOpenDisplay(arg_display);
- if(display == 0) {
- fprintf(stderr, "%s: \"%s\": %s: %s\n", progname, XDisplayName(arg_display), "failed to open display", strerror(errno));
- return(1);
- }
-#endif
-
- defaultScreen = DefaultScreenOfDisplay(display);
- defaultVisual = DefaultVisualOfScreen(defaultScreen);
- defaultColourmap = DefaultColormapOfScreen(defaultScreen);
- defaultRootWindow = RootWindowOfScreen(defaultScreen);
- screenDepth = DefaultDepthOfScreen(defaultScreen);
- screenWidth = WidthOfScreen(defaultScreen);
- screenHeight = HeightOfScreen(defaultScreen);
- screenBlackPixel = BlackPixelOfScreen(defaultScreen);
- screenWhitePixel = WhitePixelOfScreen(defaultScreen);
-
-#if 0
- if(arg_install) {
- visualInfo.visualid = XVisualIDFromVisual(defaultVisual);
- dummyptr = XGetVisualInfo(display, VisualIDMask, &visualInfo, &dummyint);
- if(dummyptr == 0) {
- fprintf(stderr, "%s: \"%s\": %s: %s\n", progname, XDisplayName(arg_display), "failed to get visual info", strerror(errno));
- return(1);
- }
- memcpy(&visualInfo, dummyptr, sizeof(visualInfo));
- XFree(dummyptr);
-
- if(visualInfo.class != PseudoColor) {
- fprintf(stderr, "%s: \"%s\": %s\n", progname, XDisplayName(arg_display), "private colourmap only supported for pseudocolour display");
- return(1);
- }
-
- privateColourmap = XCreateColormap(display, defaultRootWindow, defaultVisual, AllocAll);
- if(privateColourmap == 0) {
- fprintf(stderr, "%s: \"%s\": %s: %s\n", progname, XDisplayName(arg_display), "failed to create colourmap", strerror(errno));
- return(1);
- }
-
- privateNumColours = visualInfo.colormap_size;
-
- privateColours = malloc(privateNumColours * sizeof(XColor));
- if(privateColours == 0) {
- fprintf(stderr, "%s: %s (%d): %s\n", progname, "malloc failed", privateNumColours * sizeof(XColor), strerror(errno));
- return(1);
- }
- for(dummyint = 0; dummyint < privateNumColours; dummyint++) privateColours[dummyint].pixel = dummyint;
- XQueryColors(display, defaultColourmap, privateColours, privateNumColours);
- XStoreColors(display, privateColourmap, privateColours, privateNumColours);
-
- privateFlags = malloc(privateNumColours);
- if(privateFlags == 0) {
- fprintf(stderr, "%s: %s (%d): %s\n", progname, "malloc failed", privateNumColours, strerror(errno));
- return(1);
- }
- memset(privateFlags, 0, privateNumColours);
- privateFlags[0] = 1; /* first two entries (black and white) are already allocated */
- privateFlags[1] = 1;
- }
-
- sizeHints.flags = PSize | PMinSize | PMaxSize;
- sizeHints.width = 20 * TILEX;
- sizeHints.height = 12 * TILEY + SCOREY;
- sizeHints.min_width = sizeHints.max_width = sizeHints.width;
- sizeHints.min_height = sizeHints.max_height = sizeHints.height;
- if(arg_geometry) {
- dummyint = XWMGeometry(display, XScreenNumberOfScreen(defaultScreen), arg_geometry, 0, 2, &sizeHints, &sizeHints.x, &sizeHints.y, &dummyint, &dummyint, &sizeHints.win_gravity);
- if(dummyint & (XValue | YValue)) sizeHints.flags |= USPosition | PWinGravity;
- }
-
- xwindow = XCreateWindow(display, defaultRootWindow, sizeHints.x, sizeHints.y, sizeHints.width, sizeHints.height, 2, screenDepth, InputOutput, CopyFromParent, 0, 0);
- if(xwindow == 0) {
- fprintf(stderr, "%s: \"%s\": %s: %s\n", progname, XDisplayName(arg_display), "failed to open window", strerror(errno));
- return(1);
- }
-
- setWindowAttributes.background_pixel = screenBlackPixel;
- setWindowAttributes.border_pixel = screenWhitePixel;
- setWindowAttributes.backing_store = NotUseful;
- setWindowAttributes.override_redirect = False;
- setWindowAttributes.event_mask = KeyPressMask | EnterWindowMask | LeaveWindowMask | ExposureMask;
- setWindowAttributes.colormap = privateColourmap ? privateColourmap : defaultColourmap;
- XChangeWindowAttributes(display, xwindow, CWBackPixel | CWBorderPixel | CWBackingStore | CWOverrideRedirect | CWEventMask | CWColormap, &setWindowAttributes);
-
- XStoreName(display, xwindow, "Emerald Mine");
-
- wmHints.flags = InputHint | StateHint;
- wmHints.input = True;
- wmHints.initial_state = NormalState;
- XSetWMHints(display, xwindow, &wmHints);
-
- XSetWMNormalHints(display, xwindow, &sizeHints);
-
- deleteAtom = XInternAtom(display, "WM_DELETE_WINDOW", False);
- XSetWMProtocols(display, xwindow, &deleteAtom, 1);
-
- cursor = XCreateFontCursor(display, XC_trek);
- if(cursor) XDefineCursor(display, xwindow, cursor);
-
- XMapWindow(display, xwindow);
-#endif
-
-#if 0
- for(i = 0; i < 4; i++) {
- name[MAXNAME] = 0;
- if(arg_basedir) {
- snprintf(name, MAXNAME+2, "%s/%s/%s", arg_basedir, EM_GFX_DIR, xpmNames[i]);
- } else {
- snprintf(name, MAXNAME+2, "%s/%s", EM_GFX_DIR, xpmNames[i]);
- }
- if(name[MAXNAME]) snprintf_overflow("read graphics/ files");
-
- xpmAttributes[i].valuemask = XpmColormap | XpmReturnAllocPixels | XpmExactColors | XpmCloseness | XpmAllocColor | XpmFreeColors;
- xpmAttributes[i].colormap = privateColourmap ? privateColourmap : defaultColourmap;
- xpmAttributes[i].exactColors = False;
- xpmAttributes[i].closeness = xpmCloseness[i];
- xpmAttributes[i].alloc_color = xpmAllocColourFunc;
- xpmAttributes[i].free_colors = xpmFreeColoursFunc;
- dummyint = XpmReadFileToPixmap(display, xwindow, name, &xpmPixmaps[i], &xpmBitmaps[i], &xpmAttributes[i]);
- if(dummyint) {
- fprintf(stderr, "%s: \"%s\": \"%s\": %s: %s: %s\n", progname, XDisplayName(arg_display), name, "failed to read xpm", XpmGetErrorString(dummyint), strerror(errno));
- return(1);
- }
- xpmGot[i] = 1;
- }
-#endif
-
- for(i = 0; i < 4; i++)
- {
- name[MAXNAME] = 0;
- snprintf(name, MAXNAME+2, "%s/%s", EM_GFX_DIR, pcxNames[i]);
-
- if (name[MAXNAME])
- snprintf_overflow("read graphics/ files");
-
- if ((pcxBitmaps[i] = LoadImage(name)) == NULL)
- {
- printf("::: LoadImage() failed for file '%s'\n", name);
- return 1;
- }
- }
-
- objBitmap = pcxBitmaps[0];
- botBitmap = pcxBitmaps[1];
- sprBitmap = pcxBitmaps[2];
- ttlBitmap = pcxBitmaps[3];
-
-#if 0
- objPixmap = xpmPixmaps[0];
- botPixmap = xpmPixmaps[1];
- sprPixmap = xpmPixmaps[2];
- ttlPixmap = xpmPixmaps[3];
- objmaskBitmap = xpmBitmaps[0];
- botmaskBitmap = xpmBitmaps[1];
- sprmaskBitmap = xpmBitmaps[2];
- ttlmaskBitmap = xpmBitmaps[3];
-#else
- objPixmap = pcxBitmaps[0]->drawable;
- botPixmap = pcxBitmaps[1]->drawable;
- sprPixmap = pcxBitmaps[2]->drawable;
- ttlPixmap = pcxBitmaps[3]->drawable;
- objmaskBitmap = pcxBitmaps[0]->clip_mask;
- botmaskBitmap = pcxBitmaps[1]->clip_mask;
- sprmaskBitmap = pcxBitmaps[2]->clip_mask;
- ttlmaskBitmap = pcxBitmaps[3]->clip_mask;
-#endif
-
-#if 1
- for (i = 0; i < 4; i++)
- {
- Pixmap clip_mask;
-
- if ((clip_mask = XCreatePixmap(display, window->drawable,
- pcxBitmaps[i]->width * 2,
- pcxBitmaps[i]->height * 2, 1))
- == None)
- {
- printf("::: cannot create clip mask");
- return 1;
- }
-
-#if 0
- {
- XGCValues clip_gc_values;
- unsigned long clip_gc_valuemask;
- GC gc;
-
- clip_gc_values.graphics_exposures = False;
- clip_gc_valuemask = GCGraphicsExposures;
- if ((gc = XCreateGC(display, clip_mask,
- clip_gc_valuemask, &clip_gc_values)) == None)
- {
- printf("X CreateGC failed\n");
- exit(1);
- }
-
- XFillRectangle(display, clip_mask, gc, 0, 0,
- pcxBitmaps[i]->width * 2,
- pcxBitmaps[i]->height * 2);
- }
-#endif
-
-#if 0
- {
- byte * src_ptr;
- int src_width = pcxBitmaps[i]->width;
- int src_height = pcxBitmaps[i]->height;
-
-#if 0
- printf("::: %d, %d [%ld -> %ld (%ld)]\n",
- src_width, src_height,
- src_ptr,
- src_ptr + src_width * src_height * 1,
- src_width * src_height * 1);
-#endif
-
-#if 0
- for (i = src_ptr; i < src_ptr + src_width * src_height * 1; i++)
- {
- byte x = *(byte *)i;
-
- x = x * 1;
- }
-#endif
- }
-#endif
-
- pcxBitmapsX2[i] = ZoomBitmap(pcxBitmaps[i],
- pcxBitmaps[i]->width * 2,
- pcxBitmaps[i]->height * 2);
-
-#if 1
-
-#if 0
- printf("::: CREATING NEW CLIPMASKS ...\n");
-#endif
-#if 1
- clip_mask = Pixmap_to_Mask(pcxBitmapsX2[i]->drawable,
- pcxBitmapsX2[i]->width,
- pcxBitmapsX2[i]->height);
-#endif
-#if 0
- printf("::: CREATING NEW CLIPMASKS DONE\n");
-#endif
-
- pcxBitmapsX2[i]->clip_mask = clip_mask;
-
-#if 0
- printf("::: %ld, %ld, %ld, %ld, %ld, %ld, %ld\n",
- pcxBitmaps[i]->gc,
- pcxBitmaps[i]->clip_mask, pcxBitmapsX2[i]->clip_mask,
- pcxBitmaps[i]->width, pcxBitmaps[i]->height,
- pcxBitmapsX2[i]->width, pcxBitmapsX2[i]->height);
-#endif
-
-#if 0
- ZoomPixmap(display, pcxBitmaps[i]->gc,
- pcxBitmaps[i]->clip_mask, pcxBitmapsX2[i]->clip_mask,
- pcxBitmaps[i]->width, pcxBitmaps[i]->height,
- pcxBitmapsX2[i]->width, pcxBitmapsX2[i]->height);
-#endif
-
-#endif
- }
-
- objBitmap = pcxBitmapsX2[0];
- botBitmap = pcxBitmapsX2[1];
- sprBitmap = pcxBitmapsX2[2];
- ttlBitmap = pcxBitmapsX2[3];
-
- objPixmap = pcxBitmapsX2[0]->drawable;
- botPixmap = pcxBitmapsX2[1]->drawable;
- sprPixmap = pcxBitmapsX2[2]->drawable;
- ttlPixmap = pcxBitmapsX2[3]->drawable;
-#if 1
- objmaskBitmap = pcxBitmapsX2[0]->clip_mask;
- botmaskBitmap = pcxBitmapsX2[1]->clip_mask;
- sprmaskBitmap = pcxBitmapsX2[2]->clip_mask;
- ttlmaskBitmap = pcxBitmapsX2[3]->clip_mask;
-#endif
-#endif
-
-#if 1
- screenBitmap = CreateBitmap(22 * TILEX, 14 * TILEY, DEFAULT_DEPTH);
- scoreBitmap = CreateBitmap(20 * TILEX, SCOREY, DEFAULT_DEPTH);
-#endif
-
- screenPixmap = XCreatePixmap(display, xwindow, 22 * TILEX, 14 * TILEY, screenDepth);
- if(screenPixmap == 0) {
- fprintf(stderr, "%s: \"%s\": %s: %s\n", progname, XDisplayName(arg_display), "failed to create pixmap", strerror(errno));
- return(1);
- }
-
- scorePixmap = XCreatePixmap(display, xwindow, 20 * TILEX, SCOREY, screenDepth);
- if(scorePixmap == 0) {
- fprintf(stderr, "%s: \"%s\": %s: %s\n", progname, XDisplayName(arg_display), "failed to create pixmap", strerror(errno));
- return(1);
- }
-
- spriteBitmap = XCreatePixmap(display, xwindow, TILEX, TILEY, 1);
- if(spriteBitmap == 0) {
- fprintf(stderr, "%s: \"%s\": %s: %s\n", progname, XDisplayName(arg_display), "failed to create pixmap", strerror(errno));
- return(1);
- }
-
- redColour.pixel = screenWhitePixel;
- whiteColour.pixel = screenBlackPixel;
- gotRed = (xpmAllocColourFunc(display, privateColourmap ? privateColourmap : defaultColourmap, "red", &redColour, 0) > 0);
- gotWhite = (xpmAllocColourFunc(display, privateColourmap ? privateColourmap : defaultColourmap, "white", &whiteColour, 0) > 0);
-
- gcValues.graphics_exposures = False;
- screenGC = XCreateGC(display, screenPixmap, GCGraphicsExposures, &gcValues);
- if(screenGC == 0) {
- fprintf(stderr, "%s: \"%s\": %s: %s\n", progname, XDisplayName(arg_display), "failed to create graphics context", strerror(errno));
- return(1);
- }
-
- gcValues.graphics_exposures = False;
- scoreGC = XCreateGC(display, scorePixmap, GCGraphicsExposures, &gcValues);
- if(scoreGC == 0) {
- fprintf(stderr, "%s: \"%s\": %s: %s\n", progname, XDisplayName(arg_display), "failed to create graphics context", strerror(errno));
- return(1);
- }
-
- gcValues.function = objmaskBitmap ? GXcopyInverted : sprmaskBitmap ? GXcopy : GXset;
- gcValues.graphics_exposures = False;
- spriteGC = XCreateGC(display, spriteBitmap, GCFunction | GCGraphicsExposures, &gcValues);
- if(spriteGC == 0) {
- fprintf(stderr, "%s: \"%s\": %s: %s\n", progname, XDisplayName(arg_display), "failed to create graphics context", strerror(errno));
- return(1);
- }
-
- gcValues.foreground = redColour.pixel;
- gcValues.background = whiteColour.pixel;
- gcValues.line_style = LineDoubleDash;
- gcValues.graphics_exposures = False;
- antsGC = XCreateGC(display, screenPixmap, GCForeground | GCBackground | GCLineStyle | GCGraphicsExposures, &gcValues);
- if(antsGC == 0) {
- fprintf(stderr, "%s: \"%s\": %s: %s\n", progname, XDisplayName(arg_display), "failed to create graphics context", strerror(errno));
- return(1);
- }
-
- for(i = 0; i < 16; i++) {
- keycodes[i] = XKeysymToKeycode(display, keysyms[i]);
- }
- for(i = 0; i < 3; i++) northKeyCode[i] = keycodes[i + 0];
- for(i = 0; i < 3; i++) eastKeyCode[i] = keycodes[i + 3];
- for(i = 0; i < 3; i++) southKeyCode[i] = keycodes[i + 6];
- for(i = 0; i < 3; i++) westKeyCode[i] = keycodes[i + 9];
- for(i = 0; i < 3; i++) fireKeyCode[i] = keycodes[i + 12];
- for(i = 0; i < 1; i++) escKeyCode[i] = keycodes[i + 15];
-
- /* ----------------------------------------------------------------- */
-
-#if 0
- {
- Bitmap *bm = pcxBitmaps[2];
- Pixmap clip_mask = bm->clip_mask;
-
- if (clip_mask)
- {
-#if 1
- int width = bm->width;
- int height = bm->height;
-#else
- int width = 16 * 4;
- int height = 16 * 4;
-#endif
- XImage *src_ximage = XGetImage(display, clip_mask, 0, 0,
- width, height, AllPlanes, ZPixmap);
- XImage *dst_ximage = XGetImage(display, xwindow, 0, 0,
- width, height, AllPlanes, ZPixmap);
- int x, y;
-
- if (src_ximage == NULL)
- {
- printf("src_ximage failed\n");
- exit(1);
- }
-
- if (dst_ximage == NULL)
- {
- printf("dst_ximage failed\n");
- exit(1);
- }
-
- printf("::: DISPLAY CLIP MASK ...\n");
-
- for (x=0; x<width; x++)
- {
- for (y=0; y<height; y++)
- {
- unsigned long pixel = XGetPixel(src_ximage, x, y);
-
- if (pixel != BlackPixel(display, screen))
- pixel = WhitePixel(display, screen);
-
- XPutPixel(dst_ximage, x, y, pixel);
- }
- }
-
- printf("::: DISPLAY CLIP MASK NOW\n");
-
- XPutImage(display, xwindow, screenGC, dst_ximage, 0, 0,
- 0, 13 * TILEY, width, height);
-
- printf("::: DISPLAY CLIP MASK DONE\n");
- }
- }
-#endif
-
- /* ----------------------------------------------------------------- */
-
-#if 0
- {
- int ii = 2;
-
- XGCValues clip_gc_values;
- unsigned long clip_gc_valuemask;
-
-#if 1
- GC gc = screenGC;
-#else
-#if 1
- GC gc = pcxBitmaps[ii]->stored_clip_gc;
-#else
- GC gc = pcxBitmaps[ii]->gc;
-#endif
-#endif
- Pixmap src_pixmap = pcxBitmaps[ii]->clip_mask;
- Pixmap dst_pixmap = pcxBitmapsX2[ii]->clip_mask;
- int src_width = pcxBitmaps[ii]->width;
- int src_height = pcxBitmaps[ii]->height;
- int dst_width = pcxBitmapsX2[ii]->width;
- int dst_height = pcxBitmapsX2[ii]->height;
-
- XImage *src_ximage, *dst_ximage;
- byte *src_ptr, *dst_ptr;
- int bits_per_pixel;
- int bytes_per_pixel;
- int x, y, xx, yy, i;
-#if 1
- boolean scale_down = (src_width > dst_width);
- int zoom_factor;
-#else
- int zoom_factor = src_width / dst_width; /* currently very limited! */
-#endif
- int row_skip, col_skip;
-
- printf("::: %d\n", scale_down);
-
- xdebug("::: ZOOM STEP 1");
-
- clip_gc_values.graphics_exposures = False;
- clip_gc_valuemask = GCGraphicsExposures;
- if ((gc = XCreateGC(display, pcxBitmaps[ii]->clip_mask,
- clip_gc_valuemask, &clip_gc_values)) == None)
- {
- printf("XCreateGC failed\n");
- exit(1);
- }
-
- xdebug("::: ZOOM STEP 2");
-
- if (scale_down)
- {
- zoom_factor = src_width / dst_width;
-
- /* adjust source image size to integer multiple of destination size */
- src_width = dst_width * zoom_factor;
- src_height = dst_height * zoom_factor;
- }
- else
- {
- zoom_factor = dst_width / src_width;
-
- /* no adjustment needed when scaling up (some pixels may be left blank) */
- }
-
- /* copy source pixmap to temporary image */
- if ((src_ximage = XGetImage(display, src_pixmap, 0, 0, src_width, src_height,
- AllPlanes, ZPixmap)) == NULL)
- Error(ERR_EXIT, "ZoomPixmap(): XGetImage() failed");
-
- bits_per_pixel = src_ximage->bits_per_pixel;
- bytes_per_pixel = (bits_per_pixel + 7) / 8;
-
- printf("::: bits_per_pixel == %d\n", bits_per_pixel);
-
- if ((dst_ximage = XCreateImage(display, visual, src_ximage->depth, ZPixmap,
- 0, NULL, dst_width, dst_height,
- 8, dst_width * bytes_per_pixel)) == NULL)
- Error(ERR_EXIT, "ZoomPixmap(): XCreateImage() failed");
-
- dst_ximage->data =
- checked_malloc(dst_width * dst_height * bytes_per_pixel);
- dst_ximage->byte_order = src_ximage->byte_order;
-
- src_ptr = (byte *)src_ximage->data;
- dst_ptr = (byte *)dst_ximage->data;
-
- if (scale_down)
- {
- col_skip = (zoom_factor - 1) * bytes_per_pixel;
- row_skip = col_skip * src_width;
-
- /* scale image down by scaling factor 'zoom_factor' */
- for (y = 0; y < src_height; y += zoom_factor, src_ptr += row_skip)
- for (x = 0; x < src_width; x += zoom_factor, src_ptr += col_skip)
- for (i = 0; i < bytes_per_pixel; i++)
- *dst_ptr++ = *src_ptr++;
- }
- else
- {
- row_skip = src_width * bytes_per_pixel;
-
-#if 1
- printf("::: %d, %d -> %d, %d [%d / %d]\n[%ld -> %ld (%ld)] [%ld -> %ld (%ld)]\n",
- src_width, src_height,
- dst_width, dst_height,
- zoom_factor, bytes_per_pixel,
- src_ptr,
- src_ptr + src_width * src_height * bytes_per_pixel,
- src_width * src_height * bytes_per_pixel,
- dst_ptr,
- dst_ptr + dst_width * dst_height * bytes_per_pixel,
- dst_width * dst_height * bytes_per_pixel);
-#endif
-
-#if 0
- printf("A\n");
-
- for (i = 0; i < src_width * src_height * bytes_per_pixel;
- i++)
- {
- byte x = *(byte *)(src_ptr + i);
-
- printf("::: %d ...\n", i);
-
- x = x * 1;
- }
-
- printf("B\n");
-#endif
-
- /* scale image up by scaling factor 'zoom_factor' */
- for (y = 0; y < src_height; y++)
- {
- for (yy = 0; yy < zoom_factor; yy++)
- {
- if (yy > 0)
- src_ptr -= row_skip;
-
-#if 0
- printf("::: [%d -> %ld / %ld]\n", y, src_ptr, dst_ptr);
-#endif
-
- for (x = 0; x < src_width; x++)
- {
- for (xx = 0; xx < zoom_factor; xx++)
- for (i = 0; i < bytes_per_pixel; i++)
-#if 1
- {
-#if 0
- printf("::: %d\n", *(src_ptr + i));
-#endif
-
- *dst_ptr++ = *(src_ptr + i);
- }
-#else
- *dst_ptr++ = 0;
-#endif
-
- src_ptr += i;
- }
- }
- }
- }
-
- xdebug("::: ZOOM STEP 9");
-
- /* copy scaled image to destination pixmap */
- XPutImage(display, dst_pixmap, gc, dst_ximage, 0, 0, 0, 0,
- dst_width, dst_height);
-
- /* free temporary images */
- X11DestroyImage(src_ximage);
- X11DestroyImage(dst_ximage);
-
-
- xdebug("::: ZOOM DONE");
-
- }
-#endif
-
- /* ----------------------------------------------------------------- */
-
-#if 0
- {
- Bitmap *bm = pcxBitmapsX2[2];
- Pixmap clip_mask = bm->clip_mask;
-
- if (clip_mask)
- {
-#if 0
- int width = bm->width;
- int height = bm->height;
-#else
- int width = 16 * 4;
- int height = 16 * 4;
-#endif
- XImage *src_ximage = XGetImage(display, clip_mask, 0, 0,
- width, height, AllPlanes, ZPixmap);
- XImage *dst_ximage = XGetImage(display, xwindow, 0, 0,
- width, height, AllPlanes, ZPixmap);
- int x, y;
-
- if (src_ximage == NULL)
- {
- printf("src_ximage failed\n");
- exit(1);
- }
-
- if (dst_ximage == NULL)
- {
- printf("dst_ximage failed\n");
- exit(1);
- }
-
- printf("::: DISPLAY CLIP MASK ...\n");
-
- for (x=0; x<width; x++)
- {
- for (y=0; y<height; y++)
- {
- unsigned long pixel = XGetPixel(src_ximage, x, y);
-
- if (pixel != BlackPixel(display, screen))
- pixel = WhitePixel(display, screen);
-
- XPutPixel(dst_ximage, x, y, pixel);
- }
- }
-
- printf("::: DISPLAY CLIP MASK NOW\n");
-
- XPutImage(display, xwindow, screenGC, dst_ximage, 0, 0,
- 0, 13 * TILEY + height, width, height);
-
- printf("::: DISPLAY CLIP MASK DONE\n");
- }
- }
-#endif
-
- /* ----------------------------------------------------------------- */
-
-#if 0
- {
- XImage *dst_ximage;
-
- printf("::: GET IMAGE ...\n");
-
- dst_ximage = XGetImage(display, xwindow, 0, 0,
- 16, 16, AllPlanes, ZPixmap);
- if (dst_ximage == NULL)
- {
- printf("dst_ximage failed\n");
- exit(1);
- }
-
- printf("::: PUT IMAGE ...\n");
-
- XPutImage(display, xwindow, screenGC, dst_ximage, 0, 0,
- 0, 13 * TILEY, 10, 10);
-
- printf("::: PUT IMAGE DONE\n");
- }
-#endif
-
- /* ----------------------------------------------------------------- */
-
-#if defined(PLATFORM_LINUX) || defined(PLATFORM_BSD)
- if(arg_silence == 0) {
- for(i = 0; i < SAMPLE_MAX; i++) {
- name[MAXNAME] = 0;
- if(arg_basedir) {
- snprintf(name, MAXNAME+2, "%s/%s/%s", arg_basedir, EM_SND_DIR, sound_names[i]);
- } else {
- snprintf(name, MAXNAME+2, "%s/%s", EM_SND_DIR, sound_names[i]);
- }
- if(name[MAXNAME]) snprintf_overflow("read sounds/ directory");
-
- if(read_sample(name, &sound_data[i], &sound_length[i])) return(1);
-
- {
- short *ptr, *stop;
- int mult = sound_volume[i] * 65536 / (100 * MIXER_MAX);
- stop = sound_data[i] + sound_length[i];
- for(ptr = sound_data[i]; ptr < stop; ptr++) *ptr = (*ptr * mult) / 65536;
- }
- }
-
- if(pipe(sound_pipe) == -1) {
- fprintf(stderr, "%s: %s: %s\n", progname, "unable to create sound pipe", strerror(errno));
- return(1);
- }
- sound_pid = fork();
- if(sound_pid == -1) {
- fprintf(stderr, "%s: %s: %s\n", progname, "unable to fork sound thread", strerror(errno));
- return(1);
- }
- close(sound_pipe[sound_pid == 0]); sound_pipe[sound_pid == 0] = -1;
- if(sound_pid == 0) _exit(sound_thread());
- signal(SIGPIPE, SIG_IGN); /* dont crash if sound process dies */
- }
-#endif /* defined(PLATFORM_LINUX) || defined(PLATFORM_BSD) */
-
- return(0);
-}
-
-void close_all(void)
-{
- int i;
-
- if(sound_pid != -1) {
- kill(sound_pid, SIGTERM);
- waitpid(sound_pid, 0, 0);
- }
- if(sound_pipe[0] != -1) close(sound_pipe[0]);
- if(sound_pipe[1] != -1) close(sound_pipe[1]);
- for(i = 0; i < SAMPLE_MAX; i++) if(sound_data[i]) free(sound_data[i]);
-
-#if 0
- for(i = 0; i < 4; i++) if(xpmPixmaps[i]) XFreePixmap(display, xpmPixmaps[i]);
- for(i = 0; i < 4; i++) if(xpmBitmaps[i]) XFreePixmap(display, xpmBitmaps[i]);
- for(i = 0; i < 4; i++) if(xpmGot[i]) {
- xpmFreeColoursFunc(display, xpmAttributes[i].colormap, xpmAttributes[i].alloc_pixels, xpmAttributes[i].nalloc_pixels, 0);
- XpmFreeAttributes(&xpmAttributes[i]);
- }
-#endif
-
- if(gotRed) xpmFreeColoursFunc(display, privateColourmap ? privateColourmap : defaultColourmap, &redColour.pixel, 1, 0);
- if(gotWhite) xpmFreeColoursFunc(display, privateColourmap ? privateColourmap : defaultColourmap, &whiteColour.pixel, 1, 0);
-
- if(screenGC) XFreeGC(display, screenGC);
- if(scoreGC) XFreeGC(display, scoreGC);
- if(spriteGC) XFreeGC(display, spriteGC);
- if(antsGC) XFreeGC(display, antsGC);
- if(screenPixmap) XFreePixmap(display, screenPixmap);
- if(scorePixmap) XFreePixmap(display, scorePixmap);
- if(spriteBitmap) XFreePixmap(display, spriteBitmap);
- if(xwindow) XDestroyWindow(display, xwindow);
- if(cursor) XFreeCursor(display, cursor);
- if(privateColourmap) XFreeColormap(display, privateColourmap);
- if(privateColours) free(privateColours);
- if(privateFlags) free(privateFlags);
- if(display) XCloseDisplay(display);
-}
-
-/* ---------------------------------------------------------------------- */
-
-void sound_play(void)
-{
- if(sound_pipe[1] != -1) {
- if(write(sound_pipe[1], &play, sizeof(play)) == -1) {
- fprintf(stderr, "%s: %s: %s\n", progname, "write sound", strerror(errno));
- if(sound_pipe[0] != -1) { close(sound_pipe[0]); sound_pipe[0] = -1; }
- if(sound_pipe[1] != -1) { close(sound_pipe[1]); sound_pipe[1] = -1; }
- }
- }
- memset(play, 0, sizeof(play));
-}
-
-/* ---------------------------------------------------------------------- */
-
-static int xpmAllocColourFunc(Display *display, Colormap colourmap, char *colourname, XColor *xcolour, void *closure)
-{
- int i, match;
- int r,g,b;
- long best, sum;
-
- if(colourname) if(XParseColor(display, colourmap, colourname, xcolour) == 0) return(-1); /* invalid name */
- if(colourmap != privateColourmap) return(XAllocColor(display, colourmap, xcolour) != 0);
-
-/* first try to find an exact match */
- match = -1;
- for(i = 0; i < privateNumColours; i++) {
- if(privateColours[i].red == xcolour->red && privateColours[i].green == xcolour->green && privateColours[i].blue == xcolour->blue) match = i;
- }
- if(match != -1) {
- privateFlags[match] = 1;
- xcolour->pixel = privateColours[match].pixel;
- return(1);
- }
-
-/* then find an unallocated colour that is close to what we want */
- match = -1;
- best = 1000000;
- for(i = 0; i < privateNumColours; i++) {
- if(privateFlags[i]) continue; /* skip if it is already allocated */
- r = (privateColours[i].red - xcolour->red) / 256;
- g = (privateColours[i].green - xcolour->green) / 256;
- b = (privateColours[i].blue - xcolour->blue) / 256;
- sum = r * r + g * g + b * b;
- if(sum < best) {
- best = sum;
- match = i;
- }
- }
- if(match != -1) {
- privateFlags[match] = 1;
- privateColours[match].red = xcolour->red;
- privateColours[match].green = xcolour->green;
- privateColours[match].blue = xcolour->blue;
- XStoreColor(display, colourmap, &privateColours[match]);
- xcolour->pixel = privateColours[match].pixel;
- return(1); /* found a close match */
- }
-
-/* if all else fails, just find the closest colour and return it */
- match = -1;
- best = 1000000;
- for(i = 0; i < privateNumColours; i++) {
- r = (privateColours[i].red - xcolour->red) / 256;
- g = (privateColours[i].green - xcolour->green) / 256;
- b = (privateColours[i].blue - xcolour->blue) / 256;
- sum = r * r + g * g + b * b;
- if(sum < best) {
- best = sum;
- match = i;
- }
- }
- if(match != -1) {
- xcolour->red = privateColours[match].red;
- xcolour->green = privateColours[match].green;
- xcolour->blue = privateColours[match].blue;
- xcolour->pixel = privateColours[match].pixel;
- return(1); /* best we could do */
- }
- return(0); /* still didnt find one, give up */
-}
-
-static int xpmFreeColoursFunc(Display *display, Colormap colourmap, unsigned long *pixels, int npixels, void *closure)
-{
- if(colourmap != privateColourmap) XFreeColors(display, colourmap, pixels, npixels, 0);
- return(1); /* non-zero for success */
-}
-
-#endif
+++ /dev/null
-
-#if defined(TARGET_X11)
-
-/* 2000-08-13T15:29:40Z
- *
- * handle input from x11 and keyboard and joystick
- */
-
-#include <X11/Xlib.h>
-#include <X11/Xutil.h>
-#include <X11/Xatom.h>
-#include <X11/keysym.h>
-#include <sys/time.h>
-#include <sys/types.h>
-#include <unistd.h>
-#include <stdlib.h>
-#include <stdio.h>
-#include <string.h>
-#include <errno.h>
-
-#include "global.h"
-#include "display.h"
-#include "level.h"
-
-unsigned long Random;
-
-struct PLAYER ply1;
-struct PLAYER ply2;
-struct LEVEL lev;
-
-unsigned short **Boom;
-unsigned short **Cave;
-unsigned short **Next;
-unsigned short **Draw;
-
-static unsigned short *Index[4][HEIGHT];
-static unsigned short Array[4][HEIGHT][WIDTH];
-
-static int input_die;
-static int input_pause;
-static int input_refresh;
-static int input_esc;
-
-static struct timeval tv1;
-static struct timeval tv2;
-
-static unsigned char keymatrix[32];
-
-static int player_mode;
-static char player_name[32];
-static int player_level;
-
-static void drawmenu(int pos)
-{
- char buffer[256];
- switch(pos) {
- case 0:
- switch(player_mode) {
- case 0: strcpy(buffer, "quit emerald mine"); break;
- case 1: strcpy(buffer, "single player"); break;
- case 2: strcpy(buffer, "teamwork"); break;
- }
- title_string(4, 0, 40, buffer);
- break;
- case 1:
- sprintf(buffer, "name: %s", player_name);
- title_string(5, 0, 40, buffer);
- break;
- case 2:
- sprintf(buffer, "level: %d", player_level);
- title_string(6, 0, 40, buffer);
- break;
- case 3:
- title_string(7, 0, 40, "highscores");
- break;
- case 4:
- title_string(8, 0, 40, "start");
- break;
- case 5:
- title_string(10, 1, 13, "played");
- title_string(10, 14, 26, "score");
- title_string(10, 27, 39, "won");
- break;
- case 6:
- sprintf(buffer, "%d", 0);
- title_string(11, 1, 13, buffer);
- sprintf(buffer, "%d", 0);
- title_string(11, 14, 26, buffer);
- sprintf(buffer, "%d", 0);
- title_string(11, 27, 39, buffer);
- break;
- }
-}
-
-/* bring it all together */
-int game_start(void)
-{
- int x,y;
- char name[MAXNAME+2];
- int temp;
- int pos;
-
- Random = 1684108901;
-
- for(y = 0; y < HEIGHT; y++) for(x = 0; x < WIDTH; x++) Array[0][y][x] = ZBORDER;
- for(y = 0; y < HEIGHT; y++) for(x = 0; x < WIDTH; x++) Array[1][y][x] = ZBORDER;
- for(y = 0; y < HEIGHT; y++) for(x = 0; x < WIDTH; x++) Array[2][y][x] = ZBORDER;
- for(y = 0; y < HEIGHT; y++) for(x = 0; x < WIDTH; x++) Array[3][y][x] = Xblank;
-
- for(y = 0; y < HEIGHT; y++) Index[0][y] = Array[0][y];
- for(y = 0; y < HEIGHT; y++) Index[1][y] = Array[1][y];
- for(y = 0; y < HEIGHT; y++) Index[2][y] = Array[2][y];
- for(y = 0; y < HEIGHT; y++) Index[3][y] = Array[3][y];
-
- Cave = Index[0];
- Next = Index[1];
- Draw = Index[2];
- Boom = Index[3];
-
- player_mode = 1; /* start off as single player */
- strcpy(player_name, "dave");
- player_level = 0;
-
- input_pause = 1 * 0;
-
- for(;;) {
-
- pos = 4;
-
- title_initscreen();
-
- for(temp = 0; temp < 7; temp++) drawmenu(temp); /* display all lines */
- title_blitants(4 + pos);
-
- title_blitscore();
- title_animscreen();
-
-#if 0
- printf("--> M1: xwindow == %ld\n", xwindow);
-#endif
-
- temp = 1;
- for(;;) {
- input_eventloop();
- if(input_die) return(0);
- if(input_refresh) blitscreen();
-
-#if 0
- printf("--> M2: xwindow == %ld\n", xwindow);
-#endif
-
- if(!input_pause) {
- title_blitants(4 + pos);
- title_blitscore();
- title_animscreen();
-
-#if 0
- printf("--> M3: xwindow == %ld\n", xwindow);
-#endif
-
- ply1.joy_n = ply1.joy_e = ply1.joy_s = ply1.joy_w = 0;
-
- readjoy();
-
- if(temp == 0) {
- if(ply1.joy_fire) break;
-
- if(ply1.joy_e && player_level < 99) {
- player_level++;
- drawmenu(2);
- }
- if(ply1.joy_w && player_level > 0) {
- player_level--;
- drawmenu(2);
- }
- if(ply1.joy_n && pos > 0) {
- drawmenu(pos);
- pos--;
- title_blitants(4 + pos);
- }
- if(ply1.joy_s && pos < 4) {
- drawmenu(pos);
- pos++;
- title_blitants(4 + pos);
- }
- }
- temp = (ply1.joy_n || ply1.joy_e || ply1.joy_s || ply1.joy_w || ply1.joy_fire);
- }
- }
-
-#if 0
- printf("--> M4: xwindow == %ld\n", xwindow);
-#endif
-
- name[MAXNAME] = 0;
- snprintf(name, MAXNAME+2, "%s/lev%02d", EM_LVL_DIR, player_level);
- if(name[MAXNAME]) snprintf_overflow("read a level in cave/");
-
- if(cave_convert(name)) continue;
-
-#if 0
- printf("--> M5: xwindow == %ld\n", xwindow);
-#endif
-
- game_initscreen();
-#if 0
- printf("--> M6: xwindow == %ld\n", xwindow);
-#endif
- game_blitscore();
-#if 0
- printf("--> M7: xwindow == %ld\n", xwindow);
-#endif
- game_animscreen();
-
-#if 0
- printf("--> M8: xwindow == %ld\n", xwindow);
-#endif
-
- for(;;) {
- input_eventloop();
- if(input_die || input_esc) break;
- if(input_refresh) blitscreen();
-
- if(!input_pause) {
- game_animscreen();
-
- frame = (frame - 1) & 7;
-
- readjoy();
-
- if(frame == 7) {
- synchro_1();
- synchro_2();
- }
- if(frame == 6) {
- synchro_3();
- sound_play();
- game_blitscore();
- }
- }
- }
- }
-}
-
-/* read input device for players
- */
-void readjoy(void)
-{
- unsigned int i;
- unsigned int north = 0, east = 0, south = 0, west = 0, fire = 0;
-
- for(i = 0; i < 3; i++) if(keymatrix[northKeyCode[i] >> 3] & 1 << (northKeyCode[i] & 7)) north = 1;
- for(i = 0; i < 3; i++) if(keymatrix[eastKeyCode[i] >> 3] & 1 << (eastKeyCode[i] & 7)) east = 1;
- for(i = 0; i < 3; i++) if(keymatrix[southKeyCode[i] >> 3] & 1 << (southKeyCode[i] & 7)) south = 1;
- for(i = 0; i < 3; i++) if(keymatrix[westKeyCode[i] >> 3] & 1 << (westKeyCode[i] & 7)) west = 1;
- for(i = 0; i < 3; i++) if(keymatrix[fireKeyCode[i] >> 3] & 1 << (fireKeyCode[i] & 7)) fire = 1;
-
- ply1.joy_fire = fire;
- if(ply1.joy_stick || (north | east | south | west)) {
- ply1.joy_n = north;
- ply1.joy_e = east;
- ply1.joy_s = south;
- ply1.joy_w = west;
- }
-
-#if 0
- printf("::: JOY == %d/%d/%d/%d/%d\n",
- north, east, south, west, fire);
-#endif
-}
-
-/* handle events from x windows and block until the next frame
- */
-void input_eventloop(void)
-{
- XEvent event;
- unsigned int i;
- unsigned long count;
-
- if(input_pause) {
- XPeekEvent(display, &event); /* block until an event arrives */
-
- if(gettimeofday(&tv1, 0) == -1) tv1.tv_usec = 0;
- } else {
- XSync(display, False); /* block until all graphics are drawn */
-
- if(gettimeofday(&tv2, 0) == -1) tv2.tv_usec = 0;
- count = tv2.tv_usec + 1000000 - tv1.tv_usec; if(count >= 1000000) count -= 1000000;
- tv1.tv_usec = tv2.tv_usec;
- if(count < 25000) {
- tv2.tv_sec = 0;
- tv2.tv_usec = 25000 - count;
-#if 1
- select(0, 0, 0, 0, &tv2); /* sleep a bit */
-#else
- usleep(tv2.tv_usec);
-#endif
- }
- }
-
- input_die = 0;
- input_refresh = 0;
- lastKeySym = NoSymbol;
- while(XPending(display)) { /* drain the event queue */
- XNextEvent(display, &event);
- switch(event.xany.type) {
- case KeyPress:
- XLookupString(&event.xkey, (char *)&count, 1, &lastKeySym, 0);
- break;
- case Expose:
- if(event.xexpose.window == xwindow && event.xexpose.count == 0) input_refresh = 1;
- break;
- case ClientMessage:
- if(event.xclient.window == xwindow && (Atom)event.xclient.data.l[0] == deleteAtom) input_die = 1;
- break;
- case EnterNotify:
- if(event.xcrossing.window == xwindow) input_pause = 0;
- break;
- case LeaveNotify:
- if(event.xcrossing.window == xwindow) input_pause = 1;
- break;
- }
- }
- XQueryKeymap(display, keymatrix); /* read the keyboard */
-
- input_esc = 0;
- for(i = 0; i < 1; i++) if(keymatrix[escKeyCode[i] >> 3] & 1 << (escKeyCode[i] & 7)) input_esc = 1;
-}
-
-#endif
+++ /dev/null
-#ifndef LEVEL_H
-#define LEVEL_H
-
-#include "tile.h"
-
-#define WIDTH 102
-#define HEIGHT 102
-
-struct LEVEL {
- unsigned int home; /* number of players that have to go home 0=all players home */
- unsigned int width; /* world width */
- unsigned int height; /* world height */
- unsigned int time; /* time remaining */
- unsigned int required; /* emeralds needed */
- unsigned int score; /* score */
-
-/* fill in all below /every/ time you read a level */
- unsigned int alien_score; /* alien popped by stone/spring score */
- unsigned int ameuba_time; /* ameuba speed */
- unsigned int android_move_cnt; /* android move time counter */
- unsigned int android_move_time; /* android move reset time */
- unsigned int android_clone_cnt; /* android clone time counter */
- unsigned int android_clone_time; /* android clone reset time */
- unsigned int ball_cnt; /* ball time counter */
- unsigned int ball_pos; /* ball array pos counter */
- unsigned int ball_random; /* ball is random flag */
- unsigned int ball_state; /* ball currently on flag */
- unsigned int ball_time; /* ball reset time */
- unsigned int bug_score; /* bug popped by stone/spring score */
- unsigned int diamond_score; /* diamond collect score */
- unsigned int dynamite_score; /* dynamite collect scoer*/
- unsigned int eater_pos; /* eater array pos */
- unsigned int eater_score; /* eater popped by stone/spring score */
- unsigned int emerald_score; /* emerald collect score */
- unsigned int exit_score; /* exit score */
- unsigned int key_score; /* key collect score */
- unsigned int lenses_cnt; /* lenses time counter */
- unsigned int lenses_score; /* lenses collect score */
- unsigned int lenses_time; /* lenses reset time */
- unsigned int magnify_cnt; /* magnify time counter */
- unsigned int magnify_score; /* magnify collect score */
- unsigned int magnify_time; /* magnify reset time */
- unsigned int nut_score; /* nut crack score */
- unsigned int shine_cnt; /* shine counter for emerald/diamond */
- unsigned int slurp_score; /* slurp alien score */
- unsigned int tank_score; /* tank popped by stone/spring */
- unsigned int wheel_cnt; /* wheel time counter */
- unsigned int wheel_x; /* wheel x pos */
- unsigned int wheel_y; /* wheel y pos */
- unsigned int wheel_time; /* wheel reset time */
- unsigned int wind_cnt; /* wind time counter */
- unsigned int wind_direction; /* wind direction */
- unsigned int wind_time; /* wind reset time */
- unsigned int wonderwall_state; /* wonderwall currently on flag */
- unsigned int wonderwall_time; /* wonderwall time */
- unsigned short eater_array[8][9]; /* eater data */
- unsigned short ball_array[8][8]; /* ball data */
- unsigned short android_array[TILE_MAX]; /* android clone table */
-};
-
-struct PLAYER {
- unsigned int num;
- unsigned int alive;
- unsigned int dynamite;
- unsigned int dynamite_cnt;
- unsigned int keys;
- unsigned int anim;
- unsigned int x;
- unsigned int y;
- unsigned int oldx;
- unsigned int oldy;
- unsigned joy_n:1;
- unsigned joy_e:1;
- unsigned joy_s:1;
- unsigned joy_w:1;
- unsigned joy_fire:1;
- unsigned joy_stick:1;
- unsigned joy_spin:1;
-};
-
-extern unsigned long Random;
-
-extern struct PLAYER ply1;
-extern struct PLAYER ply2;
-extern struct LEVEL lev;
-extern unsigned short **Boom;
-extern unsigned short **Cave;
-extern unsigned short **Next;
-extern unsigned short **Draw;
-
-#endif
+++ /dev/null
-
-#if defined(TARGET_X11)
-
-/* Emerald Mine
- *
- * David Tritscher
- *
- * v0.0 2000-01-06T06:43:39Z
- *
- * set everything up and close everything down
- */
-
-#include <stdlib.h>
-#include <unistd.h>
-#include <stdio.h>
-#include <string.h>
-#include <errno.h>
-
-#include "global.h"
-
-char *progname;
-char *arg_basedir;
-char *arg_display;
-char *arg_geometry;
-int arg_install;
-int arg_silence;
-
-extern void tab_generate();
-extern void ulaw_generate();
-
-int em_main_OLD(int argc, char **argv)
-{
- int result;
- int option;
- extern char *optarg;
-
- /* pre-calculate some data */
- tab_generate();
- ulaw_generate();
-
- progname = strrchr(argv[0], '/'); progname = progname ? progname + 1 : argv[0];
-
- while((option = getopt(argc, argv, "b:d:g:in")) != -1) {
- switch(option) {
- case 'b': arg_basedir = optarg; break;
- case 'd': arg_display = optarg; break;
- case 'g': arg_geometry = optarg; break;
- case 'i': arg_install = 1; break;
- case 'n': arg_silence = 1; break;
- default:
- printf("Emerald Mine for X11 © 2000,2001 David Tritscher\n\n");
- printf("usage: %s [options]\n", progname);
- printf("\t-b set base directory\n");
- printf("\t-d server to contact\n");
- printf("\t-g geometry\n");
- printf("\t-i install colourmap\n");
- printf("\t-n no sounds\n");
- exit(option == 'h' ? 0 : 1);
- }
- }
- if(arg_basedir == 0) arg_basedir = getenv("EMERALD_BASE");
-
- result = open_all(); if(result) goto fail;
- result = game_start(); if(result) goto fail;
- result = 0;
-fail:
- close_all();
- return(result);
-}
-
-int em_main()
-{
- int result;
-
- /* pre-calculate some data */
- tab_generate();
- ulaw_generate();
-
- progname = "emerald mine";
-
- result = open_all();
- if(result)
- goto fail;
-
- result = game_start();
- if(result)
- goto fail;
-
- result = 0;
-fail:
- close_all();
- return(result);
-}
-
-/* massive kludge for buffer overflows
- * i cant think of an elegant way to handle this situation.
- * oh wait yes i can. dynamically allocate each string. oh well
- */
-void snprintf_overflow(char *description)
-{
- fprintf(stderr, "%s: %s\n", progname, "buffer overflow; check EMERALD_BASE environment variable");
- fprintf(stderr, "%s %s\n", "Fault occured while attempting to", description);
- abort();
-}
-
-#else
-
-int em_main()
-{
- /* temporary dummy until X11->SDL conversion finished */
- return 0;
-}
-
-#endif
+++ /dev/null
-#ifndef SAMPLE_H
-#define SAMPLE_H
-
-enum {
- SAMPLE_blank = 0, /* player walks on blank */
- SAMPLE_roll, /* player pushes stone/bomb/nut */
- SAMPLE_stone, /* stone hits ground */
- SAMPLE_nut, /* nut hits ground */
- SAMPLE_crack, /* stone hits nut */
- SAMPLE_bug, /* bug moves */
- SAMPLE_tank, /* tank moves */
- SAMPLE_android, /* android places something */
- SAMPLE_spring, /* spring hits ground/wall/bumper, stone hits spring */
- SAMPLE_slurp, /* spring kills alien */
- SAMPLE_eater, /* eater sits/eats diamond */
- SAMPLE_alien, /* alien moves */
- SAMPLE_collect, /* player collects diamond/emerald/dynamite/key/lenses/magnify */
- SAMPLE_diamond, /* diamond/emerald hits ground */
- SAMPLE_squash, /* stone squashes diamond, stone/emerald/diamond thru wonderwall */
- SAMPLE_drip, /* drip hits ground */
- SAMPLE_push, /* player pushes spring/balloon/android */
- SAMPLE_dirt, /* player walks on dirt */
- SAMPLE_acid, /* acid splashes */
- SAMPLE_ball, /* ball places something */
- SAMPLE_grow, /* growing wall grows */
- SAMPLE_wonder, /* wonderwall moves */
- SAMPLE_door, /* player goes thru door */
- SAMPLE_exit, /* player goes in exit */
- SAMPLE_dynamite, /* player places dynamite */
- SAMPLE_tick, /* dynamite ticks */
- SAMPLE_press, /* player presses wheel/wind/switch */
- SAMPLE_wheel, /* wheel moves */
- SAMPLE_boom, /* explosion */
- SAMPLE_time, /* time runs out */
- SAMPLE_die, /* player dies */
- SAMPLE_MAX
-};
-
-extern char play[SAMPLE_MAX];
-extern int sound_pipe[2];
-extern short *sound_data[SAMPLE_MAX];
-extern long sound_length[SAMPLE_MAX];
-
-#define MIXER_MAX 4 /* maximum number of samples we can play at once */
-
-enum { AUDIO_ULAW = 0, AUDIO_U8 };
-
-#endif
+++ /dev/null
-
-#if defined(TARGET_X11)
-
-/* 2000-08-10T17:39:15Z
- *
- * handle sounds in emerald mine
- */
-
-#include "../libgame/platform.h"
-
-#if defined(PLATFORM_LINUX) || defined(PLATFORM_BSD)
-
-#ifdef PLATFORM_LINUX
-#include <sys/soundcard.h>
-#endif
-
-#ifdef PLATFORM_BSD
-#include <soundcard.h>
-#endif
-
-#include <sys/time.h>
-#include <sys/types.h>
-#include <sys/stat.h>
-#include <sys/ioctl.h>
-#include <fcntl.h>
-#include <unistd.h>
-#include <stdio.h>
-#include <stdlib.h>
-#include <string.h>
-#include <errno.h>
-
-#include "global.h"
-#include "sample.h"
-
-static char audioname[] = "/dev/audio";
-
-static const int sound_priority[SAMPLE_MAX] = {
- SAMPLE_exit, SAMPLE_die, SAMPLE_time, SAMPLE_boom, SAMPLE_tick,
- SAMPLE_collect, SAMPLE_roll, SAMPLE_push, SAMPLE_dynamite, SAMPLE_press,
- SAMPLE_door, SAMPLE_dirt, SAMPLE_blank, SAMPLE_android, SAMPLE_ball,
- SAMPLE_grow, SAMPLE_squash, SAMPLE_crack, SAMPLE_slurp, SAMPLE_drip,
- SAMPLE_wonder, SAMPLE_wheel, SAMPLE_stone, SAMPLE_spring, SAMPLE_diamond,
- SAMPLE_nut, SAMPLE_bug, SAMPLE_tank, SAMPLE_eater, SAMPLE_alien,
- SAMPLE_acid
-};
-
-int sound_thread(void)
-{
- int audio_fd; /* file descriptor of /dev/audio or -1 if not open */
- int audio_format;
- int sample_rate;
- int fragment_size;
- unsigned char *audio_buffer; /* actual buffer pumped to /dev/audio */
- short *mix_buffer;
-
- char sound_play[SAMPLE_MAX]; /* if set, we should be playing these sounds */
- long sound_pos[SAMPLE_MAX]; /* position in the sound */
- int mix_play[MIXER_MAX]; /* which sounds we have chosen to mix (calculated each time) */
- int mix_count;
-
- int i;
-
-loop:
- audio_fd = -1;
- audio_format = AUDIO_ULAW; /* defaults for non-OSS /dev/audio */
- sample_rate = 8000;
- fragment_size = 256;
- audio_buffer = 0;
- mix_buffer = 0;
- mix_count = 0;
-
- memset(sound_play, 0, sizeof(sound_play)); /* not playing any sounds */
-
- for(;;) {
- for(;;) {
-
-/* pick sounds to play, if any */
- if(sound_play[SAMPLE_exit] || sound_play[SAMPLE_die]) sound_play[SAMPLE_boom] = 0; /* no explosions if player goes home */
- mix_count = 0;
- for(i = 0; i < SAMPLE_MAX; i++) {
- if(sound_play[sound_priority[i]]) {
- mix_play[mix_count++] = sound_priority[i];
- if(mix_count == MIXER_MAX) break; /* cant mix too many sounds at once */
- }
- }
-
-/* check for incoming messages */
- if(mix_count || audio_fd != -1) { /* dont block if we are playing sounds */
- fd_set rfds;
- struct timeval tv;
- FD_ZERO(&rfds);
- FD_SET(sound_pipe[0], &rfds);
- tv.tv_sec = 0;
- tv.tv_usec = 0; /* (900000 * fragment_size / sample_rate) */
- i = select(sound_pipe[0] + 1, &rfds, 0, 0, &tv); /* dont block */
- if(i == -1) {
- fprintf(stderr, "%s: %s: %s\n", progname, "select failed", strerror(errno));
- goto fail;
- }
- if(i == 0) break; /* no messages */
- }
-
-/* get a message and start a sound */
- i = read(sound_pipe[0], &play, sizeof(play));
- if(i == -1) {
- fprintf(stderr, "%s: %s: %s\n", progname, "read failed", strerror(errno));
- goto fail;
- }
- if(i == 0) {
- fprintf(stderr, "%s: %s: %s\n", progname, "read sound", "Broken pipe");
- goto fail;
- }
- if(i != sizeof(play)) {
- fprintf(stderr, "%s: %s\n", progname, "bad message length");
- goto fail;
- }
- for(i = 0; i < SAMPLE_MAX; i++) {
- if(play[i]) {
- sound_play[i] = 1; /* play this sound */
- sound_pos[i] = 0; /* start it from the start */
- }
- }
- }
-
-/* open the audio device if there are sounds to play */
- if(mix_count && audio_fd == -1) {
- audio_fd = open(audioname, O_WRONLY);
- if(audio_fd == -1) goto reset;
-#ifdef OPEN_SOUND_SYSTEM
- i = 0x00020008;
- if(ioctl(audio_fd, SNDCTL_DSP_SETFRAGMENT, &i) == -1) {
- fprintf(stderr, "%s: \"%s\": %s (%d): %s\n", progname, audioname, "unable to set fragment size", 512, strerror(errno));
- goto reset;
- }
- if(ioctl(audio_fd, SNDCTL_DSP_GETFMTS, &i) == -1) {
- fprintf(stderr, "%s: \"%s\": %s: %s\n", progname, audioname, "unable to query audio format", strerror(errno));
- goto reset;
- }
- audio_format = (i & AFMT_U8) ? AFMT_U8 : AFMT_MU_LAW; /* prefer 8 bit unsigned and fall back on mu-law */
- i = audio_format;
- if(ioctl(audio_fd, SNDCTL_DSP_SETFMT, &i) == -1) {
- fprintf(stderr, "%s: \"%s\": %s (%d): %s\n", progname, audioname, "unable to set audio format", audio_format, strerror(errno));
- goto reset;
- }
- if(i == AFMT_MU_LAW) {
- audio_format = AUDIO_ULAW;
- } else if(i == AFMT_U8) {
- audio_format = AUDIO_U8;
- } else {
- fprintf(stderr, "%s: \"%s\": %s (%d)\n", progname, audioname, "audio format required by device not supported", i);
- goto reset;
- }
- i = 1;
- if(ioctl(audio_fd, SNDCTL_DSP_CHANNELS, &i) == -1) {
- fprintf(stderr, "%s: \"%s\": %s: %s\n", progname, audioname, "unable to set channels to mono", strerror(errno));
- goto reset;
- }
- if(i != 1) {
- fprintf(stderr, "%s: \"%s\": %s (%d)\n", progname, audioname, "channels required by device not supported", i);
- goto reset;
- }
- i = 8000;
- if(ioctl(audio_fd, SNDCTL_DSP_SPEED, &i) == -1) {
- fprintf(stderr, "%s: \"%s\": %s: %s\n", progname, audioname, "unable to set sampling rate", strerror(errno));
- goto reset;
- }
- sample_rate = i;
- if(ioctl(audio_fd, SNDCTL_DSP_GETBLKSIZE, &i) == -1) {
- fprintf(stderr, "%s: \"%s\": %s: %s\n", progname, audioname, "unable to get block size", strerror(errno));
- goto reset;
- }
- fragment_size = i;
-#else
- if(fcntl(audio_fd, F_SETFL, O_NONBLOCK) == -1) {
- fprintf(stderr, "%s: \"%s\": %s: %s\n", progname, audioname, "unable to make audio non blocking", strerror(errno));
- goto reset;
- }
-#endif /* OPEN_SOUND_SYSTEM */
- audio_buffer = malloc(fragment_size * sizeof(*audio_buffer));
- if(audio_buffer == 0) {
- fprintf(stderr, "%s: %s (%d): %s\n", progname, "unable to malloc audio buffer", fragment_size * sizeof(*audio_buffer), strerror(errno));
- goto fail;
- }
- mix_buffer = malloc(fragment_size * sizeof(*mix_buffer));
- if(mix_buffer == 0) {
- fprintf(stderr, "%s: %s (%d): %s\n", progname, "unable to malloc mixing buffer", fragment_size * sizeof(*mix_buffer), strerror(errno));
- goto fail;
- }
- }
-
-/* close the audio device if no sounds are playing */
- if(mix_count == 0 && audio_fd != -1) {
- close(audio_fd);
- free(audio_buffer);
- free(mix_buffer);
- audio_fd = -1;
- audio_buffer = 0;
- mix_buffer = 0;
- }
-
-/* if we are playing sounds and the audio device is open, mix them */
- if(mix_count && audio_fd != -1) {
-
- memset(mix_buffer, 0, fragment_size * sizeof(*mix_buffer)); /* prepare mix buffer */
-
- for(i = 0; i < mix_count; i++) {
- register short *mix_ptr = mix_buffer;
- register short *sound_ptr = sound_data[mix_play[i]] + sound_pos[mix_play[i]];
- register long count = sound_length[mix_play[i]] - sound_pos[mix_play[i]];
- if(count > fragment_size) count = fragment_size;
- while(count--) *mix_ptr++ += *sound_ptr++; /* mix the sounds in */
- }
- switch(audio_format) {
- case AUDIO_ULAW:
- for(i = 0; i < fragment_size; i++) audio_buffer[i] = linear_to_ulaw[mix_buffer[i] + 32768];
- break;
- case AUDIO_U8:
- for(i = 0; i < fragment_size; i++) audio_buffer[i] = (mix_buffer[i] + 32768) >> 8;
- break;
- }
-
-/* advance sound pointers */
- for(i = 0; i < SAMPLE_MAX; i++) {
- if(sound_play[i]) {
- if(sound_pos[i] + fragment_size < sound_length[i]) {
- sound_pos[i] += fragment_size;
- } else {
- sound_play[i] = 0;
- }
- }
- }
-
-/* send the data to the audio device */
- i = write(audio_fd, audio_buffer, fragment_size);
- if(i == -1) {
- fprintf(stderr, "%s: %s: %s\n", progname, "write error", strerror(errno));
- goto reset;
- }
- if(i != fragment_size) {
- fprintf(stderr, "%s: %s\n", progname, "bad write length");
- goto reset;
- }
- }
- } /* for */
-
-reset:
- if(audio_fd != -1) close(audio_fd);
- if(audio_buffer) free(audio_buffer);
- if(mix_buffer) free(mix_buffer);
- goto loop; /* back to top */
-
-fail:
- if(audio_fd != -1) close(audio_fd);
- if(audio_buffer) free(audio_buffer);
- if(mix_buffer) free(mix_buffer);
- return(0);
-}
-
-int read_sample(char *name, short **data, long *length)
-{
- int result;
- FILE *file = 0;
- short *dataptr = 0;
- long datalength;
-
- int i, actual, ch;
- unsigned char buffer[24];
- unsigned long temp;
-
- file = fopen(name, "rb");
- if(file == 0) {
- fprintf(stderr, "%s: \"%s\": %s: %s\n", progname, name, "open error", strerror(errno));
- result = 1; goto fail;
- }
- actual = fread(buffer, 1, 24, file);
- if(actual == -1) {
- fprintf(stderr, "%s: \"%s\": %s: %s\n", progname, name, "read error", strerror(errno));
- result = 1; goto fail;
- }
- if(actual < 24) {
- fprintf(stderr, "%s: \"%s\": %s\n", progname, name, "premature eof");
- result = 1; goto fail;
- }
- temp = buffer[0] << 24 | buffer[1] << 16 | buffer[2] << 8 | buffer[3]; /* magic */
- if(temp != 0x2e736e64) {
- fprintf(stderr, "%s: \"%s\": %s\n", progname, name, "unrecognized file format");
- result = 1; goto fail;
- }
- temp = buffer[4] << 24 | buffer[5] << 16 | buffer[6] << 8 | buffer[7]; /* header length */
- if(temp < 24) {
- fprintf(stderr, "%s: \"%s\": %s\n", progname, name, "bad header length");
- result = 1; goto fail;
- }
- actual = temp;
- for(i = 24; i < actual; i++) { /* skip the rest of the header */
- ch = fgetc(file);
- if(ch == EOF) break;
- }
-
- temp = buffer[8] << 24 | buffer[9] << 16 | buffer[10] << 8 | buffer[11]; /* data length */
- datalength = temp;
- temp = buffer[12] << 24 | buffer[13] << 16 | buffer[14] << 8 | buffer[15]; /* encoding */
- if(temp != 1) {
- fprintf(stderr, "%s: \"%s\": %s (%ld != 1)\n", progname, name, "bad encoding type", temp);
- result = 1; goto fail;
- }
- temp = buffer[16] << 24 | buffer[17] << 16 | buffer[18] << 8 | buffer[19]; /* sample rate */
- if(temp != 8000) {
- fprintf(stderr, "%s: \"%s\": %s (%ld != 8000)\n", progname, name, "bad sample rate", temp);
- result = 1; goto fail;
- }
- temp = buffer[20] << 24 | buffer[21] << 16 | buffer[22] << 8 | buffer[23]; /* channels */
- if(temp != 1) {
- fprintf(stderr, "%s: \"%s\": %s (%ld != 1)\n", progname, name, "unsupported channels", temp);
- result = 1; goto fail;
- }
-
- dataptr = malloc(datalength * sizeof(*dataptr));
- if(dataptr == 0) {
- fprintf(stderr, "%s: \"%s\": %s (%ld): %s\n", progname, name, "unable to malloc buffer", datalength * sizeof(*dataptr), strerror(errno));
- result = 1; goto fail;
- }
-
- for(i = 0; i < datalength; i++) {
- ch = fgetc(file);
- if(ch == EOF) break;
- dataptr[i] = ulaw_to_linear[ch];
- }
- fclose(file);
- file = 0;
-
- *data = dataptr;
- *length = datalength;
- result = 0;
-fail:
- if(file) fclose(file);
- return(result);
-}
-
-#endif /* defined(PLATFORM_LINUX) || defined(PLATFORM_BSD) */
-
-#endif
+++ /dev/null
-
-#if defined(TARGET_X11)
-
-/* first part of synchro.
- *
- * game logic for players.
- *
- * large switch statement for tiles the player interacts with.
- */
-
-#include "tile.h"
-#include "level.h"
-#include "sample.h"
-
-static void player(struct PLAYER *);
-static int test(struct PLAYER *);
-static void die(struct PLAYER *);
-
-void synchro_1(void)
-{
- char ply1_kill = test(&ply1); /* must test for death and actually kill separately */
- char ply2_kill = test(&ply2);
- if(ply1.alive && ply1_kill) die(&ply1);
- if(ply2.alive && ply2_kill) die(&ply2);
-
-#if 0
- ply1.alive = 1; /* debugging */
-#endif
-
- ply1.oldx = ply1.x;
- ply1.oldy = ply1.y;
- ply1.anim = SPR_still;
- ply2.oldx = ply2.x;
- ply2.oldy = ply2.y;
- ply2.anim = SPR_still;
-
- if(Random & 256) {
- if(ply1.alive) player(&ply1);
- if(ply2.alive) player(&ply2);
- } else {
- if(ply2.alive) player(&ply2);
- if(ply1.alive) player(&ply1);
- }
- if(ply1.alive) {
- if(Cave[ply1.oldy][ply1.oldx] == Zplayer) {
- Cave[ply1.oldy][ply1.oldx] = Xblank;
- Next[ply1.oldy][ply1.oldx] = Xblank;
- }
- if(Cave[ply1.y][ply1.x] == Xblank) {
- Cave[ply1.y][ply1.x] = Zplayer;
- Next[ply1.y][ply1.x] = Zplayer;
- }
- }
- if(ply2.alive) {
- if(Cave[ply2.oldy][ply2.oldx] == Zplayer) {
- Cave[ply2.oldy][ply2.oldx] = Xblank;
- Next[ply2.oldy][ply2.oldx] = Xblank;
- }
- if(Cave[ply2.y][ply2.x] == Xblank) {
- Cave[ply2.y][ply2.x] = Zplayer;
- Next[ply2.y][ply2.x] = Zplayer;
- }
- }
-}
-
-static int test(struct PLAYER *ply)
-{
- register unsigned int x = ply->x;
- register unsigned int y = ply->y;
-
- if(lev.time == 0) return(1);
-
- switch(Cave[y-1][x]) {
- case Xbug_n:
- case Xbug_e:
- case Xbug_s:
- case Xbug_w:
- case Xbug_gon:
- case Xbug_goe:
- case Xbug_gos:
- case Xbug_gow:
- case Xtank_n:
- case Xtank_e:
- case Xtank_s:
- case Xtank_w:
- case Xtank_gon:
- case Xtank_goe:
- case Xtank_gos:
- case Xtank_gow:
- return(1);
- }
- switch(Cave[y][x+1]) {
- case Xbug_n:
- case Xbug_e:
- case Xbug_s:
- case Xbug_w:
- case Xbug_gon:
- case Xbug_goe:
- case Xbug_gos:
- case Xbug_gow:
- case Xtank_n:
- case Xtank_e:
- case Xtank_s:
- case Xtank_w:
- case Xtank_gon:
- case Xtank_goe:
- case Xtank_gos:
- case Xtank_gow:
- return(1);
- }
- switch(Cave[y+1][x]) {
- case Xbug_n:
- case Xbug_e:
- case Xbug_s:
- case Xbug_w:
- case Xbug_gon:
- case Xbug_goe:
- case Xbug_gos:
- case Xbug_gow:
- case Xtank_n:
- case Xtank_e:
- case Xtank_s:
- case Xtank_w:
- case Xtank_gon:
- case Xtank_goe:
- case Xtank_gos:
- case Xtank_gow:
- return(1);
- }
- switch(Cave[y][x-1]) {
- case Xbug_n:
- case Xbug_e:
- case Xbug_s:
- case Xbug_w:
- case Xbug_gon:
- case Xbug_goe:
- case Xbug_gos:
- case Xbug_gow:
- case Xtank_n:
- case Xtank_e:
- case Xtank_s:
- case Xtank_w:
- case Xtank_gon:
- case Xtank_goe:
- case Xtank_gos:
- case Xtank_gow:
- return(1);
- }
- switch(Cave[y][x]) {
- case Xblank:
- case Yacid_splash_eB:
- case Yacid_splash_wB:
- case Zplayer:
- case Xdynamite_1:
- case Xdynamite_2:
- case Xdynamite_3:
- case Xdynamite_4:
- return(0);
- }
- return(1);
-}
-
-static void die(struct PLAYER *ply)
-{
- register unsigned int x = ply->x;
- register unsigned int y = ply->y;
-
- ply->alive = 0;
-
- switch(Cave[y-1][x]) {
- case Xbug_n:
- case Xbug_e:
- case Xbug_s:
- case Xbug_w:
- case Xbug_gon:
- case Xbug_goe:
- case Xbug_gos:
- case Xbug_gow:
- Cave[y-1][x] = Xboom_bug; break;
- case Xtank_n:
- case Xtank_e:
- case Xtank_s:
- case Xtank_w:
- case Xtank_gon:
- case Xtank_goe:
- case Xtank_gos:
- case Xtank_gow:
- Cave[y-1][x] = Xboom_bomb; break;
- }
- switch(Cave[y][x+1]) {
- case Xbug_n:
- case Xbug_e:
- case Xbug_s:
- case Xbug_w:
- case Xbug_gon:
- case Xbug_goe:
- case Xbug_gos:
- case Xbug_gow:
- Cave[y][x+1] = Xboom_bug; break;
- case Xtank_n:
- case Xtank_e:
- case Xtank_s:
- case Xtank_w:
- case Xtank_gon:
- case Xtank_goe:
- case Xtank_gos:
- case Xtank_gow:
- Cave[y][x+1] = Xboom_bomb; break;
- }
- switch(Cave[y+1][x]) {
- case Xbug_n:
- case Xbug_e:
- case Xbug_s:
- case Xbug_w:
- case Xbug_gon:
- case Xbug_goe:
- case Xbug_gos:
- case Xbug_gow:
- Cave[y+1][x] = Xboom_bug; break;
- case Xtank_n:
- case Xtank_e:
- case Xtank_s:
- case Xtank_w:
- case Xtank_gon:
- case Xtank_goe:
- case Xtank_gos:
- case Xtank_gow:
- Cave[y+1][x] = Xboom_bomb; break;
- }
- switch(Cave[y][x-1]) {
- case Xbug_n:
- case Xbug_e:
- case Xbug_s:
- case Xbug_w:
- case Xbug_gon:
- case Xbug_goe:
- case Xbug_gos:
- case Xbug_gow:
- Cave[y][x-1] = Xboom_bug; break;
- case Xtank_n:
- case Xtank_e:
- case Xtank_s:
- case Xtank_w:
- case Xtank_gon:
- case Xtank_goe:
- case Xtank_gos:
- case Xtank_gow:
- Cave[y][x-1] = Xboom_bomb; break;
- }
- switch(Cave[y][x]) {
- case Xexit_1:
- case Xexit_2:
- case Xexit_3:
- play[SAMPLE_exit] = 1; break;
- default:
- play[SAMPLE_die] = 1; break;
- }
- Cave[y][x] = Xboom_1;
- Boom[y][x] = Xblank;
-}
-
-static void player(struct PLAYER *ply)
-{
- register unsigned int x = ply->x;
- register unsigned int y = ply->y;
- unsigned int anim = 0; /* initialized to make compilers happy */
- int dx = 0, dy = 0;
-
- if((ply->joy_spin = !ply->joy_spin)) {
- if(ply->joy_n) {
- y--; dy = -1; anim = 0; /* north */
- } else if(ply->joy_e) {
- x++; dx = 1; anim = 1; /* east */
- } else if(ply->joy_s) {
- y++; dy = 1; anim = 2; /* south */
- } else if(ply->joy_w) {
- x--; dx = -1; anim = 3; /* west */
- }
- } else {
- if(ply->joy_w) {
- x--; dx = -1; anim = 3; /* west */
- } else if(ply->joy_s) {
- y++; dy = 1; anim = 2; /* south */
- } else if(ply->joy_e) {
- x++; dx = 1; anim = 1; /* east */
- } else if(ply->joy_n) {
- y--; dy = -1; anim = 0; /* north */
- }
- }
- if(dx == 0 && dy == 0) {
- ply->joy_stick = 0;
- if(ply->joy_fire) {
- if(++ply->dynamite_cnt == 5 && ply->dynamite) {
- Cave[y][x] = Xdynamite_1;
- play[SAMPLE_dynamite] = 1;
- ply->dynamite--;
- }
- } else {
- ply->dynamite_cnt = 0;
- }
- Random += 7; /* bit more random if we dont move */
- return;
- }
- ply->joy_stick = 1;
- ply->joy_n = ply->joy_e = ply->joy_s = ply->joy_w = 0;
- ply->dynamite_cnt = 0; /* reset dynamite timer if we move */
-
- if(ply->joy_fire == 0) {
- switch(Cave[y][x]) { /* fire is released */
- case Xblank:
- case Yacid_splash_eB:
- case Yacid_splash_wB:
- Cave[y][x] = Zplayer;
- Next[y][x] = Zplayer;
- play[SAMPLE_blank] = 1;
- ply->anim = SPR_walk + anim;
- ply->x = x;
- ply->y = y;
- break;
- case Xboom_android:
- case Xboom_1:
- case Xbug_n:
- case Xbug_e:
- case Xbug_s:
- case Xbug_w:
- case Xbug_gon:
- case Xbug_goe:
- case Xbug_gos:
- case Xbug_gow:
- case Xtank_n:
- case Xtank_e:
- case Xtank_s:
- case Xtank_w:
- case Xtank_gon:
- case Xtank_goe:
- case Xtank_gos:
- case Xtank_gow:
- case Xacid_1:
- case Xacid_2:
- case Xacid_3:
- case Xacid_4:
- case Xacid_5:
- case Xacid_6:
- case Xacid_7:
- case Xacid_8:
- ply->anim = SPR_walk + anim;
- ply->x = x;
- ply->y = y;
- break;
- case Xgrass:
- Cave[y][x] = dy ? (dy < 0 ? Ygrass_nB : Ygrass_sB) : (dx > 0 ? Ygrass_eB : Ygrass_wB);
- Next[y][x] = Zplayer;
- play[SAMPLE_dirt] = 1;
- ply->anim = SPR_walk + anim;
- ply->x = x;
- ply->y = y;
- break;
- case Xdirt:
- Cave[y][x] = dy ? (dy < 0 ? Ydirt_nB : Ydirt_sB) : (dx > 0 ? Ydirt_eB : Ydirt_wB);
- Next[y][x] = Zplayer;
- play[SAMPLE_dirt] = 1;
- ply->anim = SPR_walk + anim;
- ply->x = x;
- ply->y = y;
- break;
- case Xdiamond:
- case Xdiamond_pause:
- Cave[y][x] = Ydiamond_eat;
- Next[y][x] = Zplayer;
- play[SAMPLE_collect] = 1;
- lev.score += lev.diamond_score;
- lev.required = lev.required < 3 ? 0 : lev.required - 3;
- ply->anim = SPR_walk + anim;
- ply->x = x;
- ply->y = y;
- break;
- case Xemerald:
- case Xemerald_pause:
- Cave[y][x] = Yemerald_eat;
- Next[y][x] = Zplayer;
- play[SAMPLE_collect] = 1;
- lev.score += lev.emerald_score;
- lev.required = lev.required < 1 ? 0 : lev.required - 1;
- ply->anim = SPR_walk + anim;
- ply->x = x;
- ply->y = y;
- break;
- case Xdynamite:
- Cave[y][x] = Ydynamite_eat;
- Next[y][x] = Zplayer;
- play[SAMPLE_collect] = 1;
- lev.score += lev.dynamite_score;
- ply->dynamite = ply->dynamite > 9998 ? 9999 : ply->dynamite + 1;
- ply->anim = SPR_walk + anim;
- ply->x = x;
- ply->y = y;
- break;
- case Xkey_1:
- ply->keys |= 0x01; goto key_walk;
- case Xkey_2:
- ply->keys |= 0x02; goto key_walk;
- case Xkey_3:
- ply->keys |= 0x04; goto key_walk;
- case Xkey_4:
- ply->keys |= 0x08; goto key_walk;
- case Xkey_5:
- ply->keys |= 0x10; goto key_walk;
- case Xkey_6:
- ply->keys |= 0x20; goto key_walk;
- case Xkey_7:
- ply->keys |= 0x40; goto key_walk;
- case Xkey_8:
- ply->keys |= 0x80; goto key_walk;
- key_walk:
- Cave[y][x] = Yball_eat;
- Next[y][x] = Zplayer;
- play[SAMPLE_collect] = 1;
- lev.score += lev.key_score;
- ply->anim = SPR_walk + anim;
- ply->x = x;
- ply->y = y;
- break;
- case Xlenses:
- Cave[y][x] = Yball_eat;
- Next[y][x] = Zplayer;
- play[SAMPLE_collect] = 1;
- lev.score += lev.lenses_score;
- lev.lenses_cnt = lev.lenses_time;
- ply->anim = SPR_walk + anim;
- ply->x = x;
- ply->y = y;
- break;
- case Xmagnify:
- Cave[y][x] = Yball_eat;
- Next[y][x] = Zplayer;
- play[SAMPLE_collect] = 1;
- lev.score += lev.magnify_score;
- lev.magnify_cnt = lev.magnify_time;
- ply->anim = SPR_walk + anim;
- ply->x = x;
- ply->y = y;
- break;
- case Xstone:
- if(dy) break;
- switch(Cave[y][x+dx]) {
- case Xacid_1:
- case Xacid_2:
- case Xacid_3:
- case Xacid_4:
- case Xacid_5:
- case Xacid_6:
- case Xacid_7:
- case Xacid_8:
- if(Cave[y-1][x+dx+1] == Xblank) Cave[y-1][x+dx+1] = Yacid_splash_eB;
- if(Cave[y-1][x+dx-1] == Xblank) Cave[y-1][x+dx-1] = Yacid_splash_wB;
- play[SAMPLE_acid] = 1;
- goto stone_walk;
- case Xblank:
- case Yacid_splash_eB:
- case Yacid_splash_wB:
- Cave[y][x+dx] = dx > 0 ? Ystone_e : Ystone_w;
- Next[y][x+dx] = Xstone_pause;
- stone_walk:
- Cave[y][x] = dx > 0 ? Ystone_eB : Ystone_wB;
- Next[y][x] = Zplayer;
- play[SAMPLE_roll] = 1;
- ply->x = x;
- }
- ply->anim = SPR_push + anim;
- break;
- case Xbomb:
- if(dy) break;
- switch(Cave[y][x+dx]) {
- case Xacid_1:
- case Xacid_2:
- case Xacid_3:
- case Xacid_4:
- case Xacid_5:
- case Xacid_6:
- case Xacid_7:
- case Xacid_8:
- if(Cave[y-1][x+dx+1] == Xblank) Cave[y-1][x+dx+1] = Yacid_splash_eB;
- if(Cave[y-1][x+dx-1] == Xblank) Cave[y-1][x+dx-1] = Yacid_splash_wB;
- play[SAMPLE_acid] = 1;
- goto bomb_walk;
- case Xblank:
- case Yacid_splash_eB:
- case Yacid_splash_wB:
- Cave[y][x+dx] = dx > 0 ? Ybomb_e : Ybomb_w;
- Next[y][x+dx] = Xbomb_pause;
- bomb_walk:
- Cave[y][x] = dx > 0 ? Ybomb_eB : Ybomb_wB;
- Next[y][x] = Zplayer;
- play[SAMPLE_roll] = 1;
- ply->x = x;
- }
- ply->anim = SPR_push + anim;
- break;
- case Xnut:
- if(dy) break;
- switch(Cave[y][x+dx]) {
- case Xacid_1:
- case Xacid_2:
- case Xacid_3:
- case Xacid_4:
- case Xacid_5:
- case Xacid_6:
- case Xacid_7:
- case Xacid_8:
- if(Cave[y-1][x+dx+1] == Xblank) Cave[y-1][x+dx+1] = Yacid_splash_eB;
- if(Cave[y-1][x+dx-1] == Xblank) Cave[y-1][x+dx-1] = Yacid_splash_wB;
- play[SAMPLE_acid] = 1;
- goto nut_walk;
- case Xblank:
- case Yacid_splash_eB:
- case Yacid_splash_wB:
- Cave[y][x+dx] = dx > 0 ? Ynut_e : Ynut_w;
- Next[y][x+dx] = Xnut_pause;
- nut_walk:
- Cave[y][x] = dx > 0 ? Ynut_eB : Ynut_wB;
- Next[y][x] = Zplayer;
- play[SAMPLE_roll] = 1;
- ply->x = x;
- }
- ply->anim = SPR_push + anim;
- break;
- case Xspring:
- if(dy) break;
- switch(Cave[y][x+dx]) {
- case Xalien:
- case Xalien_pause:
- Cave[y][x] = dx > 0 ? Yspring_kill_eB : Yspring_kill_wB;
- Cave[y][x+dx] = dx > 0 ? Yspring_kill_e : Yspring_kill_w;
- Next[y][x] = Zplayer;
- Next[y][x+dx] = dx > 0 ? Xspring_e : Xspring_w;
- play[SAMPLE_slurp] = 1;
- lev.score += lev.slurp_score;
- ply->x = x;
- break;
- case Xacid_1:
- case Xacid_2:
- case Xacid_3:
- case Xacid_4:
- case Xacid_5:
- case Xacid_6:
- case Xacid_7:
- case Xacid_8:
- if(Cave[y-1][x+dx+1] == Xblank) Cave[y-1][x+dx+1] = Yacid_splash_eB;
- if(Cave[y-1][x+dx-1] == Xblank) Cave[y-1][x+dx-1] = Yacid_splash_wB;
- play[SAMPLE_acid] = 1;
- goto spring_walk;
- case Xblank:
- case Yacid_splash_eB:
- case Yacid_splash_wB:
- Cave[y][x+dx] = dx > 0 ? Yspring_e : Yspring_w;
- Next[y][x+dx] = dx > 0 ? Xspring_e : Xspring_w;
- spring_walk:
- Cave[y][x] = dx > 0 ? Yspring_eB : Yspring_wB;
- Next[y][x] = Zplayer;
- play[SAMPLE_roll] = 1;
- ply->x = x;
- }
- ply->anim = SPR_push + anim;
- break;
- case Xspring_pause:
- case Xstone_pause:
- case Xbomb_pause:
- case Xnut_pause:
- case Xsand_stonein_1:
- case Xsand_stonein_2:
- case Xsand_stonein_3:
- case Xsand_stonein_4:
- if(dy) break;
- ply->anim = SPR_push + anim;
- break;
- case Xballoon:
- switch(Cave[y+dy][x+dx]) {
- case Xacid_1:
- case Xacid_2:
- case Xacid_3:
- case Xacid_4:
- case Xacid_5:
- case Xacid_6:
- case Xacid_7:
- case Xacid_8:
- if(Cave[y+dy-1][x+dx+1] == Xblank) Cave[y+dy-1][x+dx+1] = Yacid_splash_eB;
- if(Cave[y+dy-1][x+dx-1] == Xblank) Cave[y+dy-1][x+dx-1] = Yacid_splash_wB;
- play[SAMPLE_acid] = 1;
- goto balloon_walk;
- case Xblank:
- case Yacid_splash_eB:
- case Yacid_splash_wB:
- Cave[y+dy][x+dx] = dy ? (dy < 0 ? Yballoon_n : Yballoon_s) : (dx > 0 ? Yballoon_e : Yballoon_w);
- Next[y+dy][x+dx] = Xballoon;
- balloon_walk:
- Cave[y][x] = dy ? (dy < 0 ? Yballoon_nB : Yballoon_sB) : (dx > 0 ? Yballoon_eB : Yballoon_wB);
- Next[y][x] = Zplayer;
- play[SAMPLE_push] = 1;
- ply->x = x;
- ply->y = y;
- }
- ply->anim = SPR_push + anim;
- break;
- case Xandroid:
- case Xandroid_1_n:
- case Xandroid_2_n:
- case Xandroid_1_e:
- case Xandroid_2_e:
- case Xandroid_1_s:
- case Xandroid_2_s:
- case Xandroid_1_w:
- case Xandroid_2_w:
- switch(Cave[y+dy][x+dx]) {
- case Xacid_1:
- case Xacid_2:
- case Xacid_3:
- case Xacid_4:
- case Xacid_5:
- case Xacid_6:
- case Xacid_7:
- case Xacid_8:
- if(Cave[y+dy-1][x+dx+1] == Xblank) Cave[y+dy-1][x+dx+1] = Yacid_splash_eB;
- if(Cave[y+dy-1][x+dx-1] == Xblank) Cave[y+dy-1][x+dx-1] = Yacid_splash_wB;
- play[SAMPLE_acid] = 1;
- goto android_walk;
- case Xblank:
- case Yacid_splash_eB:
- case Yacid_splash_wB:
- Cave[y+dy][x+dx] = dy ? (dy < 0 ? Yandroid_n : Yandroid_s) : (dx > 0 ? Yandroid_e : Yandroid_w);
- Next[y+dy][x+dx] = dy ? (dy < 0 ? Xandroid_2_n : Xandroid_2_s) : (dx > 0 ? Xandroid_2_e : Xandroid_2_w);
- android_walk:
- Cave[y][x] = dy ? (dy < 0 ? Yandroid_nB : Yandroid_sB) : (dx > 0 ? Yandroid_eB : Yandroid_wB);
- Next[y][x] = Zplayer;
- play[SAMPLE_push] = 1;
- ply->x = x;
- ply->y = y;
- }
- ply->anim = SPR_push + anim;
- break;
- case Xdoor_1:
- case Xfake_door_1:
- if(ply->keys & 0x01) goto door_walk; else break;
- case Xdoor_2:
- case Xfake_door_2:
- if(ply->keys & 0x02) goto door_walk; else break;
- case Xdoor_3:
- case Xfake_door_3:
- if(ply->keys & 0x04) goto door_walk; else break;
- case Xdoor_4:
- case Xfake_door_4:
- if(ply->keys & 0x08) goto door_walk; else break;
- case Xdoor_5:
- case Xfake_door_5:
- if(ply->keys & 0x10) goto door_walk; else break;
- case Xdoor_6:
- case Xfake_door_6:
- if(ply->keys & 0x20) goto door_walk; else break;
- case Xdoor_7:
- case Xfake_door_7:
- if(ply->keys & 0x40) goto door_walk; else break;
- case Xdoor_8:
- case Xfake_door_8:
- if(ply->keys & 0x80) goto door_walk; else break;
- door_walk:
- if(!tab_blank[Cave[y+dy][x+dx]]) break;
- Cave[y+dy][x+dx] = Zplayer;
- Next[y+dy][x+dx] = Zplayer;
- play[SAMPLE_door] = 1;
- ply->anim = SPR_walk + anim;
- ply->x = x + dx;
- ply->y = y + dy;
- break;
- case Xwheel:
- play[SAMPLE_press] = 1;
- lev.wheel_cnt = lev.wheel_time;
- lev.wheel_x = x;
- lev.wheel_y = y;
- break;
- case Xwind_n:
- lev.wind_direction = 0; goto wind_walk;
- case Xwind_e:
- lev.wind_direction = 1; goto wind_walk;
- case Xwind_s:
- lev.wind_direction = 2; goto wind_walk;
- case Xwind_w:
- lev.wind_direction = 3; goto wind_walk;
- case Xwind_nesw:
- lev.wind_direction = dy ? (dy < 0 ? 0 : 2) : (dx > 0 ? 1 : 3); goto wind_walk;
- wind_walk:
- play[SAMPLE_press] = 1;
- lev.wind_cnt = lev.wind_time;
- break;
- case Xwind_stop:
- play[SAMPLE_press] = 1;
- lev.wind_cnt = 0;
- break;
- case Xswitch:
- play[SAMPLE_press] = 1;
- lev.ball_cnt = lev.ball_time;
- lev.ball_state = !lev.ball_state;
- break;
- case Xplant:
- Cave[y][x] = Yplant;
- Next[y][x] = Xplant;
- play[SAMPLE_blank] = 1;
- ply->anim = SPR_walk + anim;
- ply->x = x;
- ply->y = y;
- break;
- case Xexit_1:
- case Xexit_2:
- case Xexit_3:
- play[SAMPLE_exit] = 1;
- if(--lev.home == 0) lev.score += lev.time * lev.exit_score / 100;
- ply->anim = SPR_walk + anim;
- ply->x = x;
- ply->y = y;
- break;
- }
- } else {
- switch(Cave[y][x]) { /* fire is pressed */
- case Xgrass:
- case Xdirt:
- Cave[y][x] = Yball_eat;
- Next[y][x] = Xblank;
- play[SAMPLE_dirt] = 1;
- ply->anim = SPR_spray + anim;
- break;
- case Xdiamond:
- case Xdiamond_pause:
- Cave[y][x] = Ydiamond_eat;
- Next[y][x] = Xblank;
- play[SAMPLE_collect] = 1;
- lev.score += lev.diamond_score;
- lev.required = lev.required < 3 ? 0 : lev.required - 3;
- ply->anim = SPR_walk + anim;
- break;
- case Xemerald:
- case Xemerald_pause:
- Cave[y][x] = Yemerald_eat;
- Next[y][x] = Xblank;
- play[SAMPLE_collect] = 1;
- lev.score += lev.emerald_score;
- lev.required = lev.required < 1 ? 0 : lev.required - 1;
- ply->anim = SPR_walk + anim;
- break;
- case Xdynamite:
- Cave[y][x] = Ydynamite_eat;
- Next[y][x] = Xblank;
- play[SAMPLE_collect] = 1;
- lev.score += lev.dynamite_score;
- ply->dynamite = ply->dynamite > 9998 ? 9999 : ply->dynamite + 1;
- ply->anim = SPR_walk + anim;
- break;
- case Xkey_1:
- ply->keys |= 0x01; goto key_shoot;
- case Xkey_2:
- ply->keys |= 0x02; goto key_shoot;
- case Xkey_3:
- ply->keys |= 0x04; goto key_shoot;
- case Xkey_4:
- ply->keys |= 0x08; goto key_shoot;
- case Xkey_5:
- ply->keys |= 0x10; goto key_shoot;
- case Xkey_6:
- ply->keys |= 0x20; goto key_shoot;
- case Xkey_7:
- ply->keys |= 0x40; goto key_shoot;
- case Xkey_8:
- ply->keys |= 0x80; goto key_shoot;
- key_shoot:
- Cave[y][x] = Yball_eat;
- Next[y][x] = Xblank;
- play[SAMPLE_collect] = 1;
- lev.score += lev.key_score;
- ply->anim = SPR_walk + anim;
- break;
- case Xlenses:
- Cave[y][x] = Yball_eat;
- Next[y][x] = Xblank;
- play[SAMPLE_collect] = 1;
- lev.score += lev.lenses_score;
- lev.lenses_cnt = lev.lenses_time;
- ply->anim = SPR_walk + anim;
- break;
- case Xmagnify:
- Cave[y][x] = Yball_eat;
- Next[y][x] = Xblank;
- play[SAMPLE_collect] = 1;
- lev.score += lev.magnify_score;
- lev.magnify_cnt = lev.magnify_time;
- ply->anim = SPR_walk + anim;
- break;
- }
- }
-}
-
-#endif
+++ /dev/null
-
-#if defined(TARGET_X11)
-
-/* second part of synchro.
- *
- * game logic for monsters.
- *
- * one giant switch statement to process everything.
- *
- * this whole thing is a major bottleneck. the compiler must use registers. compilers suck.
- */
-
-#include "display.h"
-#include "tile.h"
-#include "level.h"
-#include "sample.h"
-
-extern unsigned int screen_x;
-extern unsigned int screen_y;
-
-void synchro_2(void)
-{
- register unsigned int x = 0;
- register unsigned int y = 1;
- register unsigned long random = Random;
- register unsigned short *cave_cache = Cave[y]; /* might be a win */
- unsigned long score = 0;
-
- unsigned int temp = 0; /* initialized to make compilers happy */
- unsigned int left = screen_x / TILEX; /* only needed for sounds */
- unsigned int top = screen_y / TILEY;
- unsigned int dx; /* only needed to find closest player */
- unsigned int dy;
-
-#define RANDOM (random = random << 31 | random >> 1)
-#define PLAY(sample) { if((unsigned int)(y - top) <= 12 && (unsigned int)(x - left) <= 20) play[sample] = 1; }
-
-loop:
- switch(cave_cache[++x]) {
- default:
- goto loop;
-/* ---------------------------------------------------------------------- */
-#ifdef BAD_ROLL
- case Xstone_force_e:
- switch(Cave[y][x+1]) {
- case ZBORDER:
- case Znormal:
- case Zdynamite:
- case Xboom_bug:
- case Xboom_bomb:
- case Xboom_android:
- case Xboom_1:
- case Zplayer:
- Cave[y][x] = Xstone;
- Next[y][x] = Xstone;
- goto loop;
- default:
- Cave[y][x] = Ystone_eB;
- Cave[y][x+1] = Ystone_e;
- Next[y][x] = Xblank;
- Next[y][x+1] = Xstone_pause;
- goto loop;
- }
- case Xstone_force_w:
- switch(Cave[y][x-1]) {
- case ZBORDER:
- case Znormal:
- case Zdynamite:
- case Xboom_bug:
- case Xboom_bomb:
- case Xboom_android:
- case Xboom_1:
- case Zplayer:
- Cave[y][x] = Xstone;
- Next[y][x] = Xstone;
- goto loop;
- default:
- Cave[y][x] = Ystone_wB;
- Cave[y][x-1] = Ystone_w;
- Next[y][x] = Xblank;
- Next[y][x-1] = Xstone_pause;
- goto loop;
- }
- case Xnut_force_e:
- switch(Cave[y][x+1]) {
- case ZBORDER:
- case Znormal:
- case Zdynamite:
- case Xboom_bug:
- case Xboom_bomb:
- case Xboom_android:
- case Xboom_1:
- case Zplayer:
- Cave[y][x] = Xnut;
- Next[y][x] = Xnut;
- goto loop;
- default:
- Cave[y][x] = Ynut_eB;
- Cave[y][x+1] = Ynut_e;
- Next[y][x] = Xblank;
- Next[y][x+1] = Xnut_pause;
- goto loop;
- }
- case Xnut_force_w:
- switch(Cave[y][x-1]) {
- case ZBORDER:
- case Znormal:
- case Zdynamite:
- case Xboom_bug:
- case Xboom_bomb:
- case Xboom_android:
- case Xboom_1:
- case Zplayer:
- Cave[y][x] = Xnut;
- Next[y][x] = Xnut;
- goto loop;
- default:
- Cave[y][x] = Ynut_wB;
- Cave[y][x-1] = Ynut_w;
- Next[y][x] = Xblank;
- Next[y][x-1] = Xnut_pause;
- goto loop;
- }
- case Xspring_force_e:
- switch(Cave[y][x+1]) {
- case ZBORDER:
- case Znormal:
- case Zdynamite:
- case Xboom_bug:
- case Xboom_bomb:
- case Xboom_android:
- case Xboom_1:
- case Zplayer:
- Cave[y][x] = Xspring;
- Next[y][x] = Xspring;
- goto loop;
- default:
- Cave[y][x] = Yspring_eB;
- Cave[y][x+1] = Yspring_e;
- Next[y][x] = Xblank;
-#ifdef BAD_SPRING
- Next[y][x+1] = Xspring_e;
-#else
- Next[y][x+1] = Xspring_pause;
-#endif
- goto loop;
- }
- case Xspring_force_w:
- switch(Cave[y][x-1]) {
- case ZBORDER:
- case Znormal:
- case Zdynamite:
- case Xboom_bug:
- case Xboom_bomb:
- case Xboom_android:
- case Xboom_1:
- case Zplayer:
- Cave[y][x] = Xspring;
- Next[y][x] = Xspring;
- goto loop;
- default:
- Cave[y][x] = Yspring_wB;
- Cave[y][x-1] = Yspring_w;
- Next[y][x] = Xblank;
-#ifdef BAD_SPRING
- Next[y][x-1] = Xspring_w;
-#else
- Next[y][x-1] = Xspring_pause;
-#endif
- goto loop;
- }
- case Xemerald_force_e:
- switch(Cave[y][x+1]) {
- case ZBORDER:
- case Znormal:
- case Zdynamite:
- case Xboom_bug:
- case Xboom_bomb:
- case Xboom_android:
- case Xboom_1:
- case Zplayer:
- Cave[y][x] = Xemerald;
- Next[y][x] = Xemerald;
- goto loop;
- default:
- Cave[y][x] = Yemerald_eB;
- Cave[y][x+1] = Yemerald_e;
- Next[y][x] = Xblank;
- Next[y][x+1] = Xemerald_pause;
- goto loop;
- }
- case Xemerald_force_w:
- switch(Cave[y][x-1]) {
- case ZBORDER:
- case Znormal:
- case Zdynamite:
- case Xboom_bug:
- case Xboom_bomb:
- case Xboom_android:
- case Xboom_1:
- case Zplayer:
- Cave[y][x] = Xemerald;
- Next[y][x] = Xemerald;
- goto loop;
- default:
- Cave[y][x] = Yemerald_wB;
- Cave[y][x-1] = Yemerald_w;
- Next[y][x] = Xblank;
- Next[y][x-1] = Xemerald_pause;
- goto loop;
- }
- case Xdiamond_force_e:
- switch(Cave[y][x+1]) {
- case ZBORDER:
- case Znormal:
- case Zdynamite:
- case Xboom_bug:
- case Xboom_bomb:
- case Xboom_android:
- case Xboom_1:
- case Zplayer:
- Cave[y][x] = Xdiamond;
- Next[y][x] = Xdiamond;
- goto loop;
- default:
- Cave[y][x] = Ydiamond_eB;
- Cave[y][x+1] = Ydiamond_e;
- Next[y][x] = Xblank;
- Next[y][x+1] = Xdiamond_pause;
- goto loop;
- }
- case Xdiamond_force_w:
- switch(Cave[y][x-1]) {
- case ZBORDER:
- case Znormal:
- case Zdynamite:
- case Xboom_bug:
- case Xboom_bomb:
- case Xboom_android:
- case Xboom_1:
- case Zplayer:
- Cave[y][x] = Xdiamond;
- Next[y][x] = Xdiamond;
- goto loop;
- default:
- Cave[y][x] = Ydiamond_wB;
- Cave[y][x-1] = Ydiamond_w;
- Next[y][x] = Xblank;
- Next[y][x-1] = Xdiamond_pause;
- goto loop;
- }
- case Xbomb_force_e:
- switch(Cave[y][x+1]) {
- case ZBORDER:
- case Znormal:
- case Zdynamite:
- case Xboom_bug:
- case Xboom_bomb:
- case Xboom_android:
- case Xboom_1:
- case Zplayer:
- Cave[y][x] = Xbomb;
- Next[y][x] = Xbomb;
- goto loop;
- default:
- Cave[y][x] = Ybomb_eB;
- Cave[y][x+1] = Ybomb_e;
- Next[y][x] = Xblank;
- Next[y][x+1] = Xbomb_pause;
- goto loop;
- }
- case Xbomb_force_w:
- switch(Cave[y][x-1]) {
- case ZBORDER:
- case Znormal:
- case Zdynamite:
- case Xboom_bug:
- case Xboom_bomb:
- case Xboom_android:
- case Xboom_1:
- case Zplayer:
- Cave[y][x] = Xbomb;
- Next[y][x] = Xbomb;
- goto loop;
- default:
- Cave[y][x] = Ybomb_wB;
- Cave[y][x-1] = Ybomb_w;
- Next[y][x] = Xblank;
- Next[y][x-1] = Xbomb_pause;
- goto loop;
- }
-#endif
-/* ---------------------------------------------------------------------- */
- case Xstone:
- switch(Cave[y+1][x]) {
- case Xacid_1:
- case Xacid_2:
- case Xacid_3:
- case Xacid_4:
- case Xacid_5:
- case Xacid_6:
- case Xacid_7:
- case Xacid_8:
- Cave[y][x] = Ystone_sB;
- if(Cave[y][x+1] == Xblank) Cave[y][x+1] = Yacid_splash_eB;
- if(Cave[y][x-1] == Xblank) Cave[y][x-1] = Yacid_splash_wB;
- Next[y][x] = Xblank;
- PLAY(SAMPLE_acid);
- goto loop;
- case Xblank:
- case Yacid_splash_eB:
- case Yacid_splash_wB:
- case Xplant:
- case Yplant:
- Cave[y][x] = Ystone_sB;
- Cave[y+1][x] = Ystone_s;
- Next[y][x] = Xblank;
- Next[y+1][x] = Xstone_fall;
- goto loop;
- case Xsand:
- Cave[y][x] = Xsand_stonein_1;
- Cave[y+1][x] = Xsand_sandstone_1;
- Next[y][x] = Xsand_stonein_2;
- Next[y+1][x] = Xsand_sandstone_2;
- goto loop;
- case Xspring:
- case Xspring_pause:
- case Xspring_e:
- case Xspring_w:
- case Xandroid:
- case Xandroid_1_n:
- case Xandroid_2_n:
- case Xandroid_1_e:
- case Xandroid_2_e:
- case Xandroid_1_s:
- case Xandroid_2_s:
- case Xandroid_1_w:
- case Xandroid_2_w:
- case Xstone:
- case Xstone_pause:
- case Xemerald:
- case Xemerald_pause:
- case Xdiamond:
- case Xdiamond_pause:
- case Xbomb:
- case Xbomb_pause:
- case Xballoon:
- case Xacid_ne:
- case Xacid_nw:
- case Xball_1:
- case Xball_2:
- case Xnut:
- case Xnut_pause:
- case Xgrow_ns:
- case Xgrow_ew:
- case Xkey_1:
- case Xkey_2:
- case Xkey_3:
- case Xkey_4:
- case Xkey_5:
- case Xkey_6:
- case Xkey_7:
- case Xkey_8:
- case Xbumper:
- case Xswitch:
- case Xlenses:
- case Xmagnify:
- case Xround_wall_1:
- case Xround_wall_2:
- case Xround_wall_3:
- case Xround_wall_4:
- if(RANDOM & 1) {
- if(tab_blank[Cave[y][x+1]] && tab_acid[Cave[y+1][x+1]]) {
- Cave[y][x] = Ystone_eB;
- Cave[y][x+1] = Ystone_e;
- Next[y][x] = Xblank;
- Next[y][x+1] = Xstone_pause;
- goto loop;
- }
- if(tab_blank[Cave[y][x-1]] && tab_acid[Cave[y+1][x-1]]) {
- Cave[y][x] = Ystone_wB;
- Cave[y][x-1] = Ystone_w;
- Next[y][x] = Xblank;
- Next[y][x-1] = Xstone_pause;
- goto loop;
- }
- } else {
- if(tab_blank[Cave[y][x-1]] && tab_acid[Cave[y+1][x-1]]) {
- Cave[y][x] = Ystone_wB;
- Cave[y][x-1] = Ystone_w;
- Next[y][x] = Xblank;
- Next[y][x-1] = Xstone_pause;
- goto loop;
- }
- if(tab_blank[Cave[y][x+1]] && tab_acid[Cave[y+1][x+1]]) {
- Cave[y][x] = Ystone_eB;
- Cave[y][x+1] = Ystone_e;
- Next[y][x] = Xblank;
- Next[y][x+1] = Xstone_pause;
- goto loop;
- }
- }
- default:
- goto loop;
- }
-/* ---------------------------------------------------------------------- */
- case Xstone_pause:
- switch(Cave[y+1][x]) {
- case Xacid_1:
- case Xacid_2:
- case Xacid_3:
- case Xacid_4:
- case Xacid_5:
- case Xacid_6:
- case Xacid_7:
- case Xacid_8:
- Cave[y][x] = Ystone_sB;
- if(Cave[y][x+1] == Xblank) Cave[y][x+1] = Yacid_splash_eB;
- if(Cave[y][x-1] == Xblank) Cave[y][x-1] = Yacid_splash_wB;
- Next[y][x] = Xblank;
- PLAY(SAMPLE_acid);
- goto loop;
- case Xblank:
- case Yacid_splash_eB:
- case Yacid_splash_wB:
- Cave[y][x] = Ystone_sB;
- Cave[y+1][x] = Ystone_s;
- Next[y][x] = Xblank;
- Next[y+1][x] = Xstone_fall;
- goto loop;
- default:
- Cave[y][x] = Xstone;
- Next[y][x] = Xstone;
- goto loop;
- }
-/* ---------------------------------------------------------------------- */
- case Xstone_fall:
- switch(Cave[y+1][x]) {
- case Xacid_1:
- case Xacid_2:
- case Xacid_3:
- case Xacid_4:
- case Xacid_5:
- case Xacid_6:
- case Xacid_7:
- case Xacid_8:
- Cave[y][x] = Ystone_sB;
- if(Cave[y][x+1] == Xblank) Cave[y][x+1] = Yacid_splash_eB;
- if(Cave[y][x-1] == Xblank) Cave[y][x-1] = Yacid_splash_wB;
- Next[y][x] = Xblank;
- PLAY(SAMPLE_acid);
- goto loop;
- case Xblank:
- case Yacid_splash_eB:
- case Yacid_splash_wB:
- case Zplayer:
- Cave[y][x] = Ystone_sB;
- Cave[y+1][x] = Ystone_s;
- Next[y][x] = Xblank;
- Next[y+1][x] = Xstone_fall;
- goto loop;
- case Xnut:
- case Xnut_pause:
- Cave[y+1][x] = Yemerald_stone;
- Next[y][x] = Xstone;
- Next[y+1][x] = Xemerald;
- play[SAMPLE_crack] = 1;
- score += lev.nut_score;
- goto loop;
- case Xbug_n:
- case Xbug_e:
- case Xbug_s:
- case Xbug_w:
- case Xbug_gon:
- case Xbug_goe:
- case Xbug_gos:
- case Xbug_gow:
- Cave[y][x] = Ystone_sB;
- Cave[y+1][x] = Ybug_stone;
- Next[y+1][x] = Znormal;
- Boom[y][x-1] = Xemerald;
- Boom[y][x] = Xemerald;
- Boom[y][x+1] = Xemerald;
- Boom[y+1][x-1] = Xemerald;
- Boom[y+1][x] = Xdiamond;
- Boom[y+1][x+1] = Xemerald;
- Boom[y+2][x-1] = Xemerald;
- Boom[y+2][x] = Xemerald;
- Boom[y+2][x+1] = Xemerald;
- score += lev.bug_score;
- goto loop;
- case Xtank_n:
- case Xtank_e:
- case Xtank_s:
- case Xtank_w:
- case Xtank_gon:
- case Xtank_goe:
- case Xtank_gos:
- case Xtank_gow:
- Cave[y][x] = Ystone_sB;
- Cave[y+1][x] = Ytank_stone;
- Next[y+1][x] = Znormal;
- Boom[y][x-1] = Xblank;
- Boom[y][x] = Xblank;
- Boom[y][x+1] = Xblank;
- Boom[y+1][x-1] = Xblank;
- Boom[y+1][x] = Xblank;
- Boom[y+1][x+1] = Xblank;
- Boom[y+2][x-1] = Xblank;
- Boom[y+2][x] = Xblank;
- Boom[y+2][x+1] = Xblank;
- score += lev.tank_score;
- goto loop;
- case Xspring:
- if(RANDOM & 1) {
- switch(Cave[y+1][x+1]) {
- case Xblank:
- case Yacid_splash_eB:
- case Yacid_splash_wB:
- case Xalien:
- case Xalien_pause:
- Cave[y+1][x] = Xspring_e; break;
- default:
- Cave[y+1][x] = Xspring_w; break;
- }
- } else {
- switch(Cave[y+1][x-1]) {
- case Xblank:
- case Yacid_splash_eB:
- case Yacid_splash_wB:
- case Xalien:
- case Xalien_pause:
- Cave[y+1][x] = Xspring_w; break;
- default:
- Cave[y+1][x] = Xspring_e; break;
- }
- }
- Next[y][x] = Xstone;
- goto loop;
- case Xeater_n:
- case Xeater_e:
- case Xeater_s:
- case Xeater_w:
- Cave[y][x] = Ystone_sB;
- Cave[y+1][x] = Yeater_stone;
- Next[y+1][x] = Znormal;
- Boom[y][x-1] = lev.eater_array[lev.eater_pos][0];
- Boom[y][x] = lev.eater_array[lev.eater_pos][1];
- Boom[y][x+1] = lev.eater_array[lev.eater_pos][2];
- Boom[y+1][x-1] = lev.eater_array[lev.eater_pos][3];
- Boom[y+1][x] = lev.eater_array[lev.eater_pos][4];
- Boom[y+1][x+1] = lev.eater_array[lev.eater_pos][5];
- Boom[y+2][x-1] = lev.eater_array[lev.eater_pos][6];
- Boom[y+2][x] = lev.eater_array[lev.eater_pos][7];
- Boom[y+2][x+1] = lev.eater_array[lev.eater_pos][8];
- lev.eater_pos = (lev.eater_pos + 1) & 7;
- score += lev.eater_score;
- goto loop;
- case Xalien:
- case Xalien_pause:
- Cave[y][x] = Ystone_sB;
- Cave[y+1][x] = Yalien_stone;
- Next[y+1][x] = Znormal;
- Boom[y][x-1] = Xblank;
- Boom[y][x] = Xblank;
- Boom[y][x+1] = Xblank;
- Boom[y+1][x-1] = Xblank;
- Boom[y+1][x] = Xblank;
- Boom[y+1][x+1] = Xblank;
- Boom[y+2][x-1] = Xblank;
- Boom[y+2][x] = Xblank;
- Boom[y+2][x+1] = Xblank;
- score += lev.alien_score;
- goto loop;
- case Xdiamond:
- case Xdiamond_pause:
- switch(Cave[y+2][x]) {
- case Xblank:
- case Yacid_splash_eB:
- case Yacid_splash_wB:
- case Zplayer:
- case Xbug_n:
- case Xbug_e:
- case Xbug_s:
- case Xbug_w:
- case Xbug_gon:
- case Xbug_goe:
- case Xbug_gos:
- case Xbug_gow:
- case Xtank_n:
- case Xtank_e:
- case Xtank_s:
- case Xtank_w:
- case Xtank_gon:
- case Xtank_goe:
- case Xtank_gos:
- case Xtank_gow:
- case Xspring_fall:
- case Xandroid:
- case Xandroid_1_n:
- case Xandroid_2_n:
- case Xandroid_1_e:
- case Xandroid_2_e:
- case Xandroid_1_s:
- case Xandroid_2_s:
- case Xandroid_1_w:
- case Xandroid_2_w:
- case Xstone_fall:
- case Xemerald_fall:
- case Xdiamond_fall:
- case Xbomb_fall:
- case Xacid_s:
- case Xacid_1:
- case Xacid_2:
- case Xacid_3:
- case Xacid_4:
- case Xacid_5:
- case Xacid_6:
- case Xacid_7:
- case Xacid_8:
- case Xnut_fall:
- case Xplant:
- case Yplant:
- Next[y][x] = Xstone;
- PLAY(SAMPLE_stone);
- goto loop;
- }
- Cave[y][x] = Ystone_sB;
- Cave[y+1][x] = Ydiamond_stone;
- Next[y][x] = Xblank;
- Next[y+1][x] = Xstone_pause;
- play[SAMPLE_squash] = 1;
- goto loop;
- case Xbomb:
- case Xbomb_pause:
- Cave[y+1][x] = Ybomb_eat;
- Next[y+1][x] = Znormal;
- Boom[y][x-1] = Xblank;
- Boom[y][x] = Xblank;
- Boom[y][x+1] = Xblank;
- Boom[y+1][x-1] = Xblank;
- Boom[y+1][x] = Xblank;
- Boom[y+1][x+1] = Xblank;
- Boom[y+2][x-1] = Xblank;
- Boom[y+2][x] = Xblank;
- Boom[y+2][x+1] = Xblank;
- goto loop;
- case Xwonderwall:
- if(lev.wonderwall_time) {
- lev.wonderwall_state = 1;
- Cave[y][x] = Ystone_sB;
- if(tab_blank[Cave[y+2][x]]) {
- Cave[y+2][x] = Yemerald_s;
- Next[y+2][x] = Xemerald_fall;
- }
- Next[y][x] = Xblank;
- play[SAMPLE_squash] = 1;
- goto loop;
- }
- default:
- Cave[y][x] = Xstone;
- Next[y][x] = Xstone;
- PLAY(SAMPLE_stone);
- goto loop;
- }
-/* ---------------------------------------------------------------------- */
- case Xnut:
- switch(Cave[y+1][x]) {
- case Xacid_1:
- case Xacid_2:
- case Xacid_3:
- case Xacid_4:
- case Xacid_5:
- case Xacid_6:
- case Xacid_7:
- case Xacid_8:
- Cave[y][x] = Ynut_sB;
- if(Cave[y][x+1] == Xblank) Cave[y][x+1] = Yacid_splash_eB;
- if(Cave[y][x-1] == Xblank) Cave[y][x-1] = Yacid_splash_wB;
- Next[y][x] = Xblank;
- PLAY(SAMPLE_acid);
- goto loop;
- case Xblank:
- case Yacid_splash_eB:
- case Yacid_splash_wB:
- Cave[y][x] = Ynut_sB;
- Cave[y+1][x] = Ynut_s;
- Next[y][x] = Xblank;
- Next[y+1][x] = Xnut_fall;
- goto loop;
- case Xspring:
- case Xspring_pause:
- case Xspring_e:
- case Xspring_w:
- case Xandroid:
- case Xandroid_1_n:
- case Xandroid_2_n:
- case Xandroid_1_e:
- case Xandroid_2_e:
- case Xandroid_1_s:
- case Xandroid_2_s:
- case Xandroid_1_w:
- case Xandroid_2_w:
- case Xstone:
- case Xstone_pause:
- case Xemerald:
- case Xemerald_pause:
- case Xdiamond:
- case Xdiamond_pause:
- case Xbomb:
- case Xbomb_pause:
- case Xballoon:
- case Xacid_ne:
- case Xacid_nw:
- case Xball_1:
- case Xball_2:
- case Xnut:
- case Xnut_pause:
- case Xgrow_ns:
- case Xgrow_ew:
- case Xkey_1:
- case Xkey_2:
- case Xkey_3:
- case Xkey_4:
- case Xkey_5:
- case Xkey_6:
- case Xkey_7:
- case Xkey_8:
- case Xbumper:
- case Xswitch:
- case Xround_wall_1:
- case Xround_wall_2:
- case Xround_wall_3:
- case Xround_wall_4:
- if(RANDOM & 1) {
- if(tab_blank[Cave[y][x+1]] && tab_acid[Cave[y+1][x+1]]) {
- Cave[y][x] = Ynut_eB;
- Cave[y][x+1] = Ynut_e;
- Next[y][x] = Xblank;
- Next[y][x+1] = Xnut_pause;
- goto loop;
- }
- if(tab_blank[Cave[y][x-1]] && tab_acid[Cave[y+1][x-1]]) {
- Cave[y][x] = Ynut_wB;
- Cave[y][x-1] = Ynut_w;
- Next[y][x] = Xblank;
- Next[y][x-1] = Xnut_pause;
- goto loop;
- }
- } else {
- if(tab_blank[Cave[y][x-1]] && tab_acid[Cave[y+1][x-1]]) {
- Cave[y][x] = Ynut_wB;
- Cave[y][x-1] = Ynut_w;
- Next[y][x] = Xblank;
- Next[y][x-1] = Xnut_pause;
- goto loop;
- }
- if(tab_blank[Cave[y][x+1]] && tab_acid[Cave[y+1][x+1]]) {
- Cave[y][x] = Ynut_eB;
- Cave[y][x+1] = Ynut_e;
- Next[y][x] = Xblank;
- Next[y][x+1] = Xnut_pause;
- goto loop;
- }
- }
- default:
- goto loop;
- }
-/* ---------------------------------------------------------------------- */
- case Xnut_pause:
- switch(Cave[y+1][x]) {
- case Xacid_1:
- case Xacid_2:
- case Xacid_3:
- case Xacid_4:
- case Xacid_5:
- case Xacid_6:
- case Xacid_7:
- case Xacid_8:
- Cave[y][x] = Ynut_sB;
- if(Cave[y][x+1] == Xblank) Cave[y][x+1] = Yacid_splash_eB;
- if(Cave[y][x-1] == Xblank) Cave[y][x-1] = Yacid_splash_wB;
- Next[y][x] = Xblank;
- PLAY(SAMPLE_acid);
- goto loop;
- case Xblank:
- case Yacid_splash_eB:
- case Yacid_splash_wB:
- Cave[y][x] = Ynut_sB;
- Cave[y+1][x] = Ynut_s;
- Next[y][x] = Xblank;
- Next[y+1][x] = Xnut_fall;
- goto loop;
- default:
- Cave[y][x] = Xnut;
- Next[y][x] = Xnut;
- goto loop;
- }
-/* ---------------------------------------------------------------------- */
- case Xnut_fall:
- switch(Cave[y+1][x]) {
- case Xacid_1:
- case Xacid_2:
- case Xacid_3:
- case Xacid_4:
- case Xacid_5:
- case Xacid_6:
- case Xacid_7:
- case Xacid_8:
- Cave[y][x] = Ynut_sB;
- if(Cave[y][x+1] == Xblank) Cave[y][x+1] = Yacid_splash_eB;
- if(Cave[y][x-1] == Xblank) Cave[y][x-1] = Yacid_splash_wB;
- Next[y][x] = Xblank;
- PLAY(SAMPLE_acid);
- goto loop;
- case Xblank:
- case Yacid_splash_eB:
- case Yacid_splash_wB:
- case Zplayer:
- Cave[y][x] = Ynut_sB;
- Cave[y+1][x] = Ynut_s;
- Next[y][x] = Xblank;
- Next[y+1][x] = Xnut_fall;
- goto loop;
- default:
- Cave[y][x] = Xnut;
- Next[y][x] = Xnut;
- PLAY(SAMPLE_nut);
- goto loop;
- }
-/* ---------------------------------------------------------------------- */
- case Xbug_n:
- if(tab_ameuba[Cave[y-1][x]] || tab_ameuba[Cave[y][x+1]] || tab_ameuba[Cave[y+1][x]] || tab_ameuba[Cave[y][x-1]]) goto bug_boom;
- switch(Cave[y][x+1]) {
- case Xblank:
- case Yacid_splash_eB:
- case Yacid_splash_wB:
- case Xplant:
- case Yplant:
- case Xacid_1:
- case Xacid_2:
- case Xacid_3:
- case Xacid_4:
- case Xacid_5:
- case Xacid_6:
- case Xacid_7:
- case Xacid_8:
- case Zplayer:
- Cave[y][x] = Ybug_n_e;
- Next[y][x] = Xbug_goe;
- PLAY(SAMPLE_bug);
- goto loop;
- default:
- goto bug_gon;
- }
- case Xbug_gon:
- if(tab_ameuba[Cave[y-1][x]] || tab_ameuba[Cave[y][x+1]] || tab_ameuba[Cave[y+1][x]] || tab_ameuba[Cave[y][x-1]]) goto bug_boom;
- bug_gon:
- switch(Cave[y-1][x]) {
- case Xacid_1:
- case Xacid_2:
- case Xacid_3:
- case Xacid_4:
- case Xacid_5:
- case Xacid_6:
- case Xacid_7:
- case Xacid_8:
- Cave[y][x] = Ybug_nB;
- if(Cave[y-2][x+1] == Xblank) Cave[y-2][x+1] = Yacid_splash_eB;
- if(Cave[y-2][x-1] == Xblank) Cave[y-2][x-1] = Yacid_splash_wB;
- Next[y][x] = Xblank;
- PLAY(SAMPLE_acid);
- goto loop;
- case Xblank:
- case Yacid_splash_eB:
- case Yacid_splash_wB:
- case Xplant:
- case Yplant:
- case Zplayer:
- Cave[y][x] = Ybug_nB;
- Cave[y-1][x] = Ybug_n;
- Next[y][x] = Xblank;
- Next[y-1][x] = Xbug_n;
- PLAY(SAMPLE_bug);
- goto loop;
- default:
- Cave[y][x] = Ybug_n_w;
- Next[y][x] = Xbug_gow;
- PLAY(SAMPLE_bug);
- goto loop;
- }
-/* ---------------------------------------------------------------------- */
- case Xbug_e:
- if(tab_ameuba[Cave[y-1][x]] || tab_ameuba[Cave[y][x+1]] || tab_ameuba[Cave[y+1][x]] || tab_ameuba[Cave[y][x-1]]) goto bug_boom;
- switch(Cave[y+1][x]) {
- case Xblank:
- case Yacid_splash_eB:
- case Yacid_splash_wB:
- case Xplant:
- case Yplant:
- case Xacid_1:
- case Xacid_2:
- case Xacid_3:
- case Xacid_4:
- case Xacid_5:
- case Xacid_6:
- case Xacid_7:
- case Xacid_8:
- case Zplayer:
- Cave[y][x] = Ybug_e_s;
- Next[y][x] = Xbug_gos;
- PLAY(SAMPLE_bug);
- goto loop;
- default:
- goto bug_goe;
- }
- case Xbug_goe:
- if(tab_ameuba[Cave[y-1][x]] || tab_ameuba[Cave[y][x+1]] || tab_ameuba[Cave[y+1][x]] || tab_ameuba[Cave[y][x-1]]) goto bug_boom;
- bug_goe:
- switch(Cave[y][x+1]) {
- case Xacid_1:
- case Xacid_2:
- case Xacid_3:
- case Xacid_4:
- case Xacid_5:
- case Xacid_6:
- case Xacid_7:
- case Xacid_8:
- Cave[y][x] = Ybug_eB;
- if(Cave[y-1][x+2] == Xblank) Cave[y-1][x+2] = Yacid_splash_eB;
- if(Cave[y-1][x] == Xblank) Cave[y-1][x] = Yacid_splash_wB;
- Next[y][x] = Xblank;
- PLAY(SAMPLE_acid);
- goto loop;
- case Xblank:
- case Yacid_splash_eB:
- case Yacid_splash_wB:
- case Xplant:
- case Yplant:
- case Zplayer:
- Cave[y][x] = Ybug_eB;
- Cave[y][x+1] = Ybug_e;
- Next[y][x] = Xblank;
- Next[y][x+1] = Xbug_e;
- PLAY(SAMPLE_bug);
- goto loop;
- default:
- Cave[y][x] = Ybug_e_n;
- Next[y][x] = Xbug_gon;
- PLAY(SAMPLE_bug);
- goto loop;
- }
-/* ---------------------------------------------------------------------- */
- case Xbug_s:
- if(tab_ameuba[Cave[y-1][x]] || tab_ameuba[Cave[y][x+1]] || tab_ameuba[Cave[y+1][x]] || tab_ameuba[Cave[y][x-1]]) goto bug_boom;
- switch(Cave[y][x-1]) {
- case Xblank:
- case Yacid_splash_eB:
- case Yacid_splash_wB:
- case Xplant:
- case Yplant:
- case Xacid_1:
- case Xacid_2:
- case Xacid_3:
- case Xacid_4:
- case Xacid_5:
- case Xacid_6:
- case Xacid_7:
- case Xacid_8:
- case Zplayer:
- Cave[y][x] = Ybug_s_w;
- Next[y][x] = Xbug_gow;
- PLAY(SAMPLE_bug);
- goto loop;
- default:
- goto bug_gos;
- }
- case Xbug_gos:
- if(tab_ameuba[Cave[y-1][x]] || tab_ameuba[Cave[y][x+1]] || tab_ameuba[Cave[y+1][x]] || tab_ameuba[Cave[y][x-1]]) goto bug_boom;
- bug_gos:
- switch(Cave[y+1][x]) {
- case Xacid_1:
- case Xacid_2:
- case Xacid_3:
- case Xacid_4:
- case Xacid_5:
- case Xacid_6:
- case Xacid_7:
- case Xacid_8:
- Cave[y][x] = Ybug_sB;
- if(Cave[y][x+1] == Xblank) Cave[y][x+1] = Yacid_splash_eB;
- if(Cave[y][x-1] == Xblank) Cave[y][x-1] = Yacid_splash_wB;
- Next[y][x] = Xblank;
- PLAY(SAMPLE_acid);
- goto loop;
- case Xblank:
- case Yacid_splash_eB:
- case Yacid_splash_wB:
- case Xplant:
- case Yplant:
- case Zplayer:
- Cave[y][x] = Ybug_sB;
- Cave[y+1][x] = Ybug_s;
- Next[y][x] = Xblank;
- Next[y+1][x] = Xbug_s;
- PLAY(SAMPLE_bug);
- goto loop;
- default:
- Cave[y][x] = Ybug_s_e;
- Next[y][x] = Xbug_goe;
- PLAY(SAMPLE_bug);
- goto loop;
- }
-/* ---------------------------------------------------------------------- */
- case Xbug_w:
- if(tab_ameuba[Cave[y-1][x]] || tab_ameuba[Cave[y][x+1]] || tab_ameuba[Cave[y+1][x]] || tab_ameuba[Cave[y][x-1]]) goto bug_boom;
- switch(Cave[y-1][x]) {
- case Xblank:
- case Yacid_splash_eB:
- case Yacid_splash_wB:
- case Xplant:
- case Yplant:
- case Xacid_1:
- case Xacid_2:
- case Xacid_3:
- case Xacid_4:
- case Xacid_5:
- case Xacid_6:
- case Xacid_7:
- case Xacid_8:
- case Zplayer:
- Cave[y][x] = Ybug_w_n;
- Next[y][x] = Xbug_gon;
- PLAY(SAMPLE_bug);
- goto loop;
- default:
- goto bug_gow;
- }
- case Xbug_gow:
- if(tab_ameuba[Cave[y-1][x]] || tab_ameuba[Cave[y][x+1]] || tab_ameuba[Cave[y+1][x]] || tab_ameuba[Cave[y][x-1]]) goto bug_boom;
- bug_gow:
- switch(Cave[y][x-1]) {
- case Xacid_1:
- case Xacid_2:
- case Xacid_3:
- case Xacid_4:
- case Xacid_5:
- case Xacid_6:
- case Xacid_7:
- case Xacid_8:
- Cave[y][x] = Ybug_wB;
- if(Cave[y-1][x] == Xblank) Cave[y-1][x] = Yacid_splash_eB;
- if(Cave[y-1][x-2] == Xblank) Cave[y-1][x-2] = Yacid_splash_wB;
- Next[y][x] = Xblank;
- PLAY(SAMPLE_acid);
- goto loop;
- case Xblank:
- case Yacid_splash_eB:
- case Yacid_splash_wB:
- case Xplant:
- case Yplant:
- case Zplayer:
- Cave[y][x] = Ybug_wB;
- Cave[y][x-1] = Ybug_w;
- Next[y][x] = Xblank;
- Next[y][x-1] = Xbug_w;
- PLAY(SAMPLE_bug);
- goto loop;
- default:
- Cave[y][x] = Ybug_w_s;
- Next[y][x] = Xbug_gos;
- PLAY(SAMPLE_bug);
- goto loop;
- }
-/* ---------------------------------------------------------------------- */
- case Xtank_n:
- if(tab_ameuba[Cave[y-1][x]] || tab_ameuba[Cave[y][x+1]] || tab_ameuba[Cave[y+1][x]] || tab_ameuba[Cave[y][x-1]]) goto tank_boom;
- switch(Cave[y][x-1]) {
- case Xblank:
- case Yacid_splash_eB:
- case Yacid_splash_wB:
- case Xplant:
- case Yplant:
- case Xacid_1:
- case Xacid_2:
- case Xacid_3:
- case Xacid_4:
- case Xacid_5:
- case Xacid_6:
- case Xacid_7:
- case Xacid_8:
- case Zplayer:
- Cave[y][x] = Ytank_n_w;
- Next[y][x] = Xtank_gow;
- PLAY(SAMPLE_tank);
- goto loop;
- default:
- goto tank_gon;
- }
- case Xtank_gon:
- if(tab_ameuba[Cave[y-1][x]] || tab_ameuba[Cave[y][x+1]] || tab_ameuba[Cave[y+1][x]] || tab_ameuba[Cave[y][x-1]]) goto tank_boom;
- tank_gon:
- switch(Cave[y-1][x]) {
- case Xacid_1:
- case Xacid_2:
- case Xacid_3:
- case Xacid_4:
- case Xacid_5:
- case Xacid_6:
- case Xacid_7:
- case Xacid_8:
- Cave[y][x] = Ytank_nB;
- if(Cave[y-2][x+1] == Xblank) Cave[y-2][x+1] = Yacid_splash_eB;
- if(Cave[y-2][x-1] == Xblank) Cave[y-2][x-1] = Yacid_splash_wB;
- Next[y][x] = Xblank;
- PLAY(SAMPLE_acid);
- goto loop;
- case Xblank:
- case Yacid_splash_eB:
- case Yacid_splash_wB:
- case Xplant:
- case Yplant:
- case Zplayer:
- Cave[y][x] = Ytank_nB;
- Cave[y-1][x] = Ytank_n;
- Next[y][x] = Xblank;
- Next[y-1][x] = Xtank_n;
- PLAY(SAMPLE_tank);
- goto loop;
- default:
- Cave[y][x] = Ytank_n_e;
- Next[y][x] = Xtank_goe;
- PLAY(SAMPLE_tank);
- goto loop;
- }
-/* ---------------------------------------------------------------------- */
- case Xtank_e:
- if(tab_ameuba[Cave[y-1][x]] || tab_ameuba[Cave[y][x+1]] || tab_ameuba[Cave[y+1][x]] || tab_ameuba[Cave[y][x-1]]) goto tank_boom;
- switch(Cave[y-1][x]) {
- case Xblank:
- case Yacid_splash_eB:
- case Yacid_splash_wB:
- case Xplant:
- case Yplant:
- case Xacid_1:
- case Xacid_2:
- case Xacid_3:
- case Xacid_4:
- case Xacid_5:
- case Xacid_6:
- case Xacid_7:
- case Xacid_8:
- case Zplayer:
- Cave[y][x] = Ytank_e_n;
- Next[y][x] = Xtank_gon;
- PLAY(SAMPLE_tank);
- goto loop;
- default:
- goto tank_goe;
- }
- case Xtank_goe:
- if(tab_ameuba[Cave[y-1][x]] || tab_ameuba[Cave[y][x+1]] || tab_ameuba[Cave[y+1][x]] || tab_ameuba[Cave[y][x-1]]) goto tank_boom;
- tank_goe:
- switch(Cave[y][x+1]) {
- case Xacid_1:
- case Xacid_2:
- case Xacid_3:
- case Xacid_4:
- case Xacid_5:
- case Xacid_6:
- case Xacid_7:
- case Xacid_8:
- Cave[y][x] = Ytank_eB;
- if(Cave[y-1][x+2] == Xblank) Cave[y-1][x+2] = Yacid_splash_eB;
- if(Cave[y-1][x] == Xblank) Cave[y-1][x] = Yacid_splash_wB;
- Next[y][x] = Xblank;
- PLAY(SAMPLE_acid);
- goto loop;
- case Xblank:
- case Yacid_splash_eB:
- case Yacid_splash_wB:
- case Xplant:
- case Yplant:
- case Zplayer:
- Cave[y][x] = Ytank_eB;
- Cave[y][x+1] = Ytank_e;
- Next[y][x] = Xblank;
- Next[y][x+1] = Xtank_e;
- PLAY(SAMPLE_tank);
- goto loop;
- default:
- Cave[y][x] = Ytank_e_s;
- Next[y][x] = Xtank_gos;
- PLAY(SAMPLE_tank);
- goto loop;
- }
-/* ---------------------------------------------------------------------- */
- case Xtank_s:
- if(tab_ameuba[Cave[y-1][x]] || tab_ameuba[Cave[y][x+1]] || tab_ameuba[Cave[y+1][x]] || tab_ameuba[Cave[y][x-1]]) goto tank_boom;
- switch(Cave[y][x+1]) {
- case Xblank:
- case Yacid_splash_eB:
- case Yacid_splash_wB:
- case Xplant:
- case Yplant:
- case Xacid_1:
- case Xacid_2:
- case Xacid_3:
- case Xacid_4:
- case Xacid_5:
- case Xacid_6:
- case Xacid_7:
- case Xacid_8:
- case Zplayer:
- Cave[y][x] = Ytank_s_e;
- Next[y][x] = Xtank_goe;
- PLAY(SAMPLE_tank);
- goto loop;
- default:
- goto tank_gos;
- }
- case Xtank_gos:
- if(tab_ameuba[Cave[y-1][x]] || tab_ameuba[Cave[y][x+1]] || tab_ameuba[Cave[y+1][x]] || tab_ameuba[Cave[y][x-1]]) goto tank_boom;
- tank_gos:
- switch(Cave[y+1][x]) {
- case Xacid_1:
- case Xacid_2:
- case Xacid_3:
- case Xacid_4:
- case Xacid_5:
- case Xacid_6:
- case Xacid_7:
- case Xacid_8:
- Cave[y][x] = Ytank_sB;
- if(Cave[y][x+1] == Xblank) Cave[y][x+1] = Yacid_splash_eB;
- if(Cave[y][x-1] == Xblank) Cave[y][x-1] = Yacid_splash_wB;
- Next[y][x] = Xblank;
- PLAY(SAMPLE_acid);
- goto loop;
- case Xblank:
- case Yacid_splash_eB:
- case Yacid_splash_wB:
- case Xplant:
- case Yplant:
- case Zplayer:
- Cave[y][x] = Ytank_sB;
- Cave[y+1][x] = Ytank_s;
- Next[y][x] = Xblank;
- Next[y+1][x] = Xtank_s;
- PLAY(SAMPLE_tank);
- goto loop;
- default:
- Cave[y][x] = Ytank_s_w;
- Next[y][x] = Xtank_gow;
- PLAY(SAMPLE_tank);
- goto loop;
- }
-/* ---------------------------------------------------------------------- */
- case Xtank_w:
- if(tab_ameuba[Cave[y-1][x]] || tab_ameuba[Cave[y][x+1]] || tab_ameuba[Cave[y+1][x]] || tab_ameuba[Cave[y][x-1]]) goto tank_boom;
- switch(Cave[y+1][x]) {
- case Xblank:
- case Yacid_splash_eB:
- case Yacid_splash_wB:
- case Xplant:
- case Yplant:
- case Xacid_1:
- case Xacid_2:
- case Xacid_3:
- case Xacid_4:
- case Xacid_5:
- case Xacid_6:
- case Xacid_7:
- case Xacid_8:
- case Zplayer:
- Cave[y][x] = Ytank_w_s;
- Next[y][x] = Xtank_gos;
- PLAY(SAMPLE_tank);
- goto loop;
- default:
- goto tank_gow;
- }
- case Xtank_gow:
- if(tab_ameuba[Cave[y-1][x]] || tab_ameuba[Cave[y][x+1]] || tab_ameuba[Cave[y+1][x]] || tab_ameuba[Cave[y][x-1]]) goto tank_boom;
- tank_gow:
- switch(Cave[y][x-1]) {
- case Xacid_1:
- case Xacid_2:
- case Xacid_3:
- case Xacid_4:
- case Xacid_5:
- case Xacid_6:
- case Xacid_7:
- case Xacid_8:
- Cave[y][x] = Ytank_wB;
- if(Cave[y-1][x] == Xblank) Cave[y-1][x] = Yacid_splash_eB;
- if(Cave[y-1][x-2] == Xblank) Cave[y-1][x-2] = Yacid_splash_wB;
- Next[y][x] = Xblank;
- PLAY(SAMPLE_acid);
- goto loop;
- case Xblank:
- case Yacid_splash_eB:
- case Yacid_splash_wB:
- case Xplant:
- case Yplant:
- case Zplayer:
- Cave[y][x] = Ytank_wB;
- Cave[y][x-1] = Ytank_w;
- Next[y][x] = Xblank;
- Next[y][x-1] = Xtank_w;
- PLAY(SAMPLE_tank);
- goto loop;
- default:
- Cave[y][x] = Ytank_w_n;
- Next[y][x] = Xtank_gon;
- PLAY(SAMPLE_tank);
- goto loop;
- }
-/* ---------------------------------------------------------------------- */
- case Xandroid:
- android:
- if(lev.android_clone_cnt == 0) {
- if(Cave[y-1][x-1] != Xblank && Cave[y-1][x] != Xblank &&
- Cave[y-1][x+1] != Xblank && Cave[y][x-1] != Xblank &&
- Cave[y][x+1] != Xblank && Cave[y+1][x-1] != Xblank &&
- Cave[y+1][x] != Xblank && Cave[y+1][x+1] != Xblank) goto android_move;
-
- switch(RANDOM & 7) { /* randomly find an object to clone */
- case 0: /* S,NE,W,NW,SE,E,SW,N */
- temp = lev.android_array[Cave[y+1][x]]; if(temp != Xblank) break;
- temp = lev.android_array[Cave[y-1][x+1]]; if(temp != Xblank) break;
- temp = lev.android_array[Cave[y][x-1]]; if(temp != Xblank) break;
- temp = lev.android_array[Cave[y-1][x-1]]; if(temp != Xblank) break;
- temp = lev.android_array[Cave[y+1][x+1]]; if(temp != Xblank) break;
- temp = lev.android_array[Cave[y][x+1]]; if(temp != Xblank) break;
- temp = lev.android_array[Cave[y+1][x-1]]; if(temp != Xblank) break;
- temp = lev.android_array[Cave[y-1][x]]; if(temp != Xblank) break;
- goto android_move;
- case 1: /* NW,SE,N,S,NE,SW,E,W */
- temp = lev.android_array[Cave[y-1][x-1]]; if(temp != Xblank) break;
- temp = lev.android_array[Cave[y+1][x+1]]; if(temp != Xblank) break;
- temp = lev.android_array[Cave[y-1][x]]; if(temp != Xblank) break;
- temp = lev.android_array[Cave[y+1][x]]; if(temp != Xblank) break;
- temp = lev.android_array[Cave[y-1][x+1]]; if(temp != Xblank) break;
- temp = lev.android_array[Cave[y+1][x-1]]; if(temp != Xblank) break;
- temp = lev.android_array[Cave[y][x+1]]; if(temp != Xblank) break;
- temp = lev.android_array[Cave[y][x-1]]; if(temp != Xblank) break;
- goto android_move;
- case 2: /* SW,E,S,W,N,NW,SE,NE */
- temp = lev.android_array[Cave[y+1][x-1]]; if(temp != Xblank) break;
- temp = lev.android_array[Cave[y][x+1]]; if(temp != Xblank) break;
- temp = lev.android_array[Cave[y+1][x]]; if(temp != Xblank) break;
- temp = lev.android_array[Cave[y][x-1]]; if(temp != Xblank) break;
- temp = lev.android_array[Cave[y-1][x]]; if(temp != Xblank) break;
- temp = lev.android_array[Cave[y-1][x-1]]; if(temp != Xblank) break;
- temp = lev.android_array[Cave[y+1][x+1]]; if(temp != Xblank) break;
- temp = lev.android_array[Cave[y-1][x+1]]; if(temp != Xblank) break;
- goto android_move;
- case 3: /* N,SE,NE,E,W,S,NW,SW */
- temp = lev.android_array[Cave[y-1][x]]; if(temp != Xblank) break;
- temp = lev.android_array[Cave[y+1][x+1]]; if(temp != Xblank) break;
- temp = lev.android_array[Cave[y-1][x+1]]; if(temp != Xblank) break;
- temp = lev.android_array[Cave[y][x+1]]; if(temp != Xblank) break;
- temp = lev.android_array[Cave[y][x-1]]; if(temp != Xblank) break;
- temp = lev.android_array[Cave[y+1][x]]; if(temp != Xblank) break;
- temp = lev.android_array[Cave[y-1][x-1]]; if(temp != Xblank) break;
- temp = lev.android_array[Cave[y+1][x-1]]; if(temp != Xblank) break;
- goto android_move;
- case 4: /* SE,NW,E,NE,SW,W,N,S */
- temp = lev.android_array[Cave[y+1][x+1]]; if(temp != Xblank) break;
- temp = lev.android_array[Cave[y-1][x-1]]; if(temp != Xblank) break;
- temp = lev.android_array[Cave[y][x+1]]; if(temp != Xblank) break;
- temp = lev.android_array[Cave[y-1][x+1]]; if(temp != Xblank) break;
- temp = lev.android_array[Cave[y+1][x-1]]; if(temp != Xblank) break;
- temp = lev.android_array[Cave[y][x-1]]; if(temp != Xblank) break;
- temp = lev.android_array[Cave[y-1][x]]; if(temp != Xblank) break;
- temp = lev.android_array[Cave[y+1][x]]; if(temp != Xblank) break;
- goto android_move;
- case 5: /* NE,W,SE,SW,S,N,E,NW */
- temp = lev.android_array[Cave[y-1][x+1]]; if(temp != Xblank) break;
- temp = lev.android_array[Cave[y][x-1]]; if(temp != Xblank) break;
- temp = lev.android_array[Cave[y+1][x+1]]; if(temp != Xblank) break;
- temp = lev.android_array[Cave[y+1][x-1]]; if(temp != Xblank) break;
- temp = lev.android_array[Cave[y+1][x]]; if(temp != Xblank) break;
- temp = lev.android_array[Cave[y-1][x]]; if(temp != Xblank) break;
- temp = lev.android_array[Cave[y][x+1]]; if(temp != Xblank) break;
- temp = lev.android_array[Cave[y-1][x-1]]; if(temp != Xblank) break;
- goto android_move;
- case 6: /* E,N,SW,S,NW,NE,SE,W */
- temp = lev.android_array[Cave[y][x+1]]; if(temp != Xblank) break;
- temp = lev.android_array[Cave[y-1][x]]; if(temp != Xblank) break;
- temp = lev.android_array[Cave[y+1][x-1]]; if(temp != Xblank) break;
- temp = lev.android_array[Cave[y+1][x]]; if(temp != Xblank) break;
- temp = lev.android_array[Cave[y-1][x-1]]; if(temp != Xblank) break;
- temp = lev.android_array[Cave[y-1][x+1]]; if(temp != Xblank) break;
- temp = lev.android_array[Cave[y+1][x+1]]; if(temp != Xblank) break;
- temp = lev.android_array[Cave[y][x-1]]; if(temp != Xblank) break;
- goto android_move;
- case 7: /* W,SW,NW,N,E,SE,NE,S */
- temp = lev.android_array[Cave[y][x-1]]; if(temp != Xblank) break;
- temp = lev.android_array[Cave[y+1][x-1]]; if(temp != Xblank) break;
- temp = lev.android_array[Cave[y-1][x-1]]; if(temp != Xblank) break;
- temp = lev.android_array[Cave[y-1][x]]; if(temp != Xblank) break;
- temp = lev.android_array[Cave[y][x+1]]; if(temp != Xblank) break;
- temp = lev.android_array[Cave[y+1][x+1]]; if(temp != Xblank) break;
- temp = lev.android_array[Cave[y-1][x+1]]; if(temp != Xblank) break;
- temp = lev.android_array[Cave[y+1][x]]; if(temp != Xblank) break;
- goto android_move;
- }
- Next[y][x] = temp; /* the item we chose to clone */
- play[SAMPLE_android] = 1;
- switch(RANDOM & 7) { /* randomly find a direction to move */
- case 0: /* S,NE,W,NW,SE,E,SW,N */
- if(Cave[y+1][x] == Xblank) goto android_s;
- if(Cave[y-1][x+1] == Xblank) goto android_ne;
- if(Cave[y][x-1] == Xblank) goto android_w;
- if(Cave[y-1][x-1] == Xblank) goto android_nw;
- if(Cave[y+1][x+1] == Xblank) goto android_se;
- if(Cave[y][x+1] == Xblank) goto android_e;
- if(Cave[y+1][x-1] == Xblank) goto android_sw;
- if(Cave[y-1][x] == Xblank) goto android_n;
- goto android_move;
- case 1: /* NW,SE,N,S,NE,SW,E,W */
- if(Cave[y-1][x-1] == Xblank) goto android_nw;
- if(Cave[y+1][x+1] == Xblank) goto android_se;
- if(Cave[y-1][x] == Xblank) goto android_n;
- if(Cave[y+1][x] == Xblank) goto android_s;
- if(Cave[y-1][x+1] == Xblank) goto android_ne;
- if(Cave[y+1][x-1] == Xblank) goto android_sw;
- if(Cave[y][x+1] == Xblank) goto android_e;
- if(Cave[y][x-1] == Xblank) goto android_w;
- goto android_move;
- case 2: /* SW,E,S,W,N,NW,SE,NE */
- if(Cave[y+1][x-1] == Xblank) goto android_sw;
- if(Cave[y][x+1] == Xblank) goto android_e;
- if(Cave[y+1][x] == Xblank) goto android_s;
- if(Cave[y][x-1] == Xblank) goto android_w;
- if(Cave[y-1][x] == Xblank) goto android_n;
- if(Cave[y-1][x-1] == Xblank) goto android_nw;
- if(Cave[y+1][x+1] == Xblank) goto android_se;
- if(Cave[y-1][x+1] == Xblank) goto android_ne;
- goto android_move;
- case 3: /* N,SE,NE,E,W,S,NW,SW */
- if(Cave[y-1][x] == Xblank) goto android_n;
- if(Cave[y+1][x+1] == Xblank) goto android_se;
- if(Cave[y-1][x+1] == Xblank) goto android_ne;
- if(Cave[y][x+1] == Xblank) goto android_e;
- if(Cave[y][x-1] == Xblank) goto android_w;
- if(Cave[y+1][x] == Xblank) goto android_s;
- if(Cave[y-1][x-1] == Xblank) goto android_nw;
- if(Cave[y+1][x-1] == Xblank) goto android_sw;
- goto android_move;
- case 4: /* SE,NW,E,NE,SW,W,N,S */
- if(Cave[y+1][x+1] == Xblank) goto android_se;
- if(Cave[y-1][x-1] == Xblank) goto android_nw;
- if(Cave[y][x+1] == Xblank) goto android_e;
- if(Cave[y-1][x+1] == Xblank) goto android_ne;
- if(Cave[y+1][x-1] == Xblank) goto android_sw;
- if(Cave[y][x-1] == Xblank) goto android_w;
- if(Cave[y-1][x] == Xblank) goto android_n;
- if(Cave[y+1][x] == Xblank) goto android_s;
- goto android_move;
- case 5: /* NE,W,SE,SW,S,N,E,NW */
- if(Cave[y-1][x+1] == Xblank) goto android_ne;
- if(Cave[y][x-1] == Xblank) goto android_w;
- if(Cave[y+1][x+1] == Xblank) goto android_se;
- if(Cave[y+1][x-1] == Xblank) goto android_sw;
- if(Cave[y+1][x] == Xblank) goto android_s;
- if(Cave[y-1][x] == Xblank) goto android_n;
- if(Cave[y][x+1] == Xblank) goto android_e;
- if(Cave[y-1][x-1] == Xblank) goto android_nw;
- goto android_move;
- case 6: /* E,N,SW,S,NW,NE,SE,W */
- if(Cave[y][x+1] == Xblank) goto android_e;
- if(Cave[y-1][x] == Xblank) goto android_n;
- if(Cave[y+1][x-1] == Xblank) goto android_sw;
- if(Cave[y+1][x] == Xblank) goto android_s;
- if(Cave[y-1][x-1] == Xblank) goto android_nw;
- if(Cave[y-1][x+1] == Xblank) goto android_ne;
- if(Cave[y+1][x+1] == Xblank) goto android_se;
- if(Cave[y][x-1] == Xblank) goto android_w;
- goto android_move;
- case 7: /* W,SW,NW,N,E,SE,NE,S */
- if(Cave[y][x-1] == Xblank) goto android_w;
- if(Cave[y+1][x-1] == Xblank) goto android_sw;
- if(Cave[y-1][x-1] == Xblank) goto android_nw;
- if(Cave[y-1][x] == Xblank) goto android_n;
- if(Cave[y][x+1] == Xblank) goto android_e;
- if(Cave[y+1][x+1] == Xblank) goto android_se;
- if(Cave[y-1][x+1] == Xblank) goto android_ne;
- if(Cave[y+1][x] == Xblank) goto android_s;
- goto android_move;
- }
- }
- android_move:
- if(lev.android_move_cnt == 0) {
- if(Cave[y-1][x-1] == Zplayer || Cave[y-1][x] == Zplayer ||
- Cave[y-1][x+1] == Zplayer || Cave[y][x-1] == Zplayer ||
- Cave[y][x+1] == Zplayer || Cave[y+1][x-1] == Zplayer ||
- Cave[y+1][x] == Zplayer || Cave[y+1][x+1] == Zplayer) goto android_still;
-
- if(ply1.alive && ply2.alive) {
- if( (ply1.x > x ? ply1.x - x : x - ply1.x) + (ply1.y > y ? ply1.y - y : y - ply1.y) < (ply2.x > x ? ply2.x - x : x - ply2.x) + (ply2.y > y ? ply2.y - y : y - ply2.y) ) {
- dx = ply1.x;
- dy = ply1.y;
- } else {
- dx = ply2.x;
- dy = ply2.y;
- }
- } else if(ply1.alive) {
- dx = ply1.x;
- dy = ply1.y;
- } else if(ply2.alive) {
- dx = ply2.x;
- dy = ply2.y;
- } else {
- dx = 0;
- dy = 0;
- }
- Next[y][x] = Xblank; /* assume we will move */
- temp = ((x < dx) + 1 - (x > dx)) + ((y < dy) + 1 - (y > dy)) * 3;
- if(RANDOM & 1) {
- switch(temp) { /* attempt clockwise move first if direct path is blocked */
- case 0: /* north west */
- if(tab_android_move[Cave[y-1][x-1]]) goto android_nw;
- if(tab_android_move[Cave[y-1][x]]) goto android_n;
- if(tab_android_move[Cave[y][x-1]]) goto android_w;
- break;
- case 1: /* north */
- if(tab_android_move[Cave[y-1][x]]) goto android_n;
- if(tab_android_move[Cave[y-1][x+1]]) goto android_ne;
- if(tab_android_move[Cave[y-1][x-1]]) goto android_nw;
- break;
- case 2: /* north east */
- if(tab_android_move[Cave[y-1][x+1]]) goto android_ne;
- if(tab_android_move[Cave[y][x+1]]) goto android_e;
- if(tab_android_move[Cave[y-1][x]]) goto android_n;
- break;
- case 3: /* west */
- if(tab_android_move[Cave[y][x-1]]) goto android_w;
- if(tab_android_move[Cave[y-1][x-1]]) goto android_nw;
- if(tab_android_move[Cave[y+1][x-1]]) goto android_sw;
- break;
- case 4: /* nowhere */
- break;
- case 5: /* east */
- if(tab_android_move[Cave[y][x+1]]) goto android_e;
- if(tab_android_move[Cave[y+1][x+1]]) goto android_se;
- if(tab_android_move[Cave[y-1][x+1]]) goto android_ne;
- break;
- case 6: /* south west */
- if(tab_android_move[Cave[y+1][x-1]]) goto android_sw;
- if(tab_android_move[Cave[y][x-1]]) goto android_w;
- if(tab_android_move[Cave[y+1][x]]) goto android_s;
- break;
- case 7: /* south */
- if(tab_android_move[Cave[y+1][x]]) goto android_s;
- if(tab_android_move[Cave[y+1][x-1]]) goto android_sw;
- if(tab_android_move[Cave[y+1][x+1]]) goto android_se;
- break;
- case 8: /* south east */
- if(tab_android_move[Cave[y+1][x+1]]) goto android_se;
- if(tab_android_move[Cave[y+1][x]]) goto android_s;
- if(tab_android_move[Cave[y][x+1]]) goto android_e;
- break;
- }
- } else {
- switch(temp) { /* attempt counter clockwise move first if direct path is blocked */
- case 0: /* north west */
- if(tab_android_move[Cave[y-1][x-1]]) goto android_nw;
- if(tab_android_move[Cave[y][x-1]]) goto android_w;
- if(tab_android_move[Cave[y-1][x]]) goto android_n;
- break;
- case 1: /* north */
- if(tab_android_move[Cave[y-1][x]]) goto android_n;
- if(tab_android_move[Cave[y-1][x-1]]) goto android_nw;
- if(tab_android_move[Cave[y-1][x+1]]) goto android_ne;
- break;
- case 2: /* north east */
- if(tab_android_move[Cave[y-1][x+1]]) goto android_ne;
- if(tab_android_move[Cave[y-1][x]]) goto android_n;
- if(tab_android_move[Cave[y][x+1]]) goto android_e;
- break;
- case 3: /* west */
- if(tab_android_move[Cave[y][x-1]]) goto android_w;
- if(tab_android_move[Cave[y+1][x-1]]) goto android_sw;
- if(tab_android_move[Cave[y-1][x-1]]) goto android_nw;
- break;
- case 4: /* nowhere */
- break;
- case 5: /* east */
- if(tab_android_move[Cave[y][x+1]]) goto android_e;
- if(tab_android_move[Cave[y-1][x+1]]) goto android_ne;
- if(tab_android_move[Cave[y+1][x+1]]) goto android_se;
- break;
- case 6: /* south west */
- if(tab_android_move[Cave[y+1][x-1]]) goto android_sw;
- if(tab_android_move[Cave[y+1][x]]) goto android_s;
- if(tab_android_move[Cave[y][x-1]]) goto android_w;
- break;
- case 7: /* south */
- if(tab_android_move[Cave[y+1][x]]) goto android_s;
- if(tab_android_move[Cave[y+1][x+1]]) goto android_se;
- if(tab_android_move[Cave[y+1][x-1]]) goto android_sw;
- break;
- case 8: /* south east */
- if(tab_android_move[Cave[y+1][x+1]]) goto android_se;
- if(tab_android_move[Cave[y][x+1]]) goto android_e;
- if(tab_android_move[Cave[y+1][x]]) goto android_s;
- break;
- }
- }
- }
- android_still:
- Next[y][x] = Xandroid;
- goto loop;
- android_n:
- Cave[y][x] = Yandroid_nB;
- Cave[y-1][x] = Yandroid_n;
- Next[y-1][x] = Xandroid;
- PLAY(SAMPLE_tank);
- goto loop;
- android_ne:
- Cave[y][x] = Yandroid_neB;
- Cave[y-1][x+1] = Yandroid_ne;
- Next[y-1][x+1] = Xandroid;
- PLAY(SAMPLE_tank);
- goto loop;
- android_e:
- Cave[y][x] = Yandroid_eB;
- Cave[y][x+1] = Yandroid_e;
- Next[y][x+1] = Xandroid;
- PLAY(SAMPLE_tank);
- goto loop;
- android_se:
- Cave[y][x] = Yandroid_seB;
- Cave[y+1][x+1] = Yandroid_se;
- Next[y+1][x+1] = Xandroid;
- PLAY(SAMPLE_tank);
- goto loop;
- android_s:
- Cave[y][x] = Yandroid_sB;
- Cave[y+1][x] = Yandroid_s;
- Next[y+1][x] = Xandroid;
- PLAY(SAMPLE_tank);
- goto loop;
- android_sw:
- Cave[y][x] = Yandroid_swB;
- Cave[y+1][x-1] = Yandroid_sw;
- Next[y+1][x-1] = Xandroid;
- PLAY(SAMPLE_tank);
- goto loop;
- android_w:
- Cave[y][x] = Yandroid_wB;
- Cave[y][x-1] = Yandroid_w;
- Next[y][x-1] = Xandroid;
- PLAY(SAMPLE_tank);
- goto loop;
- android_nw:
- Cave[y][x] = Yandroid_nwB;
- Cave[y-1][x-1] = Yandroid_nw;
- Next[y-1][x-1] = Xandroid;
- PLAY(SAMPLE_tank);
- goto loop;
-/* ---------------------------------------------------------------------- */
- case Xandroid_1_n:
- switch(Cave[y-1][x]) {
- case Xacid_1:
- case Xacid_2:
- case Xacid_3:
- case Xacid_4:
- case Xacid_5:
- case Xacid_6:
- case Xacid_7:
- case Xacid_8:
- Cave[y][x] = Yandroid_nB;
- if(Cave[y-2][x+1] == Xblank) Cave[y-2][x+1] = Yacid_splash_eB;
- if(Cave[y-2][x-1] == Xblank) Cave[y-2][x-1] = Yacid_splash_wB;
- Next[y][x] = Xblank;
- PLAY(SAMPLE_acid);
- goto loop;
- case Xblank:
- case Yacid_splash_eB:
- case Yacid_splash_wB:
- Cave[y][x] = Yandroid_nB;
- Cave[y-1][x] = Yandroid_n;
- Next[y][x] = Xblank;
- Next[y-1][x] = Xandroid;
- PLAY(SAMPLE_tank);
- goto loop;
- default:
- goto android;
- }
- case Xandroid_2_n:
- switch(Cave[y-1][x]) {
- case Xacid_1:
- case Xacid_2:
- case Xacid_3:
- case Xacid_4:
- case Xacid_5:
- case Xacid_6:
- case Xacid_7:
- case Xacid_8:
- Cave[y][x] = Yandroid_nB;
- if(Cave[y-2][x+1] == Xblank) Cave[y-2][x+1] = Yacid_splash_eB;
- if(Cave[y-2][x-1] == Xblank) Cave[y-2][x-1] = Yacid_splash_wB;
- Next[y][x] = Xblank;
- PLAY(SAMPLE_acid);
- goto loop;
- case Xblank:
- case Yacid_splash_eB:
- case Yacid_splash_wB:
- Cave[y][x] = Yandroid_nB;
- Cave[y-1][x] = Yandroid_n;
- Next[y][x] = Xblank;
- Next[y-1][x] = Xandroid_1_n;
- PLAY(SAMPLE_tank);
- goto loop;
- default:
- goto android;
- }
-/* ---------------------------------------------------------------------- */
- case Xandroid_1_e:
- switch(Cave[y][x+1]) {
- case Xacid_1:
- case Xacid_2:
- case Xacid_3:
- case Xacid_4:
- case Xacid_5:
- case Xacid_6:
- case Xacid_7:
- case Xacid_8:
- Cave[y][x] = Yandroid_eB;
- if(Cave[y-1][x+2] == Xblank) Cave[y-1][x+2] = Yacid_splash_eB;
- if(Cave[y-1][x] == Xblank) Cave[y-1][x] = Yacid_splash_wB;
- Next[y][x] = Xblank;
- PLAY(SAMPLE_acid);
- goto loop;
- case Xblank:
- case Yacid_splash_eB:
- case Yacid_splash_wB:
- Cave[y][x] = Yandroid_eB;
- Cave[y][x+1] = Yandroid_e;
- Next[y][x] = Xblank;
- Next[y][x+1] = Xandroid;
- PLAY(SAMPLE_tank);
- goto loop;
- default:
- goto android;
- }
- case Xandroid_2_e:
- switch(Cave[y][x+1]) {
- case Xacid_1:
- case Xacid_2:
- case Xacid_3:
- case Xacid_4:
- case Xacid_5:
- case Xacid_6:
- case Xacid_7:
- case Xacid_8:
- Cave[y][x] = Yandroid_eB;
- if(Cave[y-1][x+2] == Xblank) Cave[y-1][x+2] = Yacid_splash_eB;
- if(Cave[y-1][x] == Xblank) Cave[y-1][x] = Yacid_splash_wB;
- Next[y][x] = Xblank;
- PLAY(SAMPLE_acid);
- goto loop;
- case Xblank:
- case Yacid_splash_eB:
- case Yacid_splash_wB:
- Cave[y][x] = Yandroid_eB;
- Cave[y][x+1] = Yandroid_e;
- Next[y][x] = Xblank;
- Next[y][x+1] = Xandroid_1_e;
- PLAY(SAMPLE_tank);
- goto loop;
- default:
- goto android;
- }
-/* ---------------------------------------------------------------------- */
- case Xandroid_1_s:
- switch(Cave[y+1][x]) {
- case Xacid_1:
- case Xacid_2:
- case Xacid_3:
- case Xacid_4:
- case Xacid_5:
- case Xacid_6:
- case Xacid_7:
- case Xacid_8:
- Cave[y][x] = Yandroid_sB;
- if(Cave[y][x+1] == Xblank) Cave[y][x+1] = Yacid_splash_eB;
- if(Cave[y][x-1] == Xblank) Cave[y][x-1] = Yacid_splash_wB;
- Next[y][x] = Xblank;
- PLAY(SAMPLE_acid);
- goto loop;
- case Xblank:
- case Yacid_splash_eB:
- case Yacid_splash_wB:
- Cave[y][x] = Yandroid_sB;
- Cave[y+1][x] = Yandroid_s;
- Next[y][x] = Xblank;
- Next[y+1][x] = Xandroid;
- PLAY(SAMPLE_tank);
- goto loop;
- default:
- goto android;
- }
- case Xandroid_2_s:
- switch(Cave[y+1][x]) {
- case Xacid_1:
- case Xacid_2:
- case Xacid_3:
- case Xacid_4:
- case Xacid_5:
- case Xacid_6:
- case Xacid_7:
- case Xacid_8:
- Cave[y][x] = Yandroid_sB;
- if(Cave[y][x+1] == Xblank) Cave[y][x+1] = Yacid_splash_eB;
- if(Cave[y][x-1] == Xblank) Cave[y][x-1] = Yacid_splash_wB;
- Next[y][x] = Xblank;
- PLAY(SAMPLE_acid);
- goto loop;
- case Xblank:
- case Yacid_splash_eB:
- case Yacid_splash_wB:
- Cave[y][x] = Yandroid_sB;
- Cave[y+1][x] = Yandroid_s;
- Next[y][x] = Xblank;
- Next[y+1][x] = Xandroid_1_s;
- PLAY(SAMPLE_tank);
- goto loop;
- default:
- goto android;
- }
-/* ---------------------------------------------------------------------- */
- case Xandroid_1_w:
- switch(Cave[y][x-1]) {
- case Xacid_1:
- case Xacid_2:
- case Xacid_3:
- case Xacid_4:
- case Xacid_5:
- case Xacid_6:
- case Xacid_7:
- case Xacid_8:
- Cave[y][x] = Yandroid_wB;
- if(Cave[y-1][x] == Xblank) Cave[y-1][x] = Yacid_splash_eB;
- if(Cave[y-1][x-2] == Xblank) Cave[y-1][x-2] = Yacid_splash_wB;
- Next[y][x] = Xblank;
- PLAY(SAMPLE_acid);
- goto loop;
- case Xblank:
- case Yacid_splash_eB:
- case Yacid_splash_wB:
- Cave[y][x] = Yandroid_wB;
- Cave[y][x-1] = Yandroid_w;
- Next[y][x] = Xblank;
- Next[y][x-1] = Xandroid;
- PLAY(SAMPLE_tank);
- goto loop;
- default:
- goto android;
- }
- case Xandroid_2_w:
- switch(Cave[y][x-1]) {
- case Xacid_1:
- case Xacid_2:
- case Xacid_3:
- case Xacid_4:
- case Xacid_5:
- case Xacid_6:
- case Xacid_7:
- case Xacid_8:
- Cave[y][x] = Yandroid_wB;
- if(Cave[y-1][x] == Xblank) Cave[y-1][x] = Yacid_splash_eB;
- if(Cave[y-1][x-2] == Xblank) Cave[y-1][x-2] = Yacid_splash_wB;
- Next[y][x] = Xblank;
- PLAY(SAMPLE_acid);
- goto loop;
- case Xblank:
- case Yacid_splash_eB:
- case Yacid_splash_wB:
- Cave[y][x] = Yandroid_wB;
- Cave[y][x-1] = Yandroid_w;
- Next[y][x] = Xblank;
- Next[y][x-1] = Xandroid_1_w;
- PLAY(SAMPLE_tank);
- goto loop;
- default:
- goto android;
- }
-/* ---------------------------------------------------------------------- */
- case Xspring:
- switch(Cave[y+1][x]) {
- case Xacid_1:
- case Xacid_2:
- case Xacid_3:
- case Xacid_4:
- case Xacid_5:
- case Xacid_6:
- case Xacid_7:
- case Xacid_8:
- Cave[y][x] = Yspring_sB;
- if(Cave[y][x+1] == Xblank) Cave[y][x+1] = Yacid_splash_eB;
- if(Cave[y][x-1] == Xblank) Cave[y][x-1] = Yacid_splash_wB;
- Next[y][x] = Xblank;
- PLAY(SAMPLE_acid);
- goto loop;
- case Xblank:
- case Yacid_splash_eB:
- case Yacid_splash_wB:
- case Xplant:
- case Yplant:
- Cave[y][x] = Yspring_sB;
- Cave[y+1][x] = Yspring_s;
- Next[y][x] = Xblank;
- Next[y+1][x] = Xspring_fall;
- goto loop;
- case Xspring:
- case Xspring_pause:
- case Xspring_e:
- case Xspring_w:
- case Xandroid:
- case Xandroid_1_n:
- case Xandroid_2_n:
- case Xandroid_1_e:
- case Xandroid_2_e:
- case Xandroid_1_s:
- case Xandroid_2_s:
- case Xandroid_1_w:
- case Xandroid_2_w:
- case Xstone:
- case Xstone_pause:
- case Xemerald:
- case Xemerald_pause:
- case Xdiamond:
- case Xdiamond_pause:
- case Xbomb:
- case Xbomb_pause:
- case Xballoon:
- case Xacid_ne:
- case Xacid_nw:
- case Xball_1:
- case Xball_2:
- case Xnut:
- case Xnut_pause:
- case Xgrow_ns:
- case Xgrow_ew:
- case Xkey_1:
- case Xkey_2:
- case Xkey_3:
- case Xkey_4:
- case Xkey_5:
- case Xkey_6:
- case Xkey_7:
- case Xkey_8:
- case Xbumper:
- case Xswitch:
- case Xround_wall_1:
- case Xround_wall_2:
- case Xround_wall_3:
- case Xround_wall_4:
- if(RANDOM & 1) {
- if(tab_blank[Cave[y][x+1]] && tab_acid[Cave[y+1][x+1]]) {
- Cave[y][x] = Yspring_eB;
- Cave[y][x+1] = Yspring_e;
- if(Cave[y+1][x] == Xbumper) Cave[y+1][x] = XbumperB;
- Next[y][x] = Xblank;
-#ifdef BAD_SPRING
- Next[y][x+1] = Xspring_e;
-#else
- Next[y][x+1] = Xspring_pause;
-#endif
- goto loop;
- }
- if(tab_blank[Cave[y][x-1]] && tab_acid[Cave[y+1][x-1]]) {
- Cave[y][x] = Yspring_wB;
- Cave[y][x-1] = Yspring_w;
- if(Cave[y+1][x] == Xbumper) Cave[y+1][x] = XbumperB;
- Next[y][x] = Xblank;
-#ifdef BAD_SPRING
- Next[y][x-1] = Xspring_w;
-#else
- Next[y][x-1] = Xspring_pause;
-#endif
- goto loop;
- }
- } else {
- if(tab_blank[Cave[y][x-1]] && tab_acid[Cave[y+1][x-1]]) {
- Cave[y][x] = Yspring_wB;
- Cave[y][x-1] = Yspring_w;
- if(Cave[y+1][x] == Xbumper) Cave[y+1][x] = XbumperB;
- Next[y][x] = Xblank;
-#ifdef BAD_SPRING
- Next[y][x-1] = Xspring_w;
-#else
- Next[y][x-1] = Xspring_pause;
-#endif
- goto loop;
- }
- if(tab_blank[Cave[y][x+1]] && tab_acid[Cave[y+1][x+1]]) {
- Cave[y][x] = Yspring_eB;
- Cave[y][x+1] = Yspring_e;
- if(Cave[y+1][x] == Xbumper) Cave[y+1][x] = XbumperB;
- Next[y][x] = Xblank;
-#ifdef BAD_SPRING
- Next[y][x+1] = Xspring_e;
-#else
- Next[y][x+1] = Xspring_pause;
-#endif
- goto loop;
- }
- }
- default:
- goto loop;
- }
-/* ---------------------------------------------------------------------- */
- case Xspring_pause:
- switch(Cave[y+1][x]) {
- case Xacid_1:
- case Xacid_2:
- case Xacid_3:
- case Xacid_4:
- case Xacid_5:
- case Xacid_6:
- case Xacid_7:
- case Xacid_8:
- Cave[y][x] = Yspring_sB;
- if(Cave[y][x+1] == Xblank) Cave[y][x+1] = Yacid_splash_eB;
- if(Cave[y][x-1] == Xblank) Cave[y][x-1] = Yacid_splash_wB;
- Next[y][x] = Xblank;
- PLAY(SAMPLE_acid);
- goto loop;
- case Xblank:
- case Yacid_splash_eB:
- case Yacid_splash_wB:
- Cave[y][x] = Yspring_sB;
- Cave[y+1][x] = Yspring_s;
- Next[y][x] = Xblank;
- Next[y+1][x] = Xspring_fall;
- goto loop;
- default:
- Cave[y][x] = Xspring;
- Next[y][x] = Xspring;
- goto loop;
- }
-/* ---------------------------------------------------------------------- */
- case Xspring_e:
- switch(Cave[y+1][x]) {
- case Xacid_1:
- case Xacid_2:
- case Xacid_3:
- case Xacid_4:
- case Xacid_5:
- case Xacid_6:
- case Xacid_7:
- case Xacid_8:
- Cave[y][x] = Yspring_sB;
- if(Cave[y][x+1] == Xblank) Cave[y][x+1] = Yacid_splash_eB;
- if(Cave[y][x-1] == Xblank) Cave[y][x-1] = Yacid_splash_wB;
- Next[y][x] = Xblank;
- PLAY(SAMPLE_acid);
- goto loop;
- case Xblank:
- case Yacid_splash_eB:
- case Yacid_splash_wB:
- Cave[y][x] = Yspring_sB;
- Cave[y+1][x] = Yspring_s;
- Next[y][x] = Xblank;
- Next[y+1][x] = Xspring_fall;
- goto loop;
- case Xbumper:
- Cave[y+1][x] = XbumperB;
- }
- switch(Cave[y][x+1]) {
- case Xacid_1:
- case Xacid_2:
- case Xacid_3:
- case Xacid_4:
- case Xacid_5:
- case Xacid_6:
- case Xacid_7:
- case Xacid_8:
- Cave[y][x] = Yspring_eB;
- if(Cave[y-1][x+2] == Xblank) Cave[y-1][x+2] = Yacid_splash_eB;
- if(Cave[y-1][x] == Xblank) Cave[y-1][x] = Yacid_splash_wB;
- Next[y][x] = Xblank;
- PLAY(SAMPLE_acid);
- goto loop;
- case Xblank:
- case Yacid_splash_eB:
- case Yacid_splash_wB:
- case Yalien_nB:
- case Yalien_eB:
- case Yalien_sB:
- case Yalien_wB:
- Cave[y][x] = Yspring_eB;
- Cave[y][x+1] = Yspring_e;
- Next[y][x] = Xblank;
- Next[y][x+1] = Xspring_e;
- goto loop;
- case Xalien:
- case Xalien_pause:
- case Yalien_n:
- case Yalien_e:
- case Yalien_s:
- case Yalien_w:
- Cave[y][x] = Yspring_kill_eB;
- Cave[y][x+1] = Yspring_kill_e;
- Next[y][x] = Xblank;
- Next[y][x+1] = Xspring_e;
- play[SAMPLE_slurp] = 1;
- score += lev.slurp_score;
- goto loop;
- case Xbumper:
- case XbumperB:
- Cave[y][x+1] = XbumperB;
- Next[y][x] = Xspring_w;
- PLAY(SAMPLE_spring);
- goto loop;
- default:
- Cave[y][x] = Xspring;
- Next[y][x] = Xspring;
- PLAY(SAMPLE_spring);
- goto loop;
- }
-/* ---------------------------------------------------------------------- */
- case Xspring_w:
- switch(Cave[y+1][x]) {
- case Xacid_1:
- case Xacid_2:
- case Xacid_3:
- case Xacid_4:
- case Xacid_5:
- case Xacid_6:
- case Xacid_7:
- case Xacid_8:
- Cave[y][x] = Yspring_sB;
- if(Cave[y][x+1] == Xblank) Cave[y][x+1] = Yacid_splash_eB;
- if(Cave[y][x-1] == Xblank) Cave[y][x-1] = Yacid_splash_wB;
- Next[y][x] = Xblank;
- PLAY(SAMPLE_acid);
- goto loop;
- case Xblank:
- case Yacid_splash_eB:
- case Yacid_splash_wB:
- Cave[y][x] = Yspring_sB;
- Cave[y+1][x] = Yspring_s;
- Next[y][x] = Xblank;
- Next[y+1][x] = Xspring_fall;
- goto loop;
- case Xbumper:
- Cave[y+1][x] = XbumperB;
- }
- switch(Cave[y][x-1]) {
- case Xacid_1:
- case Xacid_2:
- case Xacid_3:
- case Xacid_4:
- case Xacid_5:
- case Xacid_6:
- case Xacid_7:
- case Xacid_8:
- Cave[y][x] = Yspring_wB;
- if(Cave[y-1][x] == Xblank) Cave[y-1][x] = Yacid_splash_eB;
- if(Cave[y-1][x-2] == Xblank) Cave[y-1][x-2] = Yacid_splash_wB;
- Next[y][x] = Xblank;
- PLAY(SAMPLE_acid);
- goto loop;
- case Xblank:
- case Yacid_splash_eB:
- case Yacid_splash_wB:
- case Yalien_nB:
- case Yalien_eB:
- case Yalien_sB:
- case Yalien_wB:
- Cave[y][x] = Yspring_wB;
- Cave[y][x-1] = Yspring_w;
- Next[y][x] = Xblank;
- Next[y][x-1] = Xspring_w;
- goto loop;
- case Xalien:
- case Xalien_pause:
- case Yalien_n:
- case Yalien_e:
- case Yalien_s:
- case Yalien_w:
- Cave[y][x] = Yspring_kill_wB;
- Cave[y][x-1] = Yspring_kill_w;
- Next[y][x] = Xblank;
- Next[y][x-1] = Xspring_w;
- play[SAMPLE_slurp] = 1;
- score += lev.slurp_score;
- goto loop;
- case Xbumper:
- case XbumperB:
- Cave[y][x-1] = XbumperB;
- Next[y][x] = Xspring_e;
- PLAY(SAMPLE_spring);
- goto loop;
- default:
- Cave[y][x] = Xspring;
- Next[y][x] = Xspring;
- PLAY(SAMPLE_spring);
- goto loop;
- }
-/* ---------------------------------------------------------------------- */
- case Xspring_fall:
- switch(Cave[y+1][x]) {
- case Xacid_1:
- case Xacid_2:
- case Xacid_3:
- case Xacid_4:
- case Xacid_5:
- case Xacid_6:
- case Xacid_7:
- case Xacid_8:
- Cave[y][x] = Yspring_sB;
- if(Cave[y][x+1] == Xblank) Cave[y][x+1] = Yacid_splash_eB;
- if(Cave[y][x-1] == Xblank) Cave[y][x-1] = Yacid_splash_wB;
- Next[y][x] = Xblank;
- PLAY(SAMPLE_acid);
- goto loop;
- case Xblank:
- case Yacid_splash_eB:
- case Yacid_splash_wB:
- case Zplayer:
- Cave[y][x] = Yspring_sB;
- Cave[y+1][x] = Yspring_s;
- Next[y][x] = Xblank;
- Next[y+1][x] = Xspring_fall;
- goto loop;
- case Xbomb:
- case Xbomb_pause:
- Cave[y+1][x] = Ybomb_eat;
- Next[y+1][x] = Znormal;
- Boom[y][x-1] = Xblank;
- Boom[y][x] = Xblank;
- Boom[y][x+1] = Xblank;
- Boom[y+1][x-1] = Xblank;
- Boom[y+1][x] = Xblank;
- Boom[y+1][x+1] = Xblank;
- Boom[y+2][x-1] = Xblank;
- Boom[y+2][x] = Xblank;
- Boom[y+2][x+1] = Xblank;
- goto loop;
- case Xbug_n:
- case Xbug_e:
- case Xbug_s:
- case Xbug_w:
- case Xbug_gon:
- case Xbug_goe:
- case Xbug_gos:
- case Xbug_gow:
- Cave[y][x] = Yspring_sB;
- Cave[y+1][x] = Ybug_spring;
- Next[y+1][x] = Znormal;
- Boom[y][x-1] = Xemerald;
- Boom[y][x] = Xemerald;
- Boom[y][x+1] = Xemerald;
- Boom[y+1][x-1] = Xemerald;
- Boom[y+1][x] = Xdiamond;
- Boom[y+1][x+1] = Xemerald;
- Boom[y+2][x-1] = Xemerald;
- Boom[y+2][x] = Xemerald;
- Boom[y+2][x+1] = Xemerald;
- score += lev.bug_score;
- goto loop;
- case Xtank_n:
- case Xtank_e:
- case Xtank_s:
- case Xtank_w:
- case Xtank_gon:
- case Xtank_goe:
- case Xtank_gos:
- case Xtank_gow:
- Cave[y][x] = Yspring_sB;
- Cave[y+1][x] = Ytank_spring;
- Next[y+1][x] = Znormal;
- Boom[y][x-1] = Xblank;
- Boom[y][x] = Xblank;
- Boom[y][x+1] = Xblank;
- Boom[y+1][x-1] = Xblank;
- Boom[y+1][x] = Xblank;
- Boom[y+1][x+1] = Xblank;
- Boom[y+2][x-1] = Xblank;
- Boom[y+2][x] = Xblank;
- Boom[y+2][x+1] = Xblank;
- score += lev.tank_score;
- goto loop;
- case Xeater_n:
- case Xeater_e:
- case Xeater_s:
- case Xeater_w:
- Cave[y][x] = Yspring_sB;
- Cave[y+1][x] = Yeater_spring;
- Next[y+1][x] = Znormal;
- Boom[y][x-1] = lev.eater_array[lev.eater_pos][0];
- Boom[y][x] = lev.eater_array[lev.eater_pos][1];
- Boom[y][x+1] = lev.eater_array[lev.eater_pos][2];
- Boom[y+1][x-1] = lev.eater_array[lev.eater_pos][3];
- Boom[y+1][x] = lev.eater_array[lev.eater_pos][4];
- Boom[y+1][x+1] = lev.eater_array[lev.eater_pos][5];
- Boom[y+2][x-1] = lev.eater_array[lev.eater_pos][6];
- Boom[y+2][x] = lev.eater_array[lev.eater_pos][7];
- Boom[y+2][x+1] = lev.eater_array[lev.eater_pos][8];
- lev.eater_pos = (lev.eater_pos + 1) & 7;
- score += lev.eater_score;
- goto loop;
- case Xalien:
- case Xalien_pause:
- Cave[y][x] = Yspring_sB;
- Cave[y+1][x] = Yalien_spring;
- Next[y+1][x] = Znormal;
- Boom[y][x-1] = Xblank;
- Boom[y][x] = Xblank;
- Boom[y][x+1] = Xblank;
- Boom[y+1][x-1] = Xblank;
- Boom[y+1][x] = Xblank;
- Boom[y+1][x+1] = Xblank;
- Boom[y+2][x-1] = Xblank;
- Boom[y+2][x] = Xblank;
- Boom[y+2][x+1] = Xblank;
- score += lev.alien_score;
- goto loop;
- default:
- Cave[y][x] = Xspring;
- Next[y][x] = Xspring;
- PLAY(SAMPLE_spring);
- goto loop;
- }
-/* ---------------------------------------------------------------------- */
- case Xeater_n:
- if(Cave[y][x+1] == Xdiamond) {
- Cave[y][x+1] = Ydiamond_eat;
- Next[y][x+1] = Xblank;
- play[SAMPLE_eater] = 1;
- goto loop;
- }
- if(Cave[y+1][x] == Xdiamond) {
- Cave[y+1][x] = Ydiamond_eat;
- Next[y+1][x] = Xblank;
- play[SAMPLE_eater] = 1;
- goto loop;
- }
- if(Cave[y][x-1] == Xdiamond) {
- Cave[y][x-1] = Ydiamond_eat;
- Next[y][x-1] = Xblank;
- play[SAMPLE_eater] = 1;
- goto loop;
- }
- if(Cave[y-1][x] == Xdiamond) {
- Cave[y-1][x] = Ydiamond_eat;
- Next[y-1][x] = Xblank;
- play[SAMPLE_eater] = 1;
- goto loop;
- }
- switch(Cave[y-1][x]) {
- case Xacid_1:
- case Xacid_2:
- case Xacid_3:
- case Xacid_4:
- case Xacid_5:
- case Xacid_6:
- case Xacid_7:
- case Xacid_8:
- Cave[y][x] = Yeater_nB;
- if(Cave[y-2][x+1] == Xblank) Cave[y-2][x+1] = Yacid_splash_eB;
- if(Cave[y-2][x-1] == Xblank) Cave[y-2][x-1] = Yacid_splash_wB;
- Next[y][x] = Xblank;
- PLAY(SAMPLE_acid);
- goto loop;
- case Xblank:
- case Yacid_splash_eB:
- case Yacid_splash_wB:
- case Xplant:
- case Yplant:
- case Zplayer:
- Cave[y][x] = Yeater_nB;
- Cave[y-1][x] = Yeater_n;
- Next[y][x] = Xblank;
- Next[y-1][x] = Xeater_n;
- goto loop;
- default:
- Next[y][x] = RANDOM & 1 ? Xeater_e : Xeater_w;
- PLAY(SAMPLE_eater);
- goto loop;
- }
-/* ---------------------------------------------------------------------- */
- case Xeater_e:
- if(Cave[y+1][x] == Xdiamond) {
- Cave[y+1][x] = Ydiamond_eat;
- Next[y+1][x] = Xblank;
- play[SAMPLE_eater] = 1;
- goto loop;
- }
- if(Cave[y][x-1] == Xdiamond) {
- Cave[y][x-1] = Ydiamond_eat;
- Next[y][x-1] = Xblank;
- play[SAMPLE_eater] = 1;
- goto loop;
- }
- if(Cave[y-1][x] == Xdiamond) {
- Cave[y-1][x] = Ydiamond_eat;
- Next[y-1][x] = Xblank;
- play[SAMPLE_eater] = 1;
- goto loop;
- }
- if(Cave[y][x+1] == Xdiamond) {
- Cave[y][x+1] = Ydiamond_eat;
- Next[y][x+1] = Xblank;
- play[SAMPLE_eater] = 1;
- goto loop;
- }
- switch(Cave[y][x+1]) {
- case Xacid_1:
- case Xacid_2:
- case Xacid_3:
- case Xacid_4:
- case Xacid_5:
- case Xacid_6:
- case Xacid_7:
- case Xacid_8:
- Cave[y][x] = Yeater_eB;
- if(Cave[y-1][x+2] == Xblank) Cave[y-1][x+2] = Yacid_splash_eB;
- if(Cave[y-1][x] == Xblank) Cave[y-1][x] = Yacid_splash_wB;
- Next[y][x] = Xblank;
- PLAY(SAMPLE_acid);
- goto loop;
- case Xblank:
- case Yacid_splash_eB:
- case Yacid_splash_wB:
- case Xplant:
- case Yplant:
- case Zplayer:
- Cave[y][x] = Yeater_eB;
- Cave[y][x+1] = Yeater_e;
- Next[y][x] = Xblank;
- Next[y][x+1] = Xeater_e;
- goto loop;
- default:
- Next[y][x] = RANDOM & 1 ? Xeater_n : Xeater_s;
- PLAY(SAMPLE_eater);
- goto loop;
- }
-/* ---------------------------------------------------------------------- */
- case Xeater_s:
- if(Cave[y][x-1] == Xdiamond) {
- Cave[y][x-1] = Ydiamond_eat;
- Next[y][x-1] = Xblank;
- play[SAMPLE_eater] = 1;
- goto loop;
- }
- if(Cave[y-1][x] == Xdiamond) {
- Cave[y-1][x] = Ydiamond_eat;
- Next[y-1][x] = Xblank;
- play[SAMPLE_eater] = 1;
- goto loop;
- }
- if(Cave[y][x+1] == Xdiamond) {
- Cave[y][x+1] = Ydiamond_eat;
- Next[y][x+1] = Xblank;
- play[SAMPLE_eater] = 1;
- goto loop;
- }
- if(Cave[y+1][x] == Xdiamond) {
- Cave[y+1][x] = Ydiamond_eat;
- Next[y+1][x] = Xblank;
- play[SAMPLE_eater] = 1;
- goto loop;
- }
- switch(Cave[y+1][x]) {
- case Xacid_1:
- case Xacid_2:
- case Xacid_3:
- case Xacid_4:
- case Xacid_5:
- case Xacid_6:
- case Xacid_7:
- case Xacid_8:
- Cave[y][x] = Yeater_sB;
- if(Cave[y][x+1] == Xblank) Cave[y][x+1] = Yacid_splash_eB;
- if(Cave[y][x-1] == Xblank) Cave[y][x-1] = Yacid_splash_wB;
- Next[y][x] = Xblank;
- PLAY(SAMPLE_acid);
- goto loop;
- case Xblank:
- case Yacid_splash_eB:
- case Yacid_splash_wB:
- case Xplant:
- case Yplant:
- case Zplayer:
- Cave[y][x] = Yeater_sB;
- Cave[y+1][x] = Yeater_s;
- Next[y][x] = Xblank;
- Next[y+1][x] = Xeater_s;
- goto loop;
- default:
- Next[y][x] = RANDOM & 1 ? Xeater_e : Xeater_w;
- PLAY(SAMPLE_eater);
- goto loop;
- }
-/* ---------------------------------------------------------------------- */
- case Xeater_w:
- if(Cave[y-1][x] == Xdiamond) {
- Cave[y-1][x] = Ydiamond_eat;
- Next[y-1][x] = Xblank;
- play[SAMPLE_eater] = 1;
- goto loop;
- }
- if(Cave[y][x+1] == Xdiamond) {
- Cave[y][x+1] = Ydiamond_eat;
- Next[y][x+1] = Xblank;
- play[SAMPLE_eater] = 1;
- goto loop;
- }
- if(Cave[y+1][x] == Xdiamond) {
- Cave[y+1][x] = Ydiamond_eat;
- Next[y+1][x] = Xblank;
- play[SAMPLE_eater] = 1;
- goto loop;
- }
- if(Cave[y][x-1] == Xdiamond) {
- Cave[y][x-1] = Ydiamond_eat;
- Next[y][x-1] = Xblank;
- play[SAMPLE_eater] = 1;
- goto loop;
- }
- switch(Cave[y][x-1]) {
- case Xacid_1:
- case Xacid_2:
- case Xacid_3:
- case Xacid_4:
- case Xacid_5:
- case Xacid_6:
- case Xacid_7:
- case Xacid_8:
- Cave[y][x] = Yeater_wB;
- if(Cave[y-1][x] == Xblank) Cave[y-1][x] = Yacid_splash_eB;
- if(Cave[y-1][x-2] == Xblank) Cave[y-1][x-2] = Yacid_splash_wB;
- Next[y][x] = Xblank;
- PLAY(SAMPLE_acid);
- goto loop;
- case Xblank:
- case Yacid_splash_eB:
- case Yacid_splash_wB:
- case Xplant:
- case Yplant:
- case Zplayer:
- Cave[y][x] = Yeater_wB;
- Cave[y][x-1] = Yeater_w;
- Next[y][x] = Xblank;
- Next[y][x-1] = Xeater_w;
- goto loop;
- default:
- Next[y][x] = RANDOM & 1 ? Xeater_n : Xeater_s;
- PLAY(SAMPLE_eater);
- goto loop;
- }
-/* ---------------------------------------------------------------------- */
- case Xalien:
- if(lev.wheel_cnt) {
- dx = lev.wheel_x;
- dy = lev.wheel_y;
- } else if(ply1.alive && ply2.alive) {
- if( (ply1.x > x ? ply1.x - x : x - ply1.x) + (ply1.y > y ? ply1.y - y : y - ply1.y) < (ply2.x > x ? ply2.x - x : x - ply2.x) + (ply2.y > y ? ply2.y - y : y - ply2.y) ) {
- dx = ply1.x;
- dy = ply1.y;
- } else {
- dx = ply2.x;
- dy = ply2.y;
- }
- } else if(ply1.alive) {
- dx = ply1.x;
- dy = ply1.y;
- } else if(ply2.alive) {
- dx = ply2.x;
- dy = ply2.y;
- } else {
- dx = 0;
- dy = 0;
- }
- if(RANDOM & 1) {
- if(y > dy) {
- switch(Cave[y-1][x]) {
- case Xacid_1:
- case Xacid_2:
- case Xacid_3:
- case Xacid_4:
- case Xacid_5:
- case Xacid_6:
- case Xacid_7:
- case Xacid_8:
- Cave[y][x] = Yalien_nB;
- if(Cave[y-2][x+1] == Xblank) Cave[y-2][x+1] = Yacid_splash_eB;
- if(Cave[y-2][x-1] == Xblank) Cave[y-2][x-1] = Yacid_splash_wB;
- Next[y][x] = Xblank;
- PLAY(SAMPLE_acid);
- goto loop;
- case Xblank:
- case Yacid_splash_eB:
- case Yacid_splash_wB:
- case Xplant:
- case Yplant:
- case Zplayer:
- Cave[y][x] = Yalien_nB;
- Cave[y-1][x] = Yalien_n;
- Next[y][x] = Xblank;
- Next[y-1][x] = Xalien_pause;
- PLAY(SAMPLE_alien);
- goto loop;
- }
- } else if(y < dy) {
- switch(Cave[y+1][x]) {
- case Xacid_1:
- case Xacid_2:
- case Xacid_3:
- case Xacid_4:
- case Xacid_5:
- case Xacid_6:
- case Xacid_7:
- case Xacid_8:
- Cave[y][x] = Yalien_sB;
- Next[y][x] = Xblank;
- if(Cave[y][x+1] == Xblank) Cave[y][x+1] = Yacid_splash_eB;
- if(Cave[y][x-1] == Xblank) Cave[y][x-1] = Yacid_splash_wB;
- PLAY(SAMPLE_acid);
- goto loop;
- case Xblank:
- case Yacid_splash_eB:
- case Yacid_splash_wB:
- case Xplant:
- case Yplant:
- case Zplayer:
- Cave[y][x] = Yalien_sB;
- Cave[y+1][x] = Yalien_s;
- Next[y][x] = Xblank;
- Next[y+1][x] = Xalien_pause;
- PLAY(SAMPLE_alien);
- goto loop;
- }
- }
- } else {
- if(x < dx) {
- switch(Cave[y][x+1]) {
- case Xacid_1:
- case Xacid_2:
- case Xacid_3:
- case Xacid_4:
- case Xacid_5:
- case Xacid_6:
- case Xacid_7:
- case Xacid_8:
- Cave[y][x] = Yalien_eB;
- if(Cave[y-1][x+2] == Xblank) Cave[y-1][x+2] = Yacid_splash_eB;
- if(Cave[y-1][x] == Xblank) Cave[y-1][x] = Yacid_splash_wB;
- Next[y][x] = Xblank;
- PLAY(SAMPLE_acid);
- goto loop;
- case Xblank:
- case Yacid_splash_eB:
- case Yacid_splash_wB:
- case Xplant:
- case Yplant:
- case Zplayer:
- Cave[y][x] = Yalien_eB;
- Cave[y][x+1] = Yalien_e;
- Next[y][x] = Xblank;
- Next[y][x+1] = Xalien_pause;
- PLAY(SAMPLE_alien);
- goto loop;
- }
- } else if(x > dx) {
- switch(Cave[y][x-1]) {
- case Xacid_1:
- case Xacid_2:
- case Xacid_3:
- case Xacid_4:
- case Xacid_5:
- case Xacid_6:
- case Xacid_7:
- case Xacid_8:
- Cave[y][x] = Yalien_wB;
- if(Cave[y-1][x] == Xblank) Cave[y-1][x] = Yacid_splash_eB;
- if(Cave[y-1][x-2] == Xblank) Cave[y-1][x-2] = Yacid_splash_wB;
- Next[y][x] = Xblank;
- PLAY(SAMPLE_acid);
- goto loop;
- case Xblank:
- case Yacid_splash_eB:
- case Yacid_splash_wB:
- case Xplant:
- case Yplant:
- case Zplayer:
- Cave[y][x] = Yalien_wB;
- Cave[y][x-1] = Yalien_w;
- Next[y][x] = Xblank;
- Next[y][x-1] = Xalien_pause;
- PLAY(SAMPLE_alien);
- goto loop;
- }
- }
- }
- goto loop;
- case Xalien_pause:
- Next[y][x] = Xalien;
- goto loop;
-/* ---------------------------------------------------------------------- */
- case Xemerald:
- switch(Cave[y+1][x]) {
- case Xacid_1:
- case Xacid_2:
- case Xacid_3:
- case Xacid_4:
- case Xacid_5:
- case Xacid_6:
- case Xacid_7:
- case Xacid_8:
- Cave[y][x] = Yemerald_sB;
- if(Cave[y][x+1] == Xblank) Cave[y][x+1] = Yacid_splash_eB;
- if(Cave[y][x-1] == Xblank) Cave[y][x-1] = Yacid_splash_wB;
- Next[y][x] = Xblank;
- PLAY(SAMPLE_acid);
- goto loop;
- case Xblank:
- case Yacid_splash_eB:
- case Yacid_splash_wB:
- Cave[y][x] = Yemerald_sB;
- Cave[y+1][x] = Yemerald_s;
- Next[y][x] = Xblank;
- Next[y+1][x] = Xemerald_fall;
- goto loop;
- case Xspring:
- case Xspring_pause:
- case Xspring_e:
- case Xspring_w:
- case Xandroid:
- case Xandroid_1_n:
- case Xandroid_2_n:
- case Xandroid_1_e:
- case Xandroid_2_e:
- case Xandroid_1_s:
- case Xandroid_2_s:
- case Xandroid_1_w:
- case Xandroid_2_w:
- case Xstone:
- case Xstone_pause:
- case Xemerald:
- case Xemerald_pause:
- case Xdiamond:
- case Xdiamond_pause:
- case Xbomb:
- case Xbomb_pause:
- case Xballoon:
- case Xacid_ne:
- case Xacid_nw:
- case Xball_1:
- case Xball_2:
- case Xnut:
- case Xnut_pause:
- case Xgrow_ns:
- case Xgrow_ew:
- case Xwonderwall:
- case Xkey_1:
- case Xkey_2:
- case Xkey_3:
- case Xkey_4:
- case Xkey_5:
- case Xkey_6:
- case Xkey_7:
- case Xkey_8:
- case Xbumper:
- case Xswitch:
- case Xsteel_1:
- case Xsteel_2:
- case Xsteel_3:
- case Xsteel_4:
- case Xwall_1:
- case Xwall_2:
- case Xwall_3:
- case Xwall_4:
- case Xround_wall_1:
- case Xround_wall_2:
- case Xround_wall_3:
- case Xround_wall_4:
- if(RANDOM & 1) {
- if(tab_blank[Cave[y][x+1]] && tab_acid[Cave[y+1][x+1]]) {
- Cave[y][x] = Yemerald_eB;
- Cave[y][x+1] = Yemerald_e;
- Next[y][x] = Xblank;
- Next[y][x+1] = Xemerald_pause;
- goto loop;
- }
- if(tab_blank[Cave[y][x-1]] && tab_acid[Cave[y+1][x-1]]) {
- Cave[y][x] = Yemerald_wB;
- Cave[y][x-1] = Yemerald_w;
- Next[y][x] = Xblank;
- Next[y][x-1] = Xemerald_pause;
- goto loop;
- }
- } else {
- if(tab_blank[Cave[y][x-1]] && tab_acid[Cave[y+1][x-1]]) {
- Cave[y][x] = Yemerald_wB;
- Cave[y][x-1] = Yemerald_w;
- Next[y][x] = Xblank;
- Next[y][x-1] = Xemerald_pause;
- goto loop;
- }
- if(tab_blank[Cave[y][x+1]] && tab_acid[Cave[y+1][x+1]]) {
- Cave[y][x] = Yemerald_eB;
- Cave[y][x+1] = Yemerald_e;
- Next[y][x] = Xblank;
- Next[y][x+1] = Xemerald_pause;
- goto loop;
- }
- }
- default:
- if(++lev.shine_cnt > 50) {
- lev.shine_cnt = RANDOM & 7;
- Cave[y][x] = Xemerald_shine;
- }
- goto loop;
- }
-/* ---------------------------------------------------------------------- */
- case Xemerald_pause:
- switch(Cave[y+1][x]) {
- case Xacid_1:
- case Xacid_2:
- case Xacid_3:
- case Xacid_4:
- case Xacid_5:
- case Xacid_6:
- case Xacid_7:
- case Xacid_8:
- Cave[y][x] = Yemerald_sB;
- if(Cave[y][x+1] == Xblank) Cave[y][x+1] = Yacid_splash_eB;
- if(Cave[y][x-1] == Xblank) Cave[y][x-1] = Yacid_splash_wB;
- Next[y][x] = Xblank;
- PLAY(SAMPLE_acid);
- goto loop;
- case Xblank:
- case Yacid_splash_eB:
- case Yacid_splash_wB:
- Cave[y][x] = Yemerald_sB;
- Cave[y+1][x] = Yemerald_s;
- Next[y][x] = Xblank;
- Next[y+1][x] = Xemerald_fall;
- goto loop;
- default:
- Cave[y][x] = Xemerald;
- Next[y][x] = Xemerald;
- goto loop;
- }
-/* ---------------------------------------------------------------------- */
- case Xemerald_fall:
- switch(Cave[y+1][x]) {
- case Xacid_1:
- case Xacid_2:
- case Xacid_3:
- case Xacid_4:
- case Xacid_5:
- case Xacid_6:
- case Xacid_7:
- case Xacid_8:
- Cave[y][x] = Yemerald_sB;
- if(Cave[y][x+1] == Xblank) Cave[y][x+1] = Yacid_splash_eB;
- if(Cave[y][x-1] == Xblank) Cave[y][x-1] = Yacid_splash_wB;
- Next[y][x] = Xblank;
- PLAY(SAMPLE_acid);
- goto loop;
- case Xblank:
- case Yacid_splash_eB:
- case Yacid_splash_wB:
- case Zplayer:
- Cave[y][x] = Yemerald_sB;
- Cave[y+1][x] = Yemerald_s;
- Next[y][x] = Xblank;
- Next[y+1][x] = Xemerald_fall;
- goto loop;
- case Xwonderwall:
- if(lev.wonderwall_time) {
- lev.wonderwall_state = 1;
- Cave[y][x] = Yemerald_sB;
- if(tab_blank[Cave[y+2][x]]) {
- Cave[y+2][x] = Ydiamond_s;
- Next[y+2][x] = Xdiamond_fall;
- }
- Next[y][x] = Xblank;
- play[SAMPLE_squash] = 1;
- goto loop;
- }
- default:
- Cave[y][x] = Xemerald;
- Next[y][x] = Xemerald;
- PLAY(SAMPLE_diamond);
- goto loop;
- }
-/* ---------------------------------------------------------------------- */
- case Xdiamond:
- switch(Cave[y+1][x]) {
- case Xacid_1:
- case Xacid_2:
- case Xacid_3:
- case Xacid_4:
- case Xacid_5:
- case Xacid_6:
- case Xacid_7:
- case Xacid_8:
- Cave[y][x] = Ydiamond_sB;
- if(Cave[y][x+1] == Xblank) Cave[y][x+1] = Yacid_splash_eB;
- if(Cave[y][x-1] == Xblank) Cave[y][x-1] = Yacid_splash_wB;
- Next[y][x] = Xblank;
- PLAY(SAMPLE_acid);
- goto loop;
- case Xblank:
- case Yacid_splash_eB:
- case Yacid_splash_wB:
- Cave[y][x] = Ydiamond_sB;
- Cave[y+1][x] = Ydiamond_s;
- Next[y][x] = Xblank;
- Next[y+1][x] = Xdiamond_fall;
- goto loop;
- case Xspring:
- case Xspring_pause:
- case Xspring_e:
- case Xspring_w:
- case Xandroid:
- case Xandroid_1_n:
- case Xandroid_2_n:
- case Xandroid_1_e:
- case Xandroid_2_e:
- case Xandroid_1_s:
- case Xandroid_2_s:
- case Xandroid_1_w:
- case Xandroid_2_w:
- case Xstone:
- case Xstone_pause:
- case Xemerald:
- case Xemerald_pause:
- case Xdiamond:
- case Xdiamond_pause:
- case Xbomb:
- case Xbomb_pause:
- case Xballoon:
- case Xacid_ne:
- case Xacid_nw:
- case Xball_1:
- case Xball_2:
- case Xnut:
- case Xnut_pause:
- case Xgrow_ns:
- case Xgrow_ew:
- case Xwonderwall:
- case Xkey_1:
- case Xkey_2:
- case Xkey_3:
- case Xkey_4:
- case Xkey_5:
- case Xkey_6:
- case Xkey_7:
- case Xkey_8:
- case Xbumper:
- case Xswitch:
- case Xsteel_1:
- case Xsteel_2:
- case Xsteel_3:
- case Xsteel_4:
- case Xwall_1:
- case Xwall_2:
- case Xwall_3:
- case Xwall_4:
- case Xround_wall_1:
- case Xround_wall_2:
- case Xround_wall_3:
- case Xround_wall_4:
- if(RANDOM & 1) {
- if(tab_blank[Cave[y][x+1]] && tab_acid[Cave[y+1][x+1]]) {
- Cave[y][x] = Ydiamond_eB;
- Cave[y][x+1] = Ydiamond_e;
- Next[y][x] = Xblank;
- Next[y][x+1] = Xdiamond_pause;
- goto loop;
- }
- if(tab_blank[Cave[y][x-1]] && tab_acid[Cave[y+1][x-1]]) {
- Cave[y][x] = Ydiamond_wB;
- Cave[y][x-1] = Ydiamond_w;
- Next[y][x] = Xblank;
- Next[y][x-1] = Xdiamond_pause;
- goto loop;
- }
- } else {
- if(tab_blank[Cave[y][x-1]] && tab_acid[Cave[y+1][x-1]]) {
- Cave[y][x] = Ydiamond_wB;
- Cave[y][x-1] = Ydiamond_w;
- Next[y][x] = Xblank;
- Next[y][x-1] = Xdiamond_pause;
- goto loop;
- }
- if(tab_blank[Cave[y][x+1]] && tab_acid[Cave[y+1][x+1]]) {
- Cave[y][x] = Ydiamond_eB;
- Cave[y][x+1] = Ydiamond_e;
- Next[y][x] = Xblank;
- Next[y][x+1] = Xdiamond_pause;
- goto loop;
- }
- }
- default:
- if(++lev.shine_cnt > 50) {
- lev.shine_cnt = RANDOM & 7;
- Cave[y][x] = Xdiamond_shine;
- }
- goto loop;
- }
-/* ---------------------------------------------------------------------- */
- case Xdiamond_pause:
- switch(Cave[y+1][x]) {
- case Xacid_1:
- case Xacid_2:
- case Xacid_3:
- case Xacid_4:
- case Xacid_5:
- case Xacid_6:
- case Xacid_7:
- case Xacid_8:
- Cave[y][x] = Ydiamond_sB;
- if(Cave[y][x+1] == Xblank) Cave[y][x+1] = Yacid_splash_eB;
- if(Cave[y][x-1] == Xblank) Cave[y][x-1] = Yacid_splash_wB;
- Next[y][x] = Xblank;
- PLAY(SAMPLE_acid);
- goto loop;
- case Xblank:
- case Yacid_splash_eB:
- case Yacid_splash_wB:
- Cave[y][x] = Ydiamond_sB;
- Cave[y+1][x] = Ydiamond_s;
- Next[y][x] = Xblank;
- Next[y+1][x] = Xdiamond_fall;
- goto loop;
- default:
- Cave[y][x] = Xdiamond;
- Next[y][x] = Xdiamond;
- goto loop;
- }
-/* ---------------------------------------------------------------------- */
- case Xdiamond_fall:
- switch(Cave[y+1][x]) {
- case Xacid_1:
- case Xacid_2:
- case Xacid_3:
- case Xacid_4:
- case Xacid_5:
- case Xacid_6:
- case Xacid_7:
- case Xacid_8:
- Cave[y][x] = Ydiamond_sB;
- if(Cave[y][x+1] == Xblank) Cave[y][x+1] = Yacid_splash_eB;
- if(Cave[y][x-1] == Xblank) Cave[y][x-1] = Yacid_splash_wB;
- Next[y][x] = Xblank;
- PLAY(SAMPLE_acid);
- goto loop;
- case Xblank:
- case Yacid_splash_eB:
- case Yacid_splash_wB:
- case Zplayer:
- Cave[y][x] = Ydiamond_sB;
- Cave[y+1][x] = Ydiamond_s;
- Next[y][x] = Xblank;
- Next[y+1][x] = Xdiamond_fall;
- goto loop;
- case Xwonderwall:
- if(lev.wonderwall_time) {
- lev.wonderwall_state = 1;
- Cave[y][x] = Ydiamond_sB;
- if(tab_blank[Cave[y+2][x]]) {
- Cave[y+2][x] = Ystone_s;
- Next[y+2][x] = Xstone_fall;
- }
- Next[y][x] = Xblank;
- play[SAMPLE_squash] = 1;
- goto loop;
- }
- default:
- Cave[y][x] = Xdiamond;
- Next[y][x] = Xdiamond;
- PLAY(SAMPLE_diamond);
- goto loop;
- }
-/* ---------------------------------------------------------------------- */
- case Xdrip_fall:
- switch(Cave[y+1][x]) {
- case Xacid_1:
- case Xacid_2:
- case Xacid_3:
- case Xacid_4:
- case Xacid_5:
- case Xacid_6:
- case Xacid_7:
- case Xacid_8:
- Cave[y][x] = Ydrip_s1B;
- if(Cave[y][x+1] == Xblank) Cave[y][x+1] = Yacid_splash_eB;
- if(Cave[y][x-1] == Xblank) Cave[y][x-1] = Yacid_splash_wB;
- Next[y][x] = Xdrip_stretchB;
- PLAY(SAMPLE_acid);
- goto loop;
- case Xblank:
- case Yacid_splash_eB:
- case Yacid_splash_wB:
- case Xplant:
- case Yplant:
- case Zplayer:
- Cave[y][x] = Ydrip_s1B;
- Cave[y+1][x] = Ydrip_s1;
- Next[y][x] = Xdrip_stretchB;
- Next[y+1][x] = Xdrip_stretch;
- goto loop;
- default:
- switch(RANDOM & 7) {
- case 0: temp = Xameuba_1; break;
- case 1: temp = Xameuba_2; break;
- case 2: temp = Xameuba_3; break;
- case 3: temp = Xameuba_4; break;
- case 4: temp = Xameuba_5; break;
- case 5: temp = Xameuba_6; break;
- case 6: temp = Xameuba_7; break;
- case 7: temp = Xameuba_8; break;
- }
- Cave[y][x] = temp;
- Next[y][x] = temp;
- play[SAMPLE_drip] = 1;
- goto loop;
- }
-/* ---------------------------------------------------------------------- */
- case Xdrip_stretch:
- Cave[y][x] = Ydrip_s2;
- Next[y][x] = Xdrip_fall;
- goto loop;
- case Xdrip_stretchB:
- Cave[y][x] = Ydrip_s2B;
- Next[y][x] = Xblank;
- goto loop;
- case Xdrip_eat:
- Next[y][x] = Xdrip_fall;
- goto loop;
-/* ---------------------------------------------------------------------- */
- case Xbomb:
- switch(Cave[y+1][x]) {
- case Xacid_1:
- case Xacid_2:
- case Xacid_3:
- case Xacid_4:
- case Xacid_5:
- case Xacid_6:
- case Xacid_7:
- case Xacid_8:
- Cave[y][x] = Ybomb_sB;
- if(Cave[y][x+1] == Xblank) Cave[y][x+1] = Yacid_splash_eB;
- if(Cave[y][x-1] == Xblank) Cave[y][x-1] = Yacid_splash_wB;
- Next[y][x] = Xblank;
- PLAY(SAMPLE_acid);
- goto loop;
- case Xblank:
- case Yacid_splash_eB:
- case Yacid_splash_wB:
- Cave[y][x] = Ybomb_sB;
- Cave[y+1][x] = Ybomb_s;
- Next[y][x] = Xblank;
- Next[y+1][x] = Xbomb_fall;
- goto loop;
- case Xspring:
- case Xspring_pause:
- case Xspring_e:
- case Xspring_w:
- case Xandroid:
- case Xandroid_1_n:
- case Xandroid_2_n:
- case Xandroid_1_e:
- case Xandroid_2_e:
- case Xandroid_1_s:
- case Xandroid_2_s:
- case Xandroid_1_w:
- case Xandroid_2_w:
- case Xstone:
- case Xstone_pause:
- case Xemerald:
- case Xemerald_pause:
- case Xdiamond:
- case Xdiamond_pause:
- case Xbomb:
- case Xbomb_pause:
- case Xballoon:
- case Xacid_ne:
- case Xacid_nw:
- case Xball_1:
- case Xball_2:
- case Xnut:
- case Xnut_pause:
- case Xgrow_ns:
- case Xgrow_ew:
- case Xkey_1:
- case Xkey_2:
- case Xkey_3:
- case Xkey_4:
- case Xkey_5:
- case Xkey_6:
- case Xkey_7:
- case Xkey_8:
- case Xbumper:
- case Xswitch:
- case Xround_wall_1:
- case Xround_wall_2:
- case Xround_wall_3:
- case Xround_wall_4:
- if(RANDOM & 1) {
- if(tab_blank[Cave[y][x+1]] && tab_acid[Cave[y+1][x+1]]) {
- Cave[y][x] = Ybomb_eB;
- Cave[y][x+1] = Ybomb_e;
- Next[y][x] = Xblank;
- Next[y][x+1] = Xbomb_pause;
- goto loop;
- }
- if(tab_blank[Cave[y][x-1]] && tab_acid[Cave[y+1][x-1]]) {
- Cave[y][x] = Ybomb_wB;
- Cave[y][x-1] = Ybomb_w;
- Next[y][x] = Xblank;
- Next[y][x-1] = Xbomb_pause;
- goto loop;
- }
- } else {
- if(tab_blank[Cave[y][x-1]] && tab_acid[Cave[y+1][x-1]]) {
- Cave[y][x] = Ybomb_wB;
- Cave[y][x-1] = Ybomb_w;
- Next[y][x] = Xblank;
- Next[y][x-1] = Xbomb_pause;
- goto loop;
- }
- if(tab_blank[Cave[y][x+1]] && tab_acid[Cave[y+1][x+1]]) {
- Cave[y][x] = Ybomb_eB;
- Cave[y][x+1] = Ybomb_e;
- Next[y][x] = Xblank;
- Next[y][x+1] = Xbomb_pause;
- goto loop;
- }
- }
- default:
- goto loop;
- }
-/* ---------------------------------------------------------------------- */
- case Xbomb_pause:
- switch(Cave[y+1][x]) {
- case Xacid_1:
- case Xacid_2:
- case Xacid_3:
- case Xacid_4:
- case Xacid_5:
- case Xacid_6:
- case Xacid_7:
- case Xacid_8:
- Cave[y][x] = Ybomb_sB;
- if(Cave[y][x+1] == Xblank) Cave[y][x+1] = Yacid_splash_eB;
- if(Cave[y][x-1] == Xblank) Cave[y][x-1] = Yacid_splash_wB;
- Next[y][x] = Xblank;
- PLAY(SAMPLE_acid);
- goto loop;
- case Xblank:
- case Yacid_splash_eB:
- case Yacid_splash_wB:
- Cave[y][x] = Ybomb_sB;
- Cave[y+1][x] = Ybomb_s;
- Next[y][x] = Xblank;
- Next[y+1][x] = Xbomb_fall;
- goto loop;
- default:
- Cave[y][x] = Xbomb;
- Next[y][x] = Xbomb;
- goto loop;
- }
-/* ---------------------------------------------------------------------- */
- case Xbomb_fall:
- switch(Cave[y+1][x]) {
- case Xacid_1:
- case Xacid_2:
- case Xacid_3:
- case Xacid_4:
- case Xacid_5:
- case Xacid_6:
- case Xacid_7:
- case Xacid_8:
- Cave[y][x] = Ybomb_sB;
- if(Cave[y][x+1] == Xblank) Cave[y][x+1] = Yacid_splash_eB;
- if(Cave[y][x-1] == Xblank) Cave[y][x-1] = Yacid_splash_wB;
- Next[y][x] = Xblank;
- PLAY(SAMPLE_acid);
- goto loop;
- case Xblank:
- case Yacid_splash_eB:
- case Yacid_splash_wB:
- Cave[y][x] = Ybomb_sB;
- Cave[y+1][x] = Ybomb_s;
- Next[y][x] = Xblank;
- Next[y+1][x] = Xbomb_fall;
- goto loop;
- default:
- Cave[y][x] = Ybomb_eat;
- Next[y][x] = Znormal;
- Boom[y-1][x-1] = Xblank;
- Boom[y-1][x] = Xblank;
- Boom[y-1][x+1] = Xblank;
- Boom[y][x-1] = Xblank;
- Boom[y][x] = Xblank;
- Boom[y][x+1] = Xblank;
- Boom[y+1][x-1] = Xblank;
- Boom[y+1][x] = Xblank;
- Boom[y+1][x+1] = Xblank;
- goto loop;
- }
-/* ---------------------------------------------------------------------- */
- case Xballoon:
- if(lev.wind_cnt == 0) goto loop;
- switch(lev.wind_direction) {
- case 0: /* north */
- switch(Cave[y-1][x]) {
- case Xacid_1:
- case Xacid_2:
- case Xacid_3:
- case Xacid_4:
- case Xacid_5:
- case Xacid_6:
- case Xacid_7:
- case Xacid_8:
- Cave[y][x] = Yballoon_nB;
- if(Cave[y-2][x+1] == Xblank) Cave[y-2][x+1] = Yacid_splash_eB;
- if(Cave[y-2][x-1] == Xblank) Cave[y-2][x-1] = Yacid_splash_wB;
- Next[y][x] = Xblank;
- PLAY(SAMPLE_acid);
- goto loop;
- case Xblank:
- case Yacid_splash_eB:
- case Yacid_splash_wB:
- Cave[y][x] = Yballoon_nB;
- Cave[y-1][x] = Yballoon_n;
- Next[y][x] = Xblank;
- Next[y-1][x] = Xballoon;
- goto loop;
- default:
- goto loop;
- }
- case 1: /* east */
- switch(Cave[y][x+1]) {
- case Xacid_1:
- case Xacid_2:
- case Xacid_3:
- case Xacid_4:
- case Xacid_5:
- case Xacid_6:
- case Xacid_7:
- case Xacid_8:
- Cave[y][x] = Yballoon_eB;
- if(Cave[y-1][x+2] == Xblank) Cave[y-1][x+2] = Yacid_splash_eB;
- if(Cave[y-1][x] == Xblank) Cave[y-1][x] = Yacid_splash_wB;
- Next[y][x] = Xblank;
- PLAY(SAMPLE_acid);
- goto loop;
- case Xblank:
- case Yacid_splash_eB:
- case Yacid_splash_wB:
- Cave[y][x] = Yballoon_eB;
- Cave[y][x+1] = Yballoon_e;
- Next[y][x] = Xblank;
- Next[y][x+1] = Xballoon;
- goto loop;
- default:
- goto loop;
- }
- case 2: /* south */
- switch(Cave[y+1][x]) {
- case Xacid_1:
- case Xacid_2:
- case Xacid_3:
- case Xacid_4:
- case Xacid_5:
- case Xacid_6:
- case Xacid_7:
- case Xacid_8:
- Cave[y][x] = Yballoon_sB;
- if(Cave[y][x+1] == Xblank) Cave[y][x+1] = Yacid_splash_eB;
- if(Cave[y][x-1] == Xblank) Cave[y][x-1] = Yacid_splash_wB;
- Next[y][x] = Xblank;
- PLAY(SAMPLE_acid);
- goto loop;
- case Xblank:
- case Yacid_splash_eB:
- case Yacid_splash_wB:
- Cave[y][x] = Yballoon_sB;
- Cave[y+1][x] = Yballoon_s;
- Next[y][x] = Xblank;
- Next[y+1][x] = Xballoon;
- goto loop;
- default:
- goto loop;
- }
- case 3: /* west */
- switch(Cave[y][x-1]) {
- case Xacid_1:
- case Xacid_2:
- case Xacid_3:
- case Xacid_4:
- case Xacid_5:
- case Xacid_6:
- case Xacid_7:
- case Xacid_8:
- Cave[y][x] = Yballoon_wB;
- if(Cave[y-1][x] == Xblank) Cave[y-1][x] = Yacid_splash_eB;
- if(Cave[y-1][x-2] == Xblank) Cave[y-1][x-2] = Yacid_splash_wB;
- Next[y][x] = Xblank;
- PLAY(SAMPLE_acid);
- goto loop;
- case Xblank:
- case Yacid_splash_eB:
- case Yacid_splash_wB:
- Cave[y][x] = Yballoon_wB;
- Cave[y][x-1] = Yballoon_w;
- Next[y][x] = Xblank;
- Next[y][x-1] = Xballoon;
- goto loop;
- default:
- goto loop;
- }
- }
-/* ---------------------------------------------------------------------- */
- case Xacid_1:
- Next[y][x] = Xacid_2;
- goto loop;
- case Xacid_2:
- Next[y][x] = Xacid_3;
- goto loop;
- case Xacid_3:
- Next[y][x] = Xacid_4;
- goto loop;
- case Xacid_4:
- Next[y][x] = Xacid_5;
- goto loop;
- case Xacid_5:
- Next[y][x] = Xacid_6;
- goto loop;
- case Xacid_6:
- Next[y][x] = Xacid_7;
- goto loop;
- case Xacid_7:
- Next[y][x] = Xacid_8;
- goto loop;
- case Xacid_8:
- Next[y][x] = Xacid_1;
- goto loop;
-/* ---------------------------------------------------------------------- */
- case Xball_1:
- if(lev.ball_state == 0) goto loop;
- Cave[y][x] = Xball_1B;
- Next[y][x] = Xball_2;
- if(lev.ball_cnt) goto loop;
- goto ball_common;
- case Xball_2:
- if(lev.ball_state == 0) goto loop;
- Cave[y][x] = Xball_2B;
- Next[y][x] = Xball_1;
- if(lev.ball_cnt) goto loop;
- goto ball_common;
- ball_common:
- play[SAMPLE_ball] = 1;
- if(lev.ball_random) {
- switch(RANDOM & 7) {
- case 0:
- if(lev.ball_array[lev.ball_pos][0] != Xblank && tab_blank[Cave[y-1][x-1]]) {
- Cave[y-1][x-1] = Yball_eat;
- Next[y-1][x-1] = lev.ball_array[lev.ball_pos][0];
- }
- break;
- case 1:
- if(lev.ball_array[lev.ball_pos][1] != Xblank && tab_blank[Cave[y-1][x]]) {
- Cave[y-1][x] = Yball_eat;
- Next[y-1][x] = lev.ball_array[lev.ball_pos][1];
- }
- break;
- case 2:
- if(lev.ball_array[lev.ball_pos][2] != Xblank && tab_blank[Cave[y-1][x+1]]) {
- Cave[y-1][x+1] = Yball_eat;
- Next[y-1][x+1] = lev.ball_array[lev.ball_pos][2];
- }
- break;
- case 3:
- if(lev.ball_array[lev.ball_pos][3] != Xblank && tab_blank[Cave[y][x-1]]) {
- Cave[y][x-1] = Yball_eat;
- Next[y][x-1] = lev.ball_array[lev.ball_pos][3];
- }
- break;
- case 4:
- if(lev.ball_array[lev.ball_pos][4] != Xblank && tab_blank[Cave[y][x+1]]) {
- Cave[y][x+1] = Yball_eat;
- Next[y][x+1] = lev.ball_array[lev.ball_pos][4];
- }
- break;
- case 5:
- if(lev.ball_array[lev.ball_pos][5] != Xblank && tab_blank[Cave[y+1][x-1]]) {
- Cave[y+1][x-1] = Yball_eat;
- Next[y+1][x-1] = lev.ball_array[lev.ball_pos][5];
- }
- break;
- case 6:
- if(lev.ball_array[lev.ball_pos][6] != Xblank && tab_blank[Cave[y+1][x]]) {
- Cave[y+1][x] = Yball_eat;
- Next[y+1][x] = lev.ball_array[lev.ball_pos][6];
- }
- break;
- case 7:
- if(lev.ball_array[lev.ball_pos][7] != Xblank && tab_blank[Cave[y+1][x+1]]) {
- Cave[y+1][x+1] = Yball_eat;
- Next[y+1][x+1] = lev.ball_array[lev.ball_pos][7];
- }
- break;
- }
- } else {
- if(lev.ball_array[lev.ball_pos][0] != Xblank && tab_blank[Cave[y-1][x-1]]) {
- Cave[y-1][x-1] = Yball_eat;
- Next[y-1][x-1] = lev.ball_array[lev.ball_pos][0];
- }
- if(lev.ball_array[lev.ball_pos][1] != Xblank && tab_blank[Cave[y-1][x]]) {
- Cave[y-1][x] = Yball_eat;
- Next[y-1][x] = lev.ball_array[lev.ball_pos][1];
- }
- if(lev.ball_array[lev.ball_pos][2] != Xblank && tab_blank[Cave[y-1][x+1]]) {
- Cave[y-1][x+1] = Yball_eat;
- Next[y-1][x+1] = lev.ball_array[lev.ball_pos][2];
- }
- if(lev.ball_array[lev.ball_pos][3] != Xblank && tab_blank[Cave[y][x-1]]) {
- Cave[y][x-1] = Yball_eat;
- Next[y][x-1] = lev.ball_array[lev.ball_pos][3];
- }
- if(lev.ball_array[lev.ball_pos][4] != Xblank && tab_blank[Cave[y][x+1]]) {
- Cave[y][x+1] = Yball_eat;
- Next[y][x+1] = lev.ball_array[lev.ball_pos][4];
- }
- if(lev.ball_array[lev.ball_pos][5] != Xblank && tab_blank[Cave[y+1][x-1]]) {
- Cave[y+1][x-1] = Yball_eat;
- Next[y+1][x-1] = lev.ball_array[lev.ball_pos][5];
- }
- if(lev.ball_array[lev.ball_pos][6] != Xblank && tab_blank[Cave[y+1][x]]) {
- Cave[y+1][x] = Yball_eat;
- Next[y+1][x] = lev.ball_array[lev.ball_pos][6];
- }
- if(lev.ball_array[lev.ball_pos][7] != Xblank && tab_blank[Cave[y+1][x+1]]) {
- Cave[y+1][x+1] = Yball_eat;
- Next[y+1][x+1] = lev.ball_array[lev.ball_pos][7];
- }
- }
- lev.ball_pos = (lev.ball_pos + 1) & 7;
- goto loop;
-/* ---------------------------------------------------------------------- */
- case Xgrow_ns:
- if(tab_blank[Cave[y-1][x]]) {
- Cave[y-1][x] = Ygrow_ns_eat;
- Next[y-1][x] = Xgrow_ns;
- play[SAMPLE_grow] = 1;
- }
- if(tab_blank[Cave[y+1][x]]) {
- Cave[y+1][x] = Ygrow_ns_eat;
- Next[y+1][x] = Xgrow_ns;
- play[SAMPLE_grow] = 1;
- }
- goto loop;
- case Xgrow_ew:
- if(tab_blank[Cave[y][x+1]]) {
- Cave[y][x+1] = Ygrow_ew_eat;
- Next[y][x+1] = Xgrow_ew;
- play[SAMPLE_grow] = 1;
- }
- if(tab_blank[Cave[y][x-1]]) {
- Cave[y][x-1] = Ygrow_ew_eat;
- Next[y][x-1] = Xgrow_ew;
- play[SAMPLE_grow] = 1;
- }
- goto loop;
-/* ---------------------------------------------------------------------- */
- case Xwonderwall:
- if(lev.wonderwall_time && lev.wonderwall_state) {
- Cave[y][x] = XwonderwallB;
- play[SAMPLE_wonder] = 1;
- }
- goto loop;
-/* ---------------------------------------------------------------------- */
- case Xexit:
- if(lev.required > 0) goto loop;
- temp = RANDOM & 63;
- if(temp < 21) {
- Cave[y][x] = Xexit_1;
- Next[y][x] = Xexit_2;
- } else if(temp < 42) {
- Cave[y][x] = Xexit_2;
- Next[y][x] = Xexit_3;
- } else {
- Cave[y][x] = Xexit_3;
- Next[y][x] = Xexit_1;
- }
- goto loop;
- case Xexit_1:
- Next[y][x] = Xexit_2;
- goto loop;
- case Xexit_2:
- Next[y][x] = Xexit_3;
- goto loop;
- case Xexit_3:
- Next[y][x] = Xexit_1;
- goto loop;
-/* ---------------------------------------------------------------------- */
- case Xdynamite_1:
- play[SAMPLE_tick] = 1;
- Next[y][x] = Xdynamite_2;
- goto loop;
- case Xdynamite_2:
- play[SAMPLE_tick] = 1;
- Next[y][x] = Xdynamite_3;
- goto loop;
- case Xdynamite_3:
- play[SAMPLE_tick] = 1;
- Next[y][x] = Xdynamite_4;
- goto loop;
- case Xdynamite_4:
- play[SAMPLE_tick] = 1;
- Next[y][x] = Zdynamite;
- Boom[y-1][x-1] = Xblank;
- Boom[y-1][x] = Xblank;
- Boom[y-1][x+1] = Xblank;
- Boom[y][x-1] = Xblank;
- Boom[y][x] = Xblank;
- Boom[y][x+1] = Xblank;
- Boom[y+1][x-1] = Xblank;
- Boom[y+1][x] = Xblank;
- Boom[y+1][x+1] = Xblank;
- goto loop;
-/* ---------------------------------------------------------------------- */
- case Xwheel:
- if(lev.wheel_cnt && x == lev.wheel_x && y == lev.wheel_y) Cave[y][x] = XwheelB;
- goto loop;
-/* ---------------------------------------------------------------------- */
- case Xswitch:
- if(lev.ball_state) Cave[y][x] = XswitchB;
- goto loop;
-/* ---------------------------------------------------------------------- */
- case Xsand_stone:
- switch(Cave[y+1][x]) {
- case Xacid_1:
- case Xacid_2:
- case Xacid_3:
- case Xacid_4:
- case Xacid_5:
- case Xacid_6:
- case Xacid_7:
- case Xacid_8:
- Cave[y][x] = Xsand_stonesand_3;
- if(Cave[y][x+1] == Xblank) Cave[y][x+1] = Yacid_splash_eB;
- if(Cave[y][x-1] == Xblank) Cave[y][x-1] = Yacid_splash_wB;
- Next[y][x] = Xsand_stonesand_4;
- PLAY(SAMPLE_acid);
- goto loop;
- case Xblank:
- case Yacid_splash_eB:
- case Yacid_splash_wB:
- Cave[y][x] = Xsand_stonesand_3;
- Cave[y+1][x] = Xsand_stoneout_1;
- Next[y][x] = Xsand_stonesand_4;
- Next[y+1][x] = Xsand_stoneout_2;
- goto loop;
- case Xsand:
- Cave[y][x] = Xsand_stonesand_1;
- Cave[y+1][x] = Xsand_sandstone_1;
- Next[y][x] = Xsand_stonesand_2;
- Next[y+1][x] = Xsand_sandstone_2;
- goto loop;
- default:
- goto loop;
- }
- case Xsand_stonein_1:
- Next[y][x] = Xsand_stonein_2;
- goto loop;
- case Xsand_stonein_2:
- Next[y][x] = Xsand_stonein_3;
- goto loop;
- case Xsand_stonein_3:
- Next[y][x] = Xsand_stonein_4;
- goto loop;
- case Xsand_stonein_4:
- Next[y][x] = Xblank;
- goto loop;
- case Xsand_stonesand_1:
- Next[y][x] = Xsand_stonesand_2;
- goto loop;
- case Xsand_stonesand_2:
- Next[y][x] = Xsand_stonesand_3;
- goto loop;
- case Xsand_stonesand_3:
- Next[y][x] = Xsand_stonesand_4;
- goto loop;
- case Xsand_stonesand_4:
- Next[y][x] = Xsand;
- goto loop;
- case Xsand_stoneout_1:
- Next[y][x] = Xsand_stoneout_2;
- goto loop;
- case Xsand_stoneout_2:
- Next[y][x] = Xstone_fall;
- goto loop;
- case Xsand_sandstone_1:
- Next[y][x] = Xsand_sandstone_2;
- goto loop;
- case Xsand_sandstone_2:
- Next[y][x] = Xsand_sandstone_3;
- goto loop;
- case Xsand_sandstone_3:
- Next[y][x] = Xsand_sandstone_4;
- goto loop;
- case Xsand_sandstone_4:
- Next[y][x] = Xsand_stone;
- goto loop;
-/* ---------------------------------------------------------------------- */
- case Xdripper:
- if(lev.lenses_cnt) Cave[y][x] = XdripperB;
- goto loop;
-/* ---------------------------------------------------------------------- */
- case Xfake_blank:
- if(lev.lenses_cnt) Cave[y][x] = Xfake_blankB;
- goto loop;
-/* ---------------------------------------------------------------------- */
- case Xfake_grass:
- if(lev.magnify_cnt) Cave[y][x] = Xfake_grassB;
- goto loop;
-/* ---------------------------------------------------------------------- */
- case Xfake_door_1:
- if(lev.magnify_cnt) Cave[y][x] = Xdoor_1;
- goto loop;
- case Xfake_door_2:
- if(lev.magnify_cnt) Cave[y][x] = Xdoor_2;
- goto loop;
- case Xfake_door_3:
- if(lev.magnify_cnt) Cave[y][x] = Xdoor_3;
- goto loop;
- case Xfake_door_4:
- if(lev.magnify_cnt) Cave[y][x] = Xdoor_4;
- goto loop;
- case Xfake_door_5:
- if(lev.magnify_cnt) Cave[y][x] = Xdoor_5;
- goto loop;
- case Xfake_door_6:
- if(lev.magnify_cnt) Cave[y][x] = Xdoor_6;
- goto loop;
- case Xfake_door_7:
- if(lev.magnify_cnt) Cave[y][x] = Xdoor_7;
- goto loop;
- case Xfake_door_8:
- if(lev.magnify_cnt) Cave[y][x] = Xdoor_8;
- goto loop;
-/* ---------------------------------------------------------------------- */
- case Xboom_bug:
- bug_boom:
- Next[y][x] = Znormal;
- Boom[y-1][x-1] = Xemerald;
- Boom[y-1][x] = Xemerald;
- Boom[y-1][x+1] = Xemerald;
- Boom[y][x-1] = Xemerald;
- Boom[y][x] = Xdiamond;
- Boom[y][x+1] = Xemerald;
- Boom[y+1][x-1] = Xemerald;
- Boom[y+1][x] = Xemerald;
- Boom[y+1][x+1] = Xemerald;
- goto loop;
- case Xboom_bomb:
- tank_boom:
- Next[y][x] = Znormal;
- Boom[y-1][x-1] = Xblank;
- Boom[y-1][x] = Xblank;
- Boom[y-1][x+1] = Xblank;
- Boom[y][x-1] = Xblank;
- Boom[y][x] = Xblank;
- Boom[y][x+1] = Xblank;
- Boom[y+1][x-1] = Xblank;
- Boom[y+1][x] = Xblank;
- Boom[y+1][x+1] = Xblank;
- goto loop;
- case Xboom_android:
- case Xboom_1:
- Next[y][x] = Xboom_2;
- play[SAMPLE_boom] = 1;
- goto loop;
- case Xboom_2:
- Next[y][x] = Boom[y][x];
- goto loop;
-/* ---------------------------------------------------------------------- */
- case ZBORDER:
- if(++y < HEIGHT - 1) {
- x = 0;
- cave_cache = Cave[y];
- goto loop;
- }
- goto done;
- }
-
-#undef RANDOM
-#undef PLAY
-#undef PLAY_FORCE
-
-done:
- if(ply1.alive || ply2.alive) lev.score += score; /* only get a score if someone is alive */
- Random = random;
- {
- void *temp = Cave; Cave = Next; Next = Draw; Draw = temp; /* triple buffering */
- }
-}
-
-#endif
+++ /dev/null
-
-#if defined(TARGET_X11)
-
-/* third part of synchro.
- *
- * handle global elements.
- *
- * this should be spread over the frames for reduced cpu load.
- */
-
-#include "tile.h"
-#include "level.h"
-#include "sample.h"
-
-void synchro_3(void)
-{
- register unsigned int x;
- register unsigned int y;
- register unsigned int count;
- register unsigned long random;
-
-/* update variables */
- if(lev.score > 9999) lev.score = 9999;
-
- if(lev.time) lev.time--;
- if(lev.android_move_cnt-- == 0) lev.android_move_cnt = lev.android_move_time;
- if(lev.android_clone_cnt-- == 0) lev.android_clone_cnt = lev.android_clone_time;
- if(lev.ball_state) if(lev.ball_cnt-- == 0) lev.ball_cnt = lev.ball_time;
- if(lev.lenses_cnt) lev.lenses_cnt--;
- if(lev.magnify_cnt) lev.magnify_cnt--;
- if(lev.wheel_cnt) lev.wheel_cnt--;
- if(lev.wind_cnt) lev.wind_cnt--;
- if(lev.wonderwall_time && lev.wonderwall_state) lev.wonderwall_time--;
-
- if(lev.time > 0 && lev.time <= 50 && lev.time % 5 == 0) play[SAMPLE_time] = 1;
- if(lev.wheel_cnt) play[SAMPLE_wheel] = 1;
-
-/* grow ameuba */
- random = Random;
- for(count = lev.ameuba_time; count--;) {
- x = (random >> 10) % (WIDTH - 2);
- y = (random >> 20) % (HEIGHT - 2);
- switch(Cave[y][x]) {
- case Xblank:
- case Yacid_splash_eB:
- case Yacid_splash_wB:
- case Xgrass:
- case Xdirt:
- case Xsand:
- case Xplant:
- case Yplant:
- if(tab_ameuba[Cave[y-1][x]] || tab_ameuba[Cave[y][x+1]] || tab_ameuba[Cave[y+1][x]] || tab_ameuba[Cave[y][x-1]]) Cave[y][x] = Xdrip_eat;
- }
- random = random * 129 + 1;
- }
- Random = random;
-
-/* handle explosions */
- for(y = 1; y < HEIGHT - 1; y++) for(x = 1; x < WIDTH - 1; x++) {
- switch(Cave[y][x]) {
- case Znormal:
- Cave[y][x] = Xboom_1;
- Cave[y-1][x] = tab_explode_normal[Cave[y-1][x]];
- Cave[y][x-1] = tab_explode_normal[Cave[y][x-1]];
- Cave[y][x+1] = tab_explode_normal[Cave[y][x+1]];
- Cave[y+1][x] = tab_explode_normal[Cave[y+1][x]];
- Cave[y-1][x-1] = tab_explode_normal[Cave[y-1][x-1]];
- Cave[y-1][x+1] = tab_explode_normal[Cave[y-1][x+1]];
- Cave[y+1][x-1] = tab_explode_normal[Cave[y+1][x-1]];
- Cave[y+1][x+1] = tab_explode_normal[Cave[y+1][x+1]];
- break;
- case Zdynamite:
- Cave[y][x] = Xboom_1;
- Cave[y-1][x] = tab_explode_dynamite[Cave[y-1][x]];
- Cave[y][x-1] = tab_explode_dynamite[Cave[y][x-1]];
- Cave[y][x+1] = tab_explode_dynamite[Cave[y][x+1]];
- Cave[y+1][x] = tab_explode_dynamite[Cave[y+1][x]];
- Cave[y-1][x-1] = tab_explode_dynamite[Cave[y-1][x-1]];
- Cave[y-1][x+1] = tab_explode_dynamite[Cave[y-1][x+1]];
- Cave[y+1][x-1] = tab_explode_dynamite[Cave[y+1][x-1]];
- Cave[y+1][x+1] = tab_explode_dynamite[Cave[y+1][x+1]];
- break;
- }
- }
-
-/* triple buffering */
- for(y = 0; y < HEIGHT; y++) for(x = 0; x < WIDTH; x++) {
- Next[y][x] = Cave[y][x];
- }
-}
-
-#endif
+++ /dev/null
-
-#if defined(TARGET_X11)
-
-/* 2000-04-19T13:26:05Z
- *
- * construct some tables to be included directly in emerald mine source.
- * i made this because dynamically building the tables every time sucks and i
- * need to be able to easily modify tile.h.
- *
- * this is key data which almost everything depends on.
- *
- * this is supposed to be fairly easy to read and modify. the tab values
- * are still hard coded constants but that should be less of a problem to
- * modify.
- */
-
-#include <stdio.h>
-#include "tile.h"
-
-/* ---------------------------------------------------------------------- */
-
-/* 0=stop 1=blank */
-int tile_blank[] = {
- Xblank, 1,
- Yacid_splash_eB, 1,
- Yacid_splash_wB, 1,
- TILE_MAX
-};
-/* 0=stop 1=acid */
-int tile_acid[] = {
- Xblank, 1,
- Yacid_splash_eB, 1,
- Yacid_splash_wB, 1,
- Xacid_1, 1,
- Xacid_2, 1,
- Xacid_3, 1,
- Xacid_4, 1,
- Xacid_5, 1,
- Xacid_6, 1,
- Xacid_7, 1,
- Xacid_8, 1,
- TILE_MAX
-};
-/* 0=stop 1=ameuba */
-int tile_ameuba[] = {
- Xdripper, 1,
- XdripperB, 1,
- Xameuba_1, 1,
- Xameuba_2, 1,
- Xameuba_3, 1,
- Xameuba_4, 1,
- Xameuba_5, 1,
- Xameuba_6, 1,
- Xameuba_7, 1,
- Xameuba_8, 1,
- TILE_MAX
-};
-/* 0=stop 1=move */
-int tile_android_move[] = {
- Xblank, 1,
- Yacid_splash_eB, 1,
- Yacid_splash_wB, 1,
- Xplant, 1,
- TILE_MAX
-};
-
-/* ---------------------------------------------------------------------- */
-
-/* explosions: special format */
-/* everything is initially filled with Xboom_1 */
-int tile_explode[] = {
- ZBORDER,
- Znormal,
- Zdynamite,
- Xboom_bug,
- Xboom_bomb,
- Xboom_android,
- Xandroid,
- Xandroid_1_n,
- Xandroid_2_n,
- Xandroid_1_e,
- Xandroid_2_e,
- Xandroid_1_s,
- Xandroid_2_s,
- Xandroid_1_w,
- Xandroid_2_w,
- Xacid_ne,
- Xacid_nw,
- Xacid_s,
- Xacid_se,
- Xacid_sw,
- Xacid_1,
- Xacid_2,
- Xacid_3,
- Xacid_4,
- Xacid_5,
- Xacid_6,
- Xacid_7,
- Xacid_8,
- Xdoor_1,
- Xdoor_2,
- Xdoor_3,
- Xdoor_4,
- Xdoor_5,
- Xdoor_6,
- Xdoor_7,
- Xdoor_8,
- Xplant,
- Yplant,
- Xfake_door_1,
- Xfake_door_2,
- Xfake_door_3,
- Xfake_door_4,
- Xfake_door_5,
- Xfake_door_6,
- Xfake_door_7,
- Xfake_door_8,
- Xsteel_1,
- Xsteel_2,
- Xsteel_3,
- Xsteel_4,
- TILE_MAX, /* up till here are indestructable */
- Xbug_n, Xboom_bug,
- Xbug_e, Xboom_bug,
- Xbug_s, Xboom_bug,
- Xbug_w, Xboom_bug,
- Xbug_gon, Xboom_bug,
- Xbug_goe, Xboom_bug,
- Xbug_gos, Xboom_bug,
- Xbug_gow, Xboom_bug,
- Xbomb, Xboom_bomb,
- Xbomb_pause, Xboom_bomb,
- Xbomb_fall, Xboom_bomb,
- TILE_MAX, /* up till here are special explosions */
- Xandroid, Xboom_android,
- Xandroid_1_n, Xboom_android,
- Xandroid_2_n, Xboom_android,
- Xandroid_1_e, Xboom_android,
- Xandroid_2_e, Xboom_android,
- Xandroid_1_s, Xboom_android,
- Xandroid_2_s, Xboom_android,
- Xandroid_1_w, Xboom_android,
- Xandroid_2_w, Xboom_android,
- TILE_MAX /* up until here are dynamite explosions */
-};
-
-/* ---------------------------------------------------------------------- */
-
-/* map the graphics file to internal tiles and animations
- *
- * one graphics icon maps to many tiles and animations
- */
-
-int obj_map[] = {
-
-/* special */
-
-Ystone_sB,7 ,
-Xsand_stonein_4,7 ,
--1,
-Xsand_stonein_4,5 ,
-Xsand_stonein_4,6 ,
--1,
-Ystone_sB,6 ,
-Xsand_stonein_4,3 ,
-Xsand_stonein_4,4 ,
--1,
-Xsand_stonein_4,1 ,
-Xsand_stonein_4,2 ,
--1,
-Ystone_sB,5 ,
-Xsand_stonein_3,7 ,
-Xsand_stonein_4,0 ,
--1,
-Xsand_stonein_3,5 ,
-Xsand_stonein_3,6 ,
--1,
-Ystone_sB,4 ,
-Xsand_stonein_3,3 ,
-Xsand_stonein_3,4 ,
--1,
-Xsand_stonein_3,1 ,
-Xsand_stonein_3,2 ,
--1,
-Ystone_sB,3 ,
-Xsand_stonein_2,7 ,
-Xsand_stonein_3,0 ,
--1,
-Xsand_stonein_2,5 ,
-Xsand_stonein_2,6 ,
--1,
-Ystone_sB,2 ,
-Xsand_stonein_2,3 ,
-Xsand_stonein_2,4 ,
--1,
-Xsand_stonein_2,1 ,
-Xsand_stonein_2,2 ,
--1,
-Ystone_sB,1 ,
-Xsand_stonein_1,7 ,
-Xsand_stonein_2,0 ,
--1,
-Xsand_stonein_1,5 ,
-Xsand_stonein_1,6 ,
--1,
-Ystone_sB,0 ,
-Xsand_stonein_1,3 ,
-Xsand_stonein_1,4 ,
--1,
-Xsand_stonein_1,1 ,
-Xsand_stonein_1,2 ,
--1,
-Xstone,0 ,
-Xstone,1 ,
-Xstone,2 ,
-Xstone,3 ,
-Xstone,4 ,
-Xstone,5 ,
-Xstone,6 ,
-Xstone,7 ,
-Xstone_pause,0 ,
-Xstone_pause,1 ,
-Xstone_pause,2 ,
-Xstone_pause,3 ,
-Xstone_pause,4 ,
-Xstone_pause,5 ,
-Xstone_pause,6 ,
-Xstone_pause,7 ,
-Xstone_fall,0 ,
-Xstone_fall,1 ,
-Xstone_fall,2 ,
-Xstone_fall,3 ,
-Xstone_fall,4 ,
-Xstone_fall,5 ,
-Xstone_fall,6 ,
-Xstone_fall,7 ,
-#ifdef BAD_ROLL
-Xstone_force_e,0 ,
-Xstone_force_e,1 ,
-Xstone_force_e,2 ,
-Xstone_force_e,3 ,
-Xstone_force_e,4 ,
-Xstone_force_e,5 ,
-Xstone_force_e,6 ,
-Xstone_force_e,7 ,
-Xstone_force_w,0 ,
-Xstone_force_w,1 ,
-Xstone_force_w,2 ,
-Xstone_force_w,3 ,
-Xstone_force_w,4 ,
-Xstone_force_w,5 ,
-Xstone_force_w,6 ,
-Xstone_force_w,7 ,
-#endif
-Ystone_s,7 ,
-Xsand_stoneout_2,7 ,
-Xsand_stonein_1,0 ,
-Ystone_e,7 ,
-Ystone_w,7 ,
-Ydiamond_stone,7 ,
--1,
--1,
-Ystone_s,6 ,
-Xsand_stoneout_2,6 ,
--1,
--1,
-Ystone_s,5 ,
-Xsand_stoneout_2,5 ,
--1,
--1,
-Ystone_s,4 ,
-Xsand_stoneout_2,4 ,
--1,
-Xsand_stoneout_2,3 ,
--1,
-Ystone_s,3 ,
-Xsand_stoneout_2,2 ,
--1,
-Xsand_stoneout_2,1 ,
--1,
-Ystone_s,2 ,
-Xsand_stoneout_2,0 ,
--1,
-Xsand_stoneout_1,7 ,
-Xsand_stoneout_1,6 ,
--1,
-Ystone_s,1 ,
-Xsand_stoneout_1,5 ,
--1,
-Xsand_stoneout_1,4 ,
-Xsand_stoneout_1,3 ,
--1,
-Ystone_s,0 ,
-Xsand_stoneout_1,2 ,
--1,
-Xsand_stoneout_1,1 ,
-Xsand_stoneout_1,0 ,
--1,
-Ynut_sB,7 ,
--1,
--1,
-Ynut_sB,6 ,
--1,
--1,
-Ynut_sB,5 ,
--1,
--1,
-Ynut_sB,4 ,
--1,
--1,
-Ynut_sB,3 ,
--1,
--1,
-Ynut_sB,2 ,
--1,
--1,
-Ynut_sB,1 ,
--1,
--1,
-Ynut_sB,0 ,
--1,
--1,
-Ynut_s,7 ,
-Ynut_e,7 ,
-Ynut_w,7 ,
-Xnut,0 ,
-Xnut,1 ,
-Xnut,2 ,
-Xnut,3 ,
-Xnut,4 ,
-Xnut,5 ,
-Xnut,6 ,
-Xnut,7 ,
-Xnut_pause,0 ,
-Xnut_pause,1 ,
-Xnut_pause,2 ,
-Xnut_pause,3 ,
-Xnut_pause,4 ,
-Xnut_pause,5 ,
-Xnut_pause,6 ,
-Xnut_pause,7 ,
-Xnut_fall,0 ,
-Xnut_fall,1 ,
-Xnut_fall,2 ,
-Xnut_fall,3 ,
-Xnut_fall,4 ,
-Xnut_fall,5 ,
-Xnut_fall,6 ,
-Xnut_fall,7 ,
-#ifdef BAD_ROLL
-Xnut_force_e,0 ,
-Xnut_force_e,1 ,
-Xnut_force_e,2 ,
-Xnut_force_e,3 ,
-Xnut_force_e,4 ,
-Xnut_force_e,5 ,
-Xnut_force_e,6 ,
-Xnut_force_e,7 ,
-Xnut_force_w,0 ,
-Xnut_force_w,1 ,
-Xnut_force_w,2 ,
-Xnut_force_w,3 ,
-Xnut_force_w,4 ,
-Xnut_force_w,5 ,
-Xnut_force_w,6 ,
-Xnut_force_w,7 ,
-#endif
--1,
--1,
-Ynut_s,6 ,
--1,
--1,
-Ynut_s,5 ,
--1,
--1,
-Ynut_s,4 ,
--1,
--1,
-Ynut_s,3 ,
--1,
--1,
-Ynut_s,2 ,
--1,
--1,
-Ynut_s,1 ,
--1,
--1,
-Ynut_s,0 ,
--1,
--1,
-
-/* normal */
-
-Xblank,0 ,
-Xblank,1 ,
-Xblank,2 ,
-Xblank,3 ,
-Xblank,4 ,
-Xblank,5 ,
-Xblank,6 ,
-Xblank,7 ,
-Xfake_blank,0 ,
-Xfake_blank,1 ,
-Xfake_blank,2 ,
-Xfake_blank,3 ,
-Xfake_blank,4 ,
-Xfake_blank,5 ,
-Xfake_blank,6 ,
-Xfake_blank,7 ,
-Xdripper,0 ,
-Xdripper,1 ,
-Xdripper,2 ,
-Xdripper,3 ,
-Xdripper,4 ,
-Xdripper,5 ,
-Xdripper,6 ,
-Xdripper,7 ,
-Zplayer,0 ,
-Zplayer,1 ,
-Zplayer,2 ,
-Zplayer,3 ,
-Zplayer,4 ,
-Zplayer,5 ,
-Zplayer,6 ,
-Zplayer,7 ,
-Ydynamite_eat,3 ,
-Ydynamite_eat,4 ,
-Ydynamite_eat,5 ,
-Ydynamite_eat,6 ,
-Ydynamite_eat,7 ,
--1,
--1,
--1,
--1,
--1,
-
-Ystone_eB,6 ,
-Ystone_w,0 ,
--1,
-Ystone_e,6 ,
-Ystone_wB,0 ,
--1,
-Ystone_eB,5 ,
-Ystone_w,1 ,
--1,
-Ystone_e,5 ,
-Ystone_wB,1 ,
--1,
-Ystone_eB,4 ,
-Ystone_w,2 ,
--1,
-Ystone_e,4 ,
-Ystone_wB,2 ,
--1,
-Ystone_eB,3 ,
-Ystone_w,3 ,
--1,
-Ystone_e,3 ,
-Ystone_wB,3 ,
--1,
-Ystone_eB,2 ,
-Ystone_w,4 ,
--1,
-Ystone_e,2 ,
-Ystone_wB,4 ,
--1,
-Ystone_eB,1 ,
-Ystone_w,5 ,
--1,
-Ystone_e,1 ,
-Ystone_wB,5 ,
--1,
-Ystone_eB,0 ,
-Ystone_w,6 ,
--1,
-Ystone_e,0 ,
-Ystone_wB,6 ,
--1,
-
-Ynut_eB,6 ,
-Ynut_w,0 ,
--1,
-Ynut_e,6 ,
-Ynut_wB,0 ,
--1,
-Ynut_eB,5 ,
-Ynut_w,1 ,
--1,
-Ynut_e,5 ,
-Ynut_wB,1 ,
--1,
-Ynut_eB,4 ,
-Ynut_w,2 ,
--1,
-Ynut_e,4 ,
-Ynut_wB,2 ,
--1,
-Ynut_eB,3 ,
-Ynut_w,3 ,
--1,
-Ynut_e,3 ,
-Ynut_wB,3 ,
--1,
-Ynut_eB,2 ,
-Ynut_w,4 ,
--1,
-Ynut_e,2 ,
-Ynut_wB,4 ,
--1,
-Ynut_eB,1 ,
-Ynut_w,5 ,
--1,
-Ynut_e,1 ,
-Ynut_wB,5 ,
--1,
-Ynut_eB,0 ,
-Ynut_w,6 ,
--1,
-Ynut_e,0 ,
-Ynut_wB,6 ,
--1,
-
-Ybug_w_n,7 ,
-Ybug_e_n,7 ,
-Ybug_n,7 ,
-Xbug_n,0 ,
-Xbug_n,1 ,
-Xbug_n,2 ,
-Xbug_n,3 ,
-Xbug_n,4 ,
-Xbug_n,5 ,
-Xbug_n,6 ,
-Xbug_n,7 ,
-Xbug_gon,0 ,
-Xbug_gon,1 ,
-Xbug_gon,2 ,
-Xbug_gon,3 ,
-Xbug_gon,4 ,
-Xbug_gon,5 ,
-Xbug_gon,6 ,
-Xbug_gon,7 ,
--1,
-Ybug_n_e,7 ,
-Ybug_s_e,7 ,
-Ybug_e,7 ,
-Xbug_e,0 ,
-Xbug_e,1 ,
-Xbug_e,2 ,
-Xbug_e,3 ,
-Xbug_e,4 ,
-Xbug_e,5 ,
-Xbug_e,6 ,
-Xbug_e,7 ,
-Xbug_goe,0 ,
-Xbug_goe,1 ,
-Xbug_goe,2 ,
-Xbug_goe,3 ,
-Xbug_goe,4 ,
-Xbug_goe,5 ,
-Xbug_goe,6 ,
-Xbug_goe,7 ,
--1,
-Ybug_e_s,7 ,
-Ybug_w_s,7 ,
-Ybug_s,7 ,
-Xbug_s,0 ,
-Xbug_s,1 ,
-Xbug_s,2 ,
-Xbug_s,3 ,
-Xbug_s,4 ,
-Xbug_s,5 ,
-Xbug_s,6 ,
-Xbug_s,7 ,
-Xbug_gos,0 ,
-Xbug_gos,1 ,
-Xbug_gos,2 ,
-Xbug_gos,3 ,
-Xbug_gos,4 ,
-Xbug_gos,5 ,
-Xbug_gos,6 ,
-Xbug_gos,7 ,
--1,
-Ybug_n_w,7 ,
-Ybug_s_w,7 ,
-Ybug_w,7 ,
-Xbug_w,0 ,
-Xbug_w,1 ,
-Xbug_w,2 ,
-Xbug_w,3 ,
-Xbug_w,4 ,
-Xbug_w,5 ,
-Xbug_w,6 ,
-Xbug_w,7 ,
-Xbug_gow,0 ,
-Xbug_gow,1 ,
-Xbug_gow,2 ,
-Xbug_gow,3 ,
-Xbug_gow,4 ,
-Xbug_gow,5 ,
-Xbug_gow,6 ,
-Xbug_gow,7 ,
--1,
-Ybug_n,0 ,
--1,
-Ybug_nB,0 ,
--1,
-Ybug_n,1 ,
--1,
-Ybug_nB,1 ,
--1,
-Ybug_n,2 ,
--1,
-Ybug_nB,2 ,
--1,
-Ybug_n,3 ,
--1,
-Ybug_nB,3 ,
--1,
-Ybug_n,4 ,
--1,
-Ybug_nB,4 ,
--1,
-Ybug_n,5 ,
--1,
-Ybug_nB,5 ,
--1,
-Ybug_n,6 ,
--1,
-Ybug_nB,6 ,
--1,
-Ybug_eB,6 ,
--1,
-Ybug_e,6 ,
--1,
-Ybug_eB,5 ,
--1,
-Ybug_e,5 ,
--1,
-Ybug_eB,4 ,
--1,
-Ybug_e,4 ,
--1,
-Ybug_eB,3 ,
--1,
-Ybug_e,3 ,
--1,
-Ybug_eB,2 ,
--1,
-Ybug_e,2 ,
--1,
-Ybug_eB,1 ,
--1,
-Ybug_e,1 ,
--1,
-Ybug_eB,0 ,
--1,
-Ybug_e,0 ,
--1,
-Ybug_sB,6 ,
--1,
-Ybug_s,6 ,
--1,
-Ybug_sB,5 ,
--1,
-Ybug_s,5 ,
--1,
-Ybug_sB,4 ,
--1,
-Ybug_s,4 ,
--1,
-Ybug_sB,3 ,
--1,
-Ybug_s,3 ,
--1,
-Ybug_sB,2 ,
--1,
-Ybug_s,2 ,
--1,
-Ybug_sB,1 ,
--1,
-Ybug_s,1 ,
--1,
-Ybug_sB,0 ,
--1,
-Ybug_s,0 ,
--1,
-Ybug_w,0 ,
--1,
-Ybug_wB,0 ,
--1,
-Ybug_w,1 ,
--1,
-Ybug_wB,1 ,
--1,
-Ybug_w,2 ,
--1,
-Ybug_wB,2 ,
--1,
-Ybug_w,3 ,
--1,
-Ybug_wB,3 ,
--1,
-Ybug_w,4 ,
--1,
-Ybug_wB,4 ,
--1,
-Ybug_w,5 ,
--1,
-Ybug_wB,5 ,
--1,
-Ybug_w,6 ,
--1,
-Ybug_wB,6 ,
--1,
-Ybug_n_e,0 ,
-Ybug_e_n,6 ,
--1,
-Ybug_n_e,1 ,
-Ybug_e_n,5 ,
--1,
-Ybug_n_e,2 ,
-Ybug_e_n,4 ,
--1,
-Ybug_n_e,3 ,
-Ybug_e_n,3 ,
--1,
-Ybug_n_e,4 ,
-Ybug_e_n,2 ,
--1,
-Ybug_n_e,5 ,
-Ybug_e_n,1 ,
--1,
-Ybug_n_e,6 ,
-Ybug_e_n,0 ,
--1,
-Ybug_e_s,0 ,
-Ybug_s_e,6 ,
--1,
-Ybug_e_s,1 ,
-Ybug_s_e,5 ,
--1,
-Ybug_e_s,2 ,
-Ybug_s_e,4 ,
--1,
-Ybug_e_s,3 ,
-Ybug_s_e,3 ,
--1,
-Ybug_e_s,4 ,
-Ybug_s_e,2 ,
--1,
-Ybug_e_s,5 ,
-Ybug_s_e,1 ,
--1,
-Ybug_e_s,6 ,
-Ybug_s_e,0 ,
--1,
-Ybug_s_w,0 ,
-Ybug_w_s,6 ,
--1,
-Ybug_s_w,1 ,
-Ybug_w_s,5 ,
--1,
-Ybug_s_w,2 ,
-Ybug_w_s,4 ,
--1,
-Ybug_s_w,3 ,
-Ybug_w_s,3 ,
--1,
-Ybug_s_w,4 ,
-Ybug_w_s,2 ,
--1,
-Ybug_s_w,5 ,
-Ybug_w_s,1 ,
--1,
-Ybug_s_w,6 ,
-Ybug_w_s,0 ,
--1,
-Ybug_n_w,6 ,
-Ybug_w_n,0 ,
--1,
-Ybug_n_w,5 ,
-Ybug_w_n,1 ,
--1,
-Ybug_n_w,4 ,
-Ybug_w_n,2 ,
--1,
-Ybug_n_w,3 ,
-Ybug_w_n,3 ,
--1,
-Ybug_n_w,2 ,
-Ybug_w_n,4 ,
--1,
-Ybug_n_w,1 ,
-Ybug_w_n,5 ,
--1,
-Ybug_n_w,0 ,
-Ybug_w_n,6 ,
--1,
-Ybug_stone,0 ,
--1,
-Ybug_stone,1 ,
--1,
-Ybug_stone,2 ,
--1,
-Ybug_stone,3 ,
--1,
-Ybug_stone,4 ,
--1,
-Ybug_stone,5 ,
--1,
-Ybug_stone,6 ,
--1,
-Ybug_spring,0 ,
--1,
-Ybug_spring,1 ,
--1,
-Ybug_spring,2 ,
--1,
-Ybug_spring,3 ,
--1,
-Ybug_spring,4 ,
--1,
-Ybug_spring,5 ,
--1,
-Ybug_spring,6 ,
--1,
-
-Ytank_w_n,7 ,
-Ytank_e_n,7 ,
-Ytank_n,7 ,
-Xtank_n,0 ,
-Xtank_n,1 ,
-Xtank_n,2 ,
-Xtank_n,3 ,
-Xtank_n,4 ,
-Xtank_n,5 ,
-Xtank_n,6 ,
-Xtank_n,7 ,
-Xtank_gon,0 ,
-Xtank_gon,1 ,
-Xtank_gon,2 ,
-Xtank_gon,3 ,
-Xtank_gon,4 ,
-Xtank_gon,5 ,
-Xtank_gon,6 ,
-Xtank_gon,7 ,
--1,
-Ytank_n_e,7 ,
-Ytank_s_e,7 ,
-Ytank_e,7 ,
-Xtank_e,0 ,
-Xtank_e,1 ,
-Xtank_e,2 ,
-Xtank_e,3 ,
-Xtank_e,4 ,
-Xtank_e,5 ,
-Xtank_e,6 ,
-Xtank_e,7 ,
-Xtank_goe,0 ,
-Xtank_goe,1 ,
-Xtank_goe,2 ,
-Xtank_goe,3 ,
-Xtank_goe,4 ,
-Xtank_goe,5 ,
-Xtank_goe,6 ,
-Xtank_goe,7 ,
--1,
-Ytank_e_s,7 ,
-Ytank_w_s,7 ,
-Ytank_s,7 ,
-Xtank_s,0 ,
-Xtank_s,1 ,
-Xtank_s,2 ,
-Xtank_s,3 ,
-Xtank_s,4 ,
-Xtank_s,5 ,
-Xtank_s,6 ,
-Xtank_s,7 ,
-Xtank_gos,0 ,
-Xtank_gos,1 ,
-Xtank_gos,2 ,
-Xtank_gos,3 ,
-Xtank_gos,4 ,
-Xtank_gos,5 ,
-Xtank_gos,6 ,
-Xtank_gos,7 ,
--1,
-Ytank_n_w,7 ,
-Ytank_s_w,7 ,
-Ytank_w,7 ,
-Xtank_w,0 ,
-Xtank_w,1 ,
-Xtank_w,2 ,
-Xtank_w,3 ,
-Xtank_w,4 ,
-Xtank_w,5 ,
-Xtank_w,6 ,
-Xtank_w,7 ,
-Xtank_gow,0 ,
-Xtank_gow,1 ,
-Xtank_gow,2 ,
-Xtank_gow,3 ,
-Xtank_gow,4 ,
-Xtank_gow,5 ,
-Xtank_gow,6 ,
-Xtank_gow,7 ,
--1,
-Ytank_n,0 ,
--1,
-Ytank_nB,0 ,
--1,
-Ytank_n,1 ,
--1,
-Ytank_nB,1 ,
--1,
-Ytank_n,2 ,
--1,
-Ytank_nB,2 ,
--1,
-Ytank_n,3 ,
--1,
-Ytank_nB,3 ,
--1,
-Ytank_n,4 ,
--1,
-Ytank_nB,4 ,
--1,
-Ytank_n,5 ,
--1,
-Ytank_nB,5 ,
--1,
-Ytank_n,6 ,
--1,
-Ytank_nB,6 ,
--1,
-Ytank_eB,6 ,
--1,
-Ytank_e,6 ,
--1,
-Ytank_eB,5 ,
--1,
-Ytank_e,5 ,
--1,
-Ytank_eB,4 ,
--1,
-Ytank_e,4 ,
--1,
-Ytank_eB,3 ,
--1,
-Ytank_e,3 ,
--1,
-Ytank_eB,2 ,
--1,
-Ytank_e,2 ,
--1,
-Ytank_eB,1 ,
--1,
-Ytank_e,1 ,
--1,
-Ytank_eB,0 ,
--1,
-Ytank_e,0 ,
--1,
-Ytank_sB,6 ,
--1,
-Ytank_s,6 ,
--1,
-Ytank_sB,5 ,
--1,
-Ytank_s,5 ,
--1,
-Ytank_sB,4 ,
--1,
-Ytank_s,4 ,
--1,
-Ytank_sB,3 ,
--1,
-Ytank_s,3 ,
--1,
-Ytank_sB,2 ,
--1,
-Ytank_s,2 ,
--1,
-Ytank_sB,1 ,
--1,
-Ytank_s,1 ,
--1,
-Ytank_sB,0 ,
--1,
-Ytank_s,0 ,
--1,
-Ytank_w,0 ,
--1,
-Ytank_wB,0 ,
--1,
-Ytank_w,1 ,
--1,
-Ytank_wB,1 ,
--1,
-Ytank_w,2 ,
--1,
-Ytank_wB,2 ,
--1,
-Ytank_w,3 ,
--1,
-Ytank_wB,3 ,
--1,
-Ytank_w,4 ,
--1,
-Ytank_wB,4 ,
--1,
-Ytank_w,5 ,
--1,
-Ytank_wB,5 ,
--1,
-Ytank_w,6 ,
--1,
-Ytank_wB,6 ,
--1,
-Ytank_n_e,0 ,
-Ytank_e_n,6 ,
--1,
-Ytank_n_e,1 ,
-Ytank_e_n,5 ,
--1,
-Ytank_n_e,2 ,
-Ytank_e_n,4 ,
--1,
-Ytank_n_e,3 ,
-Ytank_e_n,3 ,
--1,
-Ytank_n_e,4 ,
-Ytank_e_n,2 ,
--1,
-Ytank_n_e,5 ,
-Ytank_e_n,1 ,
--1,
-Ytank_n_e,6 ,
-Ytank_e_n,0 ,
--1,
-Ytank_e_s,0 ,
-Ytank_s_e,6 ,
--1,
-Ytank_e_s,1 ,
-Ytank_s_e,5 ,
--1,
-Ytank_e_s,2 ,
-Ytank_s_e,4 ,
--1,
-Ytank_e_s,3 ,
-Ytank_s_e,3 ,
--1,
-Ytank_e_s,4 ,
-Ytank_s_e,2 ,
--1,
-Ytank_e_s,5 ,
-Ytank_s_e,1 ,
--1,
-Ytank_e_s,6 ,
-Ytank_s_e,0 ,
--1,
-Ytank_s_w,0 ,
-Ytank_w_s,6 ,
--1,
-Ytank_s_w,1 ,
-Ytank_w_s,5 ,
--1,
-Ytank_s_w,2 ,
-Ytank_w_s,4 ,
--1,
-Ytank_s_w,3 ,
-Ytank_w_s,3 ,
--1,
-Ytank_s_w,4 ,
-Ytank_w_s,2 ,
--1,
-Ytank_s_w,5 ,
-Ytank_w_s,1 ,
--1,
-Ytank_s_w,6 ,
-Ytank_w_s,0 ,
--1,
-Ytank_n_w,6 ,
-Ytank_w_n,0 ,
--1,
-Ytank_n_w,5 ,
-Ytank_w_n,1 ,
--1,
-Ytank_n_w,4 ,
-Ytank_w_n,2 ,
--1,
-Ytank_n_w,3 ,
-Ytank_w_n,3 ,
--1,
-Ytank_n_w,2 ,
-Ytank_w_n,4 ,
--1,
-Ytank_n_w,1 ,
-Ytank_w_n,5 ,
--1,
-Ytank_n_w,0 ,
-Ytank_w_n,6 ,
--1,
-Ytank_stone,0 ,
--1,
-Ytank_stone,1 ,
--1,
-Ytank_stone,2 ,
--1,
-Ytank_stone,3 ,
--1,
-Ytank_stone,4 ,
--1,
-Ytank_stone,5 ,
--1,
-Ytank_stone,6 ,
--1,
-Ytank_spring,0 ,
--1,
-Ytank_spring,1 ,
--1,
-Ytank_spring,2 ,
--1,
-Ytank_spring,3 ,
--1,
-Ytank_spring,4 ,
--1,
-Ytank_spring,5 ,
--1,
-Ytank_spring,6 ,
--1,
-
-Yandroid_n,7 ,
-Yandroid_ne,7 ,
-Yandroid_e,7 ,
-Yandroid_se,7 ,
-Yandroid_s,7 ,
-Yandroid_sw,7 ,
-Yandroid_w,7 ,
-Yandroid_nw,7 ,
-Xandroid,7 ,
-Xandroid_1_n,7 ,
-Xandroid_2_n,7 ,
-Xandroid_1_e,7 ,
-Xandroid_2_e,7 ,
-Xandroid_1_w,7 ,
-Xandroid_2_w,7 ,
-Xandroid_1_s,7 ,
-Xandroid_2_s,7 ,
--1,
-Xandroid,0 ,
-Xandroid_1_n,0 ,
-Xandroid_2_n,0 ,
-Xandroid_1_e,0 ,
-Xandroid_2_e,0 ,
-Xandroid_1_w,0 ,
-Xandroid_2_w,0 ,
-Xandroid_1_s,0 ,
-Xandroid_2_s,0 ,
--1,
-Xandroid,1 ,
-Xandroid_1_n,1 ,
-Xandroid_2_n,1 ,
-Xandroid_1_e,1 ,
-Xandroid_2_e,1 ,
-Xandroid_1_w,1 ,
-Xandroid_2_w,1 ,
-Xandroid_1_s,1 ,
-Xandroid_2_s,1 ,
--1,
-Xandroid,2 ,
-Xandroid_1_n,2 ,
-Xandroid_2_n,2 ,
-Xandroid_1_e,2 ,
-Xandroid_2_e,2 ,
-Xandroid_1_w,2 ,
-Xandroid_2_w,2 ,
-Xandroid_1_s,2 ,
-Xandroid_2_s,2 ,
--1,
-Xandroid,3 ,
-Xandroid_1_n,3 ,
-Xandroid_2_n,3 ,
-Xandroid_1_e,3 ,
-Xandroid_2_e,3 ,
-Xandroid_1_w,3 ,
-Xandroid_2_w,3 ,
-Xandroid_1_s,3 ,
-Xandroid_2_s,3 ,
--1,
-Xandroid,4 ,
-Xandroid_1_n,4 ,
-Xandroid_2_n,4 ,
-Xandroid_1_e,4 ,
-Xandroid_2_e,4 ,
-Xandroid_1_w,4 ,
-Xandroid_2_w,4 ,
-Xandroid_1_s,4 ,
-Xandroid_2_s,4 ,
--1,
-Xandroid,5 ,
-Xandroid_1_n,5 ,
-Xandroid_2_n,5 ,
-Xandroid_1_e,5 ,
-Xandroid_2_e,5 ,
-Xandroid_1_w,5 ,
-Xandroid_2_w,5 ,
-Xandroid_1_s,5 ,
-Xandroid_2_s,5 ,
--1,
-Xandroid,6 ,
-Xandroid_1_n,6 ,
-Xandroid_2_n,6 ,
-Xandroid_1_e,6 ,
-Xandroid_2_e,6 ,
-Xandroid_1_w,6 ,
-Xandroid_2_w,6 ,
-Xandroid_1_s,6 ,
-Xandroid_2_s,6 ,
--1,
-Yandroid_n,0 ,
-Yandroid_sB,6 ,
--1,
-Yandroid_nB,0 ,
-Yandroid_s,6 ,
--1,
-Yandroid_n,1 ,
-Yandroid_sB,5 ,
--1,
-Yandroid_nB,1 ,
-Yandroid_s,5 ,
--1,
-Yandroid_n,2 ,
-Yandroid_sB,4 ,
-Xboom_android,0 ,
--1,
-Yandroid_nB,2 ,
-Yandroid_s,4 ,
-Xboom_android,1 ,
--1,
-Yandroid_n,3 ,
-Yandroid_sB,3 ,
-Xboom_android,2 ,
--1,
-Yandroid_nB,3 ,
-Yandroid_s,3 ,
-Xboom_android,3 ,
--1,
-Yandroid_n,4 ,
-Yandroid_sB,2 ,
-Xboom_android,4 ,
--1,
-Yandroid_nB,4 ,
-Yandroid_s,2 ,
-Xboom_android,5 ,
--1,
-Yandroid_n,5 ,
-Yandroid_sB,1 ,
-Xboom_android,6 ,
--1,
-Yandroid_nB,5 ,
-Yandroid_s,1 ,
--1,
-Yandroid_n,6 ,
-Yandroid_sB,0 ,
--1,
-Yandroid_nB,6 ,
-Yandroid_s,0 ,
--1,
-Yandroid_eB,6 ,
-Yandroid_w,0 ,
--1,
-Yandroid_e,6 ,
-Yandroid_wB,0 ,
--1,
-Yandroid_eB,5 ,
-Yandroid_w,1 ,
--1,
-Yandroid_e,5 ,
-Yandroid_wB,1 ,
--1,
-Yandroid_eB,4 ,
-Yandroid_w,2 ,
--1,
-Yandroid_e,4 ,
-Yandroid_wB,2 ,
--1,
-Yandroid_eB,3 ,
-Yandroid_w,3 ,
--1,
-Yandroid_e,3 ,
-Yandroid_wB,3 ,
--1,
-Yandroid_eB,2 ,
-Yandroid_w,4 ,
--1,
-Yandroid_e,2 ,
-Yandroid_wB,4 ,
--1,
-Yandroid_eB,1 ,
-Yandroid_w,5 ,
--1,
-Yandroid_e,1 ,
-Yandroid_wB,5 ,
--1,
-Yandroid_eB,0 ,
-Yandroid_w,6 ,
--1,
-Yandroid_e,0 ,
-Yandroid_wB,6 ,
--1,
-Yandroid_neB,6 ,
-Yandroid_sw,0 ,
--1,
-Yandroid_ne,6 ,
-Yandroid_swB,0 ,
--1,
-Yandroid_neB,5 ,
-Yandroid_sw,1 ,
--1,
-Yandroid_ne,5 ,
-Yandroid_swB,1 ,
--1,
-Yandroid_neB,4 ,
-Yandroid_sw,2 ,
--1,
-Yandroid_ne,4 ,
-Yandroid_swB,2 ,
--1,
-Yandroid_neB,3 ,
-Yandroid_sw,3 ,
--1,
-Yandroid_ne,3 ,
-Yandroid_swB,3 ,
--1,
-Yandroid_neB,2 ,
-Yandroid_sw,4 ,
--1,
-Yandroid_ne,2 ,
-Yandroid_swB,4 ,
--1,
-Yandroid_neB,1 ,
-Yandroid_sw,5 ,
--1,
-Yandroid_ne,1 ,
-Yandroid_swB,5 ,
--1,
-Yandroid_neB,0 ,
-Yandroid_sw,6 ,
--1,
-Yandroid_ne,0 ,
-Yandroid_swB,6 ,
--1,
-Yandroid_nw,0 ,
-Yandroid_seB,6 ,
--1,
-Yandroid_nwB,0 ,
-Yandroid_se,6 ,
--1,
-Yandroid_nw,1 ,
-Yandroid_seB,5 ,
--1,
-Yandroid_nwB,1 ,
-Yandroid_se,5 ,
--1,
-Yandroid_nw,2 ,
-Yandroid_seB,4 ,
--1,
-Yandroid_nwB,2 ,
-Yandroid_se,4 ,
--1,
-Yandroid_nw,3 ,
-Yandroid_seB,3 ,
--1,
-Yandroid_nwB,3 ,
-Yandroid_se,3 ,
--1,
-Yandroid_nw,4 ,
-Yandroid_seB,2 ,
--1,
-Yandroid_nwB,4 ,
-Yandroid_se,2 ,
--1,
-Yandroid_nw,5 ,
-Yandroid_seB,1 ,
--1,
-Yandroid_nwB,5 ,
-Yandroid_se,1 ,
--1,
-Yandroid_nw,6 ,
-Yandroid_seB,0 ,
--1,
-Yandroid_nwB,6 ,
-Yandroid_se,0 ,
--1,
-
-Yspring_e,7 ,
-Yspring_w,7 ,
-Yspring_kill_e,7 ,
-Yspring_kill_w,7 ,
-Yspring_s,7 ,
-Xspring,0 ,
-Xspring,1 ,
-Xspring,2 ,
-Xspring,3 ,
-Xspring,4 ,
-Xspring,5 ,
-Xspring,6 ,
-Xspring,7 ,
-Xspring_pause,0 ,
-Xspring_pause,1 ,
-Xspring_pause,2 ,
-Xspring_pause,3 ,
-Xspring_pause,4 ,
-Xspring_pause,5 ,
-Xspring_pause,6 ,
-Xspring_pause,7 ,
-Xspring_e,0 ,
-Xspring_e,1 ,
-Xspring_e,2 ,
-Xspring_e,3 ,
-Xspring_e,4 ,
-Xspring_e,5 ,
-Xspring_e,6 ,
-Xspring_e,7 ,
-Xspring_w,0 ,
-Xspring_w,1 ,
-Xspring_w,2 ,
-Xspring_w,3 ,
-Xspring_w,4 ,
-Xspring_w,5 ,
-Xspring_w,6 ,
-Xspring_w,7 ,
-Xspring_fall,0 ,
-Xspring_fall,1 ,
-Xspring_fall,2 ,
-Xspring_fall,3 ,
-Xspring_fall,4 ,
-Xspring_fall,5 ,
-Xspring_fall,6 ,
-Xspring_fall,7 ,
-#ifdef BAD_ROLL
-Xspring_force_e,0 ,
-Xspring_force_e,1 ,
-Xspring_force_e,2 ,
-Xspring_force_e,3 ,
-Xspring_force_e,4 ,
-Xspring_force_e,5 ,
-Xspring_force_e,6 ,
-Xspring_force_e,7 ,
-Xspring_force_w,0 ,
-Xspring_force_w,1 ,
-Xspring_force_w,2 ,
-Xspring_force_w,3 ,
-Xspring_force_w,4 ,
-Xspring_force_w,5 ,
-Xspring_force_w,6 ,
-Xspring_force_w,7 ,
-#endif
--1,
-Yspring_sB,6 ,
--1,
-Yspring_s,6 ,
--1,
-Yspring_sB,5 ,
--1,
-Yspring_s,5 ,
--1,
-Yspring_sB,4 ,
--1,
-Yspring_s,4 ,
--1,
-Yspring_sB,3 ,
--1,
-Yspring_s,3 ,
--1,
-Yspring_sB,2 ,
--1,
-Yspring_s,2 ,
--1,
-Yspring_sB,1 ,
--1,
-Yspring_s,1 ,
--1,
-Yspring_sB,0 ,
--1,
-Yspring_s,0 ,
--1,
-Yspring_eB,6 ,
-Yspring_w,0 ,
--1,
-Yspring_e,6 ,
-Yspring_wB,0 ,
--1,
-Yspring_eB,5 ,
-Yspring_w,1 ,
--1,
-Yspring_e,5 ,
-Yspring_wB,1 ,
--1,
-Yspring_eB,4 ,
-Yspring_w,2 ,
--1,
-Yspring_e,4 ,
-Yspring_wB,2 ,
--1,
-Yspring_eB,3 ,
-Yspring_w,3 ,
--1,
-Yspring_e,3 ,
-Yspring_wB,3 ,
--1,
-Yspring_eB,2 ,
-Yspring_w,4 ,
--1,
-Yspring_e,2 ,
-Yspring_wB,4 ,
--1,
-Yspring_eB,1 ,
-Yspring_w,5 ,
--1,
-Yspring_e,1 ,
-Yspring_wB,5 ,
--1,
-Yspring_eB,0 ,
-Yspring_w,6 ,
--1,
-Yspring_e,0 ,
-Yspring_wB,6 ,
--1,
-Yspring_kill_eB,6 ,
--1,
-Yspring_kill_e,6 ,
--1,
-Yspring_kill_eB,5 ,
--1,
-Yspring_kill_e,5 ,
--1,
-Yspring_kill_eB,4 ,
--1,
-Yspring_kill_e,4 ,
--1,
-Yspring_kill_eB,3 ,
--1,
-Yspring_kill_e,3 ,
--1,
-Yspring_kill_eB,2 ,
--1,
-Yspring_kill_e,2 ,
--1,
-Yspring_kill_eB,1 ,
--1,
-Yspring_kill_e,1 ,
--1,
-Yspring_kill_eB,0 ,
--1,
-Yspring_kill_e,0 ,
--1,
-Yspring_kill_w,0 ,
--1,
-Yspring_kill_wB,0 ,
--1,
-Yspring_kill_w,1 ,
--1,
-Yspring_kill_wB,1 ,
--1,
-Yspring_kill_w,2 ,
--1,
-Yspring_kill_wB,2 ,
--1,
-Yspring_kill_w,3 ,
--1,
-Yspring_kill_wB,3 ,
--1,
-Yspring_kill_w,4 ,
--1,
-Yspring_kill_wB,4 ,
--1,
-Yspring_kill_w,5 ,
--1,
-Yspring_kill_wB,5 ,
--1,
-Yspring_kill_w,6 ,
--1,
-Yspring_kill_wB,6 ,
--1,
-
-Xeater_n,0 ,
-Xeater_e,0 ,
-Xeater_w,0 ,
-Xeater_s,0 ,
-Xeater_n,7 ,
-Xeater_e,7 ,
-Xeater_s,7 ,
-Xeater_w,7 ,
-Yeater_n,7 ,
-Yeater_e,7 ,
-Yeater_s,7 ,
-Yeater_w,7 ,
--1,
-Xeater_n,1 ,
-Xeater_e,1 ,
-Xeater_w,1 ,
-Xeater_s,1 ,
-Xeater_n,6 ,
-Xeater_e,6 ,
-Xeater_w,6 ,
-Xeater_s,6 ,
--1,
-Xeater_n,2 ,
-Xeater_e,2 ,
-Xeater_w,2 ,
-Xeater_s,2 ,
-Xeater_n,5 ,
-Xeater_e,5 ,
-Xeater_w,5 ,
-Xeater_s,5 ,
--1,
-Xeater_n,3 ,
-Xeater_e,3 ,
-Xeater_w,3 ,
-Xeater_s,3 ,
-Xeater_n,4 ,
-Xeater_e,4 ,
-Xeater_w,4 ,
-Xeater_s,4 ,
--1,
-Yeater_n,0 ,
-Yeater_sB,6 ,
--1,
-Yeater_nB,0 ,
-Yeater_s,6 ,
--1,
-Yeater_n,1 ,
-Yeater_sB,5 ,
--1,
-Yeater_nB,1 ,
-Yeater_s,5 ,
--1,
-Yeater_n,2 ,
-Yeater_sB,4 ,
--1,
-Yeater_nB,2 ,
-Yeater_s,4 ,
--1,
-Yeater_n,3 ,
-Yeater_sB,3 ,
--1,
-Yeater_nB,3 ,
-Yeater_s,3 ,
--1,
-Yeater_n,4 ,
-Yeater_sB,2,
--1,
-Yeater_nB,4 ,
-Yeater_s,2 ,
--1,
-Yeater_n,5 ,
-Yeater_sB,1 ,
--1,
-Yeater_nB,5 ,
-Yeater_s,1 ,
--1,
-Yeater_n,6 ,
-Yeater_sB,0 ,
--1,
-Yeater_nB,6 ,
-Yeater_s,0 ,
--1,
-Yeater_eB,6 ,
-Yeater_w,0 ,
--1,
-Yeater_e,6 ,
-Yeater_wB,0 ,
--1,
-Yeater_eB,5 ,
-Yeater_w,1 ,
--1,
-Yeater_e,5 ,
-Yeater_wB,1 ,
--1,
-Yeater_eB,4 ,
-Yeater_w,2 ,
--1,
-Yeater_e,4 ,
-Yeater_wB,2 ,
--1,
-Yeater_eB,3 ,
-Yeater_w,3 ,
--1,
-Yeater_e,3 ,
-Yeater_wB,3 ,
--1,
-Yeater_eB,2 ,
-Yeater_w,4 ,
--1,
-Yeater_e,2 ,
-Yeater_wB,4 ,
--1,
-Yeater_eB,1 ,
-Yeater_w,5 ,
--1,
-Yeater_e,1 ,
-Yeater_wB,5 ,
--1,
-Yeater_eB,0 ,
-Yeater_w,6 ,
--1,
-Yeater_e,0 ,
-Yeater_wB,6 ,
--1,
-Yeater_stone,0 ,
--1,
-Yeater_stone,1 ,
--1,
-Yeater_stone,2 ,
--1,
-Yeater_stone,3 ,
--1,
-Yeater_stone,4 ,
--1,
-Yeater_stone,5 ,
--1,
-Yeater_stone,6 ,
--1,
-Yeater_spring,0 ,
--1,
-Yeater_spring,1 ,
--1,
-Yeater_spring,2 ,
--1,
-Yeater_spring,3 ,
--1,
-Yeater_spring,4 ,
--1,
-Yeater_spring,5 ,
--1,
-Yeater_spring,6 ,
--1,
-
-Xalien,0 ,
-Xalien_pause,0 ,
-Xalien,7 ,
-Xalien_pause,7 ,
-Yalien_n,7 ,
-Yalien_e,7 ,
-Yalien_s,7 ,
-Yalien_w,7 ,
--1,
-Xalien,1 ,
-Xalien_pause,1 ,
-Xalien,6 ,
-Xalien_pause,6 ,
--1,
-Xalien,2 ,
-Xalien_pause,2 ,
-Xalien,5 ,
-Xalien_pause,5 ,
--1,
-Xalien,3 ,
-Xalien_pause,3 ,
-Xalien,4 ,
-Xalien_pause,4 ,
--1,
-Yalien_n,0 ,
-Yalien_sB,6 ,
--1,
-Yalien_nB,0 ,
-Yalien_s,6 ,
--1,
-Yalien_n,1 ,
-Yalien_sB,5 ,
--1,
-Yalien_nB,1 ,
-Yalien_s,5 ,
--1,
-Yalien_n,2 ,
-Yalien_sB,4 ,
--1,
-Yalien_nB,2 ,
-Yalien_s,4 ,
--1,
-Yalien_n,3 ,
-Yalien_sB,3 ,
--1,
-Yalien_nB,3 ,
-Yalien_s,3 ,
--1,
-Yalien_n,4 ,
-Yalien_sB,2 ,
--1,
-Yalien_nB,4 ,
-Yalien_s,2 ,
--1,
-Yalien_n,5 ,
-Yalien_sB,1 ,
--1,
-Yalien_nB,5 ,
-Yalien_s,1 ,
--1,
-Yalien_n,6 ,
-Yalien_sB,0 ,
--1,
-Yalien_nB,6 ,
-Yalien_s,0 ,
--1,
-Yalien_eB,6 ,
-Yalien_w,0 ,
--1,
-Yalien_e,6 ,
-Yalien_wB,0 ,
--1,
-Yalien_eB,5 ,
-Yalien_w,1 ,
--1,
-Yalien_e,5 ,
-Yalien_wB,1 ,
--1,
-Yalien_eB,4 ,
-Yalien_w,2 ,
--1,
-Yalien_e,4 ,
-Yalien_wB,2 ,
--1,
-Yalien_eB,3 ,
-Yalien_w,3 ,
--1,
-Yalien_e,3 ,
-Yalien_wB,3 ,
--1,
-Yalien_eB,2 ,
-Yalien_w,4 ,
--1,
-Yalien_e,2 ,
-Yalien_wB,4 ,
--1,
-Yalien_eB,1 ,
-Yalien_w,5 ,
--1,
-Yalien_e,1 ,
-Yalien_wB,5 ,
--1,
-Yalien_eB,0 ,
-Yalien_w,6 ,
--1,
-Yalien_e,0 ,
-Yalien_wB,6 ,
--1,
-Yalien_stone,0 ,
--1,
-Yalien_stone,1 ,
--1,
-Yalien_stone,2 ,
--1,
-Yalien_stone,3 ,
--1,
-Yalien_stone,4 ,
--1,
-Yalien_stone,5 ,
--1,
-Yalien_stone,6 ,
--1,
-Yalien_spring,0 ,
--1,
-Yalien_spring,1 ,
--1,
-Yalien_spring,2 ,
--1,
-Yalien_spring,3 ,
--1,
-Yalien_spring,4 ,
--1,
-Yalien_spring,5 ,
--1,
-Yalien_spring,6 ,
--1,
-
-Xemerald,0 ,
-Xemerald,1 ,
-Xemerald,2 ,
-Xemerald,3 ,
-Xemerald,4 ,
-Xemerald,5 ,
-Xemerald,6 ,
-Xemerald,7 ,
-Xemerald_pause,0 ,
-Xemerald_pause,1 ,
-Xemerald_pause,2 ,
-Xemerald_pause,3 ,
-Xemerald_pause,4 ,
-Xemerald_pause,5 ,
-Xemerald_pause,6 ,
-Xemerald_pause,7 ,
-Xemerald_fall,0 ,
-Xemerald_fall,1 ,
-Xemerald_fall,2 ,
-Xemerald_fall,3 ,
-Xemerald_fall,4 ,
-Xemerald_fall,5 ,
-Xemerald_fall,6 ,
-Xemerald_fall,7 ,
-#ifdef BAD_ROLL
-Xemerald_force_e,0 ,
-Xemerald_force_e,1 ,
-Xemerald_force_e,2 ,
-Xemerald_force_e,3 ,
-Xemerald_force_e,4 ,
-Xemerald_force_e,5 ,
-Xemerald_force_e,6 ,
-Xemerald_force_e,7 ,
-Xemerald_force_w,0 ,
-Xemerald_force_w,1 ,
-Xemerald_force_w,2 ,
-Xemerald_force_w,3 ,
-Xemerald_force_w,4 ,
-Xemerald_force_w,5 ,
-Xemerald_force_w,6 ,
-Xemerald_force_w,7 ,
-#endif
-Xemerald_shine,0 ,
-Xemerald_shine,7 ,
-Yemerald_stone,7 ,
-Yemerald_s,7 ,
-Yemerald_e,7 ,
-Yemerald_w,7 ,
--1,
-Xemerald_shine,1 ,
-Xemerald_shine,6 ,
--1,
-Xemerald_shine,2 ,
-Xemerald_shine,5 ,
--1,
-Xemerald_shine,3 ,
-Xemerald_shine,4 ,
--1,
-Yemerald_sB,6 ,
--1,
-Yemerald_s,6 ,
--1,
-Yemerald_sB,5 ,
--1,
-Yemerald_s,5 ,
--1,
-Yemerald_sB,4 ,
--1,
-Yemerald_s,4 ,
--1,
-Yemerald_sB,3 ,
--1,
-Yemerald_s,3 ,
--1,
-Yemerald_sB,2 ,
--1,
-Yemerald_s,2 ,
--1,
-Yemerald_sB,1 ,
--1,
-Yemerald_s,1 ,
--1,
-Yemerald_sB,0 ,
--1,
-Yemerald_s,0 ,
--1,
-Yemerald_eB,6 ,
-Yemerald_w,0 ,
--1,
-Yemerald_e,6 ,
-Yemerald_wB,0 ,
--1,
-Yemerald_eB,5 ,
-Yemerald_w,1 ,
--1,
-Yemerald_e,5 ,
-Yemerald_wB,1 ,
--1,
-Yemerald_eB,4 ,
-Yemerald_w,2 ,
--1,
-Yemerald_e,4 ,
-Yemerald_wB,2 ,
--1,
-Yemerald_eB,3 ,
-Yemerald_w,3 ,
--1,
-Yemerald_e,3 ,
-Yemerald_wB,3 ,
--1,
-Yemerald_eB,2 ,
-Yemerald_w,4 ,
--1,
-Yemerald_e,2 ,
-Yemerald_wB,4 ,
--1,
-Yemerald_eB,1 ,
-Yemerald_w,5 ,
--1,
-Yemerald_e,1 ,
-Yemerald_wB,5 ,
--1,
-Yemerald_eB,0 ,
-Yemerald_w,6 ,
--1,
-Yemerald_e,0 ,
-Yemerald_wB,6 ,
--1,
-Yemerald_eat,6 ,
--1,
-Yemerald_eat,5 ,
--1,
-Yemerald_eat,4 ,
--1,
-Yemerald_eat,3 ,
--1,
-Yemerald_eat,2 ,
--1,
-Yemerald_eat,1 ,
--1,
-Yemerald_eat,0 ,
--1,
-Yemerald_stone,0 ,
--1,
-Yemerald_stone,1 ,
--1,
-Yemerald_stone,2 ,
--1,
-Yemerald_stone,3 ,
--1,
-Yemerald_stone,4 ,
--1,
-Yemerald_stone,5 ,
--1,
-Yemerald_stone,6 ,
--1,
-
-Xdiamond,0 ,
-Xdiamond,1 ,
-Xdiamond,2 ,
-Xdiamond,3 ,
-Xdiamond,4 ,
-Xdiamond,5 ,
-Xdiamond,6 ,
-Xdiamond,7 ,
-Xdiamond_pause,0 ,
-Xdiamond_pause,1 ,
-Xdiamond_pause,2 ,
-Xdiamond_pause,3 ,
-Xdiamond_pause,4 ,
-Xdiamond_pause,5 ,
-Xdiamond_pause,6 ,
-Xdiamond_pause,7 ,
-Xdiamond_fall,0 ,
-Xdiamond_fall,1 ,
-Xdiamond_fall,2 ,
-Xdiamond_fall,3 ,
-Xdiamond_fall,4 ,
-Xdiamond_fall,5 ,
-Xdiamond_fall,6 ,
-Xdiamond_fall,7 ,
-#ifdef BAD_ROLL
-Xdiamond_force_e,0 ,
-Xdiamond_force_e,1 ,
-Xdiamond_force_e,2 ,
-Xdiamond_force_e,3 ,
-Xdiamond_force_e,4 ,
-Xdiamond_force_e,5 ,
-Xdiamond_force_e,6 ,
-Xdiamond_force_e,7 ,
-Xdiamond_force_w,0 ,
-Xdiamond_force_w,1 ,
-Xdiamond_force_w,2 ,
-Xdiamond_force_w,3 ,
-Xdiamond_force_w,4 ,
-Xdiamond_force_w,5 ,
-Xdiamond_force_w,6 ,
-Xdiamond_force_w,7 ,
-#endif
-Xdiamond_shine,0 ,
-Xdiamond_shine,7 ,
-Ydiamond_s,7 ,
-Ydiamond_e,7 ,
-Ydiamond_w,7 ,
--1,
-Xdiamond_shine,1 ,
-Xdiamond_shine,6 ,
--1,
-Xdiamond_shine,2 ,
-Xdiamond_shine,5 ,
--1,
-Xdiamond_shine,3 ,
-Xdiamond_shine,4 ,
--1,
-Ydiamond_sB,6 ,
--1,
-Ydiamond_s,6 ,
--1,
-Ydiamond_sB,5 ,
--1,
-Ydiamond_s,5 ,
--1,
-Ydiamond_sB,4 ,
--1,
-Ydiamond_s,4 ,
--1,
-Ydiamond_sB,3 ,
--1,
-Ydiamond_s,3 ,
--1,
-Ydiamond_sB,2 ,
--1,
-Ydiamond_s,2 ,
--1,
-Ydiamond_sB,1 ,
--1,
-Ydiamond_s,1 ,
--1,
-Ydiamond_sB,0 ,
--1,
-Ydiamond_s,0 ,
--1,
-Ydiamond_eB,6 ,
-Ydiamond_w,0 ,
--1,
-Ydiamond_e,6 ,
-Ydiamond_wB,0 ,
--1,
-Ydiamond_eB,5 ,
-Ydiamond_w,1 ,
--1,
-Ydiamond_e,5 ,
-Ydiamond_wB,1 ,
--1,
-Ydiamond_eB,4 ,
-Ydiamond_w,2 ,
--1,
-Ydiamond_e,4 ,
-Ydiamond_wB,2 ,
--1,
-Ydiamond_eB,3 ,
-Ydiamond_w,3 ,
--1,
-Ydiamond_e,3 ,
-Ydiamond_wB,3 ,
--1,
-Ydiamond_eB,2 ,
-Ydiamond_w,4 ,
--1,
-Ydiamond_e,2 ,
-Ydiamond_wB,4 ,
--1,
-Ydiamond_eB,1 ,
-Ydiamond_w,5 ,
--1,
-Ydiamond_e,1 ,
-Ydiamond_wB,5 ,
--1,
-Ydiamond_eB,0 ,
-Ydiamond_w,6 ,
--1,
-Ydiamond_e,0 ,
-Ydiamond_wB,6 ,
--1,
-Ydiamond_eat,6 ,
--1,
-Ydiamond_eat,5 ,
--1,
-Ydiamond_eat,4 ,
--1,
-Ydiamond_eat,3 ,
--1,
-Ydiamond_eat,2 ,
--1,
-Ydiamond_eat,1 ,
--1,
-Ydiamond_eat,0 ,
--1,
-Ydiamond_stone,0 ,
--1,
-Ydiamond_stone,1 ,
--1,
-Ydiamond_stone,2 ,
--1,
-Ydiamond_stone,3 ,
--1,
-Ydiamond_stone,4 ,
--1,
-Ydiamond_stone,5 ,
--1,
-Ydiamond_stone,6 ,
--1,
-
-Xdrip_fall,0 ,
-Xdrip_fall,1 ,
-Xdrip_fall,2 ,
-Xdrip_fall,3 ,
-Xdrip_fall,4 ,
-Xdrip_fall,5 ,
-Xdrip_fall,6 ,
-Xdrip_fall,7 ,
-Xdrip_eat,7 ,
-Ydrip_s2,7 ,
--1,
-Ydrip_s2B,6 ,
--1,
-Ydrip_s2,6 ,
--1,
-Ydrip_s2B,5 ,
--1,
-Ydrip_s2,5 ,
--1,
-Ydrip_s2B,4 ,
--1,
-Ydrip_s2,4 ,
--1,
-Ydrip_s2B,3 ,
--1,
-Ydrip_s2,3 ,
--1,
-Ydrip_s2B,2 ,
--1,
-Ydrip_s2,2 ,
--1,
-Ydrip_s2B,1 ,
--1,
-Ydrip_s2,1 ,
--1,
-Ydrip_s2B,0 ,
--1,
-Ydrip_s2,0 ,
--1,
-Xdrip_stretchB,0 ,
-Xdrip_stretchB,1 ,
-Xdrip_stretchB,2 ,
-Xdrip_stretchB,3 ,
-Xdrip_stretchB,4 ,
-Xdrip_stretchB,5 ,
-Xdrip_stretchB,6 ,
-Xdrip_stretchB,7 ,
-Ydrip_s1B,7 ,
--1,
-Xdrip_stretch,0 ,
-Xdrip_stretch,1 ,
-Xdrip_stretch,2 ,
-Xdrip_stretch,3 ,
-Xdrip_stretch,4 ,
-Xdrip_stretch,5 ,
-Xdrip_stretch,6 ,
-Xdrip_stretch,7 ,
-Ydrip_s1,7 ,
--1,
-Ydrip_s1B,6 ,
--1,
-Ydrip_s1,6 ,
--1,
-Ydrip_s1B,5 ,
--1,
-Ydrip_s1,5 ,
--1,
-Ydrip_s1B,4 ,
--1,
-Ydrip_s1,4 ,
--1,
-Ydrip_s1B,3 ,
--1,
-Ydrip_s1,3 ,
--1,
-Ydrip_s1B,2 ,
--1,
-Ydrip_s1,2 ,
--1,
-Ydrip_s1B,1 ,
--1,
-Ydrip_s1,1 ,
--1,
-Ydrip_s1B,0 ,
--1,
-Ydrip_s1,0 ,
--1,
-Xdrip_eat,0 ,
--1,
-Xdrip_eat,1 ,
--1,
-Xdrip_eat,2 ,
--1,
-Xdrip_eat,3 ,
--1,
-Xdrip_eat,4 ,
--1,
-Xdrip_eat,5 ,
--1,
-Xdrip_eat,6 ,
--1,
-
-Xbomb,0 ,
-Xbomb,1 ,
-Xbomb,2 ,
-Xbomb,3 ,
-Xbomb,4 ,
-Xbomb,5 ,
-Xbomb,6 ,
-Xbomb,7 ,
-Xbomb_pause,0 ,
-Xbomb_pause,1 ,
-Xbomb_pause,2 ,
-Xbomb_pause,3 ,
-Xbomb_pause,4 ,
-Xbomb_pause,5 ,
-Xbomb_pause,6 ,
-Xbomb_pause,7 ,
-Xbomb_fall,0 ,
-Xbomb_fall,1 ,
-Xbomb_fall,2 ,
-Xbomb_fall,3 ,
-Xbomb_fall,4 ,
-Xbomb_fall,5 ,
-Xbomb_fall,6 ,
-Xbomb_fall,7 ,
-#ifdef BAD_ROLL
-Xbomb_force_e,0 ,
-Xbomb_force_e,1 ,
-Xbomb_force_e,2 ,
-Xbomb_force_e,3 ,
-Xbomb_force_e,4 ,
-Xbomb_force_e,5 ,
-Xbomb_force_e,6 ,
-Xbomb_force_e,7 ,
-Xbomb_force_w,0 ,
-Xbomb_force_w,1 ,
-Xbomb_force_w,2 ,
-Xbomb_force_w,3 ,
-Xbomb_force_w,4 ,
-Xbomb_force_w,5 ,
-Xbomb_force_w,6 ,
-Xbomb_force_w,7 ,
-#endif
-Ybomb_s,7 ,
-Ybomb_e,7 ,
-Ybomb_w,7 ,
--1,
-Ybomb_sB,6 ,
--1,
-Ybomb_s,6 ,
--1,
-Ybomb_sB,5 ,
--1,
-Ybomb_s,5 ,
--1,
-Ybomb_sB,4 ,
--1,
-Ybomb_s,4 ,
--1,
-Ybomb_sB,3 ,
--1,
-Ybomb_s,3 ,
--1,
-Ybomb_sB,2 ,
--1,
-Ybomb_s,2 ,
--1,
-Ybomb_sB,1 ,
--1,
-Ybomb_s,1 ,
--1,
-Ybomb_sB,0 ,
--1,
-Ybomb_s,0 ,
--1,
-Ybomb_eB,6 ,
-Ybomb_w,0 ,
--1,
-Ybomb_e,6 ,
-Ybomb_wB,0 ,
--1,
-Ybomb_eB,5 ,
-Ybomb_w,1 ,
--1,
-Ybomb_e,5 ,
-Ybomb_wB,1 ,
--1,
-Ybomb_eB,4 ,
-Ybomb_w,2 ,
--1,
-Ybomb_e,4 ,
-Ybomb_wB,2 ,
--1,
-Ybomb_eB,3 ,
-Ybomb_w,3 ,
--1,
-Ybomb_e,3 ,
-Ybomb_wB,3 ,
--1,
-Ybomb_eB,2 ,
-Ybomb_w,4 ,
--1,
-Ybomb_e,2 ,
-Ybomb_wB,4 ,
--1,
-Ybomb_eB,1 ,
-Ybomb_w,5 ,
--1,
-Ybomb_e,1 ,
-Ybomb_wB,5 ,
--1,
-Ybomb_eB,0 ,
-Ybomb_w,6 ,
--1,
-Ybomb_e,0 ,
-Ybomb_wB,6 ,
--1,
-Ybomb_eat,6 ,
--1,
-Ybomb_eat,5 ,
--1,
-Ybomb_eat,4 ,
--1,
-Ybomb_eat,3 ,
--1,
-Ybomb_eat,2 ,
--1,
-Ybomb_eat,1 ,
--1,
-Ybomb_eat,0 ,
--1,
-
-Yballoon_n,7 ,
-Yballoon_e,7 ,
-Yballoon_s,7 ,
-Yballoon_w,7 ,
-Xballoon,0 ,
-Xballoon,1 ,
-Xballoon,2 ,
-Xballoon,3 ,
-Xballoon,4 ,
-Xballoon,5 ,
-Xballoon,6 ,
-Xballoon,7 ,
--1,
-Yballoon_n,0 ,
-Yballoon_sB,6 ,
--1,
-Yballoon_nB,0 ,
-Yballoon_s,6 ,
--1,
-Yballoon_n,1 ,
-Yballoon_sB,5 ,
--1,
-Yballoon_nB,1 ,
-Yballoon_s,5 ,
--1,
-Yballoon_n,2 ,
-Yballoon_sB,4 ,
--1,
-Yballoon_nB,2 ,
-Yballoon_s,4 ,
--1,
-Yballoon_n,3 ,
-Yballoon_sB,3 ,
--1,
-Yballoon_nB,3 ,
-Yballoon_s,3 ,
--1,
-Yballoon_n,4 ,
-Yballoon_sB,2 ,
--1,
-Yballoon_nB,4 ,
-Yballoon_s,2 ,
--1,
-Yballoon_n,5 ,
-Yballoon_sB,1 ,
--1,
-Yballoon_nB,5 ,
-Yballoon_s,1 ,
--1,
-Yballoon_n,6 ,
-Yballoon_sB,0 ,
--1,
-Yballoon_nB,6 ,
-Yballoon_s,0 ,
--1,
-Yballoon_eB,6 ,
-Yballoon_w,0 ,
--1,
-Yballoon_e,6 ,
-Yballoon_wB,0 ,
--1,
-Yballoon_eB,5 ,
-Yballoon_w,1 ,
--1,
-Yballoon_e,5 ,
-Yballoon_wB,1 ,
--1,
-Yballoon_eB,4 ,
-Yballoon_w,2 ,
--1,
-Yballoon_e,4 ,
-Yballoon_wB,2 ,
--1,
-Yballoon_eB,3 ,
-Yballoon_w,3 ,
--1,
-Yballoon_e,3 ,
-Yballoon_wB,3 ,
--1,
-Yballoon_eB,2 ,
-Yballoon_w,4 ,
--1,
-Yballoon_e,2 ,
-Yballoon_wB,4 ,
--1,
-Yballoon_eB,1 ,
-Yballoon_w,5 ,
--1,
-Yballoon_e,1 ,
-Yballoon_wB,5 ,
--1,
-Yballoon_eB,0 ,
-Yballoon_w,6 ,
--1,
-Yballoon_e,0 ,
-Yballoon_wB,6 ,
--1,
-
-Xgrass,0 ,
-Xgrass,1 ,
-Xgrass,2 ,
-Xgrass,3 ,
-Xgrass,4 ,
-Xgrass,5 ,
-Xgrass,6 ,
-Xgrass,7 ,
-Xfake_grass,0 ,
-Xfake_grass,1 ,
-Xfake_grass,2 ,
-Xfake_grass,3 ,
-Xfake_grass,4 ,
-Xfake_grass,5 ,
-Xfake_grass,6 ,
-Xfake_grass,7 ,
--1,
-Ygrass_nB,6 ,
--1,
-Ygrass_nB,5 ,
--1,
-Ygrass_nB,4 ,
--1,
-Ygrass_nB,3 ,
--1,
-Ygrass_nB,2 ,
--1,
-Ygrass_nB,1 ,
--1,
-Ygrass_nB,0 ,
--1,
-Ygrass_eB,6 ,
--1,
-Ygrass_eB,5 ,
--1,
-Ygrass_eB,4 ,
--1,
-Ygrass_eB,3 ,
--1,
-Ygrass_eB,2 ,
--1,
-Ygrass_eB,1 ,
--1,
-Ygrass_eB,0 ,
--1,
-Ygrass_sB,6 ,
--1,
-Ygrass_sB,5 ,
--1,
-Ygrass_sB,4 ,
--1,
-Ygrass_sB,3 ,
--1,
-Ygrass_sB,2 ,
--1,
-Ygrass_sB,1 ,
--1,
-Ygrass_sB,0 ,
--1,
-Ygrass_wB,6 ,
--1,
-Ygrass_wB,5 ,
--1,
-Ygrass_wB,4 ,
--1,
-Ygrass_wB,3 ,
--1,
-Ygrass_wB,2 ,
--1,
-Ygrass_wB,1 ,
--1,
-Ygrass_wB,0 ,
--1,
-
-Xdirt,0 ,
-Xdirt,1 ,
-Xdirt,2 ,
-Xdirt,3 ,
-Xdirt,4 ,
-Xdirt,5 ,
-Xdirt,6 ,
-Xdirt,7 ,
--1,
-Ydirt_nB,6 ,
--1,
-Ydirt_nB,5 ,
--1,
-Ydirt_nB,4 ,
--1,
-Ydirt_nB,3 ,
--1,
-Ydirt_nB,2 ,
--1,
-Ydirt_nB,1 ,
--1,
-Ydirt_nB,0 ,
--1,
-Ydirt_eB,6 ,
--1,
-Ydirt_eB,5 ,
--1,
-Ydirt_eB,4 ,
--1,
-Ydirt_eB,3 ,
--1,
-Ydirt_eB,2 ,
--1,
-Ydirt_eB,1 ,
--1,
-Ydirt_eB,0 ,
--1,
-Ydirt_sB,6 ,
--1,
-Ydirt_sB,5 ,
--1,
-Ydirt_sB,4 ,
--1,
-Ydirt_sB,3 ,
--1,
-Ydirt_sB,2 ,
--1,
-Ydirt_sB,1 ,
--1,
-Ydirt_sB,0 ,
--1,
-Ydirt_wB,6 ,
--1,
-Ydirt_wB,5 ,
--1,
-Ydirt_wB,4 ,
--1,
-Ydirt_wB,3 ,
--1,
-Ydirt_wB,2 ,
--1,
-Ydirt_wB,1 ,
--1,
-Ydirt_wB,0 ,
--1,
-
-Xacid_nw,0 ,
-Xacid_nw,1 ,
-Xacid_nw,2 ,
-Xacid_nw,3 ,
-Xacid_nw,4 ,
-Xacid_nw,5 ,
-Xacid_nw,6 ,
-Xacid_nw,7 ,
--1,
-Xacid_ne,0 ,
-Xacid_ne,1 ,
-Xacid_ne,2 ,
-Xacid_ne,3 ,
-Xacid_ne,4 ,
-Xacid_ne,5 ,
-Xacid_ne,6 ,
-Xacid_ne,7 ,
--1,
-Xacid_sw,0 ,
-Xacid_sw,1 ,
-Xacid_sw,2 ,
-Xacid_sw,3 ,
-Xacid_sw,4 ,
-Xacid_sw,5 ,
-Xacid_sw,6 ,
-Xacid_sw,7 ,
--1,
-Xacid_s,0 ,
-Xacid_s,1 ,
-Xacid_s,2 ,
-Xacid_s,3 ,
-Xacid_s,4 ,
-Xacid_s,5 ,
-Xacid_s,6 ,
-Xacid_s,7 ,
--1,
-Xacid_se,0 ,
-Xacid_se,1 ,
-Xacid_se,2 ,
-Xacid_se,3 ,
-Xacid_se,4 ,
-Xacid_se,5 ,
-Xacid_se,6 ,
-Xacid_se,7 ,
--1,
-Xacid_1,0 ,
-Xacid_1,1 ,
-Xacid_1,2 ,
-Xacid_1,3 ,
-Xacid_1,4 ,
-Xacid_1,5 ,
-Xacid_1,6 ,
-Xacid_1,7 ,
--1,
-Xacid_2,0 ,
-Xacid_2,1 ,
-Xacid_2,2 ,
-Xacid_2,3 ,
-Xacid_2,4 ,
-Xacid_2,5 ,
-Xacid_2,6 ,
-Xacid_2,7 ,
--1,
-Xacid_3,0 ,
-Xacid_3,1 ,
-Xacid_3,2 ,
-Xacid_3,3 ,
-Xacid_3,4 ,
-Xacid_3,5 ,
-Xacid_3,6 ,
-Xacid_3,7 ,
--1,
-Xacid_4,0 ,
-Xacid_4,1 ,
-Xacid_4,2 ,
-Xacid_4,3 ,
-Xacid_4,4 ,
-Xacid_4,5 ,
-Xacid_4,6 ,
-Xacid_4,7 ,
--1,
-Xacid_5,0 ,
-Xacid_5,1 ,
-Xacid_5,2 ,
-Xacid_5,3 ,
-Xacid_5,4 ,
-Xacid_5,5 ,
-Xacid_5,6 ,
-Xacid_5,7 ,
--1,
-Xacid_6,0 ,
-Xacid_6,1 ,
-Xacid_6,2 ,
-Xacid_6,3 ,
-Xacid_6,4 ,
-Xacid_6,5 ,
-Xacid_6,6 ,
-Xacid_6,7 ,
--1,
-Xacid_7,0 ,
-Xacid_7,1 ,
-Xacid_7,2 ,
-Xacid_7,3 ,
-Xacid_7,4 ,
-Xacid_7,5 ,
-Xacid_7,6 ,
-Xacid_7,7 ,
--1,
-Xacid_8,0 ,
-Xacid_8,1 ,
-Xacid_8,2 ,
-Xacid_8,3 ,
-Xacid_8,4 ,
-Xacid_8,5 ,
-Xacid_8,6 ,
-Xacid_8,7 ,
--1,
-Yacid_splash_wB,4 ,
-Yacid_splash_wB,5 ,
--1,
-Yacid_splash_wB,2 ,
-Yacid_splash_wB,3 ,
--1,
-Yacid_splash_wB,0 ,
-Yacid_splash_wB,1 ,
--1,
-Yacid_splash_eB,4 ,
-Yacid_splash_eB,5 ,
--1,
-Yacid_splash_eB,2 ,
-Yacid_splash_eB,3 ,
--1,
-Yacid_splash_eB,0 ,
-Yacid_splash_eB,1 ,
--1,
-
-Xball_2B,7 ,
-Xball_1,0 ,
-Xball_1,1 ,
-Xball_1,2 ,
-Xball_1,3 ,
-Xball_1,4 ,
-Xball_1,5 ,
-Xball_1,6 ,
-Xball_1,7 ,
--1,
-Xball_1B,0 ,
--1,
-Xball_1B,1 ,
--1,
-Xball_1B,2 ,
--1,
-Xball_1B,3 ,
--1,
-Xball_1B,4 ,
--1,
-Xball_1B,5 ,
--1,
-Xball_1B,6 ,
--1,
-Xball_1B,7 ,
-Xball_2,0 ,
-Xball_2,1 ,
-Xball_2,2 ,
-Xball_2,3 ,
-Xball_2,4 ,
-Xball_2,5 ,
-Xball_2,6 ,
-Xball_2,7 ,
--1,
-Xball_2B,0 ,
--1,
-Xball_2B,1 ,
--1,
-Xball_2B,2 ,
--1,
-Xball_2B,3 ,
--1,
-Xball_2B,4 ,
--1,
-Xball_2B,5 ,
--1,
-Xball_2B,6 ,
--1,
-
-Ygrow_ew_eat,7 ,
-Xgrow_ew,0 ,
-Xgrow_ew,1 ,
-Xgrow_ew,2 ,
-Xgrow_ew,3 ,
-Xgrow_ew,4 ,
-Xgrow_ew,5 ,
-Xgrow_ew,6 ,
-Xgrow_ew,7 ,
--1,
-Ygrow_ew_eat,0 ,
--1,
-Ygrow_ew_eat,1 ,
--1,
-Ygrow_ew_eat,2 ,
--1,
-Ygrow_ew_eat,3 ,
--1,
-Ygrow_ew_eat,4 ,
--1,
-Ygrow_ew_eat,5 ,
--1,
-Ygrow_ew_eat,6 ,
--1,
-Ygrow_ns_eat,7 ,
-Xgrow_ns,0 ,
-Xgrow_ns,1 ,
-Xgrow_ns,2 ,
-Xgrow_ns,3 ,
-Xgrow_ns,4 ,
-Xgrow_ns,5 ,
-Xgrow_ns,6 ,
-Xgrow_ns,7 ,
--1,
-Ygrow_ns_eat,0 ,
--1,
-Ygrow_ns_eat,1 ,
--1,
-Ygrow_ns_eat,2 ,
--1,
-Ygrow_ns_eat,3 ,
--1,
-Ygrow_ns_eat,4 ,
--1,
-Ygrow_ns_eat,5 ,
--1,
-Ygrow_ns_eat,6 ,
--1,
-
-XwonderwallB,7 ,
-Xwonderwall,0 ,
-Xwonderwall,1 ,
-Xwonderwall,2 ,
-Xwonderwall,3 ,
-Xwonderwall,4 ,
-Xwonderwall,5 ,
-Xwonderwall,6 ,
-Xwonderwall,7 ,
--1,
-XwonderwallB,0 ,
--1,
-XwonderwallB,1 ,
--1,
-XwonderwallB,2 ,
--1,
-XwonderwallB,3 ,
--1,
-XwonderwallB,4 ,
--1,
-XwonderwallB,5 ,
--1,
-XwonderwallB,6 ,
--1,
-
-Xameuba_1,0 ,
-Xameuba_1,1 ,
-Xameuba_1,2 ,
-Xameuba_1,3 ,
-Xameuba_1,4 ,
-Xameuba_1,5 ,
-Xameuba_1,6 ,
-Xameuba_1,7 ,
--1,
-Xameuba_2,0 ,
-Xameuba_2,1 ,
-Xameuba_2,2 ,
-Xameuba_2,3 ,
-Xameuba_2,4 ,
-Xameuba_2,5 ,
-Xameuba_2,6 ,
-Xameuba_2,7 ,
--1,
-Xameuba_3,0 ,
-Xameuba_3,1 ,
-Xameuba_3,2 ,
-Xameuba_3,3 ,
-Xameuba_3,4 ,
-Xameuba_3,5 ,
-Xameuba_3,6 ,
-Xameuba_3,7 ,
--1,
-Xameuba_4,0 ,
-Xameuba_4,1 ,
-Xameuba_4,2 ,
-Xameuba_4,3 ,
-Xameuba_4,4 ,
-Xameuba_4,5 ,
-Xameuba_4,6 ,
-Xameuba_4,7 ,
--1,
-Xameuba_5,0 ,
-Xameuba_5,1 ,
-Xameuba_5,2 ,
-Xameuba_5,3 ,
-Xameuba_5,4 ,
-Xameuba_5,5 ,
-Xameuba_5,6 ,
-Xameuba_5,7 ,
--1,
-Xameuba_6,0 ,
-Xameuba_6,1 ,
-Xameuba_6,2 ,
-Xameuba_6,3 ,
-Xameuba_6,4 ,
-Xameuba_6,5 ,
-Xameuba_6,6 ,
-Xameuba_6,7 ,
--1,
-Xameuba_7,0 ,
-Xameuba_7,1 ,
-Xameuba_7,2 ,
-Xameuba_7,3 ,
-Xameuba_7,4 ,
-Xameuba_7,5 ,
-Xameuba_7,6 ,
-Xameuba_7,7 ,
--1,
-Xameuba_8,0 ,
-Xameuba_8,1 ,
-Xameuba_8,2 ,
-Xameuba_8,3 ,
-Xameuba_8,4 ,
-Xameuba_8,5 ,
-Xameuba_8,6 ,
-Xameuba_8,7 ,
--1,
-
-Xdoor_1,0 ,
-Xdoor_1,1 ,
-Xdoor_1,2 ,
-Xdoor_1,3 ,
-Xdoor_1,4 ,
-Xdoor_1,5 ,
-Xdoor_1,6 ,
-Xdoor_1,7 ,
--1,
-Xdoor_2,0 ,
-Xdoor_2,1 ,
-Xdoor_2,2 ,
-Xdoor_2,3 ,
-Xdoor_2,4 ,
-Xdoor_2,5 ,
-Xdoor_2,6 ,
-Xdoor_2,7 ,
--1,
-Xdoor_3,0 ,
-Xdoor_3,1 ,
-Xdoor_3,2 ,
-Xdoor_3,3 ,
-Xdoor_3,4 ,
-Xdoor_3,5 ,
-Xdoor_3,6 ,
-Xdoor_3,7 ,
--1,
-Xdoor_4,0 ,
-Xdoor_4,1 ,
-Xdoor_4,2 ,
-Xdoor_4,3 ,
-Xdoor_4,4 ,
-Xdoor_4,5 ,
-Xdoor_4,6 ,
-Xdoor_4,7 ,
--1,
-Xdoor_5,0 ,
-Xdoor_5,1 ,
-Xdoor_5,2 ,
-Xdoor_5,3 ,
-Xdoor_5,4 ,
-Xdoor_5,5 ,
-Xdoor_5,6 ,
-Xdoor_5,7 ,
--1,
-Xdoor_6,0 ,
-Xdoor_6,1 ,
-Xdoor_6,2 ,
-Xdoor_6,3 ,
-Xdoor_6,4 ,
-Xdoor_6,5 ,
-Xdoor_6,6 ,
-Xdoor_6,7 ,
--1,
-Xdoor_7,0 ,
-Xdoor_7,1 ,
-Xdoor_7,2 ,
-Xdoor_7,3 ,
-Xdoor_7,4 ,
-Xdoor_7,5 ,
-Xdoor_7,6 ,
-Xdoor_7,7 ,
--1,
-Xdoor_8,0 ,
-Xdoor_8,1 ,
-Xdoor_8,2 ,
-Xdoor_8,3 ,
-Xdoor_8,4 ,
-Xdoor_8,5 ,
-Xdoor_8,6 ,
-Xdoor_8,7 ,
--1,
-Xkey_1,0 ,
-Xkey_1,1 ,
-Xkey_1,2 ,
-Xkey_1,3 ,
-Xkey_1,4 ,
-Xkey_1,5 ,
-Xkey_1,6 ,
-Xkey_1,7 ,
--1,
-Xkey_2,0 ,
-Xkey_2,1 ,
-Xkey_2,2 ,
-Xkey_2,3 ,
-Xkey_2,4 ,
-Xkey_2,5 ,
-Xkey_2,6 ,
-Xkey_2,7 ,
--1,
-Xkey_3,0 ,
-Xkey_3,1 ,
-Xkey_3,2 ,
-Xkey_3,3 ,
-Xkey_3,4 ,
-Xkey_3,5 ,
-Xkey_3,6 ,
-Xkey_3,7 ,
--1,
-Xkey_4,0 ,
-Xkey_4,1 ,
-Xkey_4,2 ,
-Xkey_4,3 ,
-Xkey_4,4 ,
-Xkey_4,5 ,
-Xkey_4,6 ,
-Xkey_4,7 ,
--1,
-Xkey_5,0 ,
-Xkey_5,1 ,
-Xkey_5,2 ,
-Xkey_5,3 ,
-Xkey_5,4 ,
-Xkey_5,5 ,
-Xkey_5,6 ,
-Xkey_5,7 ,
--1,
-Xkey_6,0 ,
-Xkey_6,1 ,
-Xkey_6,2 ,
-Xkey_6,3 ,
-Xkey_6,4 ,
-Xkey_6,5 ,
-Xkey_6,6 ,
-Xkey_6,7 ,
--1,
-Xkey_7,0 ,
-Xkey_7,1 ,
-Xkey_7,2 ,
-Xkey_7,3 ,
-Xkey_7,4 ,
-Xkey_7,5 ,
-Xkey_7,6 ,
-Xkey_7,7 ,
--1,
-Xkey_8,0 ,
-Xkey_8,1 ,
-Xkey_8,2 ,
-Xkey_8,3 ,
-Xkey_8,4 ,
-Xkey_8,5 ,
-Xkey_8,6 ,
-Xkey_8,7 ,
--1,
-
-Xwind_n,0 ,
-Xwind_n,1 ,
-Xwind_n,2 ,
-Xwind_n,3 ,
-Xwind_n,4 ,
-Xwind_n,5 ,
-Xwind_n,6 ,
-Xwind_n,7 ,
--1,
-Xwind_e,0 ,
-Xwind_e,1 ,
-Xwind_e,2 ,
-Xwind_e,3 ,
-Xwind_e,4 ,
-Xwind_e,5 ,
-Xwind_e,6 ,
-Xwind_e,7 ,
--1,
-Xwind_s,0 ,
-Xwind_s,1 ,
-Xwind_s,2 ,
-Xwind_s,3 ,
-Xwind_s,4 ,
-Xwind_s,5 ,
-Xwind_s,6 ,
-Xwind_s,7 ,
--1,
-Xwind_w,0 ,
-Xwind_w,1 ,
-Xwind_w,2 ,
-Xwind_w,3 ,
-Xwind_w,4 ,
-Xwind_w,5 ,
-Xwind_w,6 ,
-Xwind_w,7 ,
--1,
-Xwind_nesw,0 ,
-Xwind_nesw,1 ,
-Xwind_nesw,2 ,
-Xwind_nesw,3 ,
-Xwind_nesw,4 ,
-Xwind_nesw,5 ,
-Xwind_nesw,6 ,
-Xwind_nesw,7 ,
--1,
-Xwind_stop,0 ,
-Xwind_stop,1 ,
-Xwind_stop,2 ,
-Xwind_stop,3 ,
-Xwind_stop,4 ,
-Xwind_stop,5 ,
-Xwind_stop,6 ,
-Xwind_stop,7 ,
--1,
-
-Xexit,0 ,
-Xexit,1 ,
-Xexit,2 ,
-Xexit,3 ,
-Xexit,4 ,
-Xexit,5 ,
-Xexit,6 ,
-Xexit,7 ,
--1,
-Xexit_1,0 ,
-Xexit_1,1 ,
-Xexit_1,2 ,
--1,
-Xexit_1,3 ,
-Xexit_1,4 ,
-Xexit_1,5 ,
-Xexit_3,7 ,
-Xexit_3,6 ,
-Xexit_3,5 ,
--1,
-Xexit_1,6 ,
-Xexit_1,7 ,
-Xexit_2,0 ,
-Xexit_3,4 ,
-Xexit_3,3 ,
-Xexit_3,2 ,
--1,
-Xexit_2,1 ,
-Xexit_2,2 ,
-Xexit_2,3 ,
-Xexit_3,1 ,
-Xexit_3,0 ,
-Xexit_2,7 ,
--1,
-Xexit_2,4 ,
-Xexit_2,5 ,
-Xexit_2,6 ,
--1,
-
-Ydynamite_eat,0 ,
-Ydynamite_eat,1 ,
-Ydynamite_eat,2 ,
-Xdynamite,0 ,
-Xdynamite,1 ,
-Xdynamite,2 ,
-Xdynamite,3 ,
-Xdynamite,4 ,
-Xdynamite,5 ,
-Xdynamite,6 ,
-Xdynamite,7 ,
--1,
-Xdynamite_4,0 ,
-Xdynamite_4,1 ,
-Xdynamite_4,2 ,
-Xdynamite_4,3 ,
-Xdynamite_4,4 ,
-Xdynamite_4,5 ,
-Xdynamite_4,6 ,
-Xdynamite_4,7 ,
--1,
-Xdynamite_3,0 ,
-Xdynamite_3,1 ,
-Xdynamite_3,2 ,
-Xdynamite_3,3 ,
-Xdynamite_3,4 ,
-Xdynamite_3,5 ,
-Xdynamite_3,6 ,
-Xdynamite_3,7 ,
--1,
-Xdynamite_2,0 ,
-Xdynamite_2,1 ,
-Xdynamite_2,2 ,
-Xdynamite_2,3 ,
-Xdynamite_2,4 ,
-Xdynamite_2,5 ,
-Xdynamite_2,6 ,
-Xdynamite_2,7 ,
--1,
-Xdynamite_1,0 ,
-Xdynamite_1,1 ,
-Xdynamite_1,2 ,
-Xdynamite_1,3 ,
-Xdynamite_1,4 ,
-Xdynamite_1,5 ,
-Xdynamite_1,6 ,
-Xdynamite_1,7 ,
--1,
-
-Xbumper,0 ,
-Xbumper,1 ,
-Xbumper,2 ,
-Xbumper,3 ,
-Xbumper,4 ,
-Xbumper,5 ,
-Xbumper,6 ,
-Xbumper,7 ,
-XbumperB,0 ,
-XbumperB,7 ,
--1,
-XbumperB,1 ,
-XbumperB,6 ,
--1,
-XbumperB,2 ,
-XbumperB,5 ,
--1,
-XbumperB,3 ,
-XbumperB,4 ,
--1,
-
-Xwheel,0 ,
-Xwheel,1 ,
-Xwheel,2 ,
-Xwheel,3 ,
-Xwheel,4 ,
-Xwheel,5 ,
-Xwheel,6 ,
-Xwheel,7 ,
-XwheelB,7 ,
-XwheelB,6 ,
-XwheelB,5 ,
-XwheelB,4 ,
--1,
-XwheelB,3 ,
-XwheelB,2 ,
-XwheelB,1 ,
-XwheelB,0 ,
--1,
-
-XswitchB,0 ,
-XswitchB,1 ,
-XswitchB,2 ,
-XswitchB,3 ,
-XswitchB,4 ,
-XswitchB,5 ,
-XswitchB,6 ,
-XswitchB,7 ,
--1,
-Xswitch,0 ,
-Xswitch,1 ,
-Xswitch,2 ,
-Xswitch,3 ,
-Xswitch,4 ,
-Xswitch,5 ,
-Xswitch,6 ,
-Xswitch,7 ,
--1,
-
-Xsand,0 ,
-Xsand,1 ,
-Xsand,2 ,
-Xsand,3 ,
-Xsand,4 ,
-Xsand,5 ,
-Xsand,6 ,
-Xsand,7 ,
-Xsand_stone,0 ,
-Xsand_stone,1 ,
-Xsand_stone,2 ,
-Xsand_stone,3 ,
-Xsand_stone,4 ,
-Xsand_stone,5 ,
-Xsand_stone,6 ,
-Xsand_stone,7 ,
-Xsand_stonesand_1,0 ,
-Xsand_stonesand_1,1 ,
-Xsand_stonesand_1,2 ,
-Xsand_stonesand_1,3 ,
-Xsand_stonesand_1,4 ,
-Xsand_stonesand_1,5 ,
-Xsand_stonesand_1,6 ,
-Xsand_stonesand_1,7 ,
-Xsand_stonesand_2,0 ,
-Xsand_stonesand_2,1 ,
-Xsand_stonesand_2,2 ,
-Xsand_stonesand_2,3 ,
-Xsand_stonesand_2,4 ,
-Xsand_stonesand_2,5 ,
-Xsand_stonesand_2,6 ,
-Xsand_stonesand_2,7 ,
-Xsand_stonesand_3,0 ,
-Xsand_stonesand_3,1 ,
-Xsand_stonesand_3,2 ,
-Xsand_stonesand_3,3 ,
-Xsand_stonesand_3,4 ,
-Xsand_stonesand_3,5 ,
-Xsand_stonesand_3,6 ,
-Xsand_stonesand_3,7 ,
-Xsand_stonesand_4,0 ,
-Xsand_stonesand_4,1 ,
-Xsand_stonesand_4,2 ,
-Xsand_stonesand_4,3 ,
-Xsand_stonesand_4,4 ,
-Xsand_stonesand_4,5 ,
-Xsand_stonesand_4,6 ,
-Xsand_stonesand_4,7 ,
-Xsand_sandstone_1,0 ,
-Xsand_sandstone_1,1 ,
-Xsand_sandstone_1,2 ,
-Xsand_sandstone_1,3 ,
-Xsand_sandstone_1,4 ,
-Xsand_sandstone_1,5 ,
-Xsand_sandstone_1,6 ,
-Xsand_sandstone_1,7 ,
-Xsand_sandstone_2,0 ,
-Xsand_sandstone_2,1 ,
-Xsand_sandstone_2,2 ,
-Xsand_sandstone_2,3 ,
-Xsand_sandstone_2,4 ,
-Xsand_sandstone_2,5 ,
-Xsand_sandstone_2,6 ,
-Xsand_sandstone_2,7 ,
-Xsand_sandstone_3,0 ,
-Xsand_sandstone_3,1 ,
-Xsand_sandstone_3,2 ,
-Xsand_sandstone_3,3 ,
-Xsand_sandstone_3,4 ,
-Xsand_sandstone_3,5 ,
-Xsand_sandstone_3,6 ,
-Xsand_sandstone_3,7 ,
-Xsand_sandstone_4,0 ,
-Xsand_sandstone_4,1 ,
-Xsand_sandstone_4,2 ,
-Xsand_sandstone_4,3 ,
-Xsand_sandstone_4,4 ,
-Xsand_sandstone_4,5 ,
-Xsand_sandstone_4,6 ,
-Xsand_sandstone_4,7 ,
--1,
-
-Xplant,0 ,
-Xplant,1 ,
-Xplant,2 ,
-Xplant,3 ,
-Xplant,4 ,
-Xplant,5 ,
-Xplant,6 ,
-Xplant,7 ,
-Yplant,0 ,
-Yplant,1 ,
-Yplant,2 ,
-Yplant,3 ,
-Yplant,4 ,
-Yplant,5 ,
-Yplant,6 ,
-Yplant,7 ,
--1,
-
-Xlenses,0 ,
-Xlenses,1 ,
-Xlenses,2 ,
-Xlenses,3 ,
-Xlenses,4 ,
-Xlenses,5 ,
-Xlenses,6 ,
-Xlenses,7 ,
--1,
-
-Xmagnify,0 ,
-Xmagnify,1 ,
-Xmagnify,2 ,
-Xmagnify,3 ,
-Xmagnify,4 ,
-Xmagnify,5 ,
-Xmagnify,6 ,
-Xmagnify,7 ,
--1,
-
-XdripperB,0 ,
-XdripperB,1 ,
-XdripperB,2 ,
-XdripperB,3 ,
-XdripperB,4 ,
-XdripperB,5 ,
-XdripperB,6 ,
-XdripperB,7 ,
--1,
-
-Xfake_blankB,0 ,
-Xfake_blankB,1 ,
-Xfake_blankB,2 ,
-Xfake_blankB,3 ,
-Xfake_blankB,4 ,
-Xfake_blankB,5 ,
-Xfake_blankB,6 ,
-Xfake_blankB,7 ,
--1,
-
-Xfake_grassB,0 ,
-Xfake_grassB,1 ,
-Xfake_grassB,2 ,
-Xfake_grassB,3 ,
-Xfake_grassB,4 ,
-Xfake_grassB,5 ,
-Xfake_grassB,6 ,
-Xfake_grassB,7 ,
--1,
-
-Xfake_door_1,0 ,
-Xfake_door_1,1 ,
-Xfake_door_1,2 ,
-Xfake_door_1,3 ,
-Xfake_door_1,4 ,
-Xfake_door_1,5 ,
-Xfake_door_1,6 ,
-Xfake_door_1,7 ,
-Xfake_door_2,0 ,
-Xfake_door_2,1 ,
-Xfake_door_2,2 ,
-Xfake_door_2,3 ,
-Xfake_door_2,4 ,
-Xfake_door_2,5 ,
-Xfake_door_2,6 ,
-Xfake_door_2,7 ,
-Xfake_door_3,0 ,
-Xfake_door_3,1 ,
-Xfake_door_3,2 ,
-Xfake_door_3,3 ,
-Xfake_door_3,4 ,
-Xfake_door_3,5 ,
-Xfake_door_3,6 ,
-Xfake_door_3,7 ,
-Xfake_door_4,0 ,
-Xfake_door_4,1 ,
-Xfake_door_4,2 ,
-Xfake_door_4,3 ,
-Xfake_door_4,4 ,
-Xfake_door_4,5 ,
-Xfake_door_4,6 ,
-Xfake_door_4,7 ,
-Xfake_door_5,0 ,
-Xfake_door_5,1 ,
-Xfake_door_5,2 ,
-Xfake_door_5,3 ,
-Xfake_door_5,4 ,
-Xfake_door_5,5 ,
-Xfake_door_5,6 ,
-Xfake_door_5,7 ,
-Xfake_door_6,0 ,
-Xfake_door_6,1 ,
-Xfake_door_6,2 ,
-Xfake_door_6,3 ,
-Xfake_door_6,4 ,
-Xfake_door_6,5 ,
-Xfake_door_6,6 ,
-Xfake_door_6,7 ,
-Xfake_door_7,0 ,
-Xfake_door_7,1 ,
-Xfake_door_7,2 ,
-Xfake_door_7,3 ,
-Xfake_door_7,4 ,
-Xfake_door_7,5 ,
-Xfake_door_7,6 ,
-Xfake_door_7,7 ,
-Xfake_door_8,0 ,
-Xfake_door_8,1 ,
-Xfake_door_8,2 ,
-Xfake_door_8,3 ,
-Xfake_door_8,4 ,
-Xfake_door_8,5 ,
-Xfake_door_8,6 ,
-Xfake_door_8,7 ,
--1,
-
-Xsteel_1,0 ,
-Xsteel_1,1 ,
-Xsteel_1,2 ,
-Xsteel_1,3 ,
-Xsteel_1,4 ,
-Xsteel_1,5 ,
-Xsteel_1,6 ,
-Xsteel_1,7 ,
--1,
-Xsteel_2,0 ,
-Xsteel_2,1 ,
-Xsteel_2,2 ,
-Xsteel_2,3 ,
-Xsteel_2,4 ,
-Xsteel_2,5 ,
-Xsteel_2,6 ,
-Xsteel_2,7 ,
--1,
-Xsteel_3,0 ,
-Xsteel_3,1 ,
-Xsteel_3,2 ,
-Xsteel_3,3 ,
-Xsteel_3,4 ,
-Xsteel_3,5 ,
-Xsteel_3,6 ,
-Xsteel_3,7 ,
--1,
-Xsteel_4,0 ,
-Xsteel_4,1 ,
-Xsteel_4,2 ,
-Xsteel_4,3 ,
-Xsteel_4,4 ,
-Xsteel_4,5 ,
-Xsteel_4,6 ,
-Xsteel_4,7 ,
--1,
-Xwall_1,0 ,
-Xwall_1,1 ,
-Xwall_1,2 ,
-Xwall_1,3 ,
-Xwall_1,4 ,
-Xwall_1,5 ,
-Xwall_1,6 ,
-Xwall_1,7 ,
--1,
-Xwall_2,0 ,
-Xwall_2,1 ,
-Xwall_2,2 ,
-Xwall_2,3 ,
-Xwall_2,4 ,
-Xwall_2,5 ,
-Xwall_2,6 ,
-Xwall_2,7 ,
--1,
-Xwall_3,0 ,
-Xwall_3,1 ,
-Xwall_3,2 ,
-Xwall_3,3 ,
-Xwall_3,4 ,
-Xwall_3,5 ,
-Xwall_3,6 ,
-Xwall_3,7 ,
--1,
-Xwall_4,0 ,
-Xwall_4,1 ,
-Xwall_4,2 ,
-Xwall_4,3 ,
-Xwall_4,4 ,
-Xwall_4,5 ,
-Xwall_4,6 ,
-Xwall_4,7 ,
--1,
-Xround_wall_1,0 ,
-Xround_wall_1,1 ,
-Xround_wall_1,2 ,
-Xround_wall_1,3 ,
-Xround_wall_1,4 ,
-Xround_wall_1,5 ,
-Xround_wall_1,6 ,
-Xround_wall_1,7 ,
--1,
-Xround_wall_2,0 ,
-Xround_wall_2,1 ,
-Xround_wall_2,2 ,
-Xround_wall_2,3 ,
-Xround_wall_2,4 ,
-Xround_wall_2,5 ,
-Xround_wall_2,6 ,
-Xround_wall_2,7 ,
--1,
-Xround_wall_3,0 ,
-Xround_wall_3,1 ,
-Xround_wall_3,2 ,
-Xround_wall_3,3 ,
-Xround_wall_3,4 ,
-Xround_wall_3,5 ,
-Xround_wall_3,6 ,
-Xround_wall_3,7 ,
--1,
-Xround_wall_4,0 ,
-Xround_wall_4,1 ,
-Xround_wall_4,2 ,
-Xround_wall_4,3 ,
-Xround_wall_4,4 ,
-Xround_wall_4,5 ,
-Xround_wall_4,6 ,
-Xround_wall_4,7 ,
--1,
-Xdecor_1,0 ,
-Xdecor_1,1 ,
-Xdecor_1,2 ,
-Xdecor_1,3 ,
-Xdecor_1,4 ,
-Xdecor_1,5 ,
-Xdecor_1,6 ,
-Xdecor_1,7 ,
--1,
-Xdecor_2,0 ,
-Xdecor_2,1 ,
-Xdecor_2,2 ,
-Xdecor_2,3 ,
-Xdecor_2,4 ,
-Xdecor_2,5 ,
-Xdecor_2,6 ,
-Xdecor_2,7 ,
--1,
-Xdecor_3,0 ,
-Xdecor_3,1 ,
-Xdecor_3,2 ,
-Xdecor_3,3 ,
-Xdecor_3,4 ,
-Xdecor_3,5 ,
-Xdecor_3,6 ,
-Xdecor_3,7 ,
--1,
-Xdecor_4,0 ,
-Xdecor_4,1 ,
-Xdecor_4,2 ,
-Xdecor_4,3 ,
-Xdecor_4,4 ,
-Xdecor_4,5 ,
-Xdecor_4,6 ,
-Xdecor_4,7 ,
--1,
-Xdecor_5,0 ,
-Xdecor_5,1 ,
-Xdecor_5,2 ,
-Xdecor_5,3 ,
-Xdecor_5,4 ,
-Xdecor_5,5 ,
-Xdecor_5,6 ,
-Xdecor_5,7 ,
--1,
-Xdecor_6,0 ,
-Xdecor_6,1 ,
-Xdecor_6,2 ,
-Xdecor_6,3 ,
-Xdecor_6,4 ,
-Xdecor_6,5 ,
-Xdecor_6,6 ,
-Xdecor_6,7 ,
--1,
-Xdecor_7,0 ,
-Xdecor_7,1 ,
-Xdecor_7,2 ,
-Xdecor_7,3 ,
-Xdecor_7,4 ,
-Xdecor_7,5 ,
-Xdecor_7,6 ,
-Xdecor_7,7 ,
--1,
-Xdecor_8,0 ,
-Xdecor_8,1 ,
-Xdecor_8,2 ,
-Xdecor_8,3 ,
-Xdecor_8,4 ,
-Xdecor_8,5 ,
-Xdecor_8,6 ,
-Xdecor_8,7 ,
--1,
-Xdecor_9,0 ,
-Xdecor_9,1 ,
-Xdecor_9,2 ,
-Xdecor_9,3 ,
-Xdecor_9,4 ,
-Xdecor_9,5 ,
-Xdecor_9,6 ,
-Xdecor_9,7 ,
--1,
-Xdecor_10,0 ,
-Xdecor_10,1 ,
-Xdecor_10,2 ,
-Xdecor_10,3 ,
-Xdecor_10,4 ,
-Xdecor_10,5 ,
-Xdecor_10,6 ,
-Xdecor_10,7 ,
--1,
-Xdecor_11,0 ,
-Xdecor_11,1 ,
-Xdecor_11,2 ,
-Xdecor_11,3 ,
-Xdecor_11,4 ,
-Xdecor_11,5 ,
-Xdecor_11,6 ,
-Xdecor_11,7 ,
--1,
-Xdecor_12,0 ,
-Xdecor_12,1 ,
-Xdecor_12,2 ,
-Xdecor_12,3 ,
-Xdecor_12,4 ,
-Xdecor_12,5 ,
-Xdecor_12,6 ,
-Xdecor_12,7 ,
--1,
-Xalpha_excla,0 ,
-Xalpha_excla,1 ,
-Xalpha_excla,2 ,
-Xalpha_excla,3 ,
-Xalpha_excla,4 ,
-Xalpha_excla,5 ,
-Xalpha_excla,6 ,
-Xalpha_excla,7 ,
--1,
-Xalpha_quote,0 ,
-Xalpha_quote,1 ,
-Xalpha_quote,2 ,
-Xalpha_quote,3 ,
-Xalpha_quote,4 ,
-Xalpha_quote,5 ,
-Xalpha_quote,6 ,
-Xalpha_quote,7 ,
--1,
-Xalpha_comma,0 ,
-Xalpha_comma,1 ,
-Xalpha_comma,2 ,
-Xalpha_comma,3 ,
-Xalpha_comma,4 ,
-Xalpha_comma,5 ,
-Xalpha_comma,6 ,
-Xalpha_comma,7 ,
--1,
-Xalpha_minus,0 ,
-Xalpha_minus,1 ,
-Xalpha_minus,2 ,
-Xalpha_minus,3 ,
-Xalpha_minus,4 ,
-Xalpha_minus,5 ,
-Xalpha_minus,6 ,
-Xalpha_minus,7 ,
--1,
-Xalpha_perio,0 ,
-Xalpha_perio,1 ,
-Xalpha_perio,2 ,
-Xalpha_perio,3 ,
-Xalpha_perio,4 ,
-Xalpha_perio,5 ,
-Xalpha_perio,6 ,
-Xalpha_perio,7 ,
--1,
-Xalpha_0,0 ,
-Xalpha_0,1 ,
-Xalpha_0,2 ,
-Xalpha_0,3 ,
-Xalpha_0,4 ,
-Xalpha_0,5 ,
-Xalpha_0,6 ,
-Xalpha_0,7 ,
--1,
-Xalpha_1,0 ,
-Xalpha_1,1 ,
-Xalpha_1,2 ,
-Xalpha_1,3 ,
-Xalpha_1,4 ,
-Xalpha_1,5 ,
-Xalpha_1,6 ,
-Xalpha_1,7 ,
--1,
-Xalpha_2,0 ,
-Xalpha_2,1 ,
-Xalpha_2,2 ,
-Xalpha_2,3 ,
-Xalpha_2,4 ,
-Xalpha_2,5 ,
-Xalpha_2,6 ,
-Xalpha_2,7 ,
--1,
-Xalpha_3,0 ,
-Xalpha_3,1 ,
-Xalpha_3,2 ,
-Xalpha_3,3 ,
-Xalpha_3,4 ,
-Xalpha_3,5 ,
-Xalpha_3,6 ,
-Xalpha_3,7 ,
--1,
-Xalpha_4,0 ,
-Xalpha_4,1 ,
-Xalpha_4,2 ,
-Xalpha_4,3 ,
-Xalpha_4,4 ,
-Xalpha_4,5 ,
-Xalpha_4,6 ,
-Xalpha_4,7 ,
--1,
-Xalpha_5,0 ,
-Xalpha_5,1 ,
-Xalpha_5,2 ,
-Xalpha_5,3 ,
-Xalpha_5,4 ,
-Xalpha_5,5 ,
-Xalpha_5,6 ,
-Xalpha_5,7 ,
--1,
-Xalpha_6,0 ,
-Xalpha_6,1 ,
-Xalpha_6,2 ,
-Xalpha_6,3 ,
-Xalpha_6,4 ,
-Xalpha_6,5 ,
-Xalpha_6,6 ,
-Xalpha_6,7 ,
--1,
-Xalpha_7,0 ,
-Xalpha_7,1 ,
-Xalpha_7,2 ,
-Xalpha_7,3 ,
-Xalpha_7,4 ,
-Xalpha_7,5 ,
-Xalpha_7,6 ,
-Xalpha_7,7 ,
--1,
-Xalpha_8,0 ,
-Xalpha_8,1 ,
-Xalpha_8,2 ,
-Xalpha_8,3 ,
-Xalpha_8,4 ,
-Xalpha_8,5 ,
-Xalpha_8,6 ,
-Xalpha_8,7 ,
--1,
-Xalpha_9,0 ,
-Xalpha_9,1 ,
-Xalpha_9,2 ,
-Xalpha_9,3 ,
-Xalpha_9,4 ,
-Xalpha_9,5 ,
-Xalpha_9,6 ,
-Xalpha_9,7 ,
--1,
-Xalpha_colon,0 ,
-Xalpha_colon,1 ,
-Xalpha_colon,2 ,
-Xalpha_colon,3 ,
-Xalpha_colon,4 ,
-Xalpha_colon,5 ,
-Xalpha_colon,6 ,
-Xalpha_colon,7 ,
--1,
-Xalpha_arrow_w,0 ,
-Xalpha_arrow_w,1 ,
-Xalpha_arrow_w,2 ,
-Xalpha_arrow_w,3 ,
-Xalpha_arrow_w,4 ,
-Xalpha_arrow_w,5 ,
-Xalpha_arrow_w,6 ,
-Xalpha_arrow_w,7 ,
--1,
-Xalpha_arrow_e,0 ,
-Xalpha_arrow_e,1 ,
-Xalpha_arrow_e,2 ,
-Xalpha_arrow_e,3 ,
-Xalpha_arrow_e,4 ,
-Xalpha_arrow_e,5 ,
-Xalpha_arrow_e,6 ,
-Xalpha_arrow_e,7 ,
--1,
-Xalpha_quest,0 ,
-Xalpha_quest,1 ,
-Xalpha_quest,2 ,
-Xalpha_quest,3 ,
-Xalpha_quest,4 ,
-Xalpha_quest,5 ,
-Xalpha_quest,6 ,
-Xalpha_quest,7 ,
--1,
-Xalpha_a,0 ,
-Xalpha_a,1 ,
-Xalpha_a,2 ,
-Xalpha_a,3 ,
-Xalpha_a,4 ,
-Xalpha_a,5 ,
-Xalpha_a,6 ,
-Xalpha_a,7 ,
--1,
-Xalpha_b,0 ,
-Xalpha_b,1 ,
-Xalpha_b,2 ,
-Xalpha_b,3 ,
-Xalpha_b,4 ,
-Xalpha_b,5 ,
-Xalpha_b,6 ,
-Xalpha_b,7 ,
--1,
-Xalpha_c,0 ,
-Xalpha_c,1 ,
-Xalpha_c,2 ,
-Xalpha_c,3 ,
-Xalpha_c,4 ,
-Xalpha_c,5 ,
-Xalpha_c,6 ,
-Xalpha_c,7 ,
--1,
-Xalpha_d,0 ,
-Xalpha_d,1 ,
-Xalpha_d,2 ,
-Xalpha_d,3 ,
-Xalpha_d,4 ,
-Xalpha_d,5 ,
-Xalpha_d,6 ,
-Xalpha_d,7 ,
--1,
-Xalpha_e,0 ,
-Xalpha_e,1 ,
-Xalpha_e,2 ,
-Xalpha_e,3 ,
-Xalpha_e,4 ,
-Xalpha_e,5 ,
-Xalpha_e,6 ,
-Xalpha_e,7 ,
--1,
-Xalpha_f,0 ,
-Xalpha_f,1 ,
-Xalpha_f,2 ,
-Xalpha_f,3 ,
-Xalpha_f,4 ,
-Xalpha_f,5 ,
-Xalpha_f,6 ,
-Xalpha_f,7 ,
--1,
-Xalpha_g,0 ,
-Xalpha_g,1 ,
-Xalpha_g,2 ,
-Xalpha_g,3 ,
-Xalpha_g,4 ,
-Xalpha_g,5 ,
-Xalpha_g,6 ,
-Xalpha_g,7 ,
--1,
-Xalpha_h,0 ,
-Xalpha_h,1 ,
-Xalpha_h,2 ,
-Xalpha_h,3 ,
-Xalpha_h,4 ,
-Xalpha_h,5 ,
-Xalpha_h,6 ,
-Xalpha_h,7 ,
--1,
-Xalpha_i,0 ,
-Xalpha_i,1 ,
-Xalpha_i,2 ,
-Xalpha_i,3 ,
-Xalpha_i,4 ,
-Xalpha_i,5 ,
-Xalpha_i,6 ,
-Xalpha_i,7 ,
--1,
-Xalpha_j,0 ,
-Xalpha_j,1 ,
-Xalpha_j,2 ,
-Xalpha_j,3 ,
-Xalpha_j,4 ,
-Xalpha_j,5 ,
-Xalpha_j,6 ,
-Xalpha_j,7 ,
--1,
-Xalpha_k,0 ,
-Xalpha_k,1 ,
-Xalpha_k,2 ,
-Xalpha_k,3 ,
-Xalpha_k,4 ,
-Xalpha_k,5 ,
-Xalpha_k,6 ,
-Xalpha_k,7 ,
--1,
-Xalpha_l,0 ,
-Xalpha_l,1 ,
-Xalpha_l,2 ,
-Xalpha_l,3 ,
-Xalpha_l,4 ,
-Xalpha_l,5 ,
-Xalpha_l,6 ,
-Xalpha_l,7 ,
--1,
-Xalpha_m,0 ,
-Xalpha_m,1 ,
-Xalpha_m,2 ,
-Xalpha_m,3 ,
-Xalpha_m,4 ,
-Xalpha_m,5 ,
-Xalpha_m,6 ,
-Xalpha_m,7 ,
--1,
-Xalpha_n,0 ,
-Xalpha_n,1 ,
-Xalpha_n,2 ,
-Xalpha_n,3 ,
-Xalpha_n,4 ,
-Xalpha_n,5 ,
-Xalpha_n,6 ,
-Xalpha_n,7 ,
--1,
-Xalpha_o,0 ,
-Xalpha_o,1 ,
-Xalpha_o,2 ,
-Xalpha_o,3 ,
-Xalpha_o,4 ,
-Xalpha_o,5 ,
-Xalpha_o,6 ,
-Xalpha_o,7 ,
--1,
-Xalpha_p,0 ,
-Xalpha_p,1 ,
-Xalpha_p,2 ,
-Xalpha_p,3 ,
-Xalpha_p,4 ,
-Xalpha_p,5 ,
-Xalpha_p,6 ,
-Xalpha_p,7 ,
--1,
-Xalpha_q,0 ,
-Xalpha_q,1 ,
-Xalpha_q,2 ,
-Xalpha_q,3 ,
-Xalpha_q,4 ,
-Xalpha_q,5 ,
-Xalpha_q,6 ,
-Xalpha_q,7 ,
--1,
-Xalpha_r,0 ,
-Xalpha_r,1 ,
-Xalpha_r,2 ,
-Xalpha_r,3 ,
-Xalpha_r,4 ,
-Xalpha_r,5 ,
-Xalpha_r,6 ,
-Xalpha_r,7 ,
--1,
-Xalpha_s,0 ,
-Xalpha_s,1 ,
-Xalpha_s,2 ,
-Xalpha_s,3 ,
-Xalpha_s,4 ,
-Xalpha_s,5 ,
-Xalpha_s,6 ,
-Xalpha_s,7 ,
--1,
-Xalpha_t,0 ,
-Xalpha_t,1 ,
-Xalpha_t,2 ,
-Xalpha_t,3 ,
-Xalpha_t,4 ,
-Xalpha_t,5 ,
-Xalpha_t,6 ,
-Xalpha_t,7 ,
--1,
-Xalpha_u,0 ,
-Xalpha_u,1 ,
-Xalpha_u,2 ,
-Xalpha_u,3 ,
-Xalpha_u,4 ,
-Xalpha_u,5 ,
-Xalpha_u,6 ,
-Xalpha_u,7 ,
--1,
-Xalpha_v,0 ,
-Xalpha_v,1 ,
-Xalpha_v,2 ,
-Xalpha_v,3 ,
-Xalpha_v,4 ,
-Xalpha_v,5 ,
-Xalpha_v,6 ,
-Xalpha_v,7 ,
--1,
-Xalpha_w,0 ,
-Xalpha_w,1 ,
-Xalpha_w,2 ,
-Xalpha_w,3 ,
-Xalpha_w,4 ,
-Xalpha_w,5 ,
-Xalpha_w,6 ,
-Xalpha_w,7 ,
--1,
-Xalpha_x,0 ,
-Xalpha_x,1 ,
-Xalpha_x,2 ,
-Xalpha_x,3 ,
-Xalpha_x,4 ,
-Xalpha_x,5 ,
-Xalpha_x,6 ,
-Xalpha_x,7 ,
--1,
-Xalpha_y,0 ,
-Xalpha_y,1 ,
-Xalpha_y,2 ,
-Xalpha_y,3 ,
-Xalpha_y,4 ,
-Xalpha_y,5 ,
-Xalpha_y,6 ,
-Xalpha_y,7 ,
--1,
-Xalpha_z,0 ,
-Xalpha_z,1 ,
-Xalpha_z,2 ,
-Xalpha_z,3 ,
-Xalpha_z,4 ,
-Xalpha_z,5 ,
-Xalpha_z,6 ,
-Xalpha_z,7 ,
--1,
-Xalpha_copyr,0 ,
-Xalpha_copyr,1 ,
-Xalpha_copyr,2 ,
-Xalpha_copyr,3 ,
-Xalpha_copyr,4 ,
-Xalpha_copyr,5 ,
-Xalpha_copyr,6 ,
-Xalpha_copyr,7 ,
--1,
-
-Yball_eat,7 ,
-Yball_eat,6 ,
-Yball_eat,5 ,
-Xboom_2,7 ,
-Xboom_2,6 ,
-Xboom_2,5 ,
--1,
-Yball_eat,4 ,
-Yball_eat,3 ,
-Yball_eat,2 ,
-Xboom_2,4 ,
-Xboom_2,3 ,
-Xboom_2,2 ,
--1,
-Yball_eat,1 ,
-Yball_eat,0 ,
-Xboom_2,1 ,
-Xboom_2,0 ,
-Xboom_1,7 ,
--1,
-Xboom_1,6 ,
-Xboom_1,5 ,
-Xboom_android,7 ,
--1,
-Xboom_1,4 ,
-Xboom_1,3 ,
-Xboom_bug,4 ,
-Xboom_bomb,4 ,
-Xboom_bug,3 ,
-Xboom_bomb,3 ,
--1,
-Xboom_1,2 ,
-Xboom_1,1 ,
-Xboom_bug,6 ,
-Xboom_bomb,6 ,
-Xboom_bug,5 ,
-Xboom_bomb,5 ,
-Xboom_bug,2 ,
-Xboom_bomb,2 ,
-Xboom_bug,1 ,
-Xboom_bomb,1 ,
--1,
-Xboom_bug,0 ,
-Xboom_bug,7 ,
-Xboom_bomb,0 ,
-Xboom_bomb,7 ,
-Xboom_1,0 ,
-Ybug_stone,7 ,
-Ybug_spring,7 ,
-Ytank_stone,7 ,
-Ytank_spring,7 ,
-Yeater_stone,7 ,
-Yeater_spring,7 ,
-Yalien_stone,7 ,
-Yalien_spring,7 ,
-Ybomb_eat,7 ,
--1
-};
-
-int spr_map[] = {
-SPR_walk+0,0, 0,1,2,3,4,5,6,7,
-SPR_walk+1,0, 8,9,10,11,12,13,14,15,
-SPR_walk+2,0, 16,17,18,19,20,21,22,23,
-SPR_walk+3,0, 24,25,26,27,28,29,30,31,
-SPR_push+0,0, 32,33,34,35,36,35,34,33,
-SPR_push+1,0, 37,38,39,40,41,40,39,38,
-SPR_push+2,0, 42,43,44,45,46,45,44,43,
-SPR_push+3,0, 47,48,49,50,51,50,49,48,
-SPR_spray+0,0, 52,52,52,52,52,52,52,52,
-SPR_spray+1,0, 53,53,53,53,53,53,53,53,
-SPR_spray+2,0, 54,54,54,54,54,54,54,54,
-SPR_spray+3,0, 55,55,55,55,55,55,55,55,
-SPR_walk+0,1, 56,57,58,59,60,61,62,63,
-SPR_walk+1,1, 64,65,66,67,68,69,70,71,
-SPR_walk+2,1, 72,73,74,75,76,77,78,79,
-SPR_walk+3,1, 80,81,82,83,84,85,86,87,
-SPR_push+0,1, 88,89,90,91,92,91,90,89,
-SPR_push+1,1, 93,94,95,96,97,96,95,94,
-SPR_push+2,1, 98,99,100,101,102,101,100,99,
-SPR_push+3,1, 103,104,105,106,107,106,105,104,
-SPR_spray+0,1, 108,108,108,108,108,108,108,108,
-SPR_spray+1,1, 109,109,109,109,109,109,109,109,
-SPR_spray+2,1, 110,110,110,110,110,110,110,110,
-SPR_spray+3,1, 111,111,111,111,111,111,111,111,
-SPR_still,0, 112,112,112,112,112,112,112,112,
-SPR_still,1, 113,113,113,113,113,113,113,113,
-SPR_MAX
-};
-
-int ttl_map[] = {
--1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,
--1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,
--1,0,-1,-1,-1,-1,-1,1,-1,-1,-1,-1,2,3,4,-1, /* !',-. */
-5,6,7,8,9,10,11,12,13,14,15,-1,-1,-1,-1,16, /* 0123456789:? */
--1,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31, /* ABCDEFGHIJKLMNO */
-32,33,34,35,36,37,38,39,40,41,42,-1,-1,-1,-1,-1, /* PQRSTUVWXYZ */
--1,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31, /* abcdefghijklmno */
-32,33,34,35,36,37,38,39,40,41,42,-1,-1,-1,-1,-1 /* pqrstuvwxyz */
-};
-
-/* ---------------------------------------------------------------------- */
-
-#if 0
-
-/* quick and dirty code to format the data semi nicely */
-
-void print_buffer(int *buffer, int count)
-{
- int i,j;
- j = 0;
- for(i = 0; i < count;) {
- if(j > 80) { j=0; printf("\n"); }
- if(j == 0) printf("\t");
- j += printf("%d", buffer[i]);
- j += printf("%s", ++i == count ? "" : ",");
- }
- if(j) printf("\n");
-}
-void print_tab(int *invert, char *varname, char *comment)
-{
- int i;
- int buffer[TILE_MAX];
-
- for(i = 0; i < TILE_MAX; i++) buffer[i] = 0;
- for(;invert[0] < TILE_MAX; invert += 2) buffer[invert[0]] = invert[1];
-
- printf("/* %s */\n", comment);
- printf("const unsigned char %s[%d] = {\n", varname, TILE_MAX);
- print_buffer(buffer, TILE_MAX);
- printf("};\n");
-}
-void print_explode(void)
-{
- int i;
- int *tile = tile_explode;
- int buffer[TILE_MAX];
-
- for(i = 0; i < TILE_MAX; i++) buffer[i] = Xboom_1;
- while((i = *tile++) < TILE_MAX) buffer[i] = i; /* these tiles are indestructable */
- while((i = *tile++) < TILE_MAX) buffer[i] = *tile++; /* these tiles are special */
-
- printf("/* normal explosion */\n");
- printf("const unsigned short tab_explode_normal[%d] = {\n", TILE_MAX);
- print_buffer(buffer, TILE_MAX);
- printf("};\n");
-
- while((i = *tile++) < TILE_MAX) buffer[i] = *tile++; /* these tiles for dynamite */
-
- printf("/* dynamite explosion */\n");
- printf("const unsigned short tab_explode_dynamite[%d] = {\n", TILE_MAX);
- print_buffer(buffer, TILE_MAX);
- printf("};\n");
-}
-void print_obj(void)
-{
- int i,j;
- int *map = obj_map;
- int buffer[8][TILE_MAX];
-
-#if 0
- int debug=0;
- for(i = 0; i < 8; i++) for(j = 0; j < TILE_MAX; j++) buffer[i][j] = 0;
- for(i = 0; i < 64; i++) {
- for(;*map != -1; map += 2) {
- if(map[0] < 0 || map[0] >= TILE_MAX || map[1] < 0 || map[1] >= 8) { fprintf(stderr, "obj_map: bad tile (%d,%d) @ %d+%d\n", map[0], map[1], i / 16, i % 16); debug = 1; continue; }
- buffer[map[1]][map[0]]++;
- }
- map++;
- }
- for(i = 0; i < 896; i++) {
- for(;*map != -1; map += 2) {
- if(map[0] < 0 || map[0] >= TILE_MAX || map[1] < 0 || map[1] >= 8) { fprintf(stderr, "obj_map: bad tile (%d,%d) @ %d\n", map[0], map[1], i); debug = 1; continue; }
- buffer[map[1]][map[0]]++;
- }
- map++;
- }
- for(i = 0; i < TILE_MAX; i++) for(j = 0; j < 8; j++) {
- switch(buffer[j][i]) {
- case 0: fprintf(stderr, "obj_map: uninitialized (%d,%d)\n", i, j); debug = 1; break;
- case 1: break; /* good */
- default: fprintf(stderr, "obj_map: duplicate (%d,%d)\n", i, j); debug = 1; break;
- }
- }
- if(sizeof(obj_map) / sizeof(*obj_map) != map - obj_map) { fprintf(stderr, "obj_map: bad end (%d != %d)\n", sizeof(obj_map) / sizeof(*obj_map), map - obj_map); debug = 1; }
- if(debug == 0) fprintf(stderr, "obj_map: looks good, now disable debug code\n");
- abort();
-#else
-
- for(i = 0; i < 8; i++) for(j = 0; j < TILE_MAX; j++) buffer[i][j] = Xblank;
-
-/* special case for first 64 entries */
- for(i = 0; i < 64; i++) {
- for(;*map != -1; map += 2) buffer[map[1]][map[0]] = i;
- map++;
- }
-
-/* now regular entries */
- for(i = 0; i < 896 * 16; i += 16) {
- for(;*map != -1; map += 2) buffer[map[1]][map[0]] = i;
- map++;
- }
-
- printf("/* map tiles to coords */\n");
- printf("const unsigned short map_obj[8][%d] = {\n", TILE_MAX);
- for(i = 0; i < 8;) {
- printf("{\n");
- print_buffer(buffer[7 - i], TILE_MAX);
- printf("}%s", ++i == 8 ? "\n" : ",");
- }
- printf("};\n");
-#endif
-}
-void print_spr(void)
-{
- int i,j,k;
- int *map = spr_map;
- int buffer[2][8][SPR_MAX];
-
- while(*map < SPR_MAX) {
- i = *map++;
- j = *map++;
- for(k = 0; k < 8; k++) buffer[j][k][i] = *map++;
- }
-
- printf("/* map sprites to coords */\n");
- printf("const unsigned short map_spr[2][8][%d] = {\n", SPR_MAX);
- for(i = 0; i < 2;) {
- printf("{\n");
- for(j = 0; j < 8;) {
- printf("\t{ ");
- for(k = 0; k < SPR_MAX;) {
- printf("%d", buffer[i][7 - j][k]);
- printf("%s", ++k == SPR_MAX ? "" : ",");
- }
- printf(" }%s\n", ++j == 8 ? "" : ",");
- }
- printf("}%s", ++i == 2 ? "\n" : ",");
- }
- printf("};\n");
-}
-void print_ttl(void)
-{
- int i,j,k;
- int buffer[128];
-
- for(i = 0; i < 128; i++) {
- if(ttl_map[i] == -1) {
- buffer[i] = -1;
- } else {
- j = (ttl_map[i] % 22) * 14;
- k = (ttl_map[i] / 22);
- buffer[i] = k * 320 + j;
- }
- }
- printf("/* map ascii to coords */\n");
- printf("const unsigned short map_ttl[128] = {\n");
- print_buffer(buffer, 128);
- printf("};\n");
-}
-int main_OLD(void)
-{
- printf("/* THIS FILE AUTOMATICALLY GENERATED */\n\n");
- print_tab(tile_blank, "tab_blank", "0=stop 1=blank");
- print_tab(tile_acid, "tab_acid", "0=stop 1=acid");
- print_tab(tile_ameuba, "tab_ameuba", "0=stop 1=ameuba");
- print_tab(tile_android_move, "tab_android_move", "0=stop 1=move");
- print_explode();
- print_obj();
- print_spr();
- print_ttl();
- return(0);
-}
-
-#endif
-
-/* ------------------------------------------------------------------------- */
-
-/* 0=stop 1=blank */
-unsigned char tab_blank[TILE_MAX];
-
-/* 0=stop 1=acid */
-unsigned char tab_acid[TILE_MAX];
-
-/* 0=stop 1=ameuba */
-unsigned char tab_ameuba[TILE_MAX];
-
-/* 0=stop 1=move */
-unsigned char tab_android_move[TILE_MAX];
-
-/* normal explosion */
-unsigned short tab_explode_normal[TILE_MAX];
-
-/* dynamite explosion */
-unsigned short tab_explode_dynamite[TILE_MAX];
-
-/* map tiles to coords */
-unsigned short map_obj[8][TILE_MAX];
-
-/* map sprites to coords */
-unsigned short map_spr[2][8][13];
-
-/* map ascii to coords */
-unsigned short map_ttl[128];
-
-void create_tab(int *invert, unsigned char *array)
-{
- int i;
- int buffer[TILE_MAX];
-
- for(i = 0; i < TILE_MAX; i++)
- buffer[i] = 0;
-
- for(;invert[0] < TILE_MAX; invert += 2)
- buffer[invert[0]] = invert[1];
-
- for(i = 0; i < TILE_MAX; i++)
- array[i] = buffer[i];
-}
-
-void create_explode()
-{
- int i;
- int *tile = tile_explode;
- int buffer[TILE_MAX];
-
- for(i = 0; i < TILE_MAX; i++)
- buffer[i] = Xboom_1;
- while((i = *tile++) < TILE_MAX)
- buffer[i] = i; /* these tiles are indestructable */
- while((i = *tile++) < TILE_MAX)
- buffer[i] = *tile++; /* these tiles are special */
-
- for(i = 0; i < TILE_MAX; i++)
- tab_explode_normal[i] = buffer[i];
-
- while((i = *tile++) < TILE_MAX)
- buffer[i] = *tile++; /* these tiles for dynamite */
-
- for(i = 0; i < TILE_MAX; i++)
- tab_explode_dynamite[i] = buffer[i];
-}
-
-void create_obj()
-{
- int i, j;
- int *map = obj_map;
- int buffer[8][TILE_MAX];
-
-#if 0
-
- int debug = 0;
- for(i = 0; i < 8; i++)
- for(j = 0; j < TILE_MAX; j++)
- buffer[i][j] = 0;
- for(i = 0; i < 64; i++)
- {
- for(;*map != -1; map += 2)
- {
- if (map[0] < 0 || map[0] >= TILE_MAX || map[1] < 0 || map[1] >= 8)
- {
- fprintf(stderr, "obj_map: bad tile (%d,%d) @ %d+%d\n",
- map[0], map[1], i / 16, i % 16);
- debug = 1;
- continue;
- }
- buffer[map[1]][map[0]]++;
- }
- map++;
- }
- for(i = 0; i < 896; i++)
- {
- for(;*map != -1; map += 2)
- {
- if (map[0] < 0 || map[0] >= TILE_MAX || map[1] < 0 || map[1] >= 8)
- {
- fprintf(stderr, "obj_map: bad tile (%d,%d) @ %d\n", map[0], map[1], i);
- debug = 1;
- continue;
- }
- buffer[map[1]][map[0]]++;
- }
- map++;
- }
- for(i = 0; i < TILE_MAX; i++)
- {
- for(j = 0; j < 8; j++)
- {
- switch(buffer[j][i])
- {
- case 0:
- fprintf(stderr, "obj_map: uninitialized (%d,%d)\n", i, j);
- debug = 1;
- break;
- case 1:
- break; /* good */
- default:
- fprintf(stderr, "obj_map: duplicate (%d,%d)\n", i, j);
- debug = 1;
- break;
- }
- }
- }
-
- if(sizeof(obj_map) / sizeof(*obj_map) != map - obj_map)
- {
- fprintf(stderr, "obj_map: bad end (%d != %d)\n",
- sizeof(obj_map) / sizeof(*obj_map), map - obj_map);
- debug = 1;
- }
- if(debug == 0)
- fprintf(stderr, "obj_map: looks good, now disable debug code\n");
- abort();
-
-#else
-
- for(i = 0; i < 8; i++)
- for(j = 0; j < TILE_MAX; j++)
- buffer[i][j] = Xblank;
-
- /* special case for first 64 entries */
- for(i = 0; i < 64; i++)
- {
- for(;*map != -1; map += 2)
- buffer[map[1]][map[0]] = i;
- map++;
- }
-
- /* now regular entries */
- for(i = 0; i < 896 * 16; i += 16)
- {
- for(;*map != -1; map += 2)
- buffer[map[1]][map[0]] = i;
- map++;
- }
-
- for(i = 0; i < 8; i++)
- for(j = 0; j < TILE_MAX; j++)
- map_obj[i][j] = buffer[7 - i][j];
-
-#endif
-}
-
-void create_spr()
-{
- int i, j, k;
- int *map = spr_map;
- int buffer[2][8][SPR_MAX];
-
- while(*map < SPR_MAX)
- {
- i = *map++;
- j = *map++;
- for(k = 0; k < 8; k++)
- buffer[j][k][i] = *map++;
- }
-
- for(i = 0; i < 2; i++)
- for(j = 0; j < 8; j++)
- for(k = 0; k < SPR_MAX; k++)
- map_spr[i][j][k] = buffer[i][7 - j][k];
-}
-
-void create_ttl()
-{
- int i, j, k;
- int buffer[128];
-
- for(i = 0; i < 128; i++)
- {
- if(ttl_map[i] == -1)
- {
- buffer[i] = -1;
- }
- else
- {
- j = (ttl_map[i] % 22) * 14;
- k = (ttl_map[i] / 22);
- buffer[i] = k * 320 + j;
- }
- }
-
- for (i = 0; i < 128; i++)
- map_ttl[i] = buffer[i];
-}
-
-void tab_generate()
-{
- create_tab(tile_blank, tab_blank);
- create_tab(tile_acid, tab_acid);
- create_tab(tile_ameuba, tab_ameuba);
- create_tab(tile_android_move, tab_android_move);
- create_explode();
- create_obj();
- create_spr();
- create_ttl();
-}
-
-#endif
+++ /dev/null
-#ifndef TILE_H
-#define TILE_H
-
-/* 2000-07-30T11:06:03Z
- */
-
-/* define these for backwards compatibility */
-#define BAD_ROLL
-#define BAD_SPRING
-
-enum {
- Xblank = 0, /* still */
- Yacid_splash_eB, /* hmm */
- Yacid_splash_wB, /* hmm */
-
-#ifdef BAD_ROLL
- Xstone_force_e, /* only use these in eater */
- Xstone_force_w,
- Xnut_force_e,
- Xnut_force_w,
- Xspring_force_e,
- Xspring_force_w,
- Xemerald_force_e,
- Xemerald_force_w,
- Xdiamond_force_e,
- Xdiamond_force_w,
- Xbomb_force_e,
- Xbomb_force_w,
-#endif
-
- Xstone,
- Xstone_pause,
- Xstone_fall,
- Ystone_s,
- Ystone_sB,
- Ystone_e,
- Ystone_eB,
- Ystone_w,
- Ystone_wB,
- Xnut,
- Xnut_pause,
- Xnut_fall,
- Ynut_s,
- Ynut_sB,
- Ynut_e,
- Ynut_eB,
- Ynut_w,
- Ynut_wB,
- Xbug_n,
- Xbug_e,
- Xbug_s,
- Xbug_w,
- Xbug_gon,
- Xbug_goe,
- Xbug_gos,
- Xbug_gow,
- Ybug_n,
- Ybug_nB,
- Ybug_e,
- Ybug_eB,
- Ybug_s,
- Ybug_sB,
- Ybug_w,
- Ybug_wB,
- Ybug_w_n,
- Ybug_n_e,
- Ybug_e_s,
- Ybug_s_w,
- Ybug_e_n,
- Ybug_s_e,
- Ybug_w_s,
- Ybug_n_w,
- Ybug_stone,
- Ybug_spring,
- Xtank_n,
- Xtank_e,
- Xtank_s,
- Xtank_w,
- Xtank_gon,
- Xtank_goe,
- Xtank_gos,
- Xtank_gow,
- Ytank_n,
- Ytank_nB,
- Ytank_e,
- Ytank_eB,
- Ytank_s,
- Ytank_sB,
- Ytank_w,
- Ytank_wB,
- Ytank_w_n,
- Ytank_n_e,
- Ytank_e_s,
- Ytank_s_w,
- Ytank_e_n,
- Ytank_s_e,
- Ytank_w_s,
- Ytank_n_w,
- Ytank_stone,
- Ytank_spring,
- Xandroid,
- Xandroid_1_n,
- Xandroid_2_n,
- Xandroid_1_e,
- Xandroid_2_e,
- Xandroid_1_w,
- Xandroid_2_w,
- Xandroid_1_s,
- Xandroid_2_s,
- Yandroid_n,
- Yandroid_nB,
- Yandroid_ne,
- Yandroid_neB,
- Yandroid_e,
- Yandroid_eB,
- Yandroid_se,
- Yandroid_seB,
- Yandroid_s,
- Yandroid_sB,
- Yandroid_sw,
- Yandroid_swB,
- Yandroid_w,
- Yandroid_wB,
- Yandroid_nw,
- Yandroid_nwB,
- Xspring,
- Xspring_pause,
- Xspring_e,
- Xspring_w,
- Xspring_fall,
- Yspring_s,
- Yspring_sB,
- Yspring_e,
- Yspring_eB,
- Yspring_w,
- Yspring_wB,
- Yspring_kill_e,
- Yspring_kill_eB,
- Yspring_kill_w,
- Yspring_kill_wB,
- Xeater_n,
- Xeater_e,
- Xeater_w,
- Xeater_s,
- Yeater_n,
- Yeater_nB,
- Yeater_e,
- Yeater_eB,
- Yeater_s,
- Yeater_sB,
- Yeater_w,
- Yeater_wB,
- Yeater_stone,
- Yeater_spring,
- Xalien,
- Xalien_pause,
- Yalien_n,
- Yalien_nB,
- Yalien_e,
- Yalien_eB,
- Yalien_s,
- Yalien_sB,
- Yalien_w,
- Yalien_wB,
- Yalien_stone,
- Yalien_spring,
- Xemerald,
- Xemerald_pause,
- Xemerald_fall,
- Xemerald_shine,
- Yemerald_s,
- Yemerald_sB,
- Yemerald_e,
- Yemerald_eB,
- Yemerald_w,
- Yemerald_wB,
- Yemerald_eat,
- Yemerald_stone,
- Xdiamond,
- Xdiamond_pause,
- Xdiamond_fall,
- Xdiamond_shine,
- Ydiamond_s,
- Ydiamond_sB,
- Ydiamond_e,
- Ydiamond_eB,
- Ydiamond_w,
- Ydiamond_wB,
- Ydiamond_eat,
- Ydiamond_stone,
- Xdrip_fall,
- Xdrip_stretch,
- Xdrip_stretchB,
- Xdrip_eat,
- Ydrip_s1,
- Ydrip_s1B,
- Ydrip_s2,
- Ydrip_s2B,
- Xbomb,
- Xbomb_pause,
- Xbomb_fall,
- Ybomb_s,
- Ybomb_sB,
- Ybomb_e,
- Ybomb_eB,
- Ybomb_w,
- Ybomb_wB,
- Ybomb_eat,
- Xballoon,
- Yballoon_n,
- Yballoon_nB,
- Yballoon_e,
- Yballoon_eB,
- Yballoon_s,
- Yballoon_sB,
- Yballoon_w,
- Yballoon_wB,
- Xgrass,
- Ygrass_nB,
- Ygrass_eB,
- Ygrass_sB,
- Ygrass_wB,
- Xdirt,
- Ydirt_nB,
- Ydirt_eB,
- Ydirt_sB,
- Ydirt_wB,
- Xacid_ne,
- Xacid_se,
- Xacid_s,
- Xacid_sw,
- Xacid_nw,
- Xacid_1,
- Xacid_2,
- Xacid_3,
- Xacid_4,
- Xacid_5,
- Xacid_6,
- Xacid_7,
- Xacid_8,
- Xball_1,
- Xball_1B,
- Xball_2,
- Xball_2B,
- Yball_eat,
- Xgrow_ns,
- Ygrow_ns_eat,
- Xgrow_ew,
- Ygrow_ew_eat,
- Xwonderwall,
- XwonderwallB,
- Xameuba_1,
- Xameuba_2,
- Xameuba_3,
- Xameuba_4,
- Xameuba_5,
- Xameuba_6,
- Xameuba_7,
- Xameuba_8,
- Xdoor_1,
- Xdoor_2,
- Xdoor_3,
- Xdoor_4,
- Xdoor_5,
- Xdoor_6,
- Xdoor_7,
- Xdoor_8,
- Xkey_1,
- Xkey_2,
- Xkey_3,
- Xkey_4,
- Xkey_5,
- Xkey_6,
- Xkey_7,
- Xkey_8,
- Xwind_n,
- Xwind_e,
- Xwind_s,
- Xwind_w,
- Xwind_nesw,
- Xwind_stop,
- Xexit,
- Xexit_1,
- Xexit_2,
- Xexit_3,
- Xdynamite,
- Ydynamite_eat,
- Xdynamite_1,
- Xdynamite_2,
- Xdynamite_3,
- Xdynamite_4,
- Xbumper,
- XbumperB,
- Xwheel,
- XwheelB,
- Xswitch,
- XswitchB,
- Xsand,
- Xsand_stone,
- Xsand_stonein_1,
- Xsand_stonein_2,
- Xsand_stonein_3,
- Xsand_stonein_4,
- Xsand_stonesand_1,
- Xsand_stonesand_2,
- Xsand_stonesand_3,
- Xsand_stonesand_4,
- Xsand_stoneout_1,
- Xsand_stoneout_2,
- Xsand_sandstone_1,
- Xsand_sandstone_2,
- Xsand_sandstone_3,
- Xsand_sandstone_4,
- Xplant,
- Yplant,
- Xlenses,
- Xmagnify,
- Xdripper,
- XdripperB,
- Xfake_blank,
- Xfake_blankB,
- Xfake_grass,
- Xfake_grassB,
- Xfake_door_1,
- Xfake_door_2,
- Xfake_door_3,
- Xfake_door_4,
- Xfake_door_5,
- Xfake_door_6,
- Xfake_door_7,
- Xfake_door_8,
- Xsteel_1,
- Xsteel_2,
- Xsteel_3,
- Xsteel_4,
- Xwall_1,
- Xwall_2,
- Xwall_3,
- Xwall_4,
- Xround_wall_1,
- Xround_wall_2,
- Xround_wall_3,
- Xround_wall_4,
- Xdecor_1,
- Xdecor_2,
- Xdecor_3,
- Xdecor_4,
- Xdecor_5,
- Xdecor_6,
- Xdecor_7,
- Xdecor_8,
- Xdecor_9,
- Xdecor_10,
- Xdecor_11,
- Xdecor_12,
- Xalpha_0,
- Xalpha_1,
- Xalpha_2,
- Xalpha_3,
- Xalpha_4,
- Xalpha_5,
- Xalpha_6,
- Xalpha_7,
- Xalpha_8,
- Xalpha_9,
- Xalpha_excla,
- Xalpha_quote,
- Xalpha_comma,
- Xalpha_minus,
- Xalpha_perio,
- Xalpha_colon,
- Xalpha_quest,
- 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_arrow_e,
- Xalpha_arrow_w,
- Xalpha_copyr,
-
- Xboom_bug, /* passed from explode to synchro (linked explosion); transition to explode_normal */
- Xboom_bomb, /* passed from explode to synchro (linked explosion); transition to explode_normal */
- Xboom_android, /* passed from explode to synchro; transition to boom_2 */
- Xboom_1, /* passed from explode to synchro; transition to boom_2 */
- Xboom_2, /* transition to boom[] */
-
- Znormal, /* no picture */ /* this tile is passed from synchro to explode, only in next[] */
- Zdynamite, /* no picture */ /* this tile is passed from synchro to explode, only in next[] */
- Zplayer, /* no picture */ /* special code to indicate player */
- ZBORDER, /* no picture */ /* special code to indicate border */
-
- TILE_MAX
-};
-
-enum {
- SPR_still = 0,
- SPR_walk = 1,
- SPR_push = 5,
- SPR_spray = 9,
- SPR_MAX = 13
-};
-
-extern unsigned char tab_blank[TILE_MAX];
-extern unsigned char tab_acid[TILE_MAX];
-extern unsigned char tab_ameuba[TILE_MAX];
-extern unsigned char tab_android_move[TILE_MAX];
-extern unsigned short tab_explode_normal[TILE_MAX];
-extern unsigned short tab_explode_dynamite[TILE_MAX];
-
-extern unsigned short map_obj[8][TILE_MAX];
-extern unsigned short map_spr[2][8][SPR_MAX];
-extern unsigned short map_ttl[128];
-
-#endif
+++ /dev/null
-
-#if defined(TARGET_X11)
-
-/* 2000-08-10T04:29:10Z
- *
- * generate ulaw<->linear conversion tables to be included
- * directly in emerald mine source
- */
-
-#include "../libgame/platform.h"
-
-#if defined(PLATFORM_LINUX) || defined(PLATFORM_BSD)
-
-#include <stdio.h>
-
-int calc_ulaw_to_linear(unsigned char);
-unsigned char calc_linear_to_ulaw(int);
-
-int buffer[65536];
-
-#if 0
-
-void print_buffer(int *buffer, int count)
-{
- int i,j;
- j = 0;
- for(i = 0; i < count;) {
- if(j > 80) { j=0; printf("\n"); }
- if(j == 0) printf("\t");
- j += printf("%d", buffer[i]);
- j += printf("%s", ++i == count ? "" : ",");
- }
- if(j) printf("\n");
-}
-int main_OLD(void)
-{
- int i;
- printf("/* THIS FILE AUTOMATICALLY GENERATED */\n");
- printf("\n#if defined(LINUX) || defined(BSD)\n");
- printf("\n/* convert from 8 bit ulaw to signed 16 bit linear */\n");
- printf("const short ulaw_to_linear[256] = {\n");
- for(i = 0; i < 256; i++) {
- buffer[i] = calc_ulaw_to_linear(i);
- }
- print_buffer(buffer, 256);
- printf("};\n");
- printf("\n/* convert from signed 16 bit linear to 8 bit ulaw */\n");
- printf("const unsigned char linear_to_ulaw[65536] = {\n");
- for(i = -32768; i < 32768; i++) {
- buffer[i + 32768] = calc_linear_to_ulaw(i);
- }
- print_buffer(buffer, 65536);
- printf("};\n");
- printf("\n#endif /* defined(LINUX) || defined(BSD) */\n");
- return(0);
-}
-
-#endif
-
-/* convert from 8 bit ulaw to signed 16 bit linear */
-short ulaw_to_linear[256];
-
-/* convert from signed 16 bit linear to 8 bit ulaw */
-unsigned char linear_to_ulaw[65536];
-
-void ulaw_generate()
-{
- int i;
-
- for(i = 0; i < 256; i++)
- ulaw_to_linear[i] = calc_ulaw_to_linear(i);
-
- for(i = -32768; i < 32768; i++)
- linear_to_ulaw[i + 32768] = calc_linear_to_ulaw(i);
-}
-
-/*
-** This routine converts from ulaw to 16 bit linear.
-**
-** Craig Reese: IDA/Supercomputing Research Center
-** 29 September 1989
-**
-** References:
-** 1) CCITT Recommendation G.711 (very difficult to follow)
-** 2) MIL-STD-188-113,"Interoperability and Performance Standards
-** for Analog-to_Digital Conversion Techniques,"
-** 17 February 1987
-**
-** Input: 8 bit ulaw sample
-** Output: signed 16 bit linear sample
-*/
-
-int calc_ulaw_to_linear(unsigned char ulawbyte)
-{
- static int exp_lut[8] = { 0, 132, 396, 924, 1980, 4092, 8316, 16764 };
- int sign, exponent, mantissa, sample;
-
- ulawbyte = ~ ulawbyte;
- sign = ( ulawbyte & 0x80 );
- exponent = ( ulawbyte >> 4 ) & 0x07;
- mantissa = ulawbyte & 0x0F;
- sample = exp_lut[exponent] + ( mantissa << ( exponent + 3 ) );
- if (sign != 0)
- sample = -sample;
-
- return(sample);
-}
-
-/*
-** This routine converts from linear to ulaw.
-**
-** Craig Reese: IDA/Supercomputing Research Center
-** Joe Campbell: Department of Defense
-** 29 September 1989
-**
-** References:
-** 1) CCITT Recommendation G.711 (very difficult to follow)
-** 2) "A New Digital Technique for Implementation of Any
-** Continuous PCM Companding Law," Villeret, Michel,
-** et al. 1973 IEEE Int. Conf. on Communications, Vol 1,
-** 1973, pg. 11.12-11.17
-** 3) MIL-STD-188-113,"Interoperability and Performance Standards
-** for Analog-to_Digital Conversion Techniques,"
-** 17 February 1987
-**
-** Input: Signed 16 bit linear sample
-** Output: 8 bit ulaw sample
-*/
-
-#define ZEROTRAP /* turn on the trap as per the MIL-STD */
-#define BIAS 0x84 /* define the add-in bias for 16 bit samples */
-#define CLIP 32635
-
-unsigned char calc_linear_to_ulaw(int sample)
-{
- static int exp_lut[256] =
- {
- 0,0,1,1,2,2,2,2,3,3,3,3,3,3,3,3,
- 4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,
- 5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,
- 5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,
- 6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,
- 6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,
- 6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,
- 6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,
- 7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,
- 7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,
- 7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,
- 7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,
- 7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,
- 7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,
- 7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,
- 7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,7
- };
-
- int sign, exponent, mantissa;
- unsigned char ulawbyte;
-
-/* Get the sample into sign-magnitude. */
- sign = (sample >> 8) & 0x80; /* set aside the sign */
- if (sign != 0)
- sample = -sample; /* get magnitude */
- if (sample > CLIP)
- sample = CLIP; /* clip the magnitude */
-
-/* Convert from 16 bit linear to ulaw. */
- sample = sample + BIAS;
- exponent = exp_lut[( sample >> 7 ) & 0xFF];
- mantissa = ( sample >> ( exponent + 3 ) ) & 0x0F;
- ulawbyte = ~ ( sign | ( exponent << 4 ) | mantissa );
-#ifdef ZEROTRAP
- if (ulawbyte == 0)
- ulawbyte = 0x02; /* optional CCITT trap */
-#endif
-
- return(ulawbyte);
-}
-
-#endif /* defined(PLATFORM_LINUX) || defined(PLATFORM_BSD) */
-
-#endif
Important note: The scaling code currently only supports scaling of the image
up or down by a power of 2 -- other scaling factors currently not supported!
+ Also not supported is scaling of pixmap masks (with depth 1); to scale them,
+ better use Pixmap_to_Mask() for now.
-----------------------------------------------------------------------------
*/
int bits_per_pixel;
int bytes_per_pixel;
int x, y, xx, yy, i;
-#if 1
- boolean scale_down = (src_width > dst_width);
- int zoom_factor;
-#else
- int zoom_factor = src_width / dst_width; /* currently very limited! */
-#endif
int row_skip, col_skip;
+ int zoom_factor;
+ boolean scale_down = (src_width > dst_width);
if (scale_down)
{
{
row_skip = src_width * bytes_per_pixel;
-#if 0
- printf("::: %d, %d -> %d, %d [%d / %d]\n[%ld -> %ld (%ld)] [%ld -> %ld (%ld)]\n",
- src_width, src_height,
- dst_width, dst_height,
- zoom_factor, bytes_per_pixel,
- src_ptr,
- src_ptr + src_width * src_height * bytes_per_pixel,
- src_width * src_height * bytes_per_pixel,
- dst_ptr,
- dst_ptr + dst_width * dst_height * bytes_per_pixel,
- dst_width * dst_height * bytes_per_pixel);
-
- printf("A\n");
-
- for (i = 0; i < src_width * src_height * bytes_per_pixel;
- i++)
- {
- byte x = *(byte *)(src_ptr + i);
-
- printf("::: %d ...\n", i);
-
- x = x * 1;
- }
-
- printf("B\n");
-#endif
-
/* scale image up by scaling factor 'zoom_factor' */
for (y = 0; y < src_height; y++)
{
if (yy > 0)
src_ptr -= row_skip;
-#if 0
- printf("::: [%d -> %ld / %ld]\n", y, src_ptr, dst_ptr);
-#endif
-
for (x = 0; x < src_width; x++)
{
for (xx = 0; xx < zoom_factor; xx++)
for (i = 0; i < bytes_per_pixel; i++)
-#if 1
*dst_ptr++ = *(src_ptr + i);
-#else
- *dst_ptr++ = 0;
-#endif
src_ptr += i;
}
#include <fcntl.h>
#include "libgame/libgame.h"
-#include "libem/libem.h"
+#include "game_em/game_em.h"
#include "conf_gfx.h" /* include auto-generated data structure definitions */
#include "conf_snd.h" /* include auto-generated data structure definitions */
projects / rocksndiamonds.git / commitdiff