From: Holger Schemel Date: Thu, 23 Jan 2020 07:52:09 +0000 (+0100) Subject: moved game logic for EM engine to single source file X-Git-Tag: 4.2.0.0~176 X-Git-Url: https://git.artsoft.org/?a=commitdiff_plain;h=0b7d45708c8b008d0ca7a11490a2267f9c314cdb;p=rocksndiamonds.git moved game logic for EM engine to single source file --- diff --git a/src/Android.mk b/src/Android.mk index 1726f8de..7703e0a0 100644 --- a/src/Android.mk +++ b/src/Android.mk @@ -56,9 +56,7 @@ LOCAL_SRC_FILES := $(SDL_PATH)/src/main/android/SDL_android_main.c \ game_em/graphics.c \ game_em/init.c \ game_em/input.c \ - game_em/synchro_1.c \ - game_em/synchro_2.c \ - game_em/synchro_3.c \ + game_em/logic.c \ game_em/tab_generate.c \ game_sp/init.c \ game_sp/file.c \ diff --git a/src/game_em/Makefile b/src/game_em/Makefile index f12c9824..b41365ef 100644 --- a/src/game_em/Makefile +++ b/src/game_em/Makefile @@ -21,9 +21,7 @@ SRCS = cave.c \ graphics.c \ init.c \ input.c \ - synchro_1.c \ - synchro_2.c \ - synchro_3.c \ + logic.c \ tab_generate.c OBJS = cave.o \ @@ -31,9 +29,7 @@ OBJS = cave.o \ graphics.o \ init.o \ input.o \ - synchro_1.o \ - synchro_2.o \ - synchro_3.o \ + logic.o \ tab_generate.o GAME_EM = game_em.a diff --git a/src/game_em/global.h b/src/game_em/global.h index 28e185f3..3040e315 100644 --- a/src/game_em/global.h +++ b/src/game_em/global.h @@ -18,9 +18,9 @@ void game_init_vars(void); void play_sound(int, int, int); void play_element_sound(int, int, int, int); -void synchro_1(void); -void synchro_2(void); -void synchro_3(void); +void logic_1(void); +void logic_2(void); +void logic_3(void); int cleanup_em_level(unsigned char *, int, char *); void convert_em_level(unsigned char *, int); diff --git a/src/game_em/input.c b/src/game_em/input.c index 27eb294f..3738b38b 100644 --- a/src/game_em/input.c +++ b/src/game_em/input.c @@ -87,13 +87,13 @@ void GameActions_EM(byte action[MAX_PLAYERS], boolean warp_mode) if (frame == 7) { - synchro_1(); - synchro_2(); + logic_1(); + logic_2(); } if (frame == 6) { - synchro_3(); + logic_3(); UpdateGameDoorValues_EM(); } diff --git a/src/game_em/logic.c b/src/game_em/logic.c new file mode 100644 index 00000000..cf7104d2 --- /dev/null +++ b/src/game_em/logic.c @@ -0,0 +1,6444 @@ +/* 2008-09-24 23:20:29 + * + * David Tritscher + * + * my own version of the emerald mine engine + */ + +#include "main_em.h" + + +#define SPRING_ROLL /* spring rolling off round things continues to roll */ +#define USE_CHANGED_ACID_STUFF + +#define RANDOM_RAW (seed = seed << 31 | seed >> 1) +#define RANDOM(x) (RANDOM_RAW & (x - 1)) + +static unsigned int seed; +static int score; + +static void Lboom_bug(int x, int y) +{ + Next[x][y] = Znormal; + Boom[x-1][y-1] = Xemerald; + Boom[x][y-1] = Xemerald; + Boom[x+1][y-1] = Xemerald; + Boom[x-1][y] = Xemerald; + Boom[x][y] = Xdiamond; + Boom[x+1][y] = Xemerald; + Boom[x-1][y+1] = Xemerald; + Boom[x][y+1] = Xemerald; + Boom[x+1][y+1] = Xemerald; + +#if PLAY_ELEMENT_SOUND + play_element_sound(x, y, SOUND_boom, element); +#endif +} + +static void Lboom_tank(int x, int y) +{ + Next[x][y] = Znormal; + Boom[x-1][y-1] = Xblank; + Boom[x][y-1] = Xblank; + Boom[x+1][y-1] = Xblank; + Boom[x-1][y] = Xblank; + Boom[x][y] = Xblank; + Boom[x+1][y] = Xblank; + Boom[x-1][y+1] = Xblank; + Boom[x][y+1] = Xblank; + Boom[x+1][y+1] = Xblank; +#if PLAY_ELEMENT_SOUND + play_element_sound(x, y, SOUND_boom, element); +#endif +} + +static boolean player_killed(struct PLAYER *ply) +{ + int x = ply->x; + int y = ply->y; + + if (!ply->alive) + return FALSE; + + if (lev.killed_out_of_time && setup.time_limit) + return TRUE; + + switch(Cave[x][y-1]) + { + case Xbug_1_n: + case Xbug_1_e: + case Xbug_1_s: + case Xbug_1_w: + case Xbug_2_n: + case Xbug_2_e: + case Xbug_2_s: + case Xbug_2_w: + case Xtank_1_n: + case Xtank_1_e: + case Xtank_1_s: + case Xtank_1_w: + case Xtank_2_n: + case Xtank_2_e: + case Xtank_2_s: + case Xtank_2_w: + return TRUE; + } + + switch(Cave[x+1][y]) + { + case Xbug_1_n: + case Xbug_1_e: + case Xbug_1_s: + case Xbug_1_w: + case Xbug_2_n: + case Xbug_2_e: + case Xbug_2_s: + case Xbug_2_w: + case Xtank_1_n: + case Xtank_1_e: + case Xtank_1_s: + case Xtank_1_w: + case Xtank_2_n: + case Xtank_2_e: + case Xtank_2_s: + case Xtank_2_w: + return TRUE; + } + + switch(Cave[x][y+1]) + { + case Xbug_1_n: + case Xbug_1_e: + case Xbug_1_s: + case Xbug_1_w: + case Xbug_2_n: + case Xbug_2_e: + case Xbug_2_s: + case Xbug_2_w: + case Xtank_1_n: + case Xtank_1_e: + case Xtank_1_s: + case Xtank_1_w: + case Xtank_2_n: + case Xtank_2_e: + case Xtank_2_s: + case Xtank_2_w: + return TRUE; + } + + switch(Cave[x-1][y]) + { + case Xbug_1_n: + case Xbug_1_e: + case Xbug_1_s: + case Xbug_1_w: + case Xbug_2_n: + case Xbug_2_e: + case Xbug_2_s: + case Xbug_2_w: + case Xtank_1_n: + case Xtank_1_e: + case Xtank_1_s: + case Xtank_1_w: + case Xtank_2_n: + case Xtank_2_e: + case Xtank_2_s: + case Xtank_2_w: + return TRUE; + } + + switch(Cave[x][y]) + { + case Xblank: + case Xacid_splash_e: + case Xacid_splash_w: + case Zplayer: + case Xdynamite_1: + case Xdynamite_2: + case Xdynamite_3: + case Xdynamite_4: +#ifdef EM_ENGINE_USE_ADDITIONAL_ELEMENTS + case Xfake_acid_1: + case Xfake_acid_2: + case Xfake_acid_3: + case Xfake_acid_4: + case Xfake_acid_5: + case Xfake_acid_6: + case Xfake_acid_7: + case Xfake_acid_8: +#endif + return FALSE; + } + + return TRUE; +} + +static void kill_player(struct PLAYER *ply) +{ + int x = ply->x; + int y = ply->y; + + ply->alive = 0; + + switch(Cave[x][y-1]) + { + case Xbug_1_n: + case Xbug_1_e: + case Xbug_1_s: + case Xbug_1_w: + case Xbug_2_n: + case Xbug_2_e: + case Xbug_2_s: + case Xbug_2_w: + Cave[x][y-1] = Xboom_bug; + break; + + case Xtank_1_n: + case Xtank_1_e: + case Xtank_1_s: + case Xtank_1_w: + case Xtank_2_n: + case Xtank_2_e: + case Xtank_2_s: + case Xtank_2_w: + Cave[x][y-1] = Xboom_bomb; + break; + } + + switch(Cave[x+1][y]) + { + case Xbug_1_n: + case Xbug_1_e: + case Xbug_1_s: + case Xbug_1_w: + case Xbug_2_n: + case Xbug_2_e: + case Xbug_2_s: + case Xbug_2_w: + Cave[x+1][y] = Xboom_bug; + break; + + case Xtank_1_n: + case Xtank_1_e: + case Xtank_1_s: + case Xtank_1_w: + case Xtank_2_n: + case Xtank_2_e: + case Xtank_2_s: + case Xtank_2_w: + Cave[x+1][y] = Xboom_bomb; + break; + } + + switch(Cave[x][y+1]) + { + case Xbug_1_n: + case Xbug_1_e: + case Xbug_1_s: + case Xbug_1_w: + case Xbug_2_n: + case Xbug_2_e: + case Xbug_2_s: + case Xbug_2_w: + Cave[x][y+1] = Xboom_bug; + break; + + case Xtank_1_n: + case Xtank_1_e: + case Xtank_1_s: + case Xtank_1_w: + case Xtank_2_n: + case Xtank_2_e: + case Xtank_2_s: + case Xtank_2_w: + Cave[x][y+1] = Xboom_bomb; + break; + } + + switch(Cave[x-1][y]) + { + case Xbug_1_n: + case Xbug_1_e: + case Xbug_1_s: + case Xbug_1_w: + case Xbug_2_n: + case Xbug_2_e: + case Xbug_2_s: + case Xbug_2_w: + Cave[x-1][y] = Xboom_bug; + break; + + case Xtank_1_n: + case Xtank_1_e: + case Xtank_1_s: + case Xtank_1_w: + case Xtank_2_n: + case Xtank_2_e: + case Xtank_2_s: + case Xtank_2_w: + Cave[x-1][y] = Xboom_bomb; + break; + } + + switch(Cave[x][y]) + { + case Xexit_1: + case Xexit_2: + case Xexit_3: + lev.exit_x = x; + lev.exit_y = y; + play_element_sound(x, y, SOUND_exit_leave, Xexit_1); + break; + + default: + play_element_sound(x, y, SOUND_die, Zplayer); + break; + } + + switch(Cave[x][y]) + { +#ifdef USE_CHANGED_ACID_STUFF + case Xacid_1: + case Xacid_2: + case Xacid_3: + case Xacid_4: + case Xacid_5: + case Xacid_6: + case Xacid_7: + case Xacid_8: + break; +#endif + + default: + Cave[x][y] = Xboom_1; + Boom[x][y] = Xblank; + break; + } +} + +static boolean player_digfield(struct PLAYER *ply, int dx, int dy) +{ + int anim = (dx < 0 ? 3 : dx > 0 ? 1 : dy < 0 ? 0 : dy > 0 ? 2 : 2); + int oldx = ply->x; + int oldy = ply->y; + int x = oldx + dx; + int y = oldy + dy; + boolean result = TRUE; + + if (!dx && !dy) /* no direction specified */ + return FALSE; + + if (dx && dy && ply->joy_snap) /* more than one direction specified */ + return FALSE; + + if (ply->joy_snap == 0) /* player wants to move */ + { + int element = Cave[x][y]; + + switch(Cave[x][y]) + { + /* fire is released */ + case Xblank: + case Xacid_splash_e: + case Xacid_splash_w: + Cave[x][y] = Zplayer; + Next[x][y] = Zplayer; +#ifdef EM_ENGINE_USE_ADDITIONAL_ELEMENTS + case Xfake_acid_1: + case Xfake_acid_2: + case Xfake_acid_3: + case Xfake_acid_4: + case Xfake_acid_5: + case Xfake_acid_6: + case Xfake_acid_7: + case Xfake_acid_8: +#endif + play_element_sound(x, y, SOUND_blank, Xblank); + ply->anim = PLY_walk_n + anim; + ply->x = x; + ply->y = y; + break; + +#ifdef USE_CHANGED_ACID_STUFF + 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[x+1][y-1] == Xblank) + Cave[x+1][y-1] = Xacid_splash_e; + if (Cave[x-1][y-1] == Xblank) + Cave[x-1][y-1] = Xacid_splash_w; + play_element_sound(x, y, SOUND_acid, Xacid_1); +#endif + + case Xboom_android: + case Xboom_1: + case Xbug_1_n: + case Xbug_1_e: + case Xbug_1_s: + case Xbug_1_w: + case Xbug_2_n: + case Xbug_2_e: + case Xbug_2_s: + case Xbug_2_w: + case Xtank_1_n: + case Xtank_1_e: + case Xtank_1_s: + case Xtank_1_w: + case Xtank_2_n: + case Xtank_2_e: + case Xtank_2_s: + case Xtank_2_w: + +#ifndef USE_CHANGED_ACID_STUFF + case Xacid_1: + case Xacid_2: + case Xacid_3: + case Xacid_4: + case Xacid_5: + case Xacid_6: + case Xacid_7: + case Xacid_8: +#endif + ply->anim = PLY_walk_n + anim; + ply->x = x; + ply->y = y; + break; + + case Xgrass: + Cave[x][y] = (dy ? (dy < 0 ? Ygrass_nB : Ygrass_sB) : + (dx > 0 ? Ygrass_eB : Ygrass_wB)); + Next[x][y] = Zplayer; + play_element_sound(x, y, SOUND_dirt, Xgrass); + ply->anim = PLY_walk_n + anim; + ply->x = x; + ply->y = y; + break; + + case Xdirt: + Cave[x][y] = (dy ? (dy < 0 ? Ydirt_nB : Ydirt_sB) : + (dx > 0 ? Ydirt_eB : Ydirt_wB)); + Next[x][y] = Zplayer; + play_element_sound(x, y, SOUND_dirt, Xdirt); + ply->anim = PLY_walk_n + anim; + ply->x = x; + ply->y = y; + break; + + case Xdiamond: + case Xdiamond_pause: + Cave[x][y] = Ydiamond_blank; + Next[x][y] = Zplayer; + play_element_sound(x, y, SOUND_collect, element); + lev.score += lev.diamond_score; + lev.required = lev.required < 3 ? 0 : lev.required - 3; + game.snapshot.collected_item = TRUE; + ply->anim = PLY_walk_n + anim; + ply->x = x; + ply->y = y; + break; + + case Xemerald: + case Xemerald_pause: + Cave[x][y] = Yemerald_blank; + Next[x][y] = Zplayer; + play_element_sound(x, y, SOUND_collect, element); + lev.score += lev.emerald_score; + lev.required = lev.required < 1 ? 0 : lev.required - 1; + game.snapshot.collected_item = TRUE; + ply->anim = PLY_walk_n + anim; + ply->x = x; + ply->y = y; + break; + + case Xdynamite: + Cave[x][y] = Ydynamite_blank; + Next[x][y] = Zplayer; + play_element_sound(x, y, SOUND_collect, element); + lev.score += lev.dynamite_score; + ply->dynamite = ply->dynamite > 9998 ? 9999 : ply->dynamite + 1; + ply->anim = PLY_walk_n + anim; + ply->x = x; + ply->y = y; + break; + + case Xkey_1: + ply->keys |= 0x01; + Cave[x][y] = Ykey_1_blank; + goto key_walk; + + case Xkey_2: + ply->keys |= 0x02; + Cave[x][y] = Ykey_2_blank; + goto key_walk; + + case Xkey_3: + ply->keys |= 0x04; + Cave[x][y] = Ykey_3_blank; + goto key_walk; + + case Xkey_4: + ply->keys |= 0x08; + Cave[x][y] = Ykey_4_blank; + goto key_walk; + + case Xkey_5: + ply->keys |= 0x10; + Cave[x][y] = Ykey_5_blank; + goto key_walk; + + case Xkey_6: + ply->keys |= 0x20; + Cave[x][y] = Ykey_6_blank; + goto key_walk; + + case Xkey_7: + ply->keys |= 0x40; + Cave[x][y] = Ykey_7_blank; + goto key_walk; + + case Xkey_8: + ply->keys |= 0x80; + Cave[x][y] = Ykey_8_blank; + goto key_walk; + + key_walk: + + Next[x][y] = Zplayer; + play_element_sound(x, y, SOUND_collect, element); + lev.score += lev.key_score; + ply->anim = PLY_walk_n + anim; + ply->x = x; + ply->y = y; + break; + + case Xlenses: + Cave[x][y] = Ylenses_blank; + Next[x][y] = Zplayer; + play_element_sound(x, y, SOUND_collect, element); + lev.score += lev.lenses_score; + lev.lenses_cnt = lev.lenses_time; + ply->anim = PLY_walk_n + anim; + ply->x = x; + ply->y = y; + break; + + case Xmagnify: + Cave[x][y] = Ymagnify_blank; + Next[x][y] = Zplayer; + play_element_sound(x, y, SOUND_collect, element); + lev.score += lev.magnify_score; + lev.magnify_cnt = lev.magnify_time; + ply->anim = PLY_walk_n + anim; + ply->x = x; + ply->y = y; + break; + + case Xstone: + if (dy) + break; + + switch(Cave[x+dx][y]) + { + 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[x+dx+1][y-1] == Xblank) + Cave[x+dx+1][y-1] = Xacid_splash_e; + if (Cave[x+dx-1][y-1] == Xblank) + Cave[x+dx-1][y-1] = Xacid_splash_w; + play_element_sound(x, y, SOUND_acid, Xacid_1); + goto stone_walk; + + case Xblank: + case Xacid_splash_e: + case Xacid_splash_w: + Cave[x+dx][y] = dx > 0 ? Ystone_e : Ystone_w; + Next[x+dx][y] = Xstone_pause; + + stone_walk: + + Cave[x][y] = dx > 0 ? Ystone_eB : Ystone_wB; + Next[x][y] = Zplayer; + play_element_sound(x, y, SOUND_roll, Xstone); + ply->x = x; + } + + ply->anim = PLY_push_n + anim; + break; + + case Xbomb: + if (dy) + break; + + switch(Cave[x+dx][y]) + { + 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[x+dx+1][y-1] == Xblank) + Cave[x+dx+1][y-1] = Xacid_splash_e; + if (Cave[x+dx-1][y-1] == Xblank) + Cave[x+dx-1][y-1] = Xacid_splash_w; + play_element_sound(x, y, SOUND_acid, Xacid_1); + goto bomb_walk; + + case Xblank: + case Xacid_splash_e: + case Xacid_splash_w: + Cave[x+dx][y] = dx > 0 ? Ybomb_e : Ybomb_w; + Next[x+dx][y] = Xbomb_pause; + + bomb_walk: + + Cave[x][y] = dx > 0 ? Ybomb_eB : Ybomb_wB; + Next[x][y] = Zplayer; + play_element_sound(x, y, SOUND_roll, Xbomb); + ply->x = x; + } + + ply->anim = PLY_push_n + anim; + break; + + case Xnut: + if (dy) + break; + + switch(Cave[x+dx][y]) + { + 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[x+dx+1][y-1] == Xblank) + Cave[x+dx+1][y-1] = Xacid_splash_e; + if (Cave[x+dx-1][y-1] == Xblank) + Cave[x+dx-1][y-1] = Xacid_splash_w; + play_element_sound(x, y, SOUND_acid, Xacid_1); + goto nut_walk; + + case Xblank: + case Xacid_splash_e: + case Xacid_splash_w: + Cave[x+dx][y] = dx > 0 ? Ynut_e : Ynut_w; + Next[x+dx][y] = Xnut_pause; + + nut_walk: + + Cave[x][y] = dx > 0 ? Ynut_eB : Ynut_wB; + Next[x][y] = Zplayer; + play_element_sound(x, y, SOUND_roll, Xnut); + ply->x = x; + } + + ply->anim = PLY_push_n + anim; + break; + + case Xspring: + if (dy) + break; + + switch(Cave[x+dx][y]) + { + case Xalien: + case Xalien_pause: + Cave[x][y] = dx > 0 ? Yspring_alien_eB : Yspring_alien_wB; + Cave[x+dx][y] = dx > 0 ? Yspring_alien_e : Yspring_alien_w; + Next[x][y] = Zplayer; + Next[x+dx][y] = dx > 0 ? Xspring_e : Xspring_w; + play_element_sound(x, y, SOUND_slurp, Xalien); + 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[x+dx+1][y-1] == Xblank) + Cave[x+dx+1][y-1] = Xacid_splash_e; + if (Cave[x+dx-1][y-1] == Xblank) + Cave[x+dx-1][y-1] = Xacid_splash_w; + play_element_sound(x, y, SOUND_acid, Xacid_1); + goto spring_walk; + + case Xblank: + case Xacid_splash_e: + case Xacid_splash_w: + Cave[x+dx][y] = dx > 0 ? Yspring_e : Yspring_w; + Next[x+dx][y] = dx > 0 ? Xspring_e : Xspring_w; + + spring_walk: + Cave[x][y] = dx > 0 ? Yspring_eB : Yspring_wB; + Next[x][y] = Zplayer; + play_element_sound(x, y, SOUND_roll, Xspring); + ply->x = x; + } + + ply->anim = PLY_push_n + 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 = PLY_push_n + anim; + break; + + case Xballoon: + switch(Cave[x+dx][y+dy]) + { + 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[x+dx+1][y+dy-1] == Xblank) + Cave[x+dx+1][y+dy-1] = Xacid_splash_e; + if (Cave[x+dx-1][y+dy-1] == Xblank) + Cave[x+dx-1][y+dy-1] = Xacid_splash_w; + play_element_sound(x, y, SOUND_acid, Xacid_1); + goto balloon_walk; + + case Xblank: + case Xacid_splash_e: + case Xacid_splash_w: + Cave[x+dx][y+dy] = (dy ? (dy < 0 ? Yballoon_n : Yballoon_s) : + (dx > 0 ? Yballoon_e : Yballoon_w)); + Next[x+dx][y+dy] = Xballoon; + + balloon_walk: + Cave[x][y] = (dy ? (dy < 0 ? Yballoon_nB : Yballoon_sB) : + (dx > 0 ? Yballoon_eB : Yballoon_wB)); + Next[x][y] = Zplayer; + play_element_sound(x, y, SOUND_push, Xballoon); + ply->x = x; + ply->y = y; + } + + ply->anim = PLY_push_n + 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[x+dx][y+dy]) + { + 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[x+dx+1][y+dy-1] == Xblank) + Cave[x+dx+1][y+dy-1] = Xacid_splash_e; + if (Cave[x+dx-1][y+dy-1] == Xblank) + Cave[x+dx-1][y+dy-1] = Xacid_splash_w; + play_element_sound(x, y, SOUND_acid, Xacid_1); + goto android_walk; + + case Xblank: + case Xacid_splash_e: + case Xacid_splash_w: + Cave[x+dx][y+dy] = (dy ? (dy < 0 ? Yandroid_n : Yandroid_s) : + (dx > 0 ? Yandroid_e : Yandroid_w)); + Next[x+dx][y+dy] = (dy ? (dy < 0 ? Xandroid_2_n : Xandroid_2_s) : + (dx > 0 ? Xandroid_2_e : Xandroid_2_w)); + + android_walk: + Cave[x][y] = (dy ? (dy < 0 ? Yandroid_nB : Yandroid_sB) : + (dx > 0 ? Yandroid_eB : Yandroid_wB)); + Next[x][y] = Zplayer; + play_element_sound(x, y, SOUND_push, Xandroid); + ply->x = x; + ply->y = y; + } + + ply->anim = PLY_push_n + 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[x+dx][y+dy]]) + break; + + Cave[x+dx][y+dy] = Zplayer; + Next[x+dx][y+dy] = Zplayer; + play_element_sound(x, y, SOUND_door, element); + ply->anim = PLY_walk_n + anim; + ply->x = x + dx; + ply->y = y + dy; + break; + + case Xwheel: + play_element_sound(x, y, SOUND_press, element); + 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_any: + lev.wind_direction = dy ? (dy < 0 ? 0 : 2) : (dx > 0 ? 1 : 3); + goto wind_walk; + + wind_walk: + play_element_sound(x, y, SOUND_press, element); + lev.wind_cnt = lev.wind_time; + break; + + case Xwind_stop: + play_element_sound(x, y, SOUND_press, element); + lev.wind_cnt = 0; + break; + + case Xswitch: + play_element_sound(x, y, SOUND_press, element); + lev.ball_cnt = lev.ball_time; + lev.ball_state = !lev.ball_state; + break; + + case Xplant: + Cave[x][y] = Yplant; + Next[x][y] = Xplant; + play_element_sound(x, y, SOUND_blank, Xplant); + ply->anim = PLY_walk_n + anim; + ply->x = x; + ply->y = y; + break; + + case Xexit_1: + case Xexit_2: + case Xexit_3: + lev.home--; + + if (lev.home == 0) + game_em.level_solved = TRUE; + + ply->anim = PLY_walk_n + anim; + ply->x = x; + ply->y = y; + + break; + } + + if (ply->x == oldx && ply->y == oldy) /* no movement */ + result = FALSE; + } + else /* player wants to snap */ + { + int element = Cave[x][y]; + + switch(Cave[x][y]) + { + /* fire is pressed */ + + case Xgrass: + Cave[x][y] = Ygrass_blank; + Next[x][y] = Xblank; + play_element_sound(x, y, SOUND_dirt, element); + ply->anim = PLY_shoot_n + anim; + break; + + case Xdirt: + Cave[x][y] = Ydirt_blank; + Next[x][y] = Xblank; + play_element_sound(x, y, SOUND_dirt, element); + ply->anim = PLY_shoot_n + anim; + break; + + case Xdiamond: + case Xdiamond_pause: + Cave[x][y] = Ydiamond_blank; + Next[x][y] = Xblank; + play_element_sound(x, y, SOUND_collect, element); + lev.score += lev.diamond_score; + lev.required = lev.required < 3 ? 0 : lev.required - 3; + game.snapshot.collected_item = TRUE; + ply->anim = PLY_walk_n + anim; + break; + + case Xemerald: + case Xemerald_pause: + Cave[x][y] = Yemerald_blank; + Next[x][y] = Xblank; + play_element_sound(x, y, SOUND_collect, element); + lev.score += lev.emerald_score; + lev.required = lev.required < 1 ? 0 : lev.required - 1; + game.snapshot.collected_item = TRUE; + ply->anim = PLY_walk_n + anim; + break; + + case Xdynamite: + Cave[x][y] = Ydynamite_blank; + Next[x][y] = Xblank; + play_element_sound(x, y, SOUND_collect, element); + lev.score += lev.dynamite_score; + ply->dynamite = ply->dynamite > 9998 ? 9999 : ply->dynamite + 1; + ply->anim = PLY_walk_n + anim; + break; + + case Xkey_1: + ply->keys |= 0x01; + Cave[x][y] = Ykey_1_blank; + goto key_shoot; + + case Xkey_2: + ply->keys |= 0x02; + Cave[x][y] = Ykey_2_blank; + goto key_shoot; + + case Xkey_3: + ply->keys |= 0x04; + Cave[x][y] = Ykey_3_blank; + goto key_shoot; + + case Xkey_4: + ply->keys |= 0x08; + Cave[x][y] = Ykey_4_blank; + goto key_shoot; + + case Xkey_5: + ply->keys |= 0x10; + Cave[x][y] = Ykey_5_blank; + goto key_shoot; + + case Xkey_6: + ply->keys |= 0x20; + Cave[x][y] = Ykey_6_blank; + goto key_shoot; + + case Xkey_7: + ply->keys |= 0x40; + Cave[x][y] = Ykey_7_blank; + goto key_shoot; + + case Xkey_8: + ply->keys |= 0x80; + Cave[x][y] = Ykey_8_blank; + goto key_shoot; + + key_shoot: + Next[x][y] = Xblank; + play_element_sound(x, y, SOUND_collect, element); + lev.score += lev.key_score; + ply->anim = PLY_walk_n + anim; + break; + + case Xlenses: + Cave[x][y] = Ylenses_blank; + Next[x][y] = Xblank; + play_element_sound(x, y, SOUND_collect, element); + lev.score += lev.lenses_score; + lev.lenses_cnt = lev.lenses_time; + ply->anim = PLY_walk_n + anim; + break; + + case Xmagnify: + Cave[x][y] = Ymagnify_blank; + Next[x][y] = Xblank; + play_element_sound(x, y, SOUND_collect, element); + lev.score += lev.magnify_score; + lev.magnify_cnt = lev.magnify_time; + ply->anim = PLY_walk_n + anim; + break; + + default: + result = FALSE; + } + } + + return result; +} + +static void check_player(struct PLAYER *ply) +{ + int oldx = ply->x; + int oldy = ply->y; + int x = oldx; + int y = oldy; + int dx = 0, dy = 0; + + game_em.last_player_direction[ply->num] = MV_NONE; + + if (ply->joy_w) /* west */ + { + x--; + dx = -1; + } + else if (ply->joy_e) /* east */ + { + x++; + dx = 1; + } + + if (ply->joy_n) /* north */ + { + y--; + dy = -1; + } + else if (ply->joy_s) /* south */ + { + y++; + dy = 1; + } + + if (dx || dy) + { + int oldx = ply->x; + int oldy = ply->y; + int x = oldx + dx; + int y = oldy + dy; + boolean players_visible_before_move; + boolean players_visible_after_move; + boolean can_move; + + players_visible_before_move = checkIfAllPlayersFitToScreen(); + + ply->x = x; + ply->y = y; + + players_visible_after_move = checkIfAllPlayersFitToScreen(); + + /* + player is allowed to move only in the following cases: + - it is not needed to display all players (not focussed to all players) + - all players are (still or again) visible after the move + - some players were already outside visible screen area before the move + */ + can_move = (game.centered_player_nr != -1 || + players_visible_after_move || + !players_visible_before_move); + + ply->x = oldx; + ply->y = oldy; + + if (!can_move) + { + ply->joy_n = ply->joy_e = ply->joy_s = ply->joy_w = 0; + + return; + } + } + + if (dx == 0 && dy == 0) + { + ply->joy_stick = 0; + + if (ply->joy_drop) + { + if (++ply->dynamite_cnt == 5 && ply->dynamite) + { + Cave[x][y] = Xdynamite_1; + play_element_sound(x, y, SOUND_dynamite, Xdynamite_1); + ply->dynamite--; + } + } + else + { + ply->dynamite_cnt = 0; + } + + RandomEM += 7; /* be a bit more random if the player doesn't 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 */ + ply->joy_spin = !ply->joy_spin; + + if (ply->joy_snap == 0) /* player wants to move */ + { + boolean moved = FALSE; + + if (ply->last_move_dir & MV_HORIZONTAL) + { + if (!(moved = player_digfield(ply, 0, dy))) + moved = player_digfield(ply, dx, 0); + } + else + { + if (!(moved = player_digfield(ply, dx, 0))) + moved = player_digfield(ply, 0, dy); + } + + if (moved) + { + if (oldx != ply->x) + ply->last_move_dir = (dx < 0 ? MV_LEFT : MV_RIGHT); + else if (oldy != ply->y) + ply->last_move_dir = (dy < 0 ? MV_UP : MV_DOWN); + + game_em.any_player_moving = TRUE; + game_em.last_moving_player = ply->num; + game_em.last_player_direction[ply->num] = ply->last_move_dir; + } + } + else /* player wants to snap */ + { + game_em.any_player_snapping = player_digfield(ply, dx, dy); + } +} + +static void set_nearest_player_xy(int x, int y, int *dx, int *dy) +{ + int distance, distance_shortest = EM_MAX_CAVE_WIDTH + EM_MAX_CAVE_HEIGHT; + int i; + + /* default values if no players are alive anymore */ + *dx = 0; + *dy = 0; + + for (i = 0; i < MAX_PLAYERS; i++) + { + if (!ply[i].alive) + continue; + + distance = ABS(ply[i].x - x) + ABS(ply[i].y - y); + + if (distance < distance_shortest) + { + *dx = ply[i].x; + *dy = ply[i].y; + + distance_shortest = distance; + } + } +} + +static void Lacid_1(int x, int y) +{ + Next[x][y] = Xacid_2; +} + +static void Lacid_2(int x, int y) +{ + Next[x][y] = Xacid_3; +} + +static void Lacid_3(int x, int y) +{ + Next[x][y] = Xacid_4; +} + +static void Lacid_4(int x, int y) +{ + Next[x][y] = Xacid_5; +} + +static void Lacid_5(int x, int y) +{ + Next[x][y] = Xacid_6; +} + +static void Lacid_6(int x, int y) +{ + Next[x][y] = Xacid_7; +} + +static void Lacid_7(int x, int y) +{ + Next[x][y] = Xacid_8; +} + +static void Lacid_8(int x, int y) +{ + Next[x][y] = Xacid_1; +} + +#ifdef EM_ENGINE_USE_ADDITIONAL_ELEMENTS +static void Lfake_acid_1(int x, int y) +{ + Next[x][y] = Xfake_acid_2; +} + +static void Lfake_acid_2(int x, int y) +{ + Next[x][y] = Xfake_acid_3; +} + +static void Lfake_acid_3(int x, int y) +{ + Next[x][y] = Xfake_acid_4; +} + +static void Lfake_acid_4(int x, int y) +{ + Next[x][y] = Xfake_acid_5; +} + +static void Lfake_acid_5(int x, int y) +{ + Next[x][y] = Xfake_acid_6; +} + +static void Lfake_acid_6(int x, int y) +{ + Next[x][y] = Xfake_acid_7; +} + +static void Lfake_acid_7(int x, int y) +{ + Next[x][y] = Xfake_acid_8; +} + +static void Lfake_acid_8(int x, int y) +{ + Next[x][y] = Xfake_acid_1; +} +#endif + +static void Landroid(int x, int y) +{ + int dx, dy, temp; + + if (lev.android_clone_cnt == 0) + { + if (Cave[x-1][y-1] != Xblank && + Cave[x][y-1] != Xblank && + Cave[x+1][y-1] != Xblank && + Cave[x-1][y] != Xblank && + Cave[x+1][y] != Xblank && + Cave[x-1][y+1] != Xblank && + Cave[x][y+1] != Xblank && + Cave[x+1][y+1] != Xblank) + goto android_move; + + switch (RANDOM(8)) + { + /* randomly find an object to clone */ + + case 0: /* S,NE,W,NW,SE,E,SW,N */ + temp = lev.android_array[Cave[x][y+1]]; if (temp != Xblank) break; + temp = lev.android_array[Cave[x+1][y-1]]; if (temp != Xblank) break; + temp = lev.android_array[Cave[x-1][y]]; if (temp != Xblank) break; + temp = lev.android_array[Cave[x-1][y-1]]; if (temp != Xblank) break; + temp = lev.android_array[Cave[x+1][y+1]]; if (temp != Xblank) break; + temp = lev.android_array[Cave[x+1][y]]; if (temp != Xblank) break; + temp = lev.android_array[Cave[x-1][y+1]]; if (temp != Xblank) break; + temp = lev.android_array[Cave[x][y-1]]; if (temp != Xblank) break; + goto android_move; + + case 1: /* NW,SE,N,S,NE,SW,E,W */ + temp = lev.android_array[Cave[x-1][y-1]]; if (temp != Xblank) break; + temp = lev.android_array[Cave[x+1][y+1]]; if (temp != Xblank) break; + temp = lev.android_array[Cave[x][y-1]]; if (temp != Xblank) break; + temp = lev.android_array[Cave[x][y+1]]; if (temp != Xblank) break; + temp = lev.android_array[Cave[x+1][y-1]]; if (temp != Xblank) break; + temp = lev.android_array[Cave[x-1][y+1]]; if (temp != Xblank) break; + temp = lev.android_array[Cave[x+1][y]]; if (temp != Xblank) break; + temp = lev.android_array[Cave[x-1][y]]; if (temp != Xblank) break; + goto android_move; + + case 2: /* SW,E,S,W,N,NW,SE,NE */ + temp = lev.android_array[Cave[x-1][y+1]]; if (temp != Xblank) break; + temp = lev.android_array[Cave[x+1][y]]; if (temp != Xblank) break; + temp = lev.android_array[Cave[x][y+1]]; if (temp != Xblank) break; + temp = lev.android_array[Cave[x-1][y]]; if (temp != Xblank) break; + temp = lev.android_array[Cave[x][y-1]]; if (temp != Xblank) break; + temp = lev.android_array[Cave[x-1][y-1]]; if (temp != Xblank) break; + temp = lev.android_array[Cave[x+1][y+1]]; if (temp != Xblank) break; + temp = lev.android_array[Cave[x+1][y-1]]; if (temp != Xblank) break; + goto android_move; + + case 3: /* N,SE,NE,E,W,S,NW,SW */ + temp = lev.android_array[Cave[x][y-1]]; if (temp != Xblank) break; + temp = lev.android_array[Cave[x+1][y+1]]; if (temp != Xblank) break; + temp = lev.android_array[Cave[x+1][y-1]]; if (temp != Xblank) break; + temp = lev.android_array[Cave[x+1][y]]; if (temp != Xblank) break; + temp = lev.android_array[Cave[x-1][y]]; if (temp != Xblank) break; + temp = lev.android_array[Cave[x][y+1]]; if (temp != Xblank) break; + temp = lev.android_array[Cave[x-1][y-1]]; if (temp != Xblank) break; + temp = lev.android_array[Cave[x-1][y+1]]; if (temp != Xblank) break; + goto android_move; + + case 4: /* SE,NW,E,NE,SW,W,N,S */ + temp = lev.android_array[Cave[x+1][y+1]]; if (temp != Xblank) break; + temp = lev.android_array[Cave[x-1][y-1]]; if (temp != Xblank) break; + temp = lev.android_array[Cave[x+1][y]]; if (temp != Xblank) break; + temp = lev.android_array[Cave[x+1][y-1]]; if (temp != Xblank) break; + temp = lev.android_array[Cave[x-1][y+1]]; if (temp != Xblank) break; + temp = lev.android_array[Cave[x-1][y]]; if (temp != Xblank) break; + temp = lev.android_array[Cave[x][y-1]]; if (temp != Xblank) break; + temp = lev.android_array[Cave[x][y+1]]; if (temp != Xblank) break; + goto android_move; + + case 5: /* NE,W,SE,SW,S,N,E,NW */ + temp = lev.android_array[Cave[x+1][y-1]]; if (temp != Xblank) break; + temp = lev.android_array[Cave[x-1][y]]; if (temp != Xblank) break; + temp = lev.android_array[Cave[x+1][y+1]]; if (temp != Xblank) break; + temp = lev.android_array[Cave[x-1][y+1]]; if (temp != Xblank) break; + temp = lev.android_array[Cave[x][y+1]]; if (temp != Xblank) break; + temp = lev.android_array[Cave[x][y-1]]; if (temp != Xblank) break; + temp = lev.android_array[Cave[x+1][y]]; if (temp != Xblank) break; + temp = lev.android_array[Cave[x-1][y-1]]; if (temp != Xblank) break; + goto android_move; + + case 6: /* E,N,SW,S,NW,NE,SE,W */ + temp = lev.android_array[Cave[x+1][y]]; if (temp != Xblank) break; + temp = lev.android_array[Cave[x][y-1]]; if (temp != Xblank) break; + temp = lev.android_array[Cave[x-1][y+1]]; if (temp != Xblank) break; + temp = lev.android_array[Cave[x][y+1]]; if (temp != Xblank) break; + temp = lev.android_array[Cave[x-1][y-1]]; if (temp != Xblank) break; + temp = lev.android_array[Cave[x+1][y-1]]; if (temp != Xblank) break; + temp = lev.android_array[Cave[x+1][y+1]]; if (temp != Xblank) break; + temp = lev.android_array[Cave[x-1][y]]; if (temp != Xblank) break; + goto android_move; + + case 7: /* W,SW,NW,N,E,SE,NE,S */ + temp = lev.android_array[Cave[x-1][y]]; if (temp != Xblank) break; + temp = lev.android_array[Cave[x-1][y+1]]; if (temp != Xblank) break; + temp = lev.android_array[Cave[x-1][y-1]]; if (temp != Xblank) break; + temp = lev.android_array[Cave[x][y-1]]; if (temp != Xblank) break; + temp = lev.android_array[Cave[x+1][y]]; if (temp != Xblank) break; + temp = lev.android_array[Cave[x+1][y+1]]; if (temp != Xblank) break; + temp = lev.android_array[Cave[x+1][y-1]]; if (temp != Xblank) break; + temp = lev.android_array[Cave[x][y+1]]; if (temp != Xblank) break; + goto android_move; + } + + Next[x][y] = temp; /* the item we chose to clone */ + play_element_sound(x, y, SOUND_android_clone, temp); + + switch (RANDOM(8)) + { + /* randomly find a direction to move */ + + case 0: /* S,NE,W,NW,SE,E,SW,N */ + if (Cave[x][y+1] == Xblank) goto android_s; + if (Cave[x+1][y-1] == Xblank) goto android_ne; + if (Cave[x-1][y] == Xblank) goto android_w; + if (Cave[x-1][y-1] == Xblank) goto android_nw; + if (Cave[x+1][y+1] == Xblank) goto android_se; + if (Cave[x+1][y] == Xblank) goto android_e; + if (Cave[x-1][y+1] == Xblank) goto android_sw; + if (Cave[x][y-1] == Xblank) goto android_n; + goto android_move; + + case 1: /* NW,SE,N,S,NE,SW,E,W */ + if (Cave[x-1][y-1] == Xblank) goto android_nw; + if (Cave[x+1][y+1] == Xblank) goto android_se; + if (Cave[x][y-1] == Xblank) goto android_n; + if (Cave[x][y+1] == Xblank) goto android_s; + if (Cave[x+1][y-1] == Xblank) goto android_ne; + if (Cave[x-1][y+1] == Xblank) goto android_sw; + if (Cave[x+1][y] == Xblank) goto android_e; + if (Cave[x-1][y] == Xblank) goto android_w; + goto android_move; + + case 2: /* SW,E,S,W,N,NW,SE,NE */ + if (Cave[x-1][y+1] == Xblank) goto android_sw; + if (Cave[x+1][y] == Xblank) goto android_e; + if (Cave[x][y+1] == Xblank) goto android_s; + if (Cave[x-1][y] == Xblank) goto android_w; + if (Cave[x][y-1] == Xblank) goto android_n; + if (Cave[x-1][y-1] == Xblank) goto android_nw; + if (Cave[x+1][y+1] == Xblank) goto android_se; + if (Cave[x+1][y-1] == Xblank) goto android_ne; + goto android_move; + + case 3: /* N,SE,NE,E,W,S,NW,SW */ + if (Cave[x][y-1] == Xblank) goto android_n; + if (Cave[x+1][y+1] == Xblank) goto android_se; + if (Cave[x+1][y-1] == Xblank) goto android_ne; + if (Cave[x+1][y] == Xblank) goto android_e; + if (Cave[x-1][y] == Xblank) goto android_w; + if (Cave[x][y+1] == Xblank) goto android_s; + if (Cave[x-1][y-1] == Xblank) goto android_nw; + if (Cave[x-1][y+1] == Xblank) goto android_sw; + goto android_move; + + case 4: /* SE,NW,E,NE,SW,W,N,S */ + if (Cave[x+1][y+1] == Xblank) goto android_se; + if (Cave[x-1][y-1] == Xblank) goto android_nw; + if (Cave[x+1][y] == Xblank) goto android_e; + if (Cave[x+1][y-1] == Xblank) goto android_ne; + if (Cave[x-1][y+1] == Xblank) goto android_sw; + if (Cave[x-1][y] == Xblank) goto android_w; + if (Cave[x][y-1] == Xblank) goto android_n; + if (Cave[x][y+1] == Xblank) goto android_s; + goto android_move; + + case 5: /* NE,W,SE,SW,S,N,E,NW */ + if (Cave[x+1][y-1] == Xblank) goto android_ne; + if (Cave[x-1][y] == Xblank) goto android_w; + if (Cave[x+1][y+1] == Xblank) goto android_se; + if (Cave[x-1][y+1] == Xblank) goto android_sw; + if (Cave[x][y+1] == Xblank) goto android_s; + if (Cave[x][y-1] == Xblank) goto android_n; + if (Cave[x+1][y] == Xblank) goto android_e; + if (Cave[x-1][y-1] == Xblank) goto android_nw; + goto android_move; + + case 6: /* E,N,SW,S,NW,NE,SE,W */ + if (Cave[x+1][y] == Xblank) goto android_e; + if (Cave[x][y-1] == Xblank) goto android_n; + if (Cave[x-1][y+1] == Xblank) goto android_sw; + if (Cave[x][y+1] == Xblank) goto android_s; + if (Cave[x-1][y-1] == Xblank) goto android_nw; + if (Cave[x+1][y-1] == Xblank) goto android_ne; + if (Cave[x+1][y+1] == Xblank) goto android_se; + if (Cave[x-1][y] == Xblank) goto android_w; + goto android_move; + + case 7: /* W,SW,NW,N,E,SE,NE,S */ + if (Cave[x-1][y] == Xblank) goto android_w; + if (Cave[x-1][y+1] == Xblank) goto android_sw; + if (Cave[x-1][y-1] == Xblank) goto android_nw; + if (Cave[x][y-1] == Xblank) goto android_n; + if (Cave[x+1][y] == Xblank) goto android_e; + if (Cave[x+1][y+1] == Xblank) goto android_se; + if (Cave[x+1][y-1] == Xblank) goto android_ne; + if (Cave[x][y+1] == Xblank) goto android_s; + goto android_move; + } + } + + android_move: + if (lev.android_move_cnt == 0) + { + if (Cave[x-1][y-1] == Zplayer || + Cave[x][y-1] == Zplayer || + Cave[x+1][y-1] == Zplayer || + Cave[x-1][y] == Zplayer || + Cave[x+1][y] == Zplayer || + Cave[x-1][y+1] == Zplayer || + Cave[x][y+1] == Zplayer || + Cave[x+1][y+1] == Zplayer) + goto android_still; + + set_nearest_player_xy(x, y, &dx, &dy); + + Next[x][y] = Xblank; /* assume we will move */ + temp = ((x < dx) + 1 - (x > dx)) + ((y < dy) + 1 - (y > dy)) * 3; + + if (RANDOM(2)) + { + switch (temp) + { + /* attempt clockwise move first if direct path is blocked */ + + case 0: /* north west */ + if (tab_android_move[Cave[x-1][y-1]]) goto android_nw; + if (tab_android_move[Cave[x][y-1]]) goto android_n; + if (tab_android_move[Cave[x-1][y]]) goto android_w; + break; + + case 1: /* north */ + if (tab_android_move[Cave[x][y-1]]) goto android_n; + if (tab_android_move[Cave[x+1][y-1]]) goto android_ne; + if (tab_android_move[Cave[x-1][y-1]]) goto android_nw; + break; + + case 2: /* north east */ + if (tab_android_move[Cave[x+1][y-1]]) goto android_ne; + if (tab_android_move[Cave[x+1][y]]) goto android_e; + if (tab_android_move[Cave[x][y-1]]) goto android_n; + break; + + case 3: /* west */ + if (tab_android_move[Cave[x-1][y]]) goto android_w; + if (tab_android_move[Cave[x-1][y-1]]) goto android_nw; + if (tab_android_move[Cave[x-1][y+1]]) goto android_sw; + break; + + case 4: /* nowhere */ + break; + + case 5: /* east */ + if (tab_android_move[Cave[x+1][y]]) goto android_e; + if (tab_android_move[Cave[x+1][y+1]]) goto android_se; + if (tab_android_move[Cave[x+1][y-1]]) goto android_ne; + break; + + case 6: /* south west */ + if (tab_android_move[Cave[x-1][y+1]]) goto android_sw; + if (tab_android_move[Cave[x-1][y]]) goto android_w; + if (tab_android_move[Cave[x][y+1]]) goto android_s; + break; + + case 7: /* south */ + if (tab_android_move[Cave[x][y+1]]) goto android_s; + if (tab_android_move[Cave[x-1][y+1]]) goto android_sw; + if (tab_android_move[Cave[x+1][y+1]]) goto android_se; + break; + + case 8: /* south east */ + if (tab_android_move[Cave[x+1][y+1]]) goto android_se; + if (tab_android_move[Cave[x][y+1]]) goto android_s; + if (tab_android_move[Cave[x+1][y]]) goto android_e; + break; + } + } + else + { + switch (temp) + { + /* attempt counterclockwise move first if direct path is blocked */ + + case 0: /* north west */ + if (tab_android_move[Cave[x-1][y-1]]) goto android_nw; + if (tab_android_move[Cave[x-1][y]]) goto android_w; + if (tab_android_move[Cave[x][y-1]]) goto android_n; + break; + + case 1: /* north */ + if (tab_android_move[Cave[x][y-1]]) goto android_n; + if (tab_android_move[Cave[x-1][y-1]]) goto android_nw; + if (tab_android_move[Cave[x+1][y-1]]) goto android_ne; + break; + + case 2: /* north east */ + if (tab_android_move[Cave[x+1][y-1]]) goto android_ne; + if (tab_android_move[Cave[x][y-1]]) goto android_n; + if (tab_android_move[Cave[x+1][y]]) goto android_e; + break; + + case 3: /* west */ + if (tab_android_move[Cave[x-1][y]]) goto android_w; + if (tab_android_move[Cave[x-1][y+1]]) goto android_sw; + if (tab_android_move[Cave[x-1][y-1]]) goto android_nw; + break; + + case 4: /* nowhere */ + break; + + case 5: /* east */ + if (tab_android_move[Cave[x+1][y]]) goto android_e; + if (tab_android_move[Cave[x+1][y-1]]) goto android_ne; + if (tab_android_move[Cave[x+1][y+1]]) goto android_se; + break; + + case 6: /* south west */ + if (tab_android_move[Cave[x-1][y+1]]) goto android_sw; + if (tab_android_move[Cave[x][y+1]]) goto android_s; + if (tab_android_move[Cave[x-1][y]]) goto android_w; + break; + + case 7: /* south */ + if (tab_android_move[Cave[x][y+1]]) goto android_s; + if (tab_android_move[Cave[x+1][y+1]]) goto android_se; + if (tab_android_move[Cave[x-1][y+1]]) goto android_sw; + break; + + case 8: /* south east */ + if (tab_android_move[Cave[x+1][y+1]]) goto android_se; + if (tab_android_move[Cave[x+1][y]]) goto android_e; + if (tab_android_move[Cave[x][y+1]]) goto android_s; + break; + } + } + } + + android_still: + Next[x][y] = Xandroid; + return; + + android_n: + Cave[x][y] = Yandroid_nB; + Cave[x][y-1] = Yandroid_n; + Next[x][y-1] = Xandroid; + play_element_sound(x, y, SOUND_android_move, Xandroid); + return; + + android_ne: + Cave[x][y] = Yandroid_neB; + Cave[x+1][y-1] = Yandroid_ne; + Next[x+1][y-1] = Xandroid; + play_element_sound(x, y, SOUND_android_move, Xandroid); + return; + + android_e: + Cave[x][y] = Yandroid_eB; + Cave[x+1][y] = Yandroid_e; + Next[x+1][y] = Xandroid; + play_element_sound(x, y, SOUND_android_move, Xandroid); + return; + + android_se: + Cave[x][y] = Yandroid_seB; + Cave[x+1][y+1] = Yandroid_se; + Next[x+1][y+1] = Xandroid; + play_element_sound(x, y, SOUND_android_move, Xandroid); + return; + + android_s: + Cave[x][y] = Yandroid_sB; + Cave[x][y+1] = Yandroid_s; + Next[x][y+1] = Xandroid; + play_element_sound(x, y, SOUND_android_move, Xandroid); + return; + + android_sw: + Cave[x][y] = Yandroid_swB; + Cave[x-1][y+1] = Yandroid_sw; + Next[x-1][y+1] = Xandroid; + play_element_sound(x, y, SOUND_android_move, Xandroid); + return; + + android_w: + Cave[x][y] = Yandroid_wB; + Cave[x-1][y] = Yandroid_w; + Next[x-1][y] = Xandroid; + play_element_sound(x, y, SOUND_android_move, Xandroid); + return; + + android_nw: + Cave[x][y] = Yandroid_nwB; + Cave[x-1][y-1] = Yandroid_nw; + Next[x-1][y-1] = Xandroid; + play_element_sound(x, y, SOUND_android_move, Xandroid); + return; +} + +static void Landroid_1_n(int x, int y) +{ + switch (Cave[x][y-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[x][y] = Yandroid_nB; + if (Cave[x+1][y-2] == Xblank) + Cave[x+1][y-2] = Xacid_splash_e; + if (Cave[x-1][y-2] == Xblank) + Cave[x-1][y-2] = Xacid_splash_w; + Next[x][y] = Xblank; + play_element_sound(x, y, SOUND_acid, Xacid_1); + return; + + case Xblank: + case Xacid_splash_e: + case Xacid_splash_w: + Cave[x][y] = Yandroid_nB; + Cave[x][y-1] = Yandroid_n; + Next[x][y] = Xblank; + Next[x][y-1] = Xandroid; + play_element_sound(x, y, SOUND_android_move, Xandroid_1_n); + return; + + default: + Landroid(x, y); + return; + } +} + +static void Landroid_2_n(int x, int y) +{ + switch (Cave[x][y-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[x][y] = Yandroid_nB; + if (Cave[x+1][y-2] == Xblank) + Cave[x+1][y-2] = Xacid_splash_e; + if (Cave[x-1][y-2] == Xblank) + Cave[x-1][y-2] = Xacid_splash_w; + Next[x][y] = Xblank; + play_element_sound(x, y, SOUND_acid, Xacid_1); + return; + + case Xblank: + case Xacid_splash_e: + case Xacid_splash_w: + Cave[x][y] = Yandroid_nB; + Cave[x][y-1] = Yandroid_n; + Next[x][y] = Xblank; + Next[x][y-1] = Xandroid_1_n; + play_element_sound(x, y, SOUND_android_move, Xandroid_2_n); + return; + + default: + Landroid(x, y); + return; + } +} + +static void Landroid_1_e(int x, int y) +{ + switch (Cave[x+1][y]) + { + 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[x][y] = Yandroid_eB; + if (Cave[x+2][y-1] == Xblank) + Cave[x+2][y-1] = Xacid_splash_e; + if (Cave[x][y-1] == Xblank) + Cave[x][y-1] = Xacid_splash_w; + Next[x][y] = Xblank; + play_element_sound(x, y, SOUND_acid, Xacid_1); + return; + + case Xblank: + case Xacid_splash_e: + case Xacid_splash_w: + Cave[x][y] = Yandroid_eB; + Cave[x+1][y] = Yandroid_e; + Next[x][y] = Xblank; + Next[x+1][y] = Xandroid; + play_element_sound(x, y, SOUND_android_move, Xandroid_1_e); + return; + + default: + Landroid(x, y); + return; + } +} + +static void Landroid_2_e(int x, int y) +{ + switch (Cave[x+1][y]) + { + 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[x][y] = Yandroid_eB; + if (Cave[x+2][y-1] == Xblank) + Cave[x+2][y-1] = Xacid_splash_e; + if (Cave[x][y-1] == Xblank) + Cave[x][y-1] = Xacid_splash_w; + Next[x][y] = Xblank; + play_element_sound(x, y, SOUND_acid, Xacid_1); + return; + + case Xblank: + case Xacid_splash_e: + case Xacid_splash_w: + Cave[x][y] = Yandroid_eB; + Cave[x+1][y] = Yandroid_e; + Next[x][y] = Xblank; + Next[x+1][y] = Xandroid_1_e; + play_element_sound(x, y, SOUND_android_move, Xandroid_2_e); + return; + + default: + Landroid(x, y); + return; + } +} + +static void Landroid_1_s(int x, int y) +{ + switch (Cave[x][y+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[x][y] = Yandroid_sB; + if (Cave[x+1][y] == Xblank) + Cave[x+1][y] = Xacid_splash_e; + if (Cave[x-1][y] == Xblank) + Cave[x-1][y] = Xacid_splash_w; + Next[x][y] = Xblank; + play_element_sound(x, y, SOUND_acid, Xacid_1); + return; + + case Xblank: + case Xacid_splash_e: + case Xacid_splash_w: + Cave[x][y] = Yandroid_sB; + Cave[x][y+1] = Yandroid_s; + Next[x][y] = Xblank; + Next[x][y+1] = Xandroid; + play_element_sound(x, y, SOUND_android_move, Xandroid_1_s); + return; + + default: + Landroid(x, y); + return; + } +} + +static void Landroid_2_s(int x, int y) +{ + switch (Cave[x][y+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[x][y] = Yandroid_sB; + if (Cave[x+1][y] == Xblank) + Cave[x+1][y] = Xacid_splash_e; + if (Cave[x-1][y] == Xblank) + Cave[x-1][y] = Xacid_splash_w; + Next[x][y] = Xblank; + play_element_sound(x, y, SOUND_acid, Xacid_1); + return; + + case Xblank: + case Xacid_splash_e: + case Xacid_splash_w: + Cave[x][y] = Yandroid_sB; + Cave[x][y+1] = Yandroid_s; + Next[x][y] = Xblank; + Next[x][y+1] = Xandroid_1_s; + play_element_sound(x, y, SOUND_android_move, Xandroid_2_s); + return; + + default: + Landroid(x, y); + return; + } +} + +static void Landroid_1_w(int x, int y) +{ + switch (Cave[x-1][y]) + { + 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[x][y] = Yandroid_wB; + if (Cave[x][y-1] == Xblank) + Cave[x][y-1] = Xacid_splash_e; + if (Cave[x-2][y-1] == Xblank) + Cave[x-2][y-1] = Xacid_splash_w; + Next[x][y] = Xblank; + play_element_sound(x, y, SOUND_acid, Xacid_1); + return; + + case Xblank: + case Xacid_splash_e: + case Xacid_splash_w: + Cave[x][y] = Yandroid_wB; + Cave[x-1][y] = Yandroid_w; + Next[x][y] = Xblank; + Next[x-1][y] = Xandroid; + play_element_sound(x, y, SOUND_android_move, Xandroid_1_w); + return; + + default: + Landroid(x, y); + return; + } +} + +static void Landroid_2_w(int x, int y) +{ + switch (Cave[x-1][y]) + { + 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[x][y] = Yandroid_wB; + if (Cave[x][y-1] == Xblank) + Cave[x][y-1] = Xacid_splash_e; + if (Cave[x-2][y-1] == Xblank) + Cave[x-2][y-1] = Xacid_splash_w; + Next[x][y] = Xblank; + play_element_sound(x, y, SOUND_acid, Xacid_1); + return; + + case Xblank: + case Xacid_splash_e: + case Xacid_splash_w: + Cave[x][y] = Yandroid_wB; + Cave[x-1][y] = Yandroid_w; + Next[x][y] = Xblank; + Next[x-1][y] = Xandroid_1_w; + play_element_sound(x, y, SOUND_android_move, Xandroid_1_w); + return; + + default: + Landroid(x, y); + return; + } +} + +static void Leater_n(int x, int y) +{ + if (Cave[x+1][y] == Xdiamond) + { + Cave[x+1][y] = Ydiamond_blank; + Next[x+1][y] = Xblank; + play_element_sound(x, y, SOUND_eater_eat, Xeater_n); + return; + } + + if (Cave[x][y+1] == Xdiamond) + { + Cave[x][y+1] = Ydiamond_blank; + Next[x][y+1] = Xblank; + play_element_sound(x, y, SOUND_eater_eat, Xeater_n); + return; + } + + if (Cave[x-1][y] == Xdiamond) + { + Cave[x-1][y] = Ydiamond_blank; + Next[x-1][y] = Xblank; + play_element_sound(x, y, SOUND_eater_eat, Xeater_n); + return; + } + + if (Cave[x][y-1] == Xdiamond) + { + Cave[x][y-1] = Ydiamond_blank; + Next[x][y-1] = Xblank; + play_element_sound(x, y, SOUND_eater_eat, Xeater_n); + return; + } + + switch (Cave[x][y-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[x][y] = Yeater_nB; + if (Cave[x+1][y-2] == Xblank) + Cave[x+1][y-2] = Xacid_splash_e; + if (Cave[x-1][y-2] == Xblank) + Cave[x-1][y-2] = Xacid_splash_w; + Next[x][y] = Xblank; + play_element_sound(x, y, SOUND_acid, Xacid_1); + return; + + case Xblank: + case Xacid_splash_e: + case Xacid_splash_w: + case Xplant: + case Yplant: + case Zplayer: + Cave[x][y] = Yeater_nB; + Cave[x][y-1] = Yeater_n; + Next[x][y] = Xblank; + Next[x][y-1] = Xeater_n; + return; + + default: + Next[x][y] = RANDOM(2) ? Xeater_e : Xeater_w; + play_element_sound(x, y, SOUND_eater, Xeater_n); + return; + } +} + +static void Leater_e(int x, int y) +{ + if (Cave[x][y+1] == Xdiamond) + { + Cave[x][y+1] = Ydiamond_blank; + Next[x][y+1] = Xblank; + play_element_sound(x, y, SOUND_eater_eat, Xeater_e); + return; + } + + if (Cave[x-1][y] == Xdiamond) + { + Cave[x-1][y] = Ydiamond_blank; + Next[x-1][y] = Xblank; + play_element_sound(x, y, SOUND_eater_eat, Xeater_e); + return; + } + + if (Cave[x][y-1] == Xdiamond) + { + Cave[x][y-1] = Ydiamond_blank; + Next[x][y-1] = Xblank; + play_element_sound(x, y, SOUND_eater_eat, Xeater_e); + return; + } + + if (Cave[x+1][y] == Xdiamond) + { + Cave[x+1][y] = Ydiamond_blank; + Next[x+1][y] = Xblank; + play_element_sound(x, y, SOUND_eater_eat, Xeater_e); + return; + } + + switch (Cave[x+1][y]) + { + 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[x][y] = Yeater_eB; + if (Cave[x+2][y-1] == Xblank) + Cave[x+2][y-1] = Xacid_splash_e; + if (Cave[x][y-1] == Xblank) + Cave[x][y-1] = Xacid_splash_w; + Next[x][y] = Xblank; + play_element_sound(x, y, SOUND_acid, Xacid_1); + return; + + case Xblank: + case Xacid_splash_e: + case Xacid_splash_w: + case Xplant: + case Yplant: + case Zplayer: + Cave[x][y] = Yeater_eB; + Cave[x+1][y] = Yeater_e; + Next[x][y] = Xblank; + Next[x+1][y] = Xeater_e; + return; + + default: + Next[x][y] = RANDOM(2) ? Xeater_n : Xeater_s; + play_element_sound(x, y, SOUND_eater, Xeater_e); + return; + } +} + +static void Leater_s(int x, int y) +{ + if (Cave[x-1][y] == Xdiamond) + { + Cave[x-1][y] = Ydiamond_blank; + Next[x-1][y] = Xblank; + play_element_sound(x, y, SOUND_eater_eat, Xeater_s); + return; + } + + if (Cave[x][y-1] == Xdiamond) + { + Cave[x][y-1] = Ydiamond_blank; + Next[x][y-1] = Xblank; + play_element_sound(x, y, SOUND_eater_eat, Xeater_s); + return; + } + + if (Cave[x+1][y] == Xdiamond) + { + Cave[x+1][y] = Ydiamond_blank; + Next[x+1][y] = Xblank; + play_element_sound(x, y, SOUND_eater_eat, Xeater_s); + return; + } + + if (Cave[x][y+1] == Xdiamond) + { + Cave[x][y+1] = Ydiamond_blank; + Next[x][y+1] = Xblank; + play_element_sound(x, y, SOUND_eater_eat, Xeater_s); + return; + } + + switch (Cave[x][y+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[x][y] = Yeater_sB; + if (Cave[x+1][y] == Xblank) + Cave[x+1][y] = Xacid_splash_e; + if (Cave[x-1][y] == Xblank) + Cave[x-1][y] = Xacid_splash_w; + Next[x][y] = Xblank; + play_element_sound(x, y, SOUND_acid, Xacid_1); + return; + + case Xblank: + case Xacid_splash_e: + case Xacid_splash_w: + case Xplant: + case Yplant: + case Zplayer: + Cave[x][y] = Yeater_sB; + Cave[x][y+1] = Yeater_s; + Next[x][y] = Xblank; + Next[x][y+1] = Xeater_s; + return; + + default: + Next[x][y] = RANDOM(2) ? Xeater_e : Xeater_w; + play_element_sound(x, y, SOUND_eater, Xeater_s); + return; + } +} + +static void Leater_w(int x, int y) +{ + if (Cave[x][y-1] == Xdiamond) + { + Cave[x][y-1] = Ydiamond_blank; + Next[x][y-1] = Xblank; + play_element_sound(x, y, SOUND_eater_eat, Xeater_w); + return; + } + + if (Cave[x+1][y] == Xdiamond) + { + Cave[x+1][y] = Ydiamond_blank; + Next[x+1][y] = Xblank; + play_element_sound(x, y, SOUND_eater_eat, Xeater_w); + return; + } + + if (Cave[x][y+1] == Xdiamond) + { + Cave[x][y+1] = Ydiamond_blank; + Next[x][y+1] = Xblank; + play_element_sound(x, y, SOUND_eater_eat, Xeater_w); + return; + } + + if (Cave[x-1][y] == Xdiamond) + { + Cave[x-1][y] = Ydiamond_blank; + Next[x-1][y] = Xblank; + play_element_sound(x, y, SOUND_eater_eat, Xeater_w); + return; + } + + switch (Cave[x-1][y]) + { + 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[x][y] = Yeater_wB; + if (Cave[x][y-1] == Xblank) + Cave[x][y-1] = Xacid_splash_e; + if (Cave[x-2][y-1] == Xblank) + Cave[x-2][y-1] = Xacid_splash_w; + Next[x][y] = Xblank; + play_element_sound(x, y, SOUND_acid, Xacid_1); + return; + + case Xblank: + case Xacid_splash_e: + case Xacid_splash_w: + case Xplant: + case Yplant: + case Zplayer: + Cave[x][y] = Yeater_wB; + Cave[x-1][y] = Yeater_w; + Next[x][y] = Xblank; + Next[x-1][y] = Xeater_w; + return; + + default: + Next[x][y] = RANDOM(2) ? Xeater_n : Xeater_s; + play_element_sound(x, y, SOUND_eater, Xeater_w); + return; + } +} + +static void Lalien(int x, int y) +{ + int dx, dy; + + if (lev.wheel_cnt) + { + dx = lev.wheel_x; + dy = lev.wheel_y; + } + else + { + set_nearest_player_xy(x, y, &dx, &dy); + } + + if (RANDOM(2)) + { + if (y > dy) + { + switch (Cave[x][y-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[x][y] = Yalien_nB; + if (Cave[x+1][y-2] == Xblank) + Cave[x+1][y-2] = Xacid_splash_e; + if (Cave[x-1][y-2] == Xblank) + Cave[x-1][y-2] = Xacid_splash_w; + Next[x][y] = Xblank; + play_element_sound(x, y, SOUND_acid, Xacid_1); + return; + + case Xblank: + case Xacid_splash_e: + case Xacid_splash_w: + case Xplant: + case Yplant: + case Zplayer: + Cave[x][y] = Yalien_nB; + Cave[x][y-1] = Yalien_n; + Next[x][y] = Xblank; + Next[x][y-1] = Xalien_pause; + play_element_sound(x, y, SOUND_alien, Xalien); + return; + } + } + else if (y < dy) + { + switch (Cave[x][y+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[x][y] = Yalien_sB; + Next[x][y] = Xblank; + if (Cave[x+1][y] == Xblank) + Cave[x+1][y] = Xacid_splash_e; + if (Cave[x-1][y] == Xblank) + Cave[x-1][y] = Xacid_splash_w; + play_element_sound(x, y, SOUND_acid, Xacid_1); + return; + + case Xblank: + case Xacid_splash_e: + case Xacid_splash_w: + case Xplant: + case Yplant: + case Zplayer: + Cave[x][y] = Yalien_sB; + Cave[x][y+1] = Yalien_s; + Next[x][y] = Xblank; + Next[x][y+1] = Xalien_pause; + play_element_sound(x, y, SOUND_alien, Xalien); + return; + } + } + } + else + { + if (x < dx) + { + switch (Cave[x+1][y]) + { + 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[x][y] = Yalien_eB; + if (Cave[x+2][y-1] == Xblank) + Cave[x+2][y-1] = Xacid_splash_e; + if (Cave[x][y-1] == Xblank) + Cave[x][y-1] = Xacid_splash_w; + Next[x][y] = Xblank; + play_element_sound(x, y, SOUND_acid, Xacid_1); + return; + + case Xblank: + case Xacid_splash_e: + case Xacid_splash_w: + case Xplant: + case Yplant: + case Zplayer: + Cave[x][y] = Yalien_eB; + Cave[x+1][y] = Yalien_e; + Next[x][y] = Xblank; + Next[x+1][y] = Xalien_pause; + play_element_sound(x, y, SOUND_alien, Xalien); + return; + } + } + else if (x > dx) + { + switch (Cave[x-1][y]) + { + 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[x][y] = Yalien_wB; + if (Cave[x][y-1] == Xblank) + Cave[x][y-1] = Xacid_splash_e; + if (Cave[x-2][y-1] == Xblank) + Cave[x-2][y-1] = Xacid_splash_w; + Next[x][y] = Xblank; + play_element_sound(x, y, SOUND_acid, Xacid_1); + return; + + case Xblank: + case Xacid_splash_e: + case Xacid_splash_w: + case Xplant: + case Yplant: + case Zplayer: + Cave[x][y] = Yalien_wB; + Cave[x-1][y] = Yalien_w; + Next[x][y] = Xblank; + Next[x-1][y] = Xalien_pause; + play_element_sound(x, y, SOUND_alien, Xalien); + return; + } + } + } +} + +static void Lalien_pause(int x, int y) +{ + Next[x][y] = Xalien; +} + +static void Lbug_n(int x, int y) +{ + switch (Cave[x][y-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[x][y] = Ybug_nB; + if (Cave[x+1][y-2] == Xblank) + Cave[x+1][y-2] = Xacid_splash_e; + if (Cave[x-1][y-2] == Xblank) + Cave[x-1][y-2] = Xacid_splash_w; + Next[x][y] = Xblank; + play_element_sound(x, y, SOUND_acid, Xacid_1); + return; + + case Xblank: + case Xacid_splash_e: + case Xacid_splash_w: + case Xplant: + case Yplant: + case Zplayer: + Cave[x][y] = Ybug_nB; + Cave[x][y-1] = Ybug_n; + Next[x][y] = Xblank; + Next[x][y-1] = Xbug_1_n; + play_element_sound(x, y, SOUND_bug, Xbug_1_n); + return; + + default: + Cave[x][y] = Ybug_n_w; + Next[x][y] = Xbug_2_w; + play_element_sound(x, y, SOUND_bug, Xbug_1_n); + return; + } +} + +static void Lbug_1_n(int x, int y) +{ + if (tab_amoeba[Cave[x][y-1]] || + tab_amoeba[Cave[x+1][y]] || + tab_amoeba[Cave[x][y+1]] || + tab_amoeba[Cave[x-1][y]]) + { + Lboom_bug(x, y); + + return; + } + + switch (Cave[x+1][y]) + { + case Xblank: + case Xacid_splash_e: + case Xacid_splash_w: + 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[x][y] = Ybug_n_e; + Next[x][y] = Xbug_2_e; + play_element_sound(x, y, SOUND_bug, Xbug_1_n); + return; + + default: + Lbug_n(x, y); + return; + } +} + +static void Lbug_2_n(int x, int y) +{ + if (tab_amoeba[Cave[x][y-1]] || + tab_amoeba[Cave[x+1][y]] || + tab_amoeba[Cave[x][y+1]] || + tab_amoeba[Cave[x-1][y]]) + { + Lboom_bug(x, y); + + return; + } + + Lbug_n(x, y); +} + +static void Lbug_e(int x, int y) +{ + switch (Cave[x+1][y]) + { + 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[x][y] = Ybug_eB; + if (Cave[x+2][y-1] == Xblank) + Cave[x+2][y-1] = Xacid_splash_e; + if (Cave[x][y-1] == Xblank) + Cave[x][y-1] = Xacid_splash_w; + Next[x][y] = Xblank; + play_element_sound(x, y, SOUND_acid, Xacid_1); + return; + + case Xblank: + case Xacid_splash_e: + case Xacid_splash_w: + case Xplant: + case Yplant: + case Zplayer: + Cave[x][y] = Ybug_eB; + Cave[x+1][y] = Ybug_e; + Next[x][y] = Xblank; + Next[x+1][y] = Xbug_1_e; + play_element_sound(x, y, SOUND_bug, Xbug_1_e); + return; + + default: + Cave[x][y] = Ybug_e_n; + Next[x][y] = Xbug_2_n; + play_element_sound(x, y, SOUND_bug, Xbug_1_e); + return; + } +} + +static void Lbug_1_e(int x, int y) +{ + if (tab_amoeba[Cave[x][y-1]] || + tab_amoeba[Cave[x+1][y]] || + tab_amoeba[Cave[x][y+1]] || + tab_amoeba[Cave[x-1][y]]) + { + Lboom_bug(x, y); + + return; + } + + switch (Cave[x][y+1]) + { + case Xblank: + case Xacid_splash_e: + case Xacid_splash_w: + 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[x][y] = Ybug_e_s; + Next[x][y] = Xbug_2_s; + play_element_sound(x, y, SOUND_bug, Xbug_1_e); + return; + + default: + Lbug_e(x, y); + return; + } +} + +static void Lbug_2_e(int x, int y) +{ + if (tab_amoeba[Cave[x][y-1]] || + tab_amoeba[Cave[x+1][y]] || + tab_amoeba[Cave[x][y+1]] || + tab_amoeba[Cave[x-1][y]]) + { + Lboom_bug(x, y); + + return; + } + + Lbug_e(x, y); +} + +static void Lbug_s(int x, int y) +{ + switch (Cave[x][y+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[x][y] = Ybug_sB; + if (Cave[x+1][y] == Xblank) + Cave[x+1][y] = Xacid_splash_e; + if (Cave[x-1][y] == Xblank) + Cave[x-1][y] = Xacid_splash_w; + Next[x][y] = Xblank; + play_element_sound(x, y, SOUND_acid, Xacid_1); + return; + + case Xblank: + case Xacid_splash_e: + case Xacid_splash_w: + case Xplant: + case Yplant: + case Zplayer: + Cave[x][y] = Ybug_sB; + Cave[x][y+1] = Ybug_s; + Next[x][y] = Xblank; + Next[x][y+1] = Xbug_1_s; + play_element_sound(x, y, SOUND_bug, Xbug_1_s); + return; + + default: + Cave[x][y] = Ybug_s_e; + Next[x][y] = Xbug_2_e; + play_element_sound(x, y, SOUND_bug, Xbug_1_s); + return; + } +} + +static void Lbug_1_s(int x, int y) +{ + if (tab_amoeba[Cave[x][y-1]] || + tab_amoeba[Cave[x+1][y]] || + tab_amoeba[Cave[x][y+1]] || + tab_amoeba[Cave[x-1][y]]) + { + Lboom_bug(x, y); + + return; + } + + switch (Cave[x-1][y]) + { + case Xblank: + case Xacid_splash_e: + case Xacid_splash_w: + 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[x][y] = Ybug_s_w; + Next[x][y] = Xbug_2_w; + play_element_sound(x, y, SOUND_bug, Xbug_1_s); + return; + + default: + Lbug_s(x, y); + return; + } +} + +static void Lbug_2_s(int x, int y) +{ + if (tab_amoeba[Cave[x][y-1]] || + tab_amoeba[Cave[x+1][y]] || + tab_amoeba[Cave[x][y+1]] || + tab_amoeba[Cave[x-1][y]]) + { + Lboom_bug(x, y); + + return; + } + + Lbug_s(x, y); +} + +static void Lbug_w(int x, int y) +{ + switch (Cave[x-1][y]) + { + 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[x][y] = Ybug_wB; + if (Cave[x][y-1] == Xblank) + Cave[x][y-1] = Xacid_splash_e; + if (Cave[x-2][y-1] == Xblank) + Cave[x-2][y-1] = Xacid_splash_w; + Next[x][y] = Xblank; + play_element_sound(x, y, SOUND_acid, Xacid_1); + return; + + case Xblank: + case Xacid_splash_e: + case Xacid_splash_w: + case Xplant: + case Yplant: + case Zplayer: + Cave[x][y] = Ybug_wB; + Cave[x-1][y] = Ybug_w; + Next[x][y] = Xblank; + Next[x-1][y] = Xbug_1_w; + play_element_sound(x, y, SOUND_bug, Xbug_1_w); + return; + + default: + Cave[x][y] = Ybug_w_s; + Next[x][y] = Xbug_2_s; + play_element_sound(x, y, SOUND_bug, Xbug_1_w); + return; + } +} + +static void Lbug_1_w(int x, int y) +{ + if (tab_amoeba[Cave[x][y-1]] || + tab_amoeba[Cave[x+1][y]] || + tab_amoeba[Cave[x][y+1]] || + tab_amoeba[Cave[x-1][y]]) + { + Lboom_bug(x, y); + + return; + } + + switch (Cave[x][y-1]) + { + case Xblank: + case Xacid_splash_e: + case Xacid_splash_w: + 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[x][y] = Ybug_w_n; + Next[x][y] = Xbug_2_n; + play_element_sound(x, y, SOUND_bug, Xbug_1_w); + return; + + default: + Lbug_w(x, y); + return; + } +} + +static void Lbug_2_w(int x, int y) +{ + if (tab_amoeba[Cave[x][y-1]] || + tab_amoeba[Cave[x+1][y]] || + tab_amoeba[Cave[x][y+1]] || + tab_amoeba[Cave[x-1][y]]) + { + Lboom_bug(x, y); + + return; + } + + Lbug_w(x, y); +} + +static void Ltank_n(int x, int y) +{ + switch (Cave[x][y-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[x][y] = Ytank_nB; + if (Cave[x+1][y-2] == Xblank) + Cave[x+1][y-2] = Xacid_splash_e; + if (Cave[x-1][y-2] == Xblank) + Cave[x-1][y-2] = Xacid_splash_w; + Next[x][y] = Xblank; + play_element_sound(x, y, SOUND_acid, Xacid_1); + return; + + case Xblank: + case Xacid_splash_e: + case Xacid_splash_w: + case Xplant: + case Yplant: + case Zplayer: + Cave[x][y] = Ytank_nB; + Cave[x][y-1] = Ytank_n; + Next[x][y] = Xblank; + Next[x][y-1] = Xtank_1_n; + play_element_sound(x, y, SOUND_tank, Xtank_1_n); + return; + + default: + Cave[x][y] = Ytank_n_e; + Next[x][y] = Xtank_2_e; + play_element_sound(x, y, SOUND_tank, Xtank_1_n); + return; + } +} + +static void Ltank_1_n(int x, int y) +{ + if (tab_amoeba[Cave[x][y-1]] || + tab_amoeba[Cave[x+1][y]] || + tab_amoeba[Cave[x][y+1]] || + tab_amoeba[Cave[x-1][y]]) + { + Lboom_tank(x, y); + + return; + } + + switch (Cave[x-1][y]) + { + case Xblank: + case Xacid_splash_e: + case Xacid_splash_w: + 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[x][y] = Ytank_n_w; + Next[x][y] = Xtank_2_w; + play_element_sound(x, y, SOUND_tank, Xtank_1_n); + return; + + default: + Ltank_n(x, y); + return; + } +} + +static void Ltank_2_n(int x, int y) +{ + if (tab_amoeba[Cave[x][y-1]] || + tab_amoeba[Cave[x+1][y]] || + tab_amoeba[Cave[x][y+1]] || + tab_amoeba[Cave[x-1][y]]) + { + Lboom_tank(x, y); + + return; + } + + Ltank_n(x, y); +} + +static void Ltank_e(int x, int y) +{ + switch (Cave[x+1][y]) + { + 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[x][y] = Ytank_eB; + if (Cave[x+2][y-1] == Xblank) + Cave[x+2][y-1] = Xacid_splash_e; + if (Cave[x][y-1] == Xblank) + Cave[x][y-1] = Xacid_splash_w; + Next[x][y] = Xblank; + play_element_sound(x, y, SOUND_acid, Xacid_1); + return; + + case Xblank: + case Xacid_splash_e: + case Xacid_splash_w: + case Xplant: + case Yplant: + case Zplayer: + Cave[x][y] = Ytank_eB; + Cave[x+1][y] = Ytank_e; + Next[x][y] = Xblank; + Next[x+1][y] = Xtank_1_e; + play_element_sound(x, y, SOUND_tank, Xtank_1_e); + return; + + default: + Cave[x][y] = Ytank_e_s; + Next[x][y] = Xtank_2_s; + play_element_sound(x, y, SOUND_tank, Xtank_1_e); + return; + } +} + +static void Ltank_1_e(int x, int y) +{ + if (tab_amoeba[Cave[x][y-1]] || + tab_amoeba[Cave[x+1][y]] || + tab_amoeba[Cave[x][y+1]] || + tab_amoeba[Cave[x-1][y]]) + { + Lboom_tank(x, y); + + return; + } + + switch (Cave[x][y-1]) + { + case Xblank: + case Xacid_splash_e: + case Xacid_splash_w: + 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[x][y] = Ytank_e_n; + Next[x][y] = Xtank_2_n; + play_element_sound(x, y, SOUND_tank, Xtank_1_e); + return; + + default: + Ltank_e(x, y); + return; + } +} + +static void Ltank_2_e(int x, int y) +{ + if (tab_amoeba[Cave[x][y-1]] || + tab_amoeba[Cave[x+1][y]] || + tab_amoeba[Cave[x][y+1]] || + tab_amoeba[Cave[x-1][y]]) + { + Lboom_tank(x, y); + + return; + } + + Ltank_e(x, y); +} + +static void Ltank_s(int x, int y) +{ + switch (Cave[x][y+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[x][y] = Ytank_sB; + if (Cave[x+1][y] == Xblank) + Cave[x+1][y] = Xacid_splash_e; + if (Cave[x-1][y] == Xblank) + Cave[x-1][y] = Xacid_splash_w; + Next[x][y] = Xblank; + play_element_sound(x, y, SOUND_acid, Xacid_1); + return; + + case Xblank: + case Xacid_splash_e: + case Xacid_splash_w: + case Xplant: + case Yplant: + case Zplayer: + Cave[x][y] = Ytank_sB; + Cave[x][y+1] = Ytank_s; + Next[x][y] = Xblank; + Next[x][y+1] = Xtank_1_s; + play_element_sound(x, y, SOUND_tank, Xtank_1_s); + return; + + default: + Cave[x][y] = Ytank_s_w; + Next[x][y] = Xtank_2_w; + play_element_sound(x, y, SOUND_tank, Xtank_1_s); + return; + } +} + +static void Ltank_1_s(int x, int y) +{ + if (tab_amoeba[Cave[x][y-1]] || + tab_amoeba[Cave[x+1][y]] || + tab_amoeba[Cave[x][y+1]] || + tab_amoeba[Cave[x-1][y]]) + { + Lboom_tank(x, y); + + return; + } + + switch (Cave[x+1][y]) + { + case Xblank: + case Xacid_splash_e: + case Xacid_splash_w: + 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[x][y] = Ytank_s_e; + Next[x][y] = Xtank_2_e; + play_element_sound(x, y, SOUND_tank, Xtank_1_s); + return; + + default: + Ltank_s(x, y); + return; + } +} + +static void Ltank_2_s(int x, int y) +{ + if (tab_amoeba[Cave[x][y-1]] || + tab_amoeba[Cave[x+1][y]] || + tab_amoeba[Cave[x][y+1]] || + tab_amoeba[Cave[x-1][y]]) + { + Lboom_tank(x, y); + + return; + } + + Ltank_s(x, y); +} + +static void Ltank_w(int x, int y) +{ + switch (Cave[x-1][y]) + { + 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[x][y] = Ytank_wB; + if (Cave[x][y-1] == Xblank) + Cave[x][y-1] = Xacid_splash_e; + if (Cave[x-2][y-1] == Xblank) + Cave[x-2][y-1] = Xacid_splash_w; + Next[x][y] = Xblank; + play_element_sound(x, y, SOUND_acid, Xacid_1); + return; + + case Xblank: + case Xacid_splash_e: + case Xacid_splash_w: + case Xplant: + case Yplant: + case Zplayer: + Cave[x][y] = Ytank_wB; + Cave[x-1][y] = Ytank_w; + Next[x][y] = Xblank; + Next[x-1][y] = Xtank_1_w; + play_element_sound(x, y, SOUND_tank, Xtank_1_w); + return; + + default: + Cave[x][y] = Ytank_w_n; + Next[x][y] = Xtank_2_n; + play_element_sound(x, y, SOUND_tank, Xtank_1_w); + return; + } +} + +static void Ltank_1_w(int x, int y) +{ + if (tab_amoeba[Cave[x][y-1]] || + tab_amoeba[Cave[x+1][y]] || + tab_amoeba[Cave[x][y+1]] || + tab_amoeba[Cave[x-1][y]]) + { + Lboom_tank(x, y); + + return; + } + + switch (Cave[x][y+1]) + { + case Xblank: + case Xacid_splash_e: + case Xacid_splash_w: + 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[x][y] = Ytank_w_s; + Next[x][y] = Xtank_2_s; + play_element_sound(x, y, SOUND_tank, Xtank_1_w); + return; + + default: + Ltank_w(x, y); + return; + } +} + +static void Ltank_2_w(int x, int y) +{ + if (tab_amoeba[Cave[x][y-1]] || + tab_amoeba[Cave[x+1][y]] || + tab_amoeba[Cave[x][y+1]] || + tab_amoeba[Cave[x-1][y]]) + { + Lboom_tank(x, y); + + return; + } + + Ltank_w(x, y); +} + +static void Lemerald(int x, int y) +{ + switch (Cave[x][y+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[x][y] = Yemerald_sB; + if (Cave[x+1][y] == Xblank) + Cave[x+1][y] = Xacid_splash_e; + if (Cave[x-1][y] == Xblank) + Cave[x-1][y] = Xacid_splash_w; + Next[x][y] = Xblank; + play_element_sound(x, y, SOUND_acid, Xacid_1); + return; + + case Xblank: + case Xacid_splash_e: + case Xacid_splash_w: + Cave[x][y] = Yemerald_sB; + Cave[x][y+1] = Yemerald_s; + Next[x][y] = Xblank; + Next[x][y+1] = Xemerald_fall; + return; + + 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 Xslidewall_ns: + case Xslidewall_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 Xroundwall_1: + case Xroundwall_2: + case Xroundwall_3: + case Xroundwall_4: + if (RANDOM(2)) + { + if (tab_blank[Cave[x+1][y]] && tab_acid[Cave[x+1][y+1]]) + { + Cave[x][y] = Yemerald_eB; + Cave[x+1][y] = Yemerald_e; + Next[x][y] = Xblank; + Next[x+1][y] = Xemerald_pause; + return; + } + + if (tab_blank[Cave[x-1][y]] && tab_acid[Cave[x-1][y+1]]) + { + Cave[x][y] = Yemerald_wB; + Cave[x-1][y] = Yemerald_w; + Next[x][y] = Xblank; + Next[x-1][y] = Xemerald_pause; + return; + } + } + else + { + if (tab_blank[Cave[x-1][y]] && tab_acid[Cave[x-1][y+1]]) + { + Cave[x][y] = Yemerald_wB; + Cave[x-1][y] = Yemerald_w; + Next[x][y] = Xblank; + Next[x-1][y] = Xemerald_pause; + return; + } + + if (tab_blank[Cave[x+1][y]] && tab_acid[Cave[x+1][y+1]]) + { + Cave[x][y] = Yemerald_eB; + Cave[x+1][y] = Yemerald_e; + Next[x][y] = Xblank; + Next[x+1][y] = Xemerald_pause; + return; + } + } + + default: + if (++lev.shine_cnt > 50) + { + lev.shine_cnt = RANDOM(8); + Cave[x][y] = Xemerald_shine; + } + + return; + } +} + +static void Lemerald_pause(int x, int y) +{ + switch (Cave[x][y+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[x][y] = Yemerald_sB; + if (Cave[x+1][y] == Xblank) + Cave[x+1][y] = Xacid_splash_e; + if (Cave[x-1][y] == Xblank) + Cave[x-1][y] = Xacid_splash_w; + Next[x][y] = Xblank; + play_element_sound(x, y, SOUND_acid, Xacid_1); + return; + + case Xblank: + case Xacid_splash_e: + case Xacid_splash_w: + Cave[x][y] = Yemerald_sB; + Cave[x][y+1] = Yemerald_s; + Next[x][y] = Xblank; + Next[x][y+1] = Xemerald_fall; + return; + + default: + Cave[x][y] = Xemerald; + Next[x][y] = Xemerald; + return; + } +} + +static void Lemerald_fall(int x, int y) +{ + switch (Cave[x][y+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[x][y] = Yemerald_sB; + if (Cave[x+1][y] == Xblank) + Cave[x+1][y] = Xacid_splash_e; + if (Cave[x-1][y] == Xblank) + Cave[x-1][y] = Xacid_splash_w; + Next[x][y] = Xblank; + play_element_sound(x, y, SOUND_acid, Xacid_1); + return; + + case Xblank: + case Xacid_splash_e: + case Xacid_splash_w: + case Zplayer: + Cave[x][y] = Yemerald_sB; + Cave[x][y+1] = Yemerald_s; + Next[x][y] = Xblank; + Next[x][y+1] = Xemerald_fall; + return; + + case Xwonderwall: + if (lev.wonderwall_time) + { + lev.wonderwall_state = 1; + Cave[x][y] = Yemerald_sB; + if (tab_blank[Cave[x][y+2]]) + { + Cave[x][y+2] = Ydiamond_s; + Next[x][y+2] = Xdiamond_fall; + } + + Next[x][y] = Xblank; + play_element_sound(x, y, SOUND_wonderfall, Xwonderwall); + return; + } + + default: + Cave[x][y] = Xemerald; + Next[x][y] = Xemerald; + play_element_sound(x, y, SOUND_diamond, Xemerald); + return; + } +} + +static void Ldiamond(int x, int y) +{ + switch (Cave[x][y+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[x][y] = Ydiamond_sB; + if (Cave[x+1][y] == Xblank) + Cave[x+1][y] = Xacid_splash_e; + if (Cave[x-1][y] == Xblank) + Cave[x-1][y] = Xacid_splash_w; + Next[x][y] = Xblank; + play_element_sound(x, y, SOUND_acid, Xacid_1); + return; + + case Xblank: + case Xacid_splash_e: + case Xacid_splash_w: + Cave[x][y] = Ydiamond_sB; + Cave[x][y+1] = Ydiamond_s; + Next[x][y] = Xblank; + Next[x][y+1] = Xdiamond_fall; + return; + + 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 Xslidewall_ns: + case Xslidewall_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 Xroundwall_1: + case Xroundwall_2: + case Xroundwall_3: + case Xroundwall_4: + if (RANDOM(2)) + { + if (tab_blank[Cave[x+1][y]] && tab_acid[Cave[x+1][y+1]]) + { + Cave[x][y] = Ydiamond_eB; + Cave[x+1][y] = Ydiamond_e; + Next[x][y] = Xblank; + Next[x+1][y] = Xdiamond_pause; + return; + } + + if (tab_blank[Cave[x-1][y]] && tab_acid[Cave[x-1][y+1]]) + { + Cave[x][y] = Ydiamond_wB; + Cave[x-1][y] = Ydiamond_w; + Next[x][y] = Xblank; + Next[x-1][y] = Xdiamond_pause; + return; + } + } + else + { + if (tab_blank[Cave[x-1][y]] && tab_acid[Cave[x-1][y+1]]) + { + Cave[x][y] = Ydiamond_wB; + Cave[x-1][y] = Ydiamond_w; + Next[x][y] = Xblank; + Next[x-1][y] = Xdiamond_pause; + return; + } + + if (tab_blank[Cave[x+1][y]] && tab_acid[Cave[x+1][y+1]]) + { + Cave[x][y] = Ydiamond_eB; + Cave[x+1][y] = Ydiamond_e; + Next[x][y] = Xblank; + Next[x+1][y] = Xdiamond_pause; + return; + } + } + + default: + if (++lev.shine_cnt > 50) + { + lev.shine_cnt = RANDOM(8); + Cave[x][y] = Xdiamond_shine; + } + + return; + } +} + +static void Ldiamond_pause(int x, int y) +{ + switch (Cave[x][y+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[x][y] = Ydiamond_sB; + if (Cave[x+1][y] == Xblank) + Cave[x+1][y] = Xacid_splash_e; + if (Cave[x-1][y] == Xblank) + Cave[x-1][y] = Xacid_splash_w; + Next[x][y] = Xblank; + play_element_sound(x, y, SOUND_acid, Xacid_1); + return; + + case Xblank: + case Xacid_splash_e: + case Xacid_splash_w: + Cave[x][y] = Ydiamond_sB; + Cave[x][y+1] = Ydiamond_s; + Next[x][y] = Xblank; + Next[x][y+1] = Xdiamond_fall; + return; + + default: + Cave[x][y] = Xdiamond; + Next[x][y] = Xdiamond; + return; + } +} + +static void Ldiamond_fall(int x, int y) +{ + switch (Cave[x][y+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[x][y] = Ydiamond_sB; + if (Cave[x+1][y] == Xblank) + Cave[x+1][y] = Xacid_splash_e; + if (Cave[x-1][y] == Xblank) + Cave[x-1][y] = Xacid_splash_w; + Next[x][y] = Xblank; + play_element_sound(x, y, SOUND_acid, Xacid_1); + return; + + case Xblank: + case Xacid_splash_e: + case Xacid_splash_w: + case Zplayer: + Cave[x][y] = Ydiamond_sB; + Cave[x][y+1] = Ydiamond_s; + Next[x][y] = Xblank; + Next[x][y+1] = Xdiamond_fall; + return; + + case Xwonderwall: + if (lev.wonderwall_time) + { + lev.wonderwall_state = 1; + Cave[x][y] = Ydiamond_sB; + if (tab_blank[Cave[x][y+2]]) + { + Cave[x][y+2] = Ystone_s; + Next[x][y+2] = Xstone_fall; + } + + Next[x][y] = Xblank; + play_element_sound(x, y, SOUND_wonderfall, Xwonderwall); + return; + } + + default: + Cave[x][y] = Xdiamond; + Next[x][y] = Xdiamond; + play_element_sound(x, y, SOUND_diamond, Xdiamond); + return; + } +} + +static void Lstone(int x, int y) +{ + switch (Cave[x][y+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[x][y] = Ystone_sB; + if (Cave[x+1][y] == Xblank) + Cave[x+1][y] = Xacid_splash_e; + if (Cave[x-1][y] == Xblank) + Cave[x-1][y] = Xacid_splash_w; + Next[x][y] = Xblank; + play_element_sound(x, y, SOUND_acid, Xacid_1); + return; + + case Xblank: + case Xacid_splash_e: + case Xacid_splash_w: + case Xplant: + case Yplant: +#ifdef EM_ENGINE_USE_ADDITIONAL_ELEMENTS + case Xfake_acid_1: + case Xfake_acid_2: + case Xfake_acid_3: + case Xfake_acid_4: + case Xfake_acid_5: + case Xfake_acid_6: + case Xfake_acid_7: + case Xfake_acid_8: +#endif + Cave[x][y] = Ystone_sB; + Cave[x][y+1] = Ystone_s; + Next[x][y] = Xblank; + Next[x][y+1] = Xstone_fall; + return; + + case Xsand: + Cave[x][y] = Xsand_stonein_1; + Cave[x][y+1] = Xsand_sandstone_1; + Next[x][y] = Xsand_stonein_2; + Next[x][y+1] = Xsand_sandstone_2; + return; + + 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 Xslidewall_ns: + case Xslidewall_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 Xroundwall_1: + case Xroundwall_2: + case Xroundwall_3: + case Xroundwall_4: + if (RANDOM(2)) + { + if (tab_blank[Cave[x+1][y]] && tab_acid[Cave[x+1][y+1]]) + { + Cave[x][y] = Ystone_eB; + Cave[x+1][y] = Ystone_e; + Next[x][y] = Xblank; + Next[x+1][y] = Xstone_pause; + return; + } + + if (tab_blank[Cave[x-1][y]] && tab_acid[Cave[x-1][y+1]]) + { + Cave[x][y] = Ystone_wB; + Cave[x-1][y] = Ystone_w; + Next[x][y] = Xblank; + Next[x-1][y] = Xstone_pause; + return; + } + } + else + { + if (tab_blank[Cave[x-1][y]] && tab_acid[Cave[x-1][y+1]]) + { + Cave[x][y] = Ystone_wB; + Cave[x-1][y] = Ystone_w; + Next[x][y] = Xblank; + Next[x-1][y] = Xstone_pause; + return; + } + + if (tab_blank[Cave[x+1][y]] && tab_acid[Cave[x+1][y+1]]) + { + Cave[x][y] = Ystone_eB; + Cave[x+1][y] = Ystone_e; + Next[x][y] = Xblank; + Next[x+1][y] = Xstone_pause; + return; + } + } + } +} + +static void Lstone_pause(int x, int y) +{ + switch (Cave[x][y+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[x][y] = Ystone_sB; + if (Cave[x+1][y] == Xblank) + Cave[x+1][y] = Xacid_splash_e; + if (Cave[x-1][y] == Xblank) + Cave[x-1][y] = Xacid_splash_w; + Next[x][y] = Xblank; + play_element_sound(x, y, SOUND_acid, Xacid_1); + return; + + case Xblank: + case Xacid_splash_e: + case Xacid_splash_w: +#ifdef EM_ENGINE_USE_ADDITIONAL_ELEMENTS + case Xfake_acid_1: + case Xfake_acid_2: + case Xfake_acid_3: + case Xfake_acid_4: + case Xfake_acid_5: + case Xfake_acid_6: + case Xfake_acid_7: + case Xfake_acid_8: +#endif + Cave[x][y] = Ystone_sB; + Cave[x][y+1] = Ystone_s; + Next[x][y] = Xblank; + Next[x][y+1] = Xstone_fall; + return; + + default: + Cave[x][y] = Xstone; + Next[x][y] = Xstone; + return; + } +} + +static void Lstone_fall(int x, int y) +{ + switch (Cave[x][y+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[x][y] = Ystone_sB; + if (Cave[x+1][y] == Xblank) + Cave[x+1][y] = Xacid_splash_e; + if (Cave[x-1][y] == Xblank) + Cave[x-1][y] = Xacid_splash_w; + Next[x][y] = Xblank; + play_element_sound(x, y, SOUND_acid, Xacid_1); + return; + + case Xblank: + case Xacid_splash_e: + case Xacid_splash_w: + case Zplayer: +#ifdef EM_ENGINE_USE_ADDITIONAL_ELEMENTS + case Xfake_acid_1: + case Xfake_acid_2: + case Xfake_acid_3: + case Xfake_acid_4: + case Xfake_acid_5: + case Xfake_acid_6: + case Xfake_acid_7: + case Xfake_acid_8: +#endif + Cave[x][y] = Ystone_sB; + Cave[x][y+1] = Ystone_s; + Next[x][y] = Xblank; + Next[x][y+1] = Xstone_fall; + return; + + case Xnut: + case Xnut_pause: + Cave[x][y+1] = Ynut_stone; + Next[x][y] = Xstone; + Next[x][y+1] = Xemerald; + play_element_sound(x, y, SOUND_crack, Xnut); + score += lev.nut_score; + return; + + case Xbug_1_n: + case Xbug_1_e: + case Xbug_1_s: + case Xbug_1_w: + case Xbug_2_n: + case Xbug_2_e: + case Xbug_2_s: + case Xbug_2_w: + Cave[x][y] = Ystone_sB; + Cave[x][y+1] = Ybug_stone; + Next[x][y+1] = Znormal; + Boom[x-1][y] = Xemerald; + Boom[x][y] = Xemerald; + Boom[x+1][y] = Xemerald; + Boom[x-1][y+1] = Xemerald; + Boom[x][y+1] = Xdiamond; + Boom[x+1][y+1] = Xemerald; + Boom[x-1][y+2] = Xemerald; + Boom[x][y+2] = Xemerald; + Boom[x+1][y+2] = Xemerald; +#if PLAY_ELEMENT_SOUND + play_element_sound(x, y, SOUND_boom, Xstone_fall); +#endif + score += lev.bug_score; + return; + + case Xtank_1_n: + case Xtank_1_e: + case Xtank_1_s: + case Xtank_1_w: + case Xtank_2_n: + case Xtank_2_e: + case Xtank_2_s: + case Xtank_2_w: + Cave[x][y] = Ystone_sB; + Cave[x][y+1] = Ytank_stone; + Next[x][y+1] = Znormal; + Boom[x-1][y] = Xblank; + Boom[x][y] = Xblank; + Boom[x+1][y] = Xblank; + Boom[x-1][y+1] = Xblank; + Boom[x][y+1] = Xblank; + Boom[x+1][y+1] = Xblank; + Boom[x-1][y+2] = Xblank; + Boom[x][y+2] = Xblank; + Boom[x+1][y+2] = Xblank; +#if PLAY_ELEMENT_SOUND + play_element_sound(x, y, SOUND_boom, Xstone_fall); +#endif + score += lev.tank_score; + return; + + case Xspring: + if (RANDOM(2)) + { + switch (Cave[x+1][y+1]) + { + case Xblank: + case Xacid_splash_e: + case Xacid_splash_w: + case Xalien: + case Xalien_pause: + Cave[x][y+1] = Xspring_e; + break; + + default: + Cave[x][y+1] = Xspring_w; + break; + } + } + else + { + switch (Cave[x-1][y+1]) + { + case Xblank: + case Xacid_splash_e: + case Xacid_splash_w: + case Xalien: + case Xalien_pause: + Cave[x][y+1] = Xspring_w; + break; + default: + Cave[x][y+1] = Xspring_e; + break; + } + } + + Next[x][y] = Xstone; + return; + + case Xeater_n: + case Xeater_e: + case Xeater_s: + case Xeater_w: + Cave[x][y] = Ystone_sB; + Cave[x][y+1] = Yeater_stone; + Next[x][y+1] = Znormal; + Boom[x-1][y] = lev.eater_array[lev.eater_pos][0]; + Boom[x][y] = lev.eater_array[lev.eater_pos][1]; + Boom[x+1][y] = lev.eater_array[lev.eater_pos][2]; + Boom[x-1][y+1] = lev.eater_array[lev.eater_pos][3]; + Boom[x][y+1] = lev.eater_array[lev.eater_pos][4]; + Boom[x+1][y+1] = lev.eater_array[lev.eater_pos][5]; + Boom[x-1][y+2] = lev.eater_array[lev.eater_pos][6]; + Boom[x][y+2] = lev.eater_array[lev.eater_pos][7]; + Boom[x+1][y+2] = lev.eater_array[lev.eater_pos][8]; +#if PLAY_ELEMENT_SOUND + play_element_sound(x, y, SOUND_boom, Xstone_fall); +#endif + lev.eater_pos = (lev.eater_pos + 1) & 7; + score += lev.eater_score; + return; + + case Xalien: + case Xalien_pause: + Cave[x][y] = Ystone_sB; + Cave[x][y+1] = Yalien_stone; + Next[x][y+1] = Znormal; + Boom[x-1][y] = Xblank; + Boom[x][y] = Xblank; + Boom[x+1][y] = Xblank; + Boom[x-1][y+1] = Xblank; + Boom[x][y+1] = Xblank; + Boom[x+1][y+1] = Xblank; + Boom[x-1][y+2] = Xblank; + Boom[x][y+2] = Xblank; + Boom[x+1][y+2] = Xblank; +#if PLAY_ELEMENT_SOUND + play_element_sound(x, y, SOUND_boom, Xstone_fall); +#endif + score += lev.alien_score; + return; + + case Xdiamond: + case Xdiamond_pause: + switch (Cave[x][y+2]) + { + case Xblank: + case Xacid_splash_e: + case Xacid_splash_w: + case Zplayer: + case Xbug_1_n: + case Xbug_1_e: + case Xbug_1_s: + case Xbug_1_w: + case Xbug_2_n: + case Xbug_2_e: + case Xbug_2_s: + case Xbug_2_w: + case Xtank_1_n: + case Xtank_1_e: + case Xtank_1_s: + case Xtank_1_w: + case Xtank_2_n: + case Xtank_2_e: + case Xtank_2_s: + case Xtank_2_w: + 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[x][y] = Xstone; + play_element_sound(x, y, SOUND_stone, Xstone); + return; + } + + Cave[x][y] = Ystone_sB; + Cave[x][y+1] = Ydiamond_stone; + Next[x][y] = Xblank; + Next[x][y+1] = Xstone_pause; + play_element_sound(x, y, SOUND_squash, Xdiamond); + return; + + case Xbomb: + case Xbomb_pause: + Cave[x][y+1] = Ybomb_blank; + Next[x][y+1] = Znormal; + Boom[x-1][y] = Xblank; + Boom[x][y] = Xblank; + Boom[x+1][y] = Xblank; + Boom[x-1][y+1] = Xblank; + Boom[x][y+1] = Xblank; + Boom[x+1][y+1] = Xblank; + Boom[x-1][y+2] = Xblank; + Boom[x][y+2] = Xblank; + Boom[x+1][y+2] = Xblank; +#if PLAY_ELEMENT_SOUND + play_element_sound(x, y, SOUND_boom, Xstone_fall); +#endif + return; + + case Xwonderwall: + if (lev.wonderwall_time) + { + lev.wonderwall_state = 1; + Cave[x][y] = Ystone_sB; + + if (tab_blank[Cave[x][y+2]]) + { + Cave[x][y+2] = Yemerald_s; + Next[x][y+2] = Xemerald_fall; + } + + Next[x][y] = Xblank; + play_element_sound(x, y, SOUND_wonderfall, Xwonderwall); + return; + } + + default: + Cave[x][y] = Xstone; + Next[x][y] = Xstone; + play_element_sound(x, y, SOUND_stone, Xstone); + return; + } +} + +static void Lbomb(int x, int y) +{ + switch (Cave[x][y+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[x][y] = Ybomb_sB; + if (Cave[x+1][y] == Xblank) + Cave[x+1][y] = Xacid_splash_e; + if (Cave[x-1][y] == Xblank) + Cave[x-1][y] = Xacid_splash_w; + Next[x][y] = Xblank; + play_element_sound(x, y, SOUND_acid, Xacid_1); + return; + + case Xblank: + case Xacid_splash_e: + case Xacid_splash_w: + Cave[x][y] = Ybomb_sB; + Cave[x][y+1] = Ybomb_s; + Next[x][y] = Xblank; + Next[x][y+1] = Xbomb_fall; + return; + + 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 Xslidewall_ns: + case Xslidewall_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 Xroundwall_1: + case Xroundwall_2: + case Xroundwall_3: + case Xroundwall_4: + if (RANDOM(2)) + { + if (tab_blank[Cave[x+1][y]] && tab_acid[Cave[x+1][y+1]]) + { + Cave[x][y] = Ybomb_eB; + Cave[x+1][y] = Ybomb_e; + Next[x][y] = Xblank; + Next[x+1][y] = Xbomb_pause; + return; + } + + if (tab_blank[Cave[x-1][y]] && tab_acid[Cave[x-1][y+1]]) + { + Cave[x][y] = Ybomb_wB; + Cave[x-1][y] = Ybomb_w; + Next[x][y] = Xblank; + Next[x-1][y] = Xbomb_pause; + return; + } + } + else + { + if (tab_blank[Cave[x-1][y]] && tab_acid[Cave[x-1][y+1]]) + { + Cave[x][y] = Ybomb_wB; + Cave[x-1][y] = Ybomb_w; + Next[x][y] = Xblank; + Next[x-1][y] = Xbomb_pause; + return; + } + + if (tab_blank[Cave[x+1][y]] && tab_acid[Cave[x+1][y+1]]) + { + Cave[x][y] = Ybomb_eB; + Cave[x+1][y] = Ybomb_e; + Next[x][y] = Xblank; + Next[x+1][y] = Xbomb_pause; + return; + } + } + } +} + +static void Lbomb_pause(int x, int y) +{ + switch (Cave[x][y+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[x][y] = Ybomb_sB; + if (Cave[x+1][y] == Xblank) + Cave[x+1][y] = Xacid_splash_e; + if (Cave[x-1][y] == Xblank) + Cave[x-1][y] = Xacid_splash_w; + Next[x][y] = Xblank; + play_element_sound(x, y, SOUND_acid, Xacid_1); + return; + + case Xblank: + case Xacid_splash_e: + case Xacid_splash_w: + Cave[x][y] = Ybomb_sB; + Cave[x][y+1] = Ybomb_s; + Next[x][y] = Xblank; + Next[x][y+1] = Xbomb_fall; + return; + + default: + Cave[x][y] = Xbomb; + Next[x][y] = Xbomb; + return; + } +} + +static void Lbomb_fall(int x, int y) +{ + switch (Cave[x][y+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[x][y] = Ybomb_sB; + if (Cave[x+1][y] == Xblank) + Cave[x+1][y] = Xacid_splash_e; + if (Cave[x-1][y] == Xblank) + Cave[x-1][y] = Xacid_splash_w; + Next[x][y] = Xblank; + play_element_sound(x, y, SOUND_acid, Xacid_1); + return; + + case Xblank: + case Xacid_splash_e: + case Xacid_splash_w: + Cave[x][y] = Ybomb_sB; + Cave[x][y+1] = Ybomb_s; + Next[x][y] = Xblank; + Next[x][y+1] = Xbomb_fall; + return; + + default: + Cave[x][y] = Ybomb_blank; + Next[x][y] = Znormal; + Boom[x-1][y-1] = Xblank; + Boom[x][y-1] = Xblank; + Boom[x+1][y-1] = Xblank; + Boom[x-1][y] = Xblank; + Boom[x][y] = Xblank; + Boom[x+1][y] = Xblank; + Boom[x-1][y+1] = Xblank; + Boom[x][y+1] = Xblank; + Boom[x+1][y+1] = Xblank; +#if PLAY_ELEMENT_SOUND + play_element_sound(x, y, SOUND_boom, Xbomb_fall); +#endif + return; + } +} + +static void Lnut(int x, int y) +{ + switch (Cave[x][y+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[x][y] = Ynut_sB; + if (Cave[x+1][y] == Xblank) + Cave[x+1][y] = Xacid_splash_e; + if (Cave[x-1][y] == Xblank) + Cave[x-1][y] = Xacid_splash_w; + Next[x][y] = Xblank; + play_element_sound(x, y, SOUND_acid, Xacid_1); + return; + + case Xblank: + case Xacid_splash_e: + case Xacid_splash_w: + Cave[x][y] = Ynut_sB; + Cave[x][y+1] = Ynut_s; + Next[x][y] = Xblank; + Next[x][y+1] = Xnut_fall; + return; + + 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 Xslidewall_ns: + case Xslidewall_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 Xroundwall_1: + case Xroundwall_2: + case Xroundwall_3: + case Xroundwall_4: + if (RANDOM(2)) + { + if (tab_blank[Cave[x+1][y]] && tab_acid[Cave[x+1][y+1]]) + { + Cave[x][y] = Ynut_eB; + Cave[x+1][y] = Ynut_e; + Next[x][y] = Xblank; + Next[x+1][y] = Xnut_pause; + return; + } + + if (tab_blank[Cave[x-1][y]] && tab_acid[Cave[x-1][y+1]]) + { + Cave[x][y] = Ynut_wB; + Cave[x-1][y] = Ynut_w; + Next[x][y] = Xblank; + Next[x-1][y] = Xnut_pause; + return; + } + } + else + { + if (tab_blank[Cave[x-1][y]] && tab_acid[Cave[x-1][y+1]]) + { + Cave[x][y] = Ynut_wB; + Cave[x-1][y] = Ynut_w; + Next[x][y] = Xblank; + Next[x-1][y] = Xnut_pause; + return; + } + + if (tab_blank[Cave[x+1][y]] && tab_acid[Cave[x+1][y+1]]) + { + Cave[x][y] = Ynut_eB; + Cave[x+1][y] = Ynut_e; + Next[x][y] = Xblank; + Next[x+1][y] = Xnut_pause; + return; + } + } + } +} + +static void Lnut_pause(int x, int y) +{ + switch (Cave[x][y+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[x][y] = Ynut_sB; + if (Cave[x+1][y] == Xblank) + Cave[x+1][y] = Xacid_splash_e; + if (Cave[x-1][y] == Xblank) + Cave[x-1][y] = Xacid_splash_w; + Next[x][y] = Xblank; + play_element_sound(x, y, SOUND_acid, Xacid_1); + return; + + case Xblank: + case Xacid_splash_e: + case Xacid_splash_w: + Cave[x][y] = Ynut_sB; + Cave[x][y+1] = Ynut_s; + Next[x][y] = Xblank; + Next[x][y+1] = Xnut_fall; + return; + + default: + Cave[x][y] = Xnut; + Next[x][y] = Xnut; + return; + } +} + +static void Lnut_fall(int x, int y) +{ + switch (Cave[x][y+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[x][y] = Ynut_sB; + if (Cave[x+1][y] == Xblank) + Cave[x+1][y] = Xacid_splash_e; + if (Cave[x-1][y] == Xblank) + Cave[x-1][y] = Xacid_splash_w; + Next[x][y] = Xblank; + play_element_sound(x, y, SOUND_acid, Xacid_1); + return; + + case Xblank: + case Xacid_splash_e: + case Xacid_splash_w: + case Zplayer: + Cave[x][y] = Ynut_sB; + Cave[x][y+1] = Ynut_s; + Next[x][y] = Xblank; + Next[x][y+1] = Xnut_fall; + return; + + default: + Cave[x][y] = Xnut; + Next[x][y] = Xnut; + play_element_sound(x, y, SOUND_nut, Xnut); + return; + } +} + +static void Lspring(int x, int y) +{ + switch (Cave[x][y+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[x][y] = Yspring_sB; + if (Cave[x+1][y] == Xblank) + Cave[x+1][y] = Xacid_splash_e; + if (Cave[x-1][y] == Xblank) + Cave[x-1][y] = Xacid_splash_w; + Next[x][y] = Xblank; + play_element_sound(x, y, SOUND_acid, Xacid_1); + return; + + case Xblank: + case Xacid_splash_e: + case Xacid_splash_w: + case Xplant: + case Yplant: + Cave[x][y] = Yspring_sB; + Cave[x][y+1] = Yspring_s; + Next[x][y] = Xblank; + Next[x][y+1] = Xspring_fall; + return; + + 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 Xslidewall_ns: + case Xslidewall_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 Xroundwall_1: + case Xroundwall_2: + case Xroundwall_3: + case Xroundwall_4: + if (RANDOM(2)) + { + if (tab_blank[Cave[x+1][y]] && tab_acid[Cave[x+1][y+1]]) + { + Cave[x][y] = Yspring_eB; + Cave[x+1][y] = Yspring_e; + if (Cave[x][y+1] == Xbumper) + Cave[x][y+1] = XbumperB; + Next[x][y] = Xblank; + +#ifdef SPRING_ROLL + Next[x+1][y] = Xspring_e; +#else + Next[x+1][y] = Xspring_pause; +#endif + return; + } + + if (tab_blank[Cave[x-1][y]] && tab_acid[Cave[x-1][y+1]]) + { + Cave[x][y] = Yspring_wB; + Cave[x-1][y] = Yspring_w; + if (Cave[x][y+1] == Xbumper) + Cave[x][y+1] = XbumperB; + Next[x][y] = Xblank; + +#ifdef SPRING_ROLL + Next[x-1][y] = Xspring_w; +#else + Next[x-1][y] = Xspring_pause; +#endif + return; + } + } + else + { + if (tab_blank[Cave[x-1][y]] && tab_acid[Cave[x-1][y+1]]) + { + Cave[x][y] = Yspring_wB; + Cave[x-1][y] = Yspring_w; + if (Cave[x][y+1] == Xbumper) + Cave[x][y+1] = XbumperB; + Next[x][y] = Xblank; + +#ifdef SPRING_ROLL + Next[x-1][y] = Xspring_w; +#else + Next[x-1][y] = Xspring_pause; +#endif + return; + } + + if (tab_blank[Cave[x+1][y]] && tab_acid[Cave[x+1][y+1]]) + { + Cave[x][y] = Yspring_eB; + Cave[x+1][y] = Yspring_e; + if (Cave[x][y+1] == Xbumper) + Cave[x][y+1] = XbumperB; + Next[x][y] = Xblank; + +#ifdef SPRING_ROLL + Next[x+1][y] = Xspring_e; +#else + Next[x+1][y] = Xspring_pause; +#endif + return; + } + } + } +} + +static void Lspring_pause(int x, int y) +{ + switch (Cave[x][y+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[x][y] = Yspring_sB; + if (Cave[x+1][y] == Xblank) + Cave[x+1][y] = Xacid_splash_e; + if (Cave[x-1][y] == Xblank) + Cave[x-1][y] = Xacid_splash_w; + Next[x][y] = Xblank; + play_element_sound(x, y, SOUND_acid, Xacid_1); + return; + + case Xblank: + case Xacid_splash_e: + case Xacid_splash_w: + Cave[x][y] = Yspring_sB; + Cave[x][y+1] = Yspring_s; + Next[x][y] = Xblank; + Next[x][y+1] = Xspring_fall; + return; + + default: + Cave[x][y] = Xspring; + Next[x][y] = Xspring; + return; + } +} + +static void Lspring_e(int x, int y) +{ + switch (Cave[x][y+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[x][y] = Yspring_sB; + if (Cave[x+1][y] == Xblank) + Cave[x+1][y] = Xacid_splash_e; + if (Cave[x-1][y] == Xblank) + Cave[x-1][y] = Xacid_splash_w; + Next[x][y] = Xblank; + play_element_sound(x, y, SOUND_acid, Xacid_1); + return; + + case Xblank: + case Xacid_splash_e: + case Xacid_splash_w: + Cave[x][y] = Yspring_sB; + Cave[x][y+1] = Yspring_s; + Next[x][y] = Xblank; + Next[x][y+1] = Xspring_fall; + return; + + case Xbumper: + Cave[x][y+1] = XbumperB; + } + + switch (Cave[x+1][y]) + { + 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[x][y] = Yspring_eB; + if (Cave[x+2][y-1] == Xblank) + Cave[x+2][y-1] = Xacid_splash_e; + if (Cave[x][y-1] == Xblank) + Cave[x][y-1] = Xacid_splash_w; + Next[x][y] = Xblank; + play_element_sound(x, y, SOUND_acid, Xacid_1); + return; + + case Xblank: + case Xacid_splash_e: + case Xacid_splash_w: + case Yalien_nB: + case Yalien_eB: + case Yalien_sB: + case Yalien_wB: + Cave[x][y] = Yspring_eB; + Cave[x+1][y] = Yspring_e; + Next[x][y] = Xblank; + Next[x+1][y] = Xspring_e; + return; + + case Xalien: + case Xalien_pause: + case Yalien_n: + case Yalien_e: + case Yalien_s: + case Yalien_w: + Cave[x][y] = Yspring_alien_eB; + Cave[x+1][y] = Yspring_alien_e; + Next[x][y] = Xblank; + Next[x+1][y] = Xspring_e; + play_element_sound(x, y, SOUND_slurp, Xalien); + score += lev.slurp_score; + return; + + case Xbumper: + case XbumperB: + Cave[x+1][y] = XbumperB; + Next[x][y] = Xspring_w; + play_element_sound(x, y, SOUND_spring, Xspring); + return; + + default: + Cave[x][y] = Xspring; + Next[x][y] = Xspring; + play_element_sound(x, y, SOUND_spring, Xspring); + return; + } +} + +static void Lspring_w(int x, int y) +{ + switch (Cave[x][y+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[x][y] = Yspring_sB; + if (Cave[x+1][y] == Xblank) + Cave[x+1][y] = Xacid_splash_e; + if (Cave[x-1][y] == Xblank) + Cave[x-1][y] = Xacid_splash_w; + Next[x][y] = Xblank; + play_element_sound(x, y, SOUND_acid, Xacid_1); + return; + + case Xblank: + case Xacid_splash_e: + case Xacid_splash_w: + Cave[x][y] = Yspring_sB; + Cave[x][y+1] = Yspring_s; + Next[x][y] = Xblank; + Next[x][y+1] = Xspring_fall; + return; + + case Xbumper: + Cave[x][y+1] = XbumperB; + } + + switch (Cave[x-1][y]) + { + 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[x][y] = Yspring_wB; + if (Cave[x][y-1] == Xblank) + Cave[x][y-1] = Xacid_splash_e; + if (Cave[x-2][y-1] == Xblank) + Cave[x-2][y-1] = Xacid_splash_w; + Next[x][y] = Xblank; + play_element_sound(x, y, SOUND_acid, Xacid_1); + return; + + case Xblank: + case Xacid_splash_e: + case Xacid_splash_w: + case Yalien_nB: + case Yalien_eB: + case Yalien_sB: + case Yalien_wB: + Cave[x][y] = Yspring_wB; + Cave[x-1][y] = Yspring_w; + Next[x][y] = Xblank; + Next[x-1][y] = Xspring_w; + return; + + case Xalien: + case Xalien_pause: + case Yalien_n: + case Yalien_e: + case Yalien_s: + case Yalien_w: + Cave[x][y] = Yspring_alien_wB; + Cave[x-1][y] = Yspring_alien_w; + Next[x][y] = Xblank; + Next[x-1][y] = Xspring_w; + play_element_sound(x, y, SOUND_slurp, Xalien); + score += lev.slurp_score; + return; + + case Xbumper: + case XbumperB: + Cave[x-1][y] = XbumperB; + Next[x][y] = Xspring_e; + play_element_sound(x, y, SOUND_spring, Xspring); + return; + + default: + Cave[x][y] = Xspring; + Next[x][y] = Xspring; + play_element_sound(x, y, SOUND_spring, Xspring); + return; + } +} + +static void Lspring_fall(int x, int y) +{ + switch (Cave[x][y+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[x][y] = Yspring_sB; + if (Cave[x+1][y] == Xblank) + Cave[x+1][y] = Xacid_splash_e; + if (Cave[x-1][y] == Xblank) + Cave[x-1][y] = Xacid_splash_w; + Next[x][y] = Xblank; + play_element_sound(x, y, SOUND_acid, Xacid_1); + return; + + case Xblank: + case Xacid_splash_e: + case Xacid_splash_w: + case Zplayer: + Cave[x][y] = Yspring_sB; + Cave[x][y+1] = Yspring_s; + Next[x][y] = Xblank; + Next[x][y+1] = Xspring_fall; + return; + + case Xbomb: + case Xbomb_pause: + Cave[x][y+1] = Ybomb_blank; + Next[x][y+1] = Znormal; + Boom[x-1][y] = Xblank; + Boom[x][y] = Xblank; + Boom[x+1][y] = Xblank; + Boom[x-1][y+1] = Xblank; + Boom[x][y+1] = Xblank; + Boom[x+1][y+1] = Xblank; + Boom[x-1][y+2] = Xblank; + Boom[x][y+2] = Xblank; + Boom[x+1][y+2] = Xblank; +#if PLAY_ELEMENT_SOUND + play_element_sound(x, y, SOUND_boom, Xspring_fall); +#endif + return; + + case Xbug_1_n: + case Xbug_1_e: + case Xbug_1_s: + case Xbug_1_w: + case Xbug_2_n: + case Xbug_2_e: + case Xbug_2_s: + case Xbug_2_w: + Cave[x][y] = Yspring_sB; + Cave[x][y+1] = Ybug_spring; + Next[x][y+1] = Znormal; + Boom[x-1][y] = Xemerald; + Boom[x][y] = Xemerald; + Boom[x+1][y] = Xemerald; + Boom[x-1][y+1] = Xemerald; + Boom[x][y+1] = Xdiamond; + Boom[x+1][y+1] = Xemerald; + Boom[x-1][y+2] = Xemerald; + Boom[x][y+2] = Xemerald; + Boom[x+1][y+2] = Xemerald; +#if PLAY_ELEMENT_SOUND + play_element_sound(x, y, SOUND_boom, Xspring_fall); +#endif + score += lev.bug_score; + return; + + case Xtank_1_n: + case Xtank_1_e: + case Xtank_1_s: + case Xtank_1_w: + case Xtank_2_n: + case Xtank_2_e: + case Xtank_2_s: + case Xtank_2_w: + Cave[x][y] = Yspring_sB; + Cave[x][y+1] = Ytank_spring; + Next[x][y+1] = Znormal; + Boom[x-1][y] = Xblank; + Boom[x][y] = Xblank; + Boom[x+1][y] = Xblank; + Boom[x-1][y+1] = Xblank; + Boom[x][y+1] = Xblank; + Boom[x+1][y+1] = Xblank; + Boom[x-1][y+2] = Xblank; + Boom[x][y+2] = Xblank; + Boom[x+1][y+2] = Xblank; +#if PLAY_ELEMENT_SOUND + play_element_sound(x, y, SOUND_boom, Xspring_fall); +#endif + score += lev.tank_score; + return; + + case Xeater_n: + case Xeater_e: + case Xeater_s: + case Xeater_w: + Cave[x][y] = Yspring_sB; + Cave[x][y+1] = Yeater_spring; + Next[x][y+1] = Znormal; + Boom[x-1][y] = lev.eater_array[lev.eater_pos][0]; + Boom[x][y] = lev.eater_array[lev.eater_pos][1]; + Boom[x+1][y] = lev.eater_array[lev.eater_pos][2]; + Boom[x-1][y+1] = lev.eater_array[lev.eater_pos][3]; + Boom[x][y+1] = lev.eater_array[lev.eater_pos][4]; + Boom[x+1][y+1] = lev.eater_array[lev.eater_pos][5]; + Boom[x-1][y+2] = lev.eater_array[lev.eater_pos][6]; + Boom[x][y+2] = lev.eater_array[lev.eater_pos][7]; + Boom[x+1][y+2] = lev.eater_array[lev.eater_pos][8]; +#if PLAY_ELEMENT_SOUND + play_element_sound(x, y, SOUND_boom, Xspring_fall); +#endif + lev.eater_pos = (lev.eater_pos + 1) & 7; + score += lev.eater_score; + return; + + case Xalien: + case Xalien_pause: + Cave[x][y] = Yspring_sB; + Cave[x][y+1] = Yalien_spring; + Next[x][y+1] = Znormal; + Boom[x-1][y] = Xblank; + Boom[x][y] = Xblank; + Boom[x+1][y] = Xblank; + Boom[x-1][y+1] = Xblank; + Boom[x][y+1] = Xblank; + Boom[x+1][y+1] = Xblank; + Boom[x-1][y+2] = Xblank; + Boom[x][y+2] = Xblank; + Boom[x+1][y+2] = Xblank; +#if PLAY_ELEMENT_SOUND + play_element_sound(x, y, SOUND_boom, Xspring_fall); +#endif + score += lev.alien_score; + return; + + default: + Cave[x][y] = Xspring; + Next[x][y] = Xspring; + play_element_sound(x, y, SOUND_spring, Xspring); + return; + } +} + +static void Lpush_emerald_e(int x, int y) +{ + switch (Cave[x+1][y]) + { + case Zborder: + case Znormal: + case Zdynamite: + case Xboom_bug: + case Xboom_bomb: + case Xboom_android: + case Xboom_1: + case Zplayer: + Cave[x][y] = Xemerald; + Next[x][y] = Xemerald; + return; + + default: + Cave[x][y] = Yemerald_eB; + Cave[x+1][y] = Yemerald_e; + Next[x][y] = Xblank; + Next[x+1][y] = Xemerald_pause; + return; + } +} + +static void Lpush_emerald_w(int x, int y) +{ + switch (Cave[x-1][y]) + { + case Zborder: + case Znormal: + case Zdynamite: + case Xboom_bug: + case Xboom_bomb: + case Xboom_android: + case Xboom_1: + case Zplayer: + Cave[x][y] = Xemerald; + Next[x][y] = Xemerald; + return; + + default: + Cave[x][y] = Yemerald_wB; + Cave[x-1][y] = Yemerald_w; + Next[x][y] = Xblank; + Next[x-1][y] = Xemerald_pause; + return; + } +} + +static void Lpush_diamond_e(int x, int y) +{ + switch (Cave[x+1][y]) + { + case Zborder: + case Znormal: + case Zdynamite: + case Xboom_bug: + case Xboom_bomb: + case Xboom_android: + case Xboom_1: + case Zplayer: + Cave[x][y] = Xdiamond; + Next[x][y] = Xdiamond; + return; + + default: + Cave[x][y] = Ydiamond_eB; + Cave[x+1][y] = Ydiamond_e; + Next[x][y] = Xblank; + Next[x+1][y] = Xdiamond_pause; + return; + } +} + +static void Lpush_diamond_w(int x, int y) +{ + switch (Cave[x-1][y]) + { + case Zborder: + case Znormal: + case Zdynamite: + case Xboom_bug: + case Xboom_bomb: + case Xboom_android: + case Xboom_1: + case Zplayer: + Cave[x][y] = Xdiamond; + Next[x][y] = Xdiamond; + return; + + default: + Cave[x][y] = Ydiamond_wB; + Cave[x-1][y] = Ydiamond_w; + Next[x][y] = Xblank; + Next[x-1][y] = Xdiamond_pause; + return; + } +} + +static void Lpush_stone_e(int x, int y) +{ + switch (Cave[x+1][y]) + { + case Zborder: + case Znormal: + case Zdynamite: + case Xboom_bug: + case Xboom_bomb: + case Xboom_android: + case Xboom_1: + case Zplayer: + Cave[x][y] = Xstone; + Next[x][y] = Xstone; + return; + + default: + Cave[x][y] = Ystone_eB; + Cave[x+1][y] = Ystone_e; + Next[x][y] = Xblank; + Next[x+1][y] = Xstone_pause; + return; + } +} + +static void Lpush_stone_w(int x, int y) +{ + switch (Cave[x-1][y]) + { + case Zborder: + case Znormal: + case Zdynamite: + case Xboom_bug: + case Xboom_bomb: + case Xboom_android: + case Xboom_1: + case Zplayer: + Cave[x][y] = Xstone; + Next[x][y] = Xstone; + return; + + default: + Cave[x][y] = Ystone_wB; + Cave[x-1][y] = Ystone_w; + Next[x][y] = Xblank; + Next[x-1][y] = Xstone_pause; + return; + } +} + +static void Lpush_bomb_e(int x, int y) +{ + switch (Cave[x+1][y]) + { + case Zborder: + case Znormal: + case Zdynamite: + case Xboom_bug: + case Xboom_bomb: + case Xboom_android: + case Xboom_1: + case Zplayer: + Cave[x][y] = Xbomb; + Next[x][y] = Xbomb; + return; + + default: + Cave[x][y] = Ybomb_eB; + Cave[x+1][y] = Ybomb_e; + Next[x][y] = Xblank; + Next[x+1][y] = Xbomb_pause; + return; + } +} + +static void Lpush_bomb_w(int x, int y) +{ + switch (Cave[x-1][y]) + { + case Zborder: + case Znormal: + case Zdynamite: + case Xboom_bug: + case Xboom_bomb: + case Xboom_android: + case Xboom_1: + case Zplayer: + Cave[x][y] = Xbomb; + Next[x][y] = Xbomb; + return; + + default: + Cave[x][y] = Ybomb_wB; + Cave[x-1][y] = Ybomb_w; + Next[x][y] = Xblank; + Next[x-1][y] = Xbomb_pause; + return; + } +} + +static void Lpush_nut_e(int x, int y) +{ + switch (Cave[x+1][y]) + { + case Zborder: + case Znormal: + case Zdynamite: + case Xboom_bug: + case Xboom_bomb: + case Xboom_android: + case Xboom_1: + case Zplayer: + Cave[x][y] = Xnut; + Next[x][y] = Xnut; + return; + + default: + Cave[x][y] = Ynut_eB; + Cave[x+1][y] = Ynut_e; + Next[x][y] = Xblank; + Next[x+1][y] = Xnut_pause; + return; + } +} + +static void Lpush_nut_w(int x, int y) +{ + switch (Cave[x-1][y]) + { + case Zborder: + case Znormal: + case Zdynamite: + case Xboom_bug: + case Xboom_bomb: + case Xboom_android: + case Xboom_1: + case Zplayer: + Cave[x][y] = Xnut; + Next[x][y] = Xnut; + return; + + default: + Cave[x][y] = Ynut_wB; + Cave[x-1][y] = Ynut_w; + Next[x][y] = Xblank; + Next[x-1][y] = Xnut_pause; + return; + } +} + +static void Lpush_spring_e(int x, int y) +{ + switch (Cave[x+1][y]) + { + case Zborder: + case Znormal: + case Zdynamite: + case Xboom_bug: + case Xboom_bomb: + case Xboom_android: + case Xboom_1: + case Zplayer: + Cave[x][y] = Xspring; + Next[x][y] = Xspring; + return; + + default: + Cave[x][y] = Yspring_eB; + Cave[x+1][y] = Yspring_e; + Next[x][y] = Xblank; + Next[x+1][y] = Xspring_e; + return; + } +} + +static void Lpush_spring_w(int x, int y) +{ + switch (Cave[x-1][y]) + { + case Zborder: + case Znormal: + case Zdynamite: + case Xboom_bug: + case Xboom_bomb: + case Xboom_android: + case Xboom_1: + case Zplayer: + Cave[x][y] = Xspring; + Next[x][y] = Xspring; + return; + + default: + Cave[x][y] = Yspring_wB; + Cave[x-1][y] = Yspring_w; + Next[x][y] = Xblank; + Next[x-1][y] = Xspring_w; + return; + } +} + +static void Ldynamite_1(int x, int y) +{ + play_element_sound(x, y, SOUND_tick, Xdynamite_1); + Next[x][y] = Xdynamite_2; +} + +static void Ldynamite_2(int x, int y) +{ + play_element_sound(x, y, SOUND_tick, Xdynamite_2); + Next[x][y] = Xdynamite_3; +} + +static void Ldynamite_3(int x, int y) +{ + play_element_sound(x, y, SOUND_tick, Xdynamite_3); + Next[x][y] = Xdynamite_4; +} + +static void Ldynamite_4(int x, int y) +{ + play_element_sound(x, y, SOUND_tick, Xdynamite_4); + Next[x][y] = Zdynamite; + Boom[x-1][y-1] = Xblank; + Boom[x][y-1] = Xblank; + Boom[x+1][y-1] = Xblank; + Boom[x-1][y] = Xblank; + Boom[x][y] = Xblank; + Boom[x+1][y] = Xblank; + Boom[x-1][y+1] = Xblank; + Boom[x][y+1] = Xblank; + Boom[x+1][y+1] = Xblank; +} + +static void Lfake_door_1(int x, int y) +{ + if (lev.magnify_cnt) + Cave[x][y] = Xdoor_1; +} + +static void Lfake_door_2(int x, int y) +{ + if (lev.magnify_cnt) + Cave[x][y] = Xdoor_2; +} + +static void Lfake_door_3(int x, int y) +{ + if (lev.magnify_cnt) + Cave[x][y] = Xdoor_3; +} + +static void Lfake_door_4(int x, int y) +{ + if (lev.magnify_cnt) + Cave[x][y] = Xdoor_4; +} + +static void Lfake_door_5(int x, int y) +{ + if (lev.magnify_cnt) + Cave[x][y] = Xdoor_5; +} + +static void Lfake_door_6(int x, int y) +{ + if (lev.magnify_cnt) + Cave[x][y] = Xdoor_6; +} + +static void Lfake_door_7(int x, int y) +{ + if (lev.magnify_cnt) + Cave[x][y] = Xdoor_7; +} + +static void Lfake_door_8(int x, int y) +{ + if (lev.magnify_cnt) + Cave[x][y] = Xdoor_8; +} + +static void Lballoon(int x, int y) +{ + if (lev.wind_cnt == 0) + return; + + switch (lev.wind_direction) + { + case 0: /* north */ + switch (Cave[x][y-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[x][y] = Yballoon_nB; + if (Cave[x+1][y-2] == Xblank) + Cave[x+1][y-2] = Xacid_splash_e; + if (Cave[x-1][y-2] == Xblank) + Cave[x-1][y-2] = Xacid_splash_w; + Next[x][y] = Xblank; + play_element_sound(x, y, SOUND_acid, Xacid_1); + return; + + case Xblank: + case Xacid_splash_e: + case Xacid_splash_w: + Cave[x][y] = Yballoon_nB; + Cave[x][y-1] = Yballoon_n; + Next[x][y] = Xblank; + Next[x][y-1] = Xballoon; + return; + } + break; + + case 1: /* east */ + switch (Cave[x+1][y]) + { + 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[x][y] = Yballoon_eB; + if (Cave[x+2][y-1] == Xblank) + Cave[x+2][y-1] = Xacid_splash_e; + if (Cave[x][y-1] == Xblank) + Cave[x][y-1] = Xacid_splash_w; + Next[x][y] = Xblank; + play_element_sound(x, y, SOUND_acid, Xacid_1); + return; + + case Xblank: + case Xacid_splash_e: + case Xacid_splash_w: + Cave[x][y] = Yballoon_eB; + Cave[x+1][y] = Yballoon_e; + Next[x][y] = Xblank; + Next[x+1][y] = Xballoon; + return; + } + break; + + case 2: /* south */ + switch (Cave[x][y+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[x][y] = Yballoon_sB; + if (Cave[x+1][y] == Xblank) + Cave[x+1][y] = Xacid_splash_e; + if (Cave[x-1][y] == Xblank) + Cave[x-1][y] = Xacid_splash_w; + Next[x][y] = Xblank; + play_element_sound(x, y, SOUND_acid, Xacid_1); + return; + + case Xblank: + case Xacid_splash_e: + case Xacid_splash_w: + Cave[x][y] = Yballoon_sB; + Cave[x][y+1] = Yballoon_s; + Next[x][y] = Xblank; + Next[x][y+1] = Xballoon; + return; + } + break; + + case 3: /* west */ + switch (Cave[x-1][y]) + { + 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[x][y] = Yballoon_wB; + if (Cave[x][y-1] == Xblank) + Cave[x][y-1] = Xacid_splash_e; + if (Cave[x-2][y-1] == Xblank) + Cave[x-2][y-1] = Xacid_splash_w; + Next[x][y] = Xblank; + play_element_sound(x, y, SOUND_acid, Xacid_1); + return; + + case Xblank: + case Xacid_splash_e: + case Xacid_splash_w: + Cave[x][y] = Yballoon_wB; + Cave[x-1][y] = Yballoon_w; + Next[x][y] = Xblank; + Next[x-1][y] = Xballoon; + return; + } + break; + } +} + +static void Lball_common(int x, int y) +{ + play_element_sound(x, y, SOUND_ball, Xball_1); + + if (lev.ball_random) + { + switch (RANDOM(8)) + { + case 0: + if (lev.ball_array[lev.ball_pos][0] != Xblank && + tab_blank[Cave[x-1][y-1]]) + { + Cave[x-1][y-1] = Yball_blank; + Next[x-1][y-1] = lev.ball_array[lev.ball_pos][0]; + } + break; + + case 1: + if (lev.ball_array[lev.ball_pos][1] != Xblank && + tab_blank[Cave[x][y-1]]) + { + Cave[x][y-1] = Yball_blank; + Next[x][y-1] = lev.ball_array[lev.ball_pos][1]; + } + break; + + case 2: + if (lev.ball_array[lev.ball_pos][2] != Xblank && + tab_blank[Cave[x+1][y-1]]) + { + Cave[x+1][y-1] = Yball_blank; + Next[x+1][y-1] = lev.ball_array[lev.ball_pos][2]; + } + break; + + case 3: + if (lev.ball_array[lev.ball_pos][3] != Xblank && + tab_blank[Cave[x-1][y]]) + { + Cave[x-1][y] = Yball_blank; + Next[x-1][y] = lev.ball_array[lev.ball_pos][3]; + } + break; + + case 4: + if (lev.ball_array[lev.ball_pos][4] != Xblank && + tab_blank[Cave[x+1][y]]) + { + Cave[x+1][y] = Yball_blank; + Next[x+1][y] = lev.ball_array[lev.ball_pos][4]; + } + break; + + case 5: + if (lev.ball_array[lev.ball_pos][5] != Xblank && + tab_blank[Cave[x-1][y+1]]) + { + Cave[x-1][y+1] = Yball_blank; + Next[x-1][y+1] = lev.ball_array[lev.ball_pos][5]; + } + break; + + case 6: + if (lev.ball_array[lev.ball_pos][6] != Xblank && + tab_blank[Cave[x][y+1]]) + { + Cave[x][y+1] = Yball_blank; + Next[x][y+1] = lev.ball_array[lev.ball_pos][6]; + } + break; + + case 7: + if (lev.ball_array[lev.ball_pos][7] != Xblank && + tab_blank[Cave[x+1][y+1]]) + { + Cave[x+1][y+1] = Yball_blank; + Next[x+1][y+1] = lev.ball_array[lev.ball_pos][7]; + } + break; + } + } + else + { + if (lev.ball_array[lev.ball_pos][0] != Xblank && + tab_blank[Cave[x-1][y-1]]) + { + Cave[x-1][y-1] = Yball_blank; + Next[x-1][y-1] = lev.ball_array[lev.ball_pos][0]; + } + + if (lev.ball_array[lev.ball_pos][1] != Xblank && + tab_blank[Cave[x][y-1]]) + { + Cave[x][y-1] = Yball_blank; + Next[x][y-1] = lev.ball_array[lev.ball_pos][1]; + } + + if (lev.ball_array[lev.ball_pos][2] != Xblank && + tab_blank[Cave[x+1][y-1]]) + { + Cave[x+1][y-1] = Yball_blank; + Next[x+1][y-1] = lev.ball_array[lev.ball_pos][2]; + } + + if (lev.ball_array[lev.ball_pos][3] != Xblank && + tab_blank[Cave[x-1][y]]) + { + Cave[x-1][y] = Yball_blank; + Next[x-1][y] = lev.ball_array[lev.ball_pos][3]; + } + + if (lev.ball_array[lev.ball_pos][4] != Xblank && + tab_blank[Cave[x+1][y]]) + { + Cave[x+1][y] = Yball_blank; + Next[x+1][y] = lev.ball_array[lev.ball_pos][4]; + } + + if (lev.ball_array[lev.ball_pos][5] != Xblank && + tab_blank[Cave[x-1][y+1]]) + { + Cave[x-1][y+1] = Yball_blank; + Next[x-1][y+1] = lev.ball_array[lev.ball_pos][5]; + } + + if (lev.ball_array[lev.ball_pos][6] != Xblank && + tab_blank[Cave[x][y+1]]) + { + Cave[x][y+1] = Yball_blank; + Next[x][y+1] = lev.ball_array[lev.ball_pos][6]; + } + + if (lev.ball_array[lev.ball_pos][7] != Xblank && + tab_blank[Cave[x+1][y+1]]) + { + Cave[x+1][y+1] = Yball_blank; + Next[x+1][y+1] = lev.ball_array[lev.ball_pos][7]; + } + } + + lev.ball_pos = (lev.ball_pos + 1) % lev.num_ball_arrays; +} + +static void Lball_1(int x, int y) +{ + if (lev.ball_state == 0) + return; + + Cave[x][y] = Yball_1; + Next[x][y] = Xball_2; + if (lev.ball_cnt) + return; + + Lball_common(x, y); +} + +static void Lball_2(int x, int y) +{ + if (lev.ball_state == 0) + return; + + Cave[x][y] = Yball_2; + Next[x][y] = Xball_1; + if (lev.ball_cnt) + return; + + Lball_common(x, y); +} + +static void Ldrip(int x, int y) +{ + Next[x][y] = Xdrip_fall; +} + +static void Ldrip_fall(int x, int y) +{ + int temp; + + switch (Cave[x][y+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[x][y] = Ydrip_1_sB; + if (Cave[x+1][y] == Xblank) + Cave[x+1][y] = Xacid_splash_e; + if (Cave[x-1][y] == Xblank) + Cave[x-1][y] = Xacid_splash_w; + Next[x][y] = Xdrip_stretchB; + play_element_sound(x, y, SOUND_acid, Xacid_1); + return; + + case Xblank: + case Xacid_splash_e: + case Xacid_splash_w: + case Xplant: + case Yplant: + case Zplayer: + Cave[x][y] = Ydrip_1_sB; + Cave[x][y+1] = Ydrip_1_s; + Next[x][y] = Xdrip_stretchB; + Next[x][y+1] = Xdrip_stretch; + return; + + default: + switch (RANDOM(8)) + { + case 0: temp = Xamoeba_1; break; + case 1: temp = Xamoeba_2; break; + case 2: temp = Xamoeba_3; break; + case 3: temp = Xamoeba_4; break; + case 4: temp = Xamoeba_5; break; + case 5: temp = Xamoeba_6; break; + case 6: temp = Xamoeba_7; break; + case 7: temp = Xamoeba_8; break; + } + + Cave[x][y] = temp; + Next[x][y] = temp; + play_element_sound(x, y, SOUND_drip, Xdrip_fall); + return; + } +} + +static void Ldrip_stretch(int x, int y) +{ + Cave[x][y] = Ydrip_2_s; + Next[x][y] = Xdrip_fall; +} + +static void Ldrip_stretchB(int x, int y) +{ + Cave[x][y] = Ydrip_2_sB; + Next[x][y] = Xblank; +} + +static void Lwonderwall(int x, int y) +{ + if (lev.wonderwall_time && lev.wonderwall_state) + { + Cave[x][y] = XwonderwallB; + play_element_sound(x, y, SOUND_wonder, Xwonderwall); + } +} + +static void Lwheel(int x, int y) +{ + if (lev.wheel_cnt && x == lev.wheel_x && y == lev.wheel_y) + Cave[x][y] = XwheelB; +} + +static void Lswitch(int x, int y) +{ + if (lev.ball_state) + Cave[x][y] = XswitchB; +} + +static void Lfake_blank(int x, int y) +{ + if (lev.lenses_cnt) + Cave[x][y] = Xfake_blankB; +} + +static void Lfake_grass(int x, int y) +{ + if (lev.magnify_cnt) + Cave[x][y] = Xfake_grassB; +} + +static void Lfake_amoeba(int x, int y) +{ + if (lev.lenses_cnt) + Cave[x][y] = Xfake_amoebaB; +} + +static void Lsand_stone(int x, int y) +{ + switch (Cave[x][y+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[x][y] = Xsand_stonesand_quickout_1; + if (Cave[x+1][y] == Xblank) + Cave[x+1][y] = Xacid_splash_e; + if (Cave[x-1][y] == Xblank) + Cave[x-1][y] = Xacid_splash_w; + Next[x][y] = Xsand_stonesand_quickout_2; + play_element_sound(x, y, SOUND_acid, Xacid_1); + return; + + case Xblank: + case Xacid_splash_e: + case Xacid_splash_w: + Cave[x][y] = Xsand_stonesand_quickout_1; + Cave[x][y+1] = Xsand_stoneout_1; + Next[x][y] = Xsand_stonesand_quickout_2; + Next[x][y+1] = Xsand_stoneout_2; + return; + + case Xsand: + Cave[x][y] = Xsand_stonesand_1; + Cave[x][y+1] = Xsand_sandstone_1; + Next[x][y] = Xsand_stonesand_2; + Next[x][y+1] = Xsand_sandstone_2; + return; + } +} + +static void Lsand_stonein_1(int x, int y) +{ + Next[x][y] = Xsand_stonein_2; +} + +static void Lsand_stonein_2(int x, int y) +{ + Next[x][y] = Xsand_stonein_3; +} + +static void Lsand_stonein_3(int x, int y) +{ + Next[x][y] = Xsand_stonein_4; +} + +static void Lsand_stonein_4(int x, int y) +{ + Next[x][y] = Xblank; +} + +static void Lsand_sandstone_1(int x, int y) +{ + Next[x][y] = Xsand_sandstone_2; +} + +static void Lsand_sandstone_2(int x, int y) +{ + Next[x][y] = Xsand_sandstone_3; +} + +static void Lsand_sandstone_3(int x, int y) +{ + Next[x][y] = Xsand_sandstone_4; +} + +static void Lsand_sandstone_4(int x, int y) +{ + Next[x][y] = Xsand_stone; +} + +static void Lsand_stonesand_1(int x, int y) +{ + Next[x][y] = Xsand_stonesand_2; +} + +static void Lsand_stonesand_2(int x, int y) +{ + Next[x][y] = Xsand_stonesand_3; +} + +static void Lsand_stonesand_3(int x, int y) +{ + Next[x][y] = Xsand_stonesand_4; +} + +static void Lsand_stonesand_4(int x, int y) +{ + Next[x][y] = Xsand; +} + +static void Lsand_stoneout_1(int x, int y) +{ + Next[x][y] = Xsand_stoneout_2; +} + +static void Lsand_stoneout_2(int x, int y) +{ + Next[x][y] = Xstone_fall; +} + +#ifdef EM_ENGINE_USE_ADDITIONAL_ELEMENTS +static void Lsand_stonesand_quickout_1(int x, int y) +{ + Next[x][y] = Xsand_stonesand_quickout_2; +} + +static void Lsand_stonesand_quickout_2(int x, int y) +{ + Next[x][y] = Xsand; +} +#endif + +static void Lslidewall_ns(int x, int y) +{ + if (tab_blank[Cave[x][y-1]]) + { + Cave[x][y-1] = Yslidewall_ns_blank; + Next[x][y-1] = Xslidewall_ns; + play_element_sound(x, y, SOUND_slidewall, Xslidewall_ns); + } + + if (tab_blank[Cave[x][y+1]]) + { + Cave[x][y+1] = Yslidewall_ns_blank; + Next[x][y+1] = Xslidewall_ns; + play_element_sound(x, y, SOUND_slidewall, Xslidewall_ns); + } +} + +static void Lslidewall_ew(int x, int y) +{ + if (tab_blank[Cave[x+1][y]]) + { + Cave[x+1][y] = Yslidewall_ew_blank; + Next[x+1][y] = Xslidewall_ew; + play_element_sound(x, y, SOUND_slidewall, Xslidewall_ew); + } + + if (tab_blank[Cave[x-1][y]]) + { + Cave[x-1][y] = Yslidewall_ew_blank; + Next[x-1][y] = Xslidewall_ew; + play_element_sound(x, y, SOUND_slidewall, Xslidewall_ew); + } +} + +static void Lexit(int x, int y) +{ + if (lev.required > 0) + return; + + switch (RANDOM(64) / 21) + { + case 0: + Cave[x][y] = Xexit_1; + Next[x][y] = Xexit_2; + break; + + case 1: + Cave[x][y] = Xexit_2; + Next[x][y] = Xexit_3; + break; + + default: + Cave[x][y] = Xexit_3; + Next[x][y] = Xexit_1; + break; + } + + play_element_sound(x, y, SOUND_exit_open, Xexit); +} + +static void Lexit_1(int x, int y) +{ + Next[x][y] = Xexit_2; +} + +static void Lexit_2(int x, int y) +{ + Next[x][y] = Xexit_3; +} + +static void Lexit_3(int x, int y) +{ + Next[x][y] = Xexit_1; +} + +static void Lpause(int x, int y) +{ + Next[x][y] = Xblank; +} + +static void Lboom_1(int x, int y) +{ + Next[x][y] = Xboom_2; +#if !PLAY_ELEMENT_SOUND + if (x != lev.exit_x && y != lev.exit_y) + play_sound(x, y, SOUND_boom); + else + lev.exit_x = lev.exit_y = -1; +#endif +} + +static void Lboom_2(int x, int y) +{ + Next[x][y] = Boom[x][y]; +} + +static void Lboom_android(int x, int y) +{ +#if PLAY_ELEMENT_SOUND + play_element_sound(x, y, SOUND_boom, Xandroid); +#endif + + Lboom_1(x, y); +} + +static void handle_tile(int x, int y) +{ + switch (Cave[x][y]) + { + case Xacid_1: Lacid_1(x, y); break; + case Xacid_2: Lacid_2(x, y); break; + case Xacid_3: Lacid_3(x, y); break; + case Xacid_4: Lacid_4(x, y); break; + case Xacid_5: Lacid_5(x, y); break; + case Xacid_6: Lacid_6(x, y); break; + case Xacid_7: Lacid_7(x, y); break; + case Xacid_8: Lacid_8(x, y); break; + +#ifdef EM_ENGINE_USE_ADDITIONAL_ELEMENTS + case Xfake_acid_1: Lfake_acid_1(x, y); break; + case Xfake_acid_2: Lfake_acid_2(x, y); break; + case Xfake_acid_3: Lfake_acid_3(x, y); break; + case Xfake_acid_4: Lfake_acid_4(x, y); break; + case Xfake_acid_5: Lfake_acid_5(x, y); break; + case Xfake_acid_6: Lfake_acid_6(x, y); break; + case Xfake_acid_7: Lfake_acid_7(x, y); break; + case Xfake_acid_8: Lfake_acid_8(x, y); break; +#endif + + case Xandroid: Landroid(x, y); break; + case Xandroid_1_n: Landroid_1_n(x, y); break; + case Xandroid_2_n: Landroid_2_n(x, y); break; + case Xandroid_1_e: Landroid_1_e(x, y); break; + case Xandroid_2_e: Landroid_2_e(x, y); break; + case Xandroid_1_s: Landroid_1_s(x, y); break; + case Xandroid_2_s: Landroid_2_s(x, y); break; + case Xandroid_1_w: Landroid_1_w(x, y); break; + case Xandroid_2_w: Landroid_2_w(x, y); break; + + case Xeater_n: Leater_n(x, y); break; + case Xeater_e: Leater_e(x, y); break; + case Xeater_s: Leater_s(x, y); break; + case Xeater_w: Leater_w(x, y); break; + + case Xalien: Lalien(x, y); break; + case Xalien_pause: Lalien_pause(x, y); break; + + case Xbug_1_n: Lbug_1_n(x, y); break; + case Xbug_2_n: Lbug_2_n(x, y); break; + case Xbug_1_e: Lbug_1_e(x, y); break; + case Xbug_2_e: Lbug_2_e(x, y); break; + case Xbug_1_s: Lbug_1_s(x, y); break; + case Xbug_2_s: Lbug_2_s(x, y); break; + case Xbug_1_w: Lbug_1_w(x, y); break; + case Xbug_2_w: Lbug_2_w(x, y); break; + + case Xtank_1_n: Ltank_1_n(x, y); break; + case Xtank_2_n: Ltank_2_n(x, y); break; + case Xtank_1_e: Ltank_1_e(x, y); break; + case Xtank_2_e: Ltank_2_e(x, y); break; + case Xtank_1_s: Ltank_1_s(x, y); break; + case Xtank_2_s: Ltank_2_s(x, y); break; + case Xtank_1_w: Ltank_1_w(x, y); break; + case Xtank_2_w: Ltank_2_w(x, y); break; + + case Xemerald: Lemerald(x, y); break; + case Xemerald_pause: Lemerald_pause(x, y); break; + case Xemerald_fall: Lemerald_fall(x, y); break; + + case Xdiamond: Ldiamond(x, y); break; + case Xdiamond_pause: Ldiamond_pause(x, y); break; + case Xdiamond_fall: Ldiamond_fall(x, y); break; + + case Xstone: Lstone(x, y); break; + case Xstone_pause: Lstone_pause(x, y); break; + case Xstone_fall: Lstone_fall(x, y); break; + + case Xbomb: Lbomb(x, y); break; + case Xbomb_pause: Lbomb_pause(x, y); break; + case Xbomb_fall: Lbomb_fall(x, y); break; + + case Xnut: Lnut(x, y); break; + case Xnut_pause: Lnut_pause(x, y); break; + case Xnut_fall: Lnut_fall(x, y); break; + + case Xspring: Lspring(x, y); break; + case Xspring_pause: Lspring_pause(x, y); break; + case Xspring_e: Lspring_e(x, y); break; + case Xspring_w: Lspring_w(x, y); break; + case Xspring_fall: Lspring_fall(x, y); break; + + case Xpush_emerald_e: Lpush_emerald_e(x, y); break; + case Xpush_emerald_w: Lpush_emerald_w(x, y); break; + case Xpush_diamond_e: Lpush_diamond_e(x, y); break; + case Xpush_diamond_w: Lpush_diamond_w(x, y); break; + case Xpush_stone_e: Lpush_stone_e(x, y); break; + case Xpush_stone_w: Lpush_stone_w(x, y); break; + case Xpush_bomb_e: Lpush_bomb_e(x, y); break; + case Xpush_bomb_w: Lpush_bomb_w(x, y); break; + case Xpush_nut_e: Lpush_nut_e(x, y); break; + case Xpush_nut_w: Lpush_nut_w(x, y); break; + case Xpush_spring_e: Lpush_spring_e(x, y); break; + case Xpush_spring_w: Lpush_spring_w(x, y); break; + + case Xdynamite_1: Ldynamite_1(x, y); break; + case Xdynamite_2: Ldynamite_2(x, y); break; + case Xdynamite_3: Ldynamite_3(x, y); break; + case Xdynamite_4: Ldynamite_4(x, y); break; + + case Xfake_door_1: Lfake_door_1(x, y); break; + case Xfake_door_2: Lfake_door_2(x, y); break; + case Xfake_door_3: Lfake_door_3(x, y); break; + case Xfake_door_4: Lfake_door_4(x, y); break; + case Xfake_door_5: Lfake_door_5(x, y); break; + case Xfake_door_6: Lfake_door_6(x, y); break; + case Xfake_door_7: Lfake_door_7(x, y); break; + case Xfake_door_8: Lfake_door_8(x, y); break; + + case Xballoon: Lballoon(x, y); break; + + case Xball_1: Lball_1(x, y); break; + case Xball_2: Lball_2(x, y); break; + + case Xdrip: Ldrip(x, y); break; + case Xdrip_fall: Ldrip_fall(x, y); break; + case Xdrip_stretch: Ldrip_stretch(x, y); break; + case Xdrip_stretchB: Ldrip_stretchB(x, y); break; + + case Xwonderwall: Lwonderwall(x, y); break; + + case Xwheel: Lwheel(x, y); break; + + case Xswitch: Lswitch(x, y); break; + + case Xfake_blank: Lfake_blank(x, y); break; + case Xfake_grass: Lfake_grass(x, y); break; + case Xfake_amoeba: Lfake_amoeba(x, y); break; + + case Xsand_stone: Lsand_stone(x, y); break; + case Xsand_stonein_1: Lsand_stonein_1(x, y); break; + case Xsand_stonein_2: Lsand_stonein_2(x, y); break; + case Xsand_stonein_3: Lsand_stonein_3(x, y); break; + case Xsand_stonein_4: Lsand_stonein_4(x, y); break; + case Xsand_sandstone_1: Lsand_sandstone_1(x, y); break; + case Xsand_sandstone_2: Lsand_sandstone_2(x, y); break; + case Xsand_sandstone_3: Lsand_sandstone_3(x, y); break; + case Xsand_sandstone_4: Lsand_sandstone_4(x, y); break; + case Xsand_stonesand_1: Lsand_stonesand_1(x, y); break; + case Xsand_stonesand_2: Lsand_stonesand_2(x, y); break; + case Xsand_stonesand_3: Lsand_stonesand_3(x, y); break; + case Xsand_stonesand_4: Lsand_stonesand_4(x, y); break; + case Xsand_stoneout_1: Lsand_stoneout_1(x, y); break; + case Xsand_stoneout_2: Lsand_stoneout_2(x, y); break; +#ifdef EM_ENGINE_USE_ADDITIONAL_ELEMENTS + case Xsand_stonesand_quickout_1: Lsand_stonesand_quickout_1(x, y); break; + case Xsand_stonesand_quickout_2: Lsand_stonesand_quickout_2(x, y); break; +#endif + + case Xslidewall_ns: Lslidewall_ns(x, y); break; + case Xslidewall_ew: Lslidewall_ew(x, y); break; + + case Xexit: Lexit(x, y); break; + case Xexit_1: Lexit_1(x, y); break; + case Xexit_2: Lexit_2(x, y); break; + case Xexit_3: Lexit_3(x, y); break; + + case Xpause: Lpause(x, y); break; + + case Xboom_bug: Lboom_bug(x, y); break; + case Xboom_bomb: Lboom_tank(x, y); break; + case Xboom_android: Lboom_android(x, y); break; + case Xboom_1: Lboom_1(x, y); break; + case Xboom_2: Lboom_2(x, y); break; + } +} + +void logic_1(void) +{ + int start_check_nr; + int i; + + game_em.any_player_moving = FALSE; + game_em.any_player_snapping = FALSE; + + /* must test for death and actually kill separately */ + for (i = 0; i < MAX_PLAYERS; i++) + { + boolean ply_kill = player_killed(&ply[i]); + + if (ply[i].alive && ply_kill) + kill_player(&ply[i]); + } + + for (i = 0; i < MAX_PLAYERS; i++) + { + ply[i].oldx = ply[i].x; + ply[i].oldy = ply[i].y; + ply[i].anim = PLY_still; + } + + start_check_nr = (RandomEM & 128 ? 0 : 1) * 2 + (RandomEM & 256 ? 0 : 1); + + for (i = 0; i < MAX_PLAYERS; i++) + { + int check_nr = (start_check_nr + i) % MAX_PLAYERS; + + if (ply[check_nr].alive) + check_player(&ply[check_nr]); + } + + for (i = 0; i < MAX_PLAYERS; i++) + { + if (!ply[i].alive) + continue; + + if (Cave[ply[i].oldx][ply[i].oldy] == Zplayer) + { + Cave[ply[i].oldx][ply[i].oldy] = Xblank; + Next[ply[i].oldx][ply[i].oldy] = Xblank; + } + + if (Cave[ply[i].x][ply[i].y] == Xblank) + { + Cave[ply[i].x][ply[i].y] = Zplayer; + Next[ply[i].x][ply[i].y] = Zplayer; + } + } +} + +void logic_2(void) +{ + int x, y; + + seed = RandomEM; + score = 0; + + for (y = 1; y < HEIGHT - 1; y++) + for (x = 0; x < WIDTH; x++) + handle_tile(x, y); + + if (ply[0].alive || ply[1].alive || ply[2].alive || ply[3].alive) + lev.score += score; /* only add a score if someone is alive */ + else + game_em.game_over = TRUE; + + RandomEM = seed; + + /* triple buffering */ + void *temp = Cave; + Cave = Next; + Next = Draw; + Draw = temp; +} + +void logic_3(void) +{ + int x; + int y; + int count; + unsigned int random; + + /* update variables */ + + if (lev.score > 9999) + lev.score = 9999; + + 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.wheel_cnt) + play_element_sound(lev.wheel_x, lev.wheel_y, SOUND_wheel, Xwheel); + + /* grow amoeba */ + + random = RandomEM; + + for (count = lev.amoeba_time; count--;) + { + x = (random >> 10) % (WIDTH - 2); + y = (random >> 20) % (HEIGHT - 2); + switch (Cave[x][y]) + { + case Xblank: + case Xacid_splash_e: + case Xacid_splash_w: + case Xgrass: + case Xdirt: + case Xsand: + case Xplant: + case Yplant: + if (tab_amoeba[Cave[x][y-1]] || + tab_amoeba[Cave[x+1][y]] || + tab_amoeba[Cave[x][y+1]] || + tab_amoeba[Cave[x-1][y]]) + Cave[x][y] = Xdrip; + } + + random = random * 129 + 1; + } + + RandomEM = random; + + /* handle explosions */ + + for (y = 1; y < HEIGHT - 1; y++) + for (x = 1; x < WIDTH - 1; x++) + { + switch (Cave[x][y]) + { + case Znormal: + Cave[x][y] = Xboom_1; + Cave[x][y-1] = tab_explode_normal[Cave[x][y-1]]; + Cave[x-1][y] = tab_explode_normal[Cave[x-1][y]]; + Cave[x+1][y] = tab_explode_normal[Cave[x+1][y]]; + Cave[x][y+1] = tab_explode_normal[Cave[x][y+1]]; + Cave[x-1][y-1] = tab_explode_normal[Cave[x-1][y-1]]; + Cave[x+1][y-1] = tab_explode_normal[Cave[x+1][y-1]]; + Cave[x-1][y+1] = tab_explode_normal[Cave[x-1][y+1]]; + Cave[x+1][y+1] = tab_explode_normal[Cave[x+1][y+1]]; + break; + + case Zdynamite: + Cave[x][y] = Xboom_1; + Cave[x][y-1] = tab_explode_dynamite[Cave[x][y-1]]; + Cave[x-1][y] = tab_explode_dynamite[Cave[x-1][y]]; + Cave[x+1][y] = tab_explode_dynamite[Cave[x+1][y]]; + Cave[x][y+1] = tab_explode_dynamite[Cave[x][y+1]]; + Cave[x-1][y-1] = tab_explode_dynamite[Cave[x-1][y-1]]; + Cave[x+1][y-1] = tab_explode_dynamite[Cave[x+1][y-1]]; + Cave[x-1][y+1] = tab_explode_dynamite[Cave[x-1][y+1]]; + Cave[x+1][y+1] = tab_explode_dynamite[Cave[x+1][y+1]]; + break; + } + } + + /* triple buffering */ + + for (y = 0; y < HEIGHT; y++) + for (x = 0; x < WIDTH; x++) + Next[x][y] = Cave[x][y]; +} diff --git a/src/game_em/synchro_1.c b/src/game_em/synchro_1.c deleted file mode 100644 index 56d4c6ce..00000000 --- a/src/game_em/synchro_1.c +++ /dev/null @@ -1,1209 +0,0 @@ -/* first part of synchro. - * - * game logic for players. - * - * large switch statement for tiles the player interacts with. - */ - -#include "main_em.h" - - -#define USE_CHANGED_ACID_STUFF 1 - -static void check_player(struct PLAYER *); -static void kill_player(struct PLAYER *); -static boolean player_digfield(struct PLAYER *, int, int); -static boolean player_killed(struct PLAYER *); - -void synchro_1(void) -{ - int start_check_nr; - int i; - - game_em.any_player_moving = FALSE; - game_em.any_player_snapping = FALSE; - - /* must test for death and actually kill separately */ - for (i = 0; i < MAX_PLAYERS; i++) - { - boolean ply_kill = player_killed(&ply[i]); - - if (ply[i].alive && ply_kill) - kill_player(&ply[i]); - } - - for (i = 0; i < MAX_PLAYERS; i++) - { - ply[i].oldx = ply[i].x; - ply[i].oldy = ply[i].y; - ply[i].anim = PLY_still; - } - - start_check_nr = (RandomEM & 128 ? 0 : 1) * 2 + (RandomEM & 256 ? 0 : 1); - - for (i = 0; i < MAX_PLAYERS; i++) - { - int check_nr = (start_check_nr + i) % MAX_PLAYERS; - - if (ply[check_nr].alive) - check_player(&ply[check_nr]); - } - - for (i = 0; i < MAX_PLAYERS; i++) - { - if (!ply[i].alive) - continue; - - if (Cave[ply[i].oldx][ply[i].oldy] == Zplayer) - { - Cave[ply[i].oldx][ply[i].oldy] = Xblank; - Next[ply[i].oldx][ply[i].oldy] = Xblank; - } - - if (Cave[ply[i].x][ply[i].y] == Xblank) - { - Cave[ply[i].x][ply[i].y] = Zplayer; - Next[ply[i].x][ply[i].y] = Zplayer; - } - } -} - -static boolean player_killed(struct PLAYER *ply) -{ - int x = ply->x; - int y = ply->y; - - if (!ply->alive) - return FALSE; - - if (lev.killed_out_of_time && setup.time_limit) - return TRUE; - - switch(Cave[x][y-1]) - { - case Xbug_1_n: - case Xbug_1_e: - case Xbug_1_s: - case Xbug_1_w: - case Xbug_2_n: - case Xbug_2_e: - case Xbug_2_s: - case Xbug_2_w: - case Xtank_1_n: - case Xtank_1_e: - case Xtank_1_s: - case Xtank_1_w: - case Xtank_2_n: - case Xtank_2_e: - case Xtank_2_s: - case Xtank_2_w: - return TRUE; - } - - switch(Cave[x+1][y]) - { - case Xbug_1_n: - case Xbug_1_e: - case Xbug_1_s: - case Xbug_1_w: - case Xbug_2_n: - case Xbug_2_e: - case Xbug_2_s: - case Xbug_2_w: - case Xtank_1_n: - case Xtank_1_e: - case Xtank_1_s: - case Xtank_1_w: - case Xtank_2_n: - case Xtank_2_e: - case Xtank_2_s: - case Xtank_2_w: - return TRUE; - } - - switch(Cave[x][y+1]) - { - case Xbug_1_n: - case Xbug_1_e: - case Xbug_1_s: - case Xbug_1_w: - case Xbug_2_n: - case Xbug_2_e: - case Xbug_2_s: - case Xbug_2_w: - case Xtank_1_n: - case Xtank_1_e: - case Xtank_1_s: - case Xtank_1_w: - case Xtank_2_n: - case Xtank_2_e: - case Xtank_2_s: - case Xtank_2_w: - return TRUE; - } - - switch(Cave[x-1][y]) - { - case Xbug_1_n: - case Xbug_1_e: - case Xbug_1_s: - case Xbug_1_w: - case Xbug_2_n: - case Xbug_2_e: - case Xbug_2_s: - case Xbug_2_w: - case Xtank_1_n: - case Xtank_1_e: - case Xtank_1_s: - case Xtank_1_w: - case Xtank_2_n: - case Xtank_2_e: - case Xtank_2_s: - case Xtank_2_w: - return TRUE; - } - - switch(Cave[x][y]) - { - case Xblank: - case Xacid_splash_e: - case Xacid_splash_w: - case Zplayer: - case Xdynamite_1: - case Xdynamite_2: - case Xdynamite_3: - case Xdynamite_4: -#ifdef EM_ENGINE_USE_ADDITIONAL_ELEMENTS - case Xfake_acid_1: - case Xfake_acid_2: - case Xfake_acid_3: - case Xfake_acid_4: - case Xfake_acid_5: - case Xfake_acid_6: - case Xfake_acid_7: - case Xfake_acid_8: -#endif - return FALSE; - } - - return TRUE; -} - -static void kill_player(struct PLAYER *ply) -{ - int x = ply->x; - int y = ply->y; - - ply->alive = 0; - - switch(Cave[x][y-1]) - { - case Xbug_1_n: - case Xbug_1_e: - case Xbug_1_s: - case Xbug_1_w: - case Xbug_2_n: - case Xbug_2_e: - case Xbug_2_s: - case Xbug_2_w: - Cave[x][y-1] = Xboom_bug; - break; - - case Xtank_1_n: - case Xtank_1_e: - case Xtank_1_s: - case Xtank_1_w: - case Xtank_2_n: - case Xtank_2_e: - case Xtank_2_s: - case Xtank_2_w: - Cave[x][y-1] = Xboom_bomb; - break; - } - - switch(Cave[x+1][y]) - { - case Xbug_1_n: - case Xbug_1_e: - case Xbug_1_s: - case Xbug_1_w: - case Xbug_2_n: - case Xbug_2_e: - case Xbug_2_s: - case Xbug_2_w: - Cave[x+1][y] = Xboom_bug; - break; - - case Xtank_1_n: - case Xtank_1_e: - case Xtank_1_s: - case Xtank_1_w: - case Xtank_2_n: - case Xtank_2_e: - case Xtank_2_s: - case Xtank_2_w: - Cave[x+1][y] = Xboom_bomb; - break; - } - - switch(Cave[x][y+1]) - { - case Xbug_1_n: - case Xbug_1_e: - case Xbug_1_s: - case Xbug_1_w: - case Xbug_2_n: - case Xbug_2_e: - case Xbug_2_s: - case Xbug_2_w: - Cave[x][y+1] = Xboom_bug; - break; - - case Xtank_1_n: - case Xtank_1_e: - case Xtank_1_s: - case Xtank_1_w: - case Xtank_2_n: - case Xtank_2_e: - case Xtank_2_s: - case Xtank_2_w: - Cave[x][y+1] = Xboom_bomb; - break; - } - - switch(Cave[x-1][y]) - { - case Xbug_1_n: - case Xbug_1_e: - case Xbug_1_s: - case Xbug_1_w: - case Xbug_2_n: - case Xbug_2_e: - case Xbug_2_s: - case Xbug_2_w: - Cave[x-1][y] = Xboom_bug; - break; - - case Xtank_1_n: - case Xtank_1_e: - case Xtank_1_s: - case Xtank_1_w: - case Xtank_2_n: - case Xtank_2_e: - case Xtank_2_s: - case Xtank_2_w: - Cave[x-1][y] = Xboom_bomb; - break; - } - - switch(Cave[x][y]) - { - case Xexit_1: - case Xexit_2: - case Xexit_3: - lev.exit_x = x; - lev.exit_y = y; - play_element_sound(x, y, SOUND_exit_leave, Xexit_1); - break; - - default: - play_element_sound(x, y, SOUND_die, Zplayer); - break; - } - - switch(Cave[x][y]) - { -#if USE_CHANGED_ACID_STUFF - case Xacid_1: - case Xacid_2: - case Xacid_3: - case Xacid_4: - case Xacid_5: - case Xacid_6: - case Xacid_7: - case Xacid_8: - break; -#endif - - default: - Cave[x][y] = Xboom_1; - Boom[x][y] = Xblank; - break; - } -} - -static void check_player(struct PLAYER *ply) -{ - int oldx = ply->x; - int oldy = ply->y; - int x = oldx; - int y = oldy; - int dx = 0, dy = 0; - - game_em.last_player_direction[ply->num] = MV_NONE; - - if (ply->joy_w) /* west */ - { - x--; - dx = -1; - } - else if (ply->joy_e) /* east */ - { - x++; - dx = 1; - } - - if (ply->joy_n) /* north */ - { - y--; - dy = -1; - } - else if (ply->joy_s) /* south */ - { - y++; - dy = 1; - } - - if (dx || dy) - { - int oldx = ply->x; - int oldy = ply->y; - int x = oldx + dx; - int y = oldy + dy; - boolean players_visible_before_move; - boolean players_visible_after_move; - boolean can_move; - - players_visible_before_move = checkIfAllPlayersFitToScreen(); - - ply->x = x; - ply->y = y; - - players_visible_after_move = checkIfAllPlayersFitToScreen(); - - /* - player is allowed to move only in the following cases: - - it is not needed to display all players (not focussed to all players) - - all players are (still or again) visible after the move - - some players were already outside visible screen area before the move - */ - can_move = (game.centered_player_nr != -1 || - players_visible_after_move || - !players_visible_before_move); - - ply->x = oldx; - ply->y = oldy; - - if (!can_move) - { - ply->joy_n = ply->joy_e = ply->joy_s = ply->joy_w = 0; - - return; - } - } - - if (dx == 0 && dy == 0) - { - ply->joy_stick = 0; - - if (ply->joy_drop) - { - if (++ply->dynamite_cnt == 5 && ply->dynamite) - { - Cave[x][y] = Xdynamite_1; - play_element_sound(x, y, SOUND_dynamite, Xdynamite_1); - ply->dynamite--; - } - } - else - { - ply->dynamite_cnt = 0; - } - - RandomEM += 7; /* be a bit more random if the player doesn't 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 */ - ply->joy_spin = !ply->joy_spin; - - if (ply->joy_snap == 0) /* player wants to move */ - { - boolean moved = FALSE; - - if (ply->last_move_dir & MV_HORIZONTAL) - { - if (!(moved = player_digfield(ply, 0, dy))) - moved = player_digfield(ply, dx, 0); - } - else - { - if (!(moved = player_digfield(ply, dx, 0))) - moved = player_digfield(ply, 0, dy); - } - - if (moved) - { - if (oldx != ply->x) - ply->last_move_dir = (dx < 0 ? MV_LEFT : MV_RIGHT); - else if (oldy != ply->y) - ply->last_move_dir = (dy < 0 ? MV_UP : MV_DOWN); - - game_em.any_player_moving = TRUE; - game_em.last_moving_player = ply->num; - game_em.last_player_direction[ply->num] = ply->last_move_dir; - } - } - else /* player wants to snap */ - { - game_em.any_player_snapping = player_digfield(ply, dx, dy); - } -} - -static boolean player_digfield(struct PLAYER *ply, int dx, int dy) -{ - int anim = (dx < 0 ? 3 : dx > 0 ? 1 : dy < 0 ? 0 : dy > 0 ? 2 : 2); - int oldx = ply->x; - int oldy = ply->y; - int x = oldx + dx; - int y = oldy + dy; - boolean result = TRUE; - - if (!dx && !dy) /* no direction specified */ - return FALSE; - - if (dx && dy && ply->joy_snap) /* more than one direction specified */ - return FALSE; - - if (ply->joy_snap == 0) /* player wants to move */ - { - int element = Cave[x][y]; - - switch(Cave[x][y]) - { - /* fire is released */ - case Xblank: - case Xacid_splash_e: - case Xacid_splash_w: - Cave[x][y] = Zplayer; - Next[x][y] = Zplayer; -#ifdef EM_ENGINE_USE_ADDITIONAL_ELEMENTS - case Xfake_acid_1: - case Xfake_acid_2: - case Xfake_acid_3: - case Xfake_acid_4: - case Xfake_acid_5: - case Xfake_acid_6: - case Xfake_acid_7: - case Xfake_acid_8: -#endif - play_element_sound(x, y, SOUND_blank, Xblank); - ply->anim = PLY_walk_n + anim; - ply->x = x; - ply->y = y; - break; - -#if USE_CHANGED_ACID_STUFF - 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[x+1][y-1] == Xblank) - Cave[x+1][y-1] = Xacid_splash_e; - if (Cave[x-1][y-1] == Xblank) - Cave[x-1][y-1] = Xacid_splash_w; - play_element_sound(x, y, SOUND_acid, Xacid_1); -#endif - - case Xboom_android: - case Xboom_1: - case Xbug_1_n: - case Xbug_1_e: - case Xbug_1_s: - case Xbug_1_w: - case Xbug_2_n: - case Xbug_2_e: - case Xbug_2_s: - case Xbug_2_w: - case Xtank_1_n: - case Xtank_1_e: - case Xtank_1_s: - case Xtank_1_w: - case Xtank_2_n: - case Xtank_2_e: - case Xtank_2_s: - case Xtank_2_w: - -#if !USE_CHANGED_ACID_STUFF - case Xacid_1: - case Xacid_2: - case Xacid_3: - case Xacid_4: - case Xacid_5: - case Xacid_6: - case Xacid_7: - case Xacid_8: -#endif - ply->anim = PLY_walk_n + anim; - ply->x = x; - ply->y = y; - break; - - case Xgrass: - Cave[x][y] = (dy ? (dy < 0 ? Ygrass_nB : Ygrass_sB) : - (dx > 0 ? Ygrass_eB : Ygrass_wB)); - Next[x][y] = Zplayer; - play_element_sound(x, y, SOUND_dirt, Xgrass); - ply->anim = PLY_walk_n + anim; - ply->x = x; - ply->y = y; - break; - - case Xdirt: - Cave[x][y] = (dy ? (dy < 0 ? Ydirt_nB : Ydirt_sB) : - (dx > 0 ? Ydirt_eB : Ydirt_wB)); - Next[x][y] = Zplayer; - play_element_sound(x, y, SOUND_dirt, Xdirt); - ply->anim = PLY_walk_n + anim; - ply->x = x; - ply->y = y; - break; - - case Xdiamond: - case Xdiamond_pause: - Cave[x][y] = Ydiamond_blank; - Next[x][y] = Zplayer; - play_element_sound(x, y, SOUND_collect, element); - lev.score += lev.diamond_score; - lev.required = lev.required < 3 ? 0 : lev.required - 3; - game.snapshot.collected_item = TRUE; - ply->anim = PLY_walk_n + anim; - ply->x = x; - ply->y = y; - break; - - case Xemerald: - case Xemerald_pause: - Cave[x][y] = Yemerald_blank; - Next[x][y] = Zplayer; - play_element_sound(x, y, SOUND_collect, element); - lev.score += lev.emerald_score; - lev.required = lev.required < 1 ? 0 : lev.required - 1; - game.snapshot.collected_item = TRUE; - ply->anim = PLY_walk_n + anim; - ply->x = x; - ply->y = y; - break; - - case Xdynamite: - Cave[x][y] = Ydynamite_blank; - Next[x][y] = Zplayer; - play_element_sound(x, y, SOUND_collect, element); - lev.score += lev.dynamite_score; - ply->dynamite = ply->dynamite > 9998 ? 9999 : ply->dynamite + 1; - ply->anim = PLY_walk_n + anim; - ply->x = x; - ply->y = y; - break; - - case Xkey_1: - ply->keys |= 0x01; - Cave[x][y] = Ykey_1_blank; - goto key_walk; - - case Xkey_2: - ply->keys |= 0x02; - Cave[x][y] = Ykey_2_blank; - goto key_walk; - - case Xkey_3: - ply->keys |= 0x04; - Cave[x][y] = Ykey_3_blank; - goto key_walk; - - case Xkey_4: - ply->keys |= 0x08; - Cave[x][y] = Ykey_4_blank; - goto key_walk; - - case Xkey_5: - ply->keys |= 0x10; - Cave[x][y] = Ykey_5_blank; - goto key_walk; - - case Xkey_6: - ply->keys |= 0x20; - Cave[x][y] = Ykey_6_blank; - goto key_walk; - - case Xkey_7: - ply->keys |= 0x40; - Cave[x][y] = Ykey_7_blank; - goto key_walk; - - case Xkey_8: - ply->keys |= 0x80; - Cave[x][y] = Ykey_8_blank; - goto key_walk; - - key_walk: - - Next[x][y] = Zplayer; - play_element_sound(x, y, SOUND_collect, element); - lev.score += lev.key_score; - ply->anim = PLY_walk_n + anim; - ply->x = x; - ply->y = y; - break; - - case Xlenses: - Cave[x][y] = Ylenses_blank; - Next[x][y] = Zplayer; - play_element_sound(x, y, SOUND_collect, element); - lev.score += lev.lenses_score; - lev.lenses_cnt = lev.lenses_time; - ply->anim = PLY_walk_n + anim; - ply->x = x; - ply->y = y; - break; - - case Xmagnify: - Cave[x][y] = Ymagnify_blank; - Next[x][y] = Zplayer; - play_element_sound(x, y, SOUND_collect, element); - lev.score += lev.magnify_score; - lev.magnify_cnt = lev.magnify_time; - ply->anim = PLY_walk_n + anim; - ply->x = x; - ply->y = y; - break; - - case Xstone: - if (dy) - break; - - switch(Cave[x+dx][y]) - { - 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[x+dx+1][y-1] == Xblank) - Cave[x+dx+1][y-1] = Xacid_splash_e; - if (Cave[x+dx-1][y-1] == Xblank) - Cave[x+dx-1][y-1] = Xacid_splash_w; - play_element_sound(x, y, SOUND_acid, Xacid_1); - goto stone_walk; - - case Xblank: - case Xacid_splash_e: - case Xacid_splash_w: - Cave[x+dx][y] = dx > 0 ? Ystone_e : Ystone_w; - Next[x+dx][y] = Xstone_pause; - - stone_walk: - - Cave[x][y] = dx > 0 ? Ystone_eB : Ystone_wB; - Next[x][y] = Zplayer; - play_element_sound(x, y, SOUND_roll, Xstone); - ply->x = x; - } - - ply->anim = PLY_push_n + anim; - break; - - case Xbomb: - if (dy) - break; - - switch(Cave[x+dx][y]) - { - 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[x+dx+1][y-1] == Xblank) - Cave[x+dx+1][y-1] = Xacid_splash_e; - if (Cave[x+dx-1][y-1] == Xblank) - Cave[x+dx-1][y-1] = Xacid_splash_w; - play_element_sound(x, y, SOUND_acid, Xacid_1); - goto bomb_walk; - - case Xblank: - case Xacid_splash_e: - case Xacid_splash_w: - Cave[x+dx][y] = dx > 0 ? Ybomb_e : Ybomb_w; - Next[x+dx][y] = Xbomb_pause; - - bomb_walk: - - Cave[x][y] = dx > 0 ? Ybomb_eB : Ybomb_wB; - Next[x][y] = Zplayer; - play_element_sound(x, y, SOUND_roll, Xbomb); - ply->x = x; - } - - ply->anim = PLY_push_n + anim; - break; - - case Xnut: - if (dy) - break; - - switch(Cave[x+dx][y]) - { - 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[x+dx+1][y-1] == Xblank) - Cave[x+dx+1][y-1] = Xacid_splash_e; - if (Cave[x+dx-1][y-1] == Xblank) - Cave[x+dx-1][y-1] = Xacid_splash_w; - play_element_sound(x, y, SOUND_acid, Xacid_1); - goto nut_walk; - - case Xblank: - case Xacid_splash_e: - case Xacid_splash_w: - Cave[x+dx][y] = dx > 0 ? Ynut_e : Ynut_w; - Next[x+dx][y] = Xnut_pause; - - nut_walk: - - Cave[x][y] = dx > 0 ? Ynut_eB : Ynut_wB; - Next[x][y] = Zplayer; - play_element_sound(x, y, SOUND_roll, Xnut); - ply->x = x; - } - - ply->anim = PLY_push_n + anim; - break; - - case Xspring: - if (dy) - break; - - switch(Cave[x+dx][y]) - { - case Xalien: - case Xalien_pause: - Cave[x][y] = dx > 0 ? Yspring_alien_eB : Yspring_alien_wB; - Cave[x+dx][y] = dx > 0 ? Yspring_alien_e : Yspring_alien_w; - Next[x][y] = Zplayer; - Next[x+dx][y] = dx > 0 ? Xspring_e : Xspring_w; - play_element_sound(x, y, SOUND_slurp, Xalien); - 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[x+dx+1][y-1] == Xblank) - Cave[x+dx+1][y-1] = Xacid_splash_e; - if (Cave[x+dx-1][y-1] == Xblank) - Cave[x+dx-1][y-1] = Xacid_splash_w; - play_element_sound(x, y, SOUND_acid, Xacid_1); - goto spring_walk; - - case Xblank: - case Xacid_splash_e: - case Xacid_splash_w: - Cave[x+dx][y] = dx > 0 ? Yspring_e : Yspring_w; - Next[x+dx][y] = dx > 0 ? Xspring_e : Xspring_w; - - spring_walk: - Cave[x][y] = dx > 0 ? Yspring_eB : Yspring_wB; - Next[x][y] = Zplayer; - play_element_sound(x, y, SOUND_roll, Xspring); - ply->x = x; - } - - ply->anim = PLY_push_n + 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 = PLY_push_n + anim; - break; - - case Xballoon: - switch(Cave[x+dx][y+dy]) - { - 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[x+dx+1][y+dy-1] == Xblank) - Cave[x+dx+1][y+dy-1] = Xacid_splash_e; - if (Cave[x+dx-1][y+dy-1] == Xblank) - Cave[x+dx-1][y+dy-1] = Xacid_splash_w; - play_element_sound(x, y, SOUND_acid, Xacid_1); - goto balloon_walk; - - case Xblank: - case Xacid_splash_e: - case Xacid_splash_w: - Cave[x+dx][y+dy] = (dy ? (dy < 0 ? Yballoon_n : Yballoon_s) : - (dx > 0 ? Yballoon_e : Yballoon_w)); - Next[x+dx][y+dy] = Xballoon; - - balloon_walk: - Cave[x][y] = (dy ? (dy < 0 ? Yballoon_nB : Yballoon_sB) : - (dx > 0 ? Yballoon_eB : Yballoon_wB)); - Next[x][y] = Zplayer; - play_element_sound(x, y, SOUND_push, Xballoon); - ply->x = x; - ply->y = y; - } - - ply->anim = PLY_push_n + 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[x+dx][y+dy]) - { - 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[x+dx+1][y+dy-1] == Xblank) - Cave[x+dx+1][y+dy-1] = Xacid_splash_e; - if (Cave[x+dx-1][y+dy-1] == Xblank) - Cave[x+dx-1][y+dy-1] = Xacid_splash_w; - play_element_sound(x, y, SOUND_acid, Xacid_1); - goto android_walk; - - case Xblank: - case Xacid_splash_e: - case Xacid_splash_w: - Cave[x+dx][y+dy] = (dy ? (dy < 0 ? Yandroid_n : Yandroid_s) : - (dx > 0 ? Yandroid_e : Yandroid_w)); - Next[x+dx][y+dy] = (dy ? (dy < 0 ? Xandroid_2_n : Xandroid_2_s) : - (dx > 0 ? Xandroid_2_e : Xandroid_2_w)); - - android_walk: - Cave[x][y] = (dy ? (dy < 0 ? Yandroid_nB : Yandroid_sB) : - (dx > 0 ? Yandroid_eB : Yandroid_wB)); - Next[x][y] = Zplayer; - play_element_sound(x, y, SOUND_push, Xandroid); - ply->x = x; - ply->y = y; - } - - ply->anim = PLY_push_n + 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[x+dx][y+dy]]) - break; - - Cave[x+dx][y+dy] = Zplayer; - Next[x+dx][y+dy] = Zplayer; - play_element_sound(x, y, SOUND_door, element); - ply->anim = PLY_walk_n + anim; - ply->x = x + dx; - ply->y = y + dy; - break; - - case Xwheel: - play_element_sound(x, y, SOUND_press, element); - 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_any: - lev.wind_direction = dy ? (dy < 0 ? 0 : 2) : (dx > 0 ? 1 : 3); - goto wind_walk; - - wind_walk: - play_element_sound(x, y, SOUND_press, element); - lev.wind_cnt = lev.wind_time; - break; - - case Xwind_stop: - play_element_sound(x, y, SOUND_press, element); - lev.wind_cnt = 0; - break; - - case Xswitch: - play_element_sound(x, y, SOUND_press, element); - lev.ball_cnt = lev.ball_time; - lev.ball_state = !lev.ball_state; - break; - - case Xplant: - Cave[x][y] = Yplant; - Next[x][y] = Xplant; - play_element_sound(x, y, SOUND_blank, Xplant); - ply->anim = PLY_walk_n + anim; - ply->x = x; - ply->y = y; - break; - - case Xexit_1: - case Xexit_2: - case Xexit_3: - lev.home--; - - if (lev.home == 0) - game_em.level_solved = TRUE; - - ply->anim = PLY_walk_n + anim; - ply->x = x; - ply->y = y; - - break; - } - - if (ply->x == oldx && ply->y == oldy) /* no movement */ - result = FALSE; - } - else /* player wants to snap */ - { - int element = Cave[x][y]; - - switch(Cave[x][y]) - { - /* fire is pressed */ - - case Xgrass: - Cave[x][y] = Ygrass_blank; - Next[x][y] = Xblank; - play_element_sound(x, y, SOUND_dirt, element); - ply->anim = PLY_shoot_n + anim; - break; - - case Xdirt: - Cave[x][y] = Ydirt_blank; - Next[x][y] = Xblank; - play_element_sound(x, y, SOUND_dirt, element); - ply->anim = PLY_shoot_n + anim; - break; - - case Xdiamond: - case Xdiamond_pause: - Cave[x][y] = Ydiamond_blank; - Next[x][y] = Xblank; - play_element_sound(x, y, SOUND_collect, element); - lev.score += lev.diamond_score; - lev.required = lev.required < 3 ? 0 : lev.required - 3; - game.snapshot.collected_item = TRUE; - ply->anim = PLY_walk_n + anim; - break; - - case Xemerald: - case Xemerald_pause: - Cave[x][y] = Yemerald_blank; - Next[x][y] = Xblank; - play_element_sound(x, y, SOUND_collect, element); - lev.score += lev.emerald_score; - lev.required = lev.required < 1 ? 0 : lev.required - 1; - game.snapshot.collected_item = TRUE; - ply->anim = PLY_walk_n + anim; - break; - - case Xdynamite: - Cave[x][y] = Ydynamite_blank; - Next[x][y] = Xblank; - play_element_sound(x, y, SOUND_collect, element); - lev.score += lev.dynamite_score; - ply->dynamite = ply->dynamite > 9998 ? 9999 : ply->dynamite + 1; - ply->anim = PLY_walk_n + anim; - break; - - case Xkey_1: - ply->keys |= 0x01; - Cave[x][y] = Ykey_1_blank; - goto key_shoot; - - case Xkey_2: - ply->keys |= 0x02; - Cave[x][y] = Ykey_2_blank; - goto key_shoot; - - case Xkey_3: - ply->keys |= 0x04; - Cave[x][y] = Ykey_3_blank; - goto key_shoot; - - case Xkey_4: - ply->keys |= 0x08; - Cave[x][y] = Ykey_4_blank; - goto key_shoot; - - case Xkey_5: - ply->keys |= 0x10; - Cave[x][y] = Ykey_5_blank; - goto key_shoot; - - case Xkey_6: - ply->keys |= 0x20; - Cave[x][y] = Ykey_6_blank; - goto key_shoot; - - case Xkey_7: - ply->keys |= 0x40; - Cave[x][y] = Ykey_7_blank; - goto key_shoot; - - case Xkey_8: - ply->keys |= 0x80; - Cave[x][y] = Ykey_8_blank; - goto key_shoot; - - key_shoot: - Next[x][y] = Xblank; - play_element_sound(x, y, SOUND_collect, element); - lev.score += lev.key_score; - ply->anim = PLY_walk_n + anim; - break; - - case Xlenses: - Cave[x][y] = Ylenses_blank; - Next[x][y] = Xblank; - play_element_sound(x, y, SOUND_collect, element); - lev.score += lev.lenses_score; - lev.lenses_cnt = lev.lenses_time; - ply->anim = PLY_walk_n + anim; - break; - - case Xmagnify: - Cave[x][y] = Ymagnify_blank; - Next[x][y] = Xblank; - play_element_sound(x, y, SOUND_collect, element); - lev.score += lev.magnify_score; - lev.magnify_cnt = lev.magnify_time; - ply->anim = PLY_walk_n + anim; - break; - - default: - result = FALSE; - } - } - - return result; -} diff --git a/src/game_em/synchro_2.c b/src/game_em/synchro_2.c deleted file mode 100644 index 7ed2bfbd..00000000 --- a/src/game_em/synchro_2.c +++ /dev/null @@ -1,5150 +0,0 @@ -/* 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 "main_em.h" - - -#define SPRING_ROLL /* spring rolling off round things continues to roll */ - -#define RANDOM_RAW (seed = seed << 31 | seed >> 1) -#define RANDOM(x) (RANDOM_RAW & (x - 1)) - -static unsigned int seed; -static int score; - -static void Lboom_bug(int x, int y) -{ - Next[x][y] = Znormal; - Boom[x-1][y-1] = Xemerald; - Boom[x][y-1] = Xemerald; - Boom[x+1][y-1] = Xemerald; - Boom[x-1][y] = Xemerald; - Boom[x][y] = Xdiamond; - Boom[x+1][y] = Xemerald; - Boom[x-1][y+1] = Xemerald; - Boom[x][y+1] = Xemerald; - Boom[x+1][y+1] = Xemerald; - -#if PLAY_ELEMENT_SOUND - play_element_sound(x, y, SOUND_boom, element); -#endif -} - -static void Lboom_tank(int x, int y) -{ - Next[x][y] = Znormal; - Boom[x-1][y-1] = Xblank; - Boom[x][y-1] = Xblank; - Boom[x+1][y-1] = Xblank; - Boom[x-1][y] = Xblank; - Boom[x][y] = Xblank; - Boom[x+1][y] = Xblank; - Boom[x-1][y+1] = Xblank; - Boom[x][y+1] = Xblank; - Boom[x+1][y+1] = Xblank; -#if PLAY_ELEMENT_SOUND - play_element_sound(x, y, SOUND_boom, element); -#endif -} - -static void set_nearest_player_xy(int x, int y, int *dx, int *dy) -{ - int distance, distance_shortest = EM_MAX_CAVE_WIDTH + EM_MAX_CAVE_HEIGHT; - int i; - - /* default values if no players are alive anymore */ - *dx = 0; - *dy = 0; - - for (i = 0; i < MAX_PLAYERS; i++) - { - if (!ply[i].alive) - continue; - - distance = ABS(ply[i].x - x) + ABS(ply[i].y - y); - - if (distance < distance_shortest) - { - *dx = ply[i].x; - *dy = ply[i].y; - - distance_shortest = distance; - } - } -} - -static void Lacid_1(int x, int y) -{ - Next[x][y] = Xacid_2; -} - -static void Lacid_2(int x, int y) -{ - Next[x][y] = Xacid_3; -} - -static void Lacid_3(int x, int y) -{ - Next[x][y] = Xacid_4; -} - -static void Lacid_4(int x, int y) -{ - Next[x][y] = Xacid_5; -} - -static void Lacid_5(int x, int y) -{ - Next[x][y] = Xacid_6; -} - -static void Lacid_6(int x, int y) -{ - Next[x][y] = Xacid_7; -} - -static void Lacid_7(int x, int y) -{ - Next[x][y] = Xacid_8; -} - -static void Lacid_8(int x, int y) -{ - Next[x][y] = Xacid_1; -} - -#ifdef EM_ENGINE_USE_ADDITIONAL_ELEMENTS -static void Lfake_acid_1(int x, int y) -{ - Next[x][y] = Xfake_acid_2; -} - -static void Lfake_acid_2(int x, int y) -{ - Next[x][y] = Xfake_acid_3; -} - -static void Lfake_acid_3(int x, int y) -{ - Next[x][y] = Xfake_acid_4; -} - -static void Lfake_acid_4(int x, int y) -{ - Next[x][y] = Xfake_acid_5; -} - -static void Lfake_acid_5(int x, int y) -{ - Next[x][y] = Xfake_acid_6; -} - -static void Lfake_acid_6(int x, int y) -{ - Next[x][y] = Xfake_acid_7; -} - -static void Lfake_acid_7(int x, int y) -{ - Next[x][y] = Xfake_acid_8; -} - -static void Lfake_acid_8(int x, int y) -{ - Next[x][y] = Xfake_acid_1; -} -#endif - -static void Landroid(int x, int y) -{ - int dx, dy, temp; - - if (lev.android_clone_cnt == 0) - { - if (Cave[x-1][y-1] != Xblank && - Cave[x][y-1] != Xblank && - Cave[x+1][y-1] != Xblank && - Cave[x-1][y] != Xblank && - Cave[x+1][y] != Xblank && - Cave[x-1][y+1] != Xblank && - Cave[x][y+1] != Xblank && - Cave[x+1][y+1] != Xblank) - goto android_move; - - switch (RANDOM(8)) - { - /* randomly find an object to clone */ - - case 0: /* S,NE,W,NW,SE,E,SW,N */ - temp = lev.android_array[Cave[x][y+1]]; if (temp != Xblank) break; - temp = lev.android_array[Cave[x+1][y-1]]; if (temp != Xblank) break; - temp = lev.android_array[Cave[x-1][y]]; if (temp != Xblank) break; - temp = lev.android_array[Cave[x-1][y-1]]; if (temp != Xblank) break; - temp = lev.android_array[Cave[x+1][y+1]]; if (temp != Xblank) break; - temp = lev.android_array[Cave[x+1][y]]; if (temp != Xblank) break; - temp = lev.android_array[Cave[x-1][y+1]]; if (temp != Xblank) break; - temp = lev.android_array[Cave[x][y-1]]; if (temp != Xblank) break; - goto android_move; - - case 1: /* NW,SE,N,S,NE,SW,E,W */ - temp = lev.android_array[Cave[x-1][y-1]]; if (temp != Xblank) break; - temp = lev.android_array[Cave[x+1][y+1]]; if (temp != Xblank) break; - temp = lev.android_array[Cave[x][y-1]]; if (temp != Xblank) break; - temp = lev.android_array[Cave[x][y+1]]; if (temp != Xblank) break; - temp = lev.android_array[Cave[x+1][y-1]]; if (temp != Xblank) break; - temp = lev.android_array[Cave[x-1][y+1]]; if (temp != Xblank) break; - temp = lev.android_array[Cave[x+1][y]]; if (temp != Xblank) break; - temp = lev.android_array[Cave[x-1][y]]; if (temp != Xblank) break; - goto android_move; - - case 2: /* SW,E,S,W,N,NW,SE,NE */ - temp = lev.android_array[Cave[x-1][y+1]]; if (temp != Xblank) break; - temp = lev.android_array[Cave[x+1][y]]; if (temp != Xblank) break; - temp = lev.android_array[Cave[x][y+1]]; if (temp != Xblank) break; - temp = lev.android_array[Cave[x-1][y]]; if (temp != Xblank) break; - temp = lev.android_array[Cave[x][y-1]]; if (temp != Xblank) break; - temp = lev.android_array[Cave[x-1][y-1]]; if (temp != Xblank) break; - temp = lev.android_array[Cave[x+1][y+1]]; if (temp != Xblank) break; - temp = lev.android_array[Cave[x+1][y-1]]; if (temp != Xblank) break; - goto android_move; - - case 3: /* N,SE,NE,E,W,S,NW,SW */ - temp = lev.android_array[Cave[x][y-1]]; if (temp != Xblank) break; - temp = lev.android_array[Cave[x+1][y+1]]; if (temp != Xblank) break; - temp = lev.android_array[Cave[x+1][y-1]]; if (temp != Xblank) break; - temp = lev.android_array[Cave[x+1][y]]; if (temp != Xblank) break; - temp = lev.android_array[Cave[x-1][y]]; if (temp != Xblank) break; - temp = lev.android_array[Cave[x][y+1]]; if (temp != Xblank) break; - temp = lev.android_array[Cave[x-1][y-1]]; if (temp != Xblank) break; - temp = lev.android_array[Cave[x-1][y+1]]; if (temp != Xblank) break; - goto android_move; - - case 4: /* SE,NW,E,NE,SW,W,N,S */ - temp = lev.android_array[Cave[x+1][y+1]]; if (temp != Xblank) break; - temp = lev.android_array[Cave[x-1][y-1]]; if (temp != Xblank) break; - temp = lev.android_array[Cave[x+1][y]]; if (temp != Xblank) break; - temp = lev.android_array[Cave[x+1][y-1]]; if (temp != Xblank) break; - temp = lev.android_array[Cave[x-1][y+1]]; if (temp != Xblank) break; - temp = lev.android_array[Cave[x-1][y]]; if (temp != Xblank) break; - temp = lev.android_array[Cave[x][y-1]]; if (temp != Xblank) break; - temp = lev.android_array[Cave[x][y+1]]; if (temp != Xblank) break; - goto android_move; - - case 5: /* NE,W,SE,SW,S,N,E,NW */ - temp = lev.android_array[Cave[x+1][y-1]]; if (temp != Xblank) break; - temp = lev.android_array[Cave[x-1][y]]; if (temp != Xblank) break; - temp = lev.android_array[Cave[x+1][y+1]]; if (temp != Xblank) break; - temp = lev.android_array[Cave[x-1][y+1]]; if (temp != Xblank) break; - temp = lev.android_array[Cave[x][y+1]]; if (temp != Xblank) break; - temp = lev.android_array[Cave[x][y-1]]; if (temp != Xblank) break; - temp = lev.android_array[Cave[x+1][y]]; if (temp != Xblank) break; - temp = lev.android_array[Cave[x-1][y-1]]; if (temp != Xblank) break; - goto android_move; - - case 6: /* E,N,SW,S,NW,NE,SE,W */ - temp = lev.android_array[Cave[x+1][y]]; if (temp != Xblank) break; - temp = lev.android_array[Cave[x][y-1]]; if (temp != Xblank) break; - temp = lev.android_array[Cave[x-1][y+1]]; if (temp != Xblank) break; - temp = lev.android_array[Cave[x][y+1]]; if (temp != Xblank) break; - temp = lev.android_array[Cave[x-1][y-1]]; if (temp != Xblank) break; - temp = lev.android_array[Cave[x+1][y-1]]; if (temp != Xblank) break; - temp = lev.android_array[Cave[x+1][y+1]]; if (temp != Xblank) break; - temp = lev.android_array[Cave[x-1][y]]; if (temp != Xblank) break; - goto android_move; - - case 7: /* W,SW,NW,N,E,SE,NE,S */ - temp = lev.android_array[Cave[x-1][y]]; if (temp != Xblank) break; - temp = lev.android_array[Cave[x-1][y+1]]; if (temp != Xblank) break; - temp = lev.android_array[Cave[x-1][y-1]]; if (temp != Xblank) break; - temp = lev.android_array[Cave[x][y-1]]; if (temp != Xblank) break; - temp = lev.android_array[Cave[x+1][y]]; if (temp != Xblank) break; - temp = lev.android_array[Cave[x+1][y+1]]; if (temp != Xblank) break; - temp = lev.android_array[Cave[x+1][y-1]]; if (temp != Xblank) break; - temp = lev.android_array[Cave[x][y+1]]; if (temp != Xblank) break; - goto android_move; - } - - Next[x][y] = temp; /* the item we chose to clone */ - play_element_sound(x, y, SOUND_android_clone, temp); - - switch (RANDOM(8)) - { - /* randomly find a direction to move */ - - case 0: /* S,NE,W,NW,SE,E,SW,N */ - if (Cave[x][y+1] == Xblank) goto android_s; - if (Cave[x+1][y-1] == Xblank) goto android_ne; - if (Cave[x-1][y] == Xblank) goto android_w; - if (Cave[x-1][y-1] == Xblank) goto android_nw; - if (Cave[x+1][y+1] == Xblank) goto android_se; - if (Cave[x+1][y] == Xblank) goto android_e; - if (Cave[x-1][y+1] == Xblank) goto android_sw; - if (Cave[x][y-1] == Xblank) goto android_n; - goto android_move; - - case 1: /* NW,SE,N,S,NE,SW,E,W */ - if (Cave[x-1][y-1] == Xblank) goto android_nw; - if (Cave[x+1][y+1] == Xblank) goto android_se; - if (Cave[x][y-1] == Xblank) goto android_n; - if (Cave[x][y+1] == Xblank) goto android_s; - if (Cave[x+1][y-1] == Xblank) goto android_ne; - if (Cave[x-1][y+1] == Xblank) goto android_sw; - if (Cave[x+1][y] == Xblank) goto android_e; - if (Cave[x-1][y] == Xblank) goto android_w; - goto android_move; - - case 2: /* SW,E,S,W,N,NW,SE,NE */ - if (Cave[x-1][y+1] == Xblank) goto android_sw; - if (Cave[x+1][y] == Xblank) goto android_e; - if (Cave[x][y+1] == Xblank) goto android_s; - if (Cave[x-1][y] == Xblank) goto android_w; - if (Cave[x][y-1] == Xblank) goto android_n; - if (Cave[x-1][y-1] == Xblank) goto android_nw; - if (Cave[x+1][y+1] == Xblank) goto android_se; - if (Cave[x+1][y-1] == Xblank) goto android_ne; - goto android_move; - - case 3: /* N,SE,NE,E,W,S,NW,SW */ - if (Cave[x][y-1] == Xblank) goto android_n; - if (Cave[x+1][y+1] == Xblank) goto android_se; - if (Cave[x+1][y-1] == Xblank) goto android_ne; - if (Cave[x+1][y] == Xblank) goto android_e; - if (Cave[x-1][y] == Xblank) goto android_w; - if (Cave[x][y+1] == Xblank) goto android_s; - if (Cave[x-1][y-1] == Xblank) goto android_nw; - if (Cave[x-1][y+1] == Xblank) goto android_sw; - goto android_move; - - case 4: /* SE,NW,E,NE,SW,W,N,S */ - if (Cave[x+1][y+1] == Xblank) goto android_se; - if (Cave[x-1][y-1] == Xblank) goto android_nw; - if (Cave[x+1][y] == Xblank) goto android_e; - if (Cave[x+1][y-1] == Xblank) goto android_ne; - if (Cave[x-1][y+1] == Xblank) goto android_sw; - if (Cave[x-1][y] == Xblank) goto android_w; - if (Cave[x][y-1] == Xblank) goto android_n; - if (Cave[x][y+1] == Xblank) goto android_s; - goto android_move; - - case 5: /* NE,W,SE,SW,S,N,E,NW */ - if (Cave[x+1][y-1] == Xblank) goto android_ne; - if (Cave[x-1][y] == Xblank) goto android_w; - if (Cave[x+1][y+1] == Xblank) goto android_se; - if (Cave[x-1][y+1] == Xblank) goto android_sw; - if (Cave[x][y+1] == Xblank) goto android_s; - if (Cave[x][y-1] == Xblank) goto android_n; - if (Cave[x+1][y] == Xblank) goto android_e; - if (Cave[x-1][y-1] == Xblank) goto android_nw; - goto android_move; - - case 6: /* E,N,SW,S,NW,NE,SE,W */ - if (Cave[x+1][y] == Xblank) goto android_e; - if (Cave[x][y-1] == Xblank) goto android_n; - if (Cave[x-1][y+1] == Xblank) goto android_sw; - if (Cave[x][y+1] == Xblank) goto android_s; - if (Cave[x-1][y-1] == Xblank) goto android_nw; - if (Cave[x+1][y-1] == Xblank) goto android_ne; - if (Cave[x+1][y+1] == Xblank) goto android_se; - if (Cave[x-1][y] == Xblank) goto android_w; - goto android_move; - - case 7: /* W,SW,NW,N,E,SE,NE,S */ - if (Cave[x-1][y] == Xblank) goto android_w; - if (Cave[x-1][y+1] == Xblank) goto android_sw; - if (Cave[x-1][y-1] == Xblank) goto android_nw; - if (Cave[x][y-1] == Xblank) goto android_n; - if (Cave[x+1][y] == Xblank) goto android_e; - if (Cave[x+1][y+1] == Xblank) goto android_se; - if (Cave[x+1][y-1] == Xblank) goto android_ne; - if (Cave[x][y+1] == Xblank) goto android_s; - goto android_move; - } - } - - android_move: - if (lev.android_move_cnt == 0) - { - if (Cave[x-1][y-1] == Zplayer || - Cave[x][y-1] == Zplayer || - Cave[x+1][y-1] == Zplayer || - Cave[x-1][y] == Zplayer || - Cave[x+1][y] == Zplayer || - Cave[x-1][y+1] == Zplayer || - Cave[x][y+1] == Zplayer || - Cave[x+1][y+1] == Zplayer) - goto android_still; - - set_nearest_player_xy(x, y, &dx, &dy); - - Next[x][y] = Xblank; /* assume we will move */ - temp = ((x < dx) + 1 - (x > dx)) + ((y < dy) + 1 - (y > dy)) * 3; - - if (RANDOM(2)) - { - switch (temp) - { - /* attempt clockwise move first if direct path is blocked */ - - case 0: /* north west */ - if (tab_android_move[Cave[x-1][y-1]]) goto android_nw; - if (tab_android_move[Cave[x][y-1]]) goto android_n; - if (tab_android_move[Cave[x-1][y]]) goto android_w; - break; - - case 1: /* north */ - if (tab_android_move[Cave[x][y-1]]) goto android_n; - if (tab_android_move[Cave[x+1][y-1]]) goto android_ne; - if (tab_android_move[Cave[x-1][y-1]]) goto android_nw; - break; - - case 2: /* north east */ - if (tab_android_move[Cave[x+1][y-1]]) goto android_ne; - if (tab_android_move[Cave[x+1][y]]) goto android_e; - if (tab_android_move[Cave[x][y-1]]) goto android_n; - break; - - case 3: /* west */ - if (tab_android_move[Cave[x-1][y]]) goto android_w; - if (tab_android_move[Cave[x-1][y-1]]) goto android_nw; - if (tab_android_move[Cave[x-1][y+1]]) goto android_sw; - break; - - case 4: /* nowhere */ - break; - - case 5: /* east */ - if (tab_android_move[Cave[x+1][y]]) goto android_e; - if (tab_android_move[Cave[x+1][y+1]]) goto android_se; - if (tab_android_move[Cave[x+1][y-1]]) goto android_ne; - break; - - case 6: /* south west */ - if (tab_android_move[Cave[x-1][y+1]]) goto android_sw; - if (tab_android_move[Cave[x-1][y]]) goto android_w; - if (tab_android_move[Cave[x][y+1]]) goto android_s; - break; - - case 7: /* south */ - if (tab_android_move[Cave[x][y+1]]) goto android_s; - if (tab_android_move[Cave[x-1][y+1]]) goto android_sw; - if (tab_android_move[Cave[x+1][y+1]]) goto android_se; - break; - - case 8: /* south east */ - if (tab_android_move[Cave[x+1][y+1]]) goto android_se; - if (tab_android_move[Cave[x][y+1]]) goto android_s; - if (tab_android_move[Cave[x+1][y]]) goto android_e; - break; - } - } - else - { - switch (temp) - { - /* attempt counterclockwise move first if direct path is blocked */ - - case 0: /* north west */ - if (tab_android_move[Cave[x-1][y-1]]) goto android_nw; - if (tab_android_move[Cave[x-1][y]]) goto android_w; - if (tab_android_move[Cave[x][y-1]]) goto android_n; - break; - - case 1: /* north */ - if (tab_android_move[Cave[x][y-1]]) goto android_n; - if (tab_android_move[Cave[x-1][y-1]]) goto android_nw; - if (tab_android_move[Cave[x+1][y-1]]) goto android_ne; - break; - - case 2: /* north east */ - if (tab_android_move[Cave[x+1][y-1]]) goto android_ne; - if (tab_android_move[Cave[x][y-1]]) goto android_n; - if (tab_android_move[Cave[x+1][y]]) goto android_e; - break; - - case 3: /* west */ - if (tab_android_move[Cave[x-1][y]]) goto android_w; - if (tab_android_move[Cave[x-1][y+1]]) goto android_sw; - if (tab_android_move[Cave[x-1][y-1]]) goto android_nw; - break; - - case 4: /* nowhere */ - break; - - case 5: /* east */ - if (tab_android_move[Cave[x+1][y]]) goto android_e; - if (tab_android_move[Cave[x+1][y-1]]) goto android_ne; - if (tab_android_move[Cave[x+1][y+1]]) goto android_se; - break; - - case 6: /* south west */ - if (tab_android_move[Cave[x-1][y+1]]) goto android_sw; - if (tab_android_move[Cave[x][y+1]]) goto android_s; - if (tab_android_move[Cave[x-1][y]]) goto android_w; - break; - - case 7: /* south */ - if (tab_android_move[Cave[x][y+1]]) goto android_s; - if (tab_android_move[Cave[x+1][y+1]]) goto android_se; - if (tab_android_move[Cave[x-1][y+1]]) goto android_sw; - break; - - case 8: /* south east */ - if (tab_android_move[Cave[x+1][y+1]]) goto android_se; - if (tab_android_move[Cave[x+1][y]]) goto android_e; - if (tab_android_move[Cave[x][y+1]]) goto android_s; - break; - } - } - } - - android_still: - Next[x][y] = Xandroid; - return; - - android_n: - Cave[x][y] = Yandroid_nB; - Cave[x][y-1] = Yandroid_n; - Next[x][y-1] = Xandroid; - play_element_sound(x, y, SOUND_android_move, Xandroid); - return; - - android_ne: - Cave[x][y] = Yandroid_neB; - Cave[x+1][y-1] = Yandroid_ne; - Next[x+1][y-1] = Xandroid; - play_element_sound(x, y, SOUND_android_move, Xandroid); - return; - - android_e: - Cave[x][y] = Yandroid_eB; - Cave[x+1][y] = Yandroid_e; - Next[x+1][y] = Xandroid; - play_element_sound(x, y, SOUND_android_move, Xandroid); - return; - - android_se: - Cave[x][y] = Yandroid_seB; - Cave[x+1][y+1] = Yandroid_se; - Next[x+1][y+1] = Xandroid; - play_element_sound(x, y, SOUND_android_move, Xandroid); - return; - - android_s: - Cave[x][y] = Yandroid_sB; - Cave[x][y+1] = Yandroid_s; - Next[x][y+1] = Xandroid; - play_element_sound(x, y, SOUND_android_move, Xandroid); - return; - - android_sw: - Cave[x][y] = Yandroid_swB; - Cave[x-1][y+1] = Yandroid_sw; - Next[x-1][y+1] = Xandroid; - play_element_sound(x, y, SOUND_android_move, Xandroid); - return; - - android_w: - Cave[x][y] = Yandroid_wB; - Cave[x-1][y] = Yandroid_w; - Next[x-1][y] = Xandroid; - play_element_sound(x, y, SOUND_android_move, Xandroid); - return; - - android_nw: - Cave[x][y] = Yandroid_nwB; - Cave[x-1][y-1] = Yandroid_nw; - Next[x-1][y-1] = Xandroid; - play_element_sound(x, y, SOUND_android_move, Xandroid); - return; -} - -static void Landroid_1_n(int x, int y) -{ - switch (Cave[x][y-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[x][y] = Yandroid_nB; - if (Cave[x+1][y-2] == Xblank) - Cave[x+1][y-2] = Xacid_splash_e; - if (Cave[x-1][y-2] == Xblank) - Cave[x-1][y-2] = Xacid_splash_w; - Next[x][y] = Xblank; - play_element_sound(x, y, SOUND_acid, Xacid_1); - return; - - case Xblank: - case Xacid_splash_e: - case Xacid_splash_w: - Cave[x][y] = Yandroid_nB; - Cave[x][y-1] = Yandroid_n; - Next[x][y] = Xblank; - Next[x][y-1] = Xandroid; - play_element_sound(x, y, SOUND_android_move, Xandroid_1_n); - return; - - default: - Landroid(x, y); - return; - } -} - -static void Landroid_2_n(int x, int y) -{ - switch (Cave[x][y-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[x][y] = Yandroid_nB; - if (Cave[x+1][y-2] == Xblank) - Cave[x+1][y-2] = Xacid_splash_e; - if (Cave[x-1][y-2] == Xblank) - Cave[x-1][y-2] = Xacid_splash_w; - Next[x][y] = Xblank; - play_element_sound(x, y, SOUND_acid, Xacid_1); - return; - - case Xblank: - case Xacid_splash_e: - case Xacid_splash_w: - Cave[x][y] = Yandroid_nB; - Cave[x][y-1] = Yandroid_n; - Next[x][y] = Xblank; - Next[x][y-1] = Xandroid_1_n; - play_element_sound(x, y, SOUND_android_move, Xandroid_2_n); - return; - - default: - Landroid(x, y); - return; - } -} - -static void Landroid_1_e(int x, int y) -{ - switch (Cave[x+1][y]) - { - 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[x][y] = Yandroid_eB; - if (Cave[x+2][y-1] == Xblank) - Cave[x+2][y-1] = Xacid_splash_e; - if (Cave[x][y-1] == Xblank) - Cave[x][y-1] = Xacid_splash_w; - Next[x][y] = Xblank; - play_element_sound(x, y, SOUND_acid, Xacid_1); - return; - - case Xblank: - case Xacid_splash_e: - case Xacid_splash_w: - Cave[x][y] = Yandroid_eB; - Cave[x+1][y] = Yandroid_e; - Next[x][y] = Xblank; - Next[x+1][y] = Xandroid; - play_element_sound(x, y, SOUND_android_move, Xandroid_1_e); - return; - - default: - Landroid(x, y); - return; - } -} - -static void Landroid_2_e(int x, int y) -{ - switch (Cave[x+1][y]) - { - 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[x][y] = Yandroid_eB; - if (Cave[x+2][y-1] == Xblank) - Cave[x+2][y-1] = Xacid_splash_e; - if (Cave[x][y-1] == Xblank) - Cave[x][y-1] = Xacid_splash_w; - Next[x][y] = Xblank; - play_element_sound(x, y, SOUND_acid, Xacid_1); - return; - - case Xblank: - case Xacid_splash_e: - case Xacid_splash_w: - Cave[x][y] = Yandroid_eB; - Cave[x+1][y] = Yandroid_e; - Next[x][y] = Xblank; - Next[x+1][y] = Xandroid_1_e; - play_element_sound(x, y, SOUND_android_move, Xandroid_2_e); - return; - - default: - Landroid(x, y); - return; - } -} - -static void Landroid_1_s(int x, int y) -{ - switch (Cave[x][y+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[x][y] = Yandroid_sB; - if (Cave[x+1][y] == Xblank) - Cave[x+1][y] = Xacid_splash_e; - if (Cave[x-1][y] == Xblank) - Cave[x-1][y] = Xacid_splash_w; - Next[x][y] = Xblank; - play_element_sound(x, y, SOUND_acid, Xacid_1); - return; - - case Xblank: - case Xacid_splash_e: - case Xacid_splash_w: - Cave[x][y] = Yandroid_sB; - Cave[x][y+1] = Yandroid_s; - Next[x][y] = Xblank; - Next[x][y+1] = Xandroid; - play_element_sound(x, y, SOUND_android_move, Xandroid_1_s); - return; - - default: - Landroid(x, y); - return; - } -} - -static void Landroid_2_s(int x, int y) -{ - switch (Cave[x][y+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[x][y] = Yandroid_sB; - if (Cave[x+1][y] == Xblank) - Cave[x+1][y] = Xacid_splash_e; - if (Cave[x-1][y] == Xblank) - Cave[x-1][y] = Xacid_splash_w; - Next[x][y] = Xblank; - play_element_sound(x, y, SOUND_acid, Xacid_1); - return; - - case Xblank: - case Xacid_splash_e: - case Xacid_splash_w: - Cave[x][y] = Yandroid_sB; - Cave[x][y+1] = Yandroid_s; - Next[x][y] = Xblank; - Next[x][y+1] = Xandroid_1_s; - play_element_sound(x, y, SOUND_android_move, Xandroid_2_s); - return; - - default: - Landroid(x, y); - return; - } -} - -static void Landroid_1_w(int x, int y) -{ - switch (Cave[x-1][y]) - { - 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[x][y] = Yandroid_wB; - if (Cave[x][y-1] == Xblank) - Cave[x][y-1] = Xacid_splash_e; - if (Cave[x-2][y-1] == Xblank) - Cave[x-2][y-1] = Xacid_splash_w; - Next[x][y] = Xblank; - play_element_sound(x, y, SOUND_acid, Xacid_1); - return; - - case Xblank: - case Xacid_splash_e: - case Xacid_splash_w: - Cave[x][y] = Yandroid_wB; - Cave[x-1][y] = Yandroid_w; - Next[x][y] = Xblank; - Next[x-1][y] = Xandroid; - play_element_sound(x, y, SOUND_android_move, Xandroid_1_w); - return; - - default: - Landroid(x, y); - return; - } -} - -static void Landroid_2_w(int x, int y) -{ - switch (Cave[x-1][y]) - { - 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[x][y] = Yandroid_wB; - if (Cave[x][y-1] == Xblank) - Cave[x][y-1] = Xacid_splash_e; - if (Cave[x-2][y-1] == Xblank) - Cave[x-2][y-1] = Xacid_splash_w; - Next[x][y] = Xblank; - play_element_sound(x, y, SOUND_acid, Xacid_1); - return; - - case Xblank: - case Xacid_splash_e: - case Xacid_splash_w: - Cave[x][y] = Yandroid_wB; - Cave[x-1][y] = Yandroid_w; - Next[x][y] = Xblank; - Next[x-1][y] = Xandroid_1_w; - play_element_sound(x, y, SOUND_android_move, Xandroid_1_w); - return; - - default: - Landroid(x, y); - return; - } -} - -static void Leater_n(int x, int y) -{ - if (Cave[x+1][y] == Xdiamond) - { - Cave[x+1][y] = Ydiamond_blank; - Next[x+1][y] = Xblank; - play_element_sound(x, y, SOUND_eater_eat, Xeater_n); - return; - } - - if (Cave[x][y+1] == Xdiamond) - { - Cave[x][y+1] = Ydiamond_blank; - Next[x][y+1] = Xblank; - play_element_sound(x, y, SOUND_eater_eat, Xeater_n); - return; - } - - if (Cave[x-1][y] == Xdiamond) - { - Cave[x-1][y] = Ydiamond_blank; - Next[x-1][y] = Xblank; - play_element_sound(x, y, SOUND_eater_eat, Xeater_n); - return; - } - - if (Cave[x][y-1] == Xdiamond) - { - Cave[x][y-1] = Ydiamond_blank; - Next[x][y-1] = Xblank; - play_element_sound(x, y, SOUND_eater_eat, Xeater_n); - return; - } - - switch (Cave[x][y-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[x][y] = Yeater_nB; - if (Cave[x+1][y-2] == Xblank) - Cave[x+1][y-2] = Xacid_splash_e; - if (Cave[x-1][y-2] == Xblank) - Cave[x-1][y-2] = Xacid_splash_w; - Next[x][y] = Xblank; - play_element_sound(x, y, SOUND_acid, Xacid_1); - return; - - case Xblank: - case Xacid_splash_e: - case Xacid_splash_w: - case Xplant: - case Yplant: - case Zplayer: - Cave[x][y] = Yeater_nB; - Cave[x][y-1] = Yeater_n; - Next[x][y] = Xblank; - Next[x][y-1] = Xeater_n; - return; - - default: - Next[x][y] = RANDOM(2) ? Xeater_e : Xeater_w; - play_element_sound(x, y, SOUND_eater, Xeater_n); - return; - } -} - -static void Leater_e(int x, int y) -{ - if (Cave[x][y+1] == Xdiamond) - { - Cave[x][y+1] = Ydiamond_blank; - Next[x][y+1] = Xblank; - play_element_sound(x, y, SOUND_eater_eat, Xeater_e); - return; - } - - if (Cave[x-1][y] == Xdiamond) - { - Cave[x-1][y] = Ydiamond_blank; - Next[x-1][y] = Xblank; - play_element_sound(x, y, SOUND_eater_eat, Xeater_e); - return; - } - - if (Cave[x][y-1] == Xdiamond) - { - Cave[x][y-1] = Ydiamond_blank; - Next[x][y-1] = Xblank; - play_element_sound(x, y, SOUND_eater_eat, Xeater_e); - return; - } - - if (Cave[x+1][y] == Xdiamond) - { - Cave[x+1][y] = Ydiamond_blank; - Next[x+1][y] = Xblank; - play_element_sound(x, y, SOUND_eater_eat, Xeater_e); - return; - } - - switch (Cave[x+1][y]) - { - 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[x][y] = Yeater_eB; - if (Cave[x+2][y-1] == Xblank) - Cave[x+2][y-1] = Xacid_splash_e; - if (Cave[x][y-1] == Xblank) - Cave[x][y-1] = Xacid_splash_w; - Next[x][y] = Xblank; - play_element_sound(x, y, SOUND_acid, Xacid_1); - return; - - case Xblank: - case Xacid_splash_e: - case Xacid_splash_w: - case Xplant: - case Yplant: - case Zplayer: - Cave[x][y] = Yeater_eB; - Cave[x+1][y] = Yeater_e; - Next[x][y] = Xblank; - Next[x+1][y] = Xeater_e; - return; - - default: - Next[x][y] = RANDOM(2) ? Xeater_n : Xeater_s; - play_element_sound(x, y, SOUND_eater, Xeater_e); - return; - } -} - -static void Leater_s(int x, int y) -{ - if (Cave[x-1][y] == Xdiamond) - { - Cave[x-1][y] = Ydiamond_blank; - Next[x-1][y] = Xblank; - play_element_sound(x, y, SOUND_eater_eat, Xeater_s); - return; - } - - if (Cave[x][y-1] == Xdiamond) - { - Cave[x][y-1] = Ydiamond_blank; - Next[x][y-1] = Xblank; - play_element_sound(x, y, SOUND_eater_eat, Xeater_s); - return; - } - - if (Cave[x+1][y] == Xdiamond) - { - Cave[x+1][y] = Ydiamond_blank; - Next[x+1][y] = Xblank; - play_element_sound(x, y, SOUND_eater_eat, Xeater_s); - return; - } - - if (Cave[x][y+1] == Xdiamond) - { - Cave[x][y+1] = Ydiamond_blank; - Next[x][y+1] = Xblank; - play_element_sound(x, y, SOUND_eater_eat, Xeater_s); - return; - } - - switch (Cave[x][y+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[x][y] = Yeater_sB; - if (Cave[x+1][y] == Xblank) - Cave[x+1][y] = Xacid_splash_e; - if (Cave[x-1][y] == Xblank) - Cave[x-1][y] = Xacid_splash_w; - Next[x][y] = Xblank; - play_element_sound(x, y, SOUND_acid, Xacid_1); - return; - - case Xblank: - case Xacid_splash_e: - case Xacid_splash_w: - case Xplant: - case Yplant: - case Zplayer: - Cave[x][y] = Yeater_sB; - Cave[x][y+1] = Yeater_s; - Next[x][y] = Xblank; - Next[x][y+1] = Xeater_s; - return; - - default: - Next[x][y] = RANDOM(2) ? Xeater_e : Xeater_w; - play_element_sound(x, y, SOUND_eater, Xeater_s); - return; - } -} - -static void Leater_w(int x, int y) -{ - if (Cave[x][y-1] == Xdiamond) - { - Cave[x][y-1] = Ydiamond_blank; - Next[x][y-1] = Xblank; - play_element_sound(x, y, SOUND_eater_eat, Xeater_w); - return; - } - - if (Cave[x+1][y] == Xdiamond) - { - Cave[x+1][y] = Ydiamond_blank; - Next[x+1][y] = Xblank; - play_element_sound(x, y, SOUND_eater_eat, Xeater_w); - return; - } - - if (Cave[x][y+1] == Xdiamond) - { - Cave[x][y+1] = Ydiamond_blank; - Next[x][y+1] = Xblank; - play_element_sound(x, y, SOUND_eater_eat, Xeater_w); - return; - } - - if (Cave[x-1][y] == Xdiamond) - { - Cave[x-1][y] = Ydiamond_blank; - Next[x-1][y] = Xblank; - play_element_sound(x, y, SOUND_eater_eat, Xeater_w); - return; - } - - switch (Cave[x-1][y]) - { - 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[x][y] = Yeater_wB; - if (Cave[x][y-1] == Xblank) - Cave[x][y-1] = Xacid_splash_e; - if (Cave[x-2][y-1] == Xblank) - Cave[x-2][y-1] = Xacid_splash_w; - Next[x][y] = Xblank; - play_element_sound(x, y, SOUND_acid, Xacid_1); - return; - - case Xblank: - case Xacid_splash_e: - case Xacid_splash_w: - case Xplant: - case Yplant: - case Zplayer: - Cave[x][y] = Yeater_wB; - Cave[x-1][y] = Yeater_w; - Next[x][y] = Xblank; - Next[x-1][y] = Xeater_w; - return; - - default: - Next[x][y] = RANDOM(2) ? Xeater_n : Xeater_s; - play_element_sound(x, y, SOUND_eater, Xeater_w); - return; - } -} - -static void Lalien(int x, int y) -{ - int dx, dy; - - if (lev.wheel_cnt) - { - dx = lev.wheel_x; - dy = lev.wheel_y; - } - else - { - set_nearest_player_xy(x, y, &dx, &dy); - } - - if (RANDOM(2)) - { - if (y > dy) - { - switch (Cave[x][y-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[x][y] = Yalien_nB; - if (Cave[x+1][y-2] == Xblank) - Cave[x+1][y-2] = Xacid_splash_e; - if (Cave[x-1][y-2] == Xblank) - Cave[x-1][y-2] = Xacid_splash_w; - Next[x][y] = Xblank; - play_element_sound(x, y, SOUND_acid, Xacid_1); - return; - - case Xblank: - case Xacid_splash_e: - case Xacid_splash_w: - case Xplant: - case Yplant: - case Zplayer: - Cave[x][y] = Yalien_nB; - Cave[x][y-1] = Yalien_n; - Next[x][y] = Xblank; - Next[x][y-1] = Xalien_pause; - play_element_sound(x, y, SOUND_alien, Xalien); - return; - } - } - else if (y < dy) - { - switch (Cave[x][y+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[x][y] = Yalien_sB; - Next[x][y] = Xblank; - if (Cave[x+1][y] == Xblank) - Cave[x+1][y] = Xacid_splash_e; - if (Cave[x-1][y] == Xblank) - Cave[x-1][y] = Xacid_splash_w; - play_element_sound(x, y, SOUND_acid, Xacid_1); - return; - - case Xblank: - case Xacid_splash_e: - case Xacid_splash_w: - case Xplant: - case Yplant: - case Zplayer: - Cave[x][y] = Yalien_sB; - Cave[x][y+1] = Yalien_s; - Next[x][y] = Xblank; - Next[x][y+1] = Xalien_pause; - play_element_sound(x, y, SOUND_alien, Xalien); - return; - } - } - } - else - { - if (x < dx) - { - switch (Cave[x+1][y]) - { - 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[x][y] = Yalien_eB; - if (Cave[x+2][y-1] == Xblank) - Cave[x+2][y-1] = Xacid_splash_e; - if (Cave[x][y-1] == Xblank) - Cave[x][y-1] = Xacid_splash_w; - Next[x][y] = Xblank; - play_element_sound(x, y, SOUND_acid, Xacid_1); - return; - - case Xblank: - case Xacid_splash_e: - case Xacid_splash_w: - case Xplant: - case Yplant: - case Zplayer: - Cave[x][y] = Yalien_eB; - Cave[x+1][y] = Yalien_e; - Next[x][y] = Xblank; - Next[x+1][y] = Xalien_pause; - play_element_sound(x, y, SOUND_alien, Xalien); - return; - } - } - else if (x > dx) - { - switch (Cave[x-1][y]) - { - 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[x][y] = Yalien_wB; - if (Cave[x][y-1] == Xblank) - Cave[x][y-1] = Xacid_splash_e; - if (Cave[x-2][y-1] == Xblank) - Cave[x-2][y-1] = Xacid_splash_w; - Next[x][y] = Xblank; - play_element_sound(x, y, SOUND_acid, Xacid_1); - return; - - case Xblank: - case Xacid_splash_e: - case Xacid_splash_w: - case Xplant: - case Yplant: - case Zplayer: - Cave[x][y] = Yalien_wB; - Cave[x-1][y] = Yalien_w; - Next[x][y] = Xblank; - Next[x-1][y] = Xalien_pause; - play_element_sound(x, y, SOUND_alien, Xalien); - return; - } - } - } -} - -static void Lalien_pause(int x, int y) -{ - Next[x][y] = Xalien; -} - -static void Lbug_n(int x, int y) -{ - switch (Cave[x][y-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[x][y] = Ybug_nB; - if (Cave[x+1][y-2] == Xblank) - Cave[x+1][y-2] = Xacid_splash_e; - if (Cave[x-1][y-2] == Xblank) - Cave[x-1][y-2] = Xacid_splash_w; - Next[x][y] = Xblank; - play_element_sound(x, y, SOUND_acid, Xacid_1); - return; - - case Xblank: - case Xacid_splash_e: - case Xacid_splash_w: - case Xplant: - case Yplant: - case Zplayer: - Cave[x][y] = Ybug_nB; - Cave[x][y-1] = Ybug_n; - Next[x][y] = Xblank; - Next[x][y-1] = Xbug_1_n; - play_element_sound(x, y, SOUND_bug, Xbug_1_n); - return; - - default: - Cave[x][y] = Ybug_n_w; - Next[x][y] = Xbug_2_w; - play_element_sound(x, y, SOUND_bug, Xbug_1_n); - return; - } -} - -static void Lbug_1_n(int x, int y) -{ - if (tab_amoeba[Cave[x][y-1]] || - tab_amoeba[Cave[x+1][y]] || - tab_amoeba[Cave[x][y+1]] || - tab_amoeba[Cave[x-1][y]]) - { - Lboom_bug(x, y); - - return; - } - - switch (Cave[x+1][y]) - { - case Xblank: - case Xacid_splash_e: - case Xacid_splash_w: - 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[x][y] = Ybug_n_e; - Next[x][y] = Xbug_2_e; - play_element_sound(x, y, SOUND_bug, Xbug_1_n); - return; - - default: - Lbug_n(x, y); - return; - } -} - -static void Lbug_2_n(int x, int y) -{ - if (tab_amoeba[Cave[x][y-1]] || - tab_amoeba[Cave[x+1][y]] || - tab_amoeba[Cave[x][y+1]] || - tab_amoeba[Cave[x-1][y]]) - { - Lboom_bug(x, y); - - return; - } - - Lbug_n(x, y); -} - -static void Lbug_e(int x, int y) -{ - switch (Cave[x+1][y]) - { - 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[x][y] = Ybug_eB; - if (Cave[x+2][y-1] == Xblank) - Cave[x+2][y-1] = Xacid_splash_e; - if (Cave[x][y-1] == Xblank) - Cave[x][y-1] = Xacid_splash_w; - Next[x][y] = Xblank; - play_element_sound(x, y, SOUND_acid, Xacid_1); - return; - - case Xblank: - case Xacid_splash_e: - case Xacid_splash_w: - case Xplant: - case Yplant: - case Zplayer: - Cave[x][y] = Ybug_eB; - Cave[x+1][y] = Ybug_e; - Next[x][y] = Xblank; - Next[x+1][y] = Xbug_1_e; - play_element_sound(x, y, SOUND_bug, Xbug_1_e); - return; - - default: - Cave[x][y] = Ybug_e_n; - Next[x][y] = Xbug_2_n; - play_element_sound(x, y, SOUND_bug, Xbug_1_e); - return; - } -} - -static void Lbug_1_e(int x, int y) -{ - if (tab_amoeba[Cave[x][y-1]] || - tab_amoeba[Cave[x+1][y]] || - tab_amoeba[Cave[x][y+1]] || - tab_amoeba[Cave[x-1][y]]) - { - Lboom_bug(x, y); - - return; - } - - switch (Cave[x][y+1]) - { - case Xblank: - case Xacid_splash_e: - case Xacid_splash_w: - 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[x][y] = Ybug_e_s; - Next[x][y] = Xbug_2_s; - play_element_sound(x, y, SOUND_bug, Xbug_1_e); - return; - - default: - Lbug_e(x, y); - return; - } -} - -static void Lbug_2_e(int x, int y) -{ - if (tab_amoeba[Cave[x][y-1]] || - tab_amoeba[Cave[x+1][y]] || - tab_amoeba[Cave[x][y+1]] || - tab_amoeba[Cave[x-1][y]]) - { - Lboom_bug(x, y); - - return; - } - - Lbug_e(x, y); -} - -static void Lbug_s(int x, int y) -{ - switch (Cave[x][y+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[x][y] = Ybug_sB; - if (Cave[x+1][y] == Xblank) - Cave[x+1][y] = Xacid_splash_e; - if (Cave[x-1][y] == Xblank) - Cave[x-1][y] = Xacid_splash_w; - Next[x][y] = Xblank; - play_element_sound(x, y, SOUND_acid, Xacid_1); - return; - - case Xblank: - case Xacid_splash_e: - case Xacid_splash_w: - case Xplant: - case Yplant: - case Zplayer: - Cave[x][y] = Ybug_sB; - Cave[x][y+1] = Ybug_s; - Next[x][y] = Xblank; - Next[x][y+1] = Xbug_1_s; - play_element_sound(x, y, SOUND_bug, Xbug_1_s); - return; - - default: - Cave[x][y] = Ybug_s_e; - Next[x][y] = Xbug_2_e; - play_element_sound(x, y, SOUND_bug, Xbug_1_s); - return; - } -} - -static void Lbug_1_s(int x, int y) -{ - if (tab_amoeba[Cave[x][y-1]] || - tab_amoeba[Cave[x+1][y]] || - tab_amoeba[Cave[x][y+1]] || - tab_amoeba[Cave[x-1][y]]) - { - Lboom_bug(x, y); - - return; - } - - switch (Cave[x-1][y]) - { - case Xblank: - case Xacid_splash_e: - case Xacid_splash_w: - 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[x][y] = Ybug_s_w; - Next[x][y] = Xbug_2_w; - play_element_sound(x, y, SOUND_bug, Xbug_1_s); - return; - - default: - Lbug_s(x, y); - return; - } -} - -static void Lbug_2_s(int x, int y) -{ - if (tab_amoeba[Cave[x][y-1]] || - tab_amoeba[Cave[x+1][y]] || - tab_amoeba[Cave[x][y+1]] || - tab_amoeba[Cave[x-1][y]]) - { - Lboom_bug(x, y); - - return; - } - - Lbug_s(x, y); -} - -static void Lbug_w(int x, int y) -{ - switch (Cave[x-1][y]) - { - 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[x][y] = Ybug_wB; - if (Cave[x][y-1] == Xblank) - Cave[x][y-1] = Xacid_splash_e; - if (Cave[x-2][y-1] == Xblank) - Cave[x-2][y-1] = Xacid_splash_w; - Next[x][y] = Xblank; - play_element_sound(x, y, SOUND_acid, Xacid_1); - return; - - case Xblank: - case Xacid_splash_e: - case Xacid_splash_w: - case Xplant: - case Yplant: - case Zplayer: - Cave[x][y] = Ybug_wB; - Cave[x-1][y] = Ybug_w; - Next[x][y] = Xblank; - Next[x-1][y] = Xbug_1_w; - play_element_sound(x, y, SOUND_bug, Xbug_1_w); - return; - - default: - Cave[x][y] = Ybug_w_s; - Next[x][y] = Xbug_2_s; - play_element_sound(x, y, SOUND_bug, Xbug_1_w); - return; - } -} - -static void Lbug_1_w(int x, int y) -{ - if (tab_amoeba[Cave[x][y-1]] || - tab_amoeba[Cave[x+1][y]] || - tab_amoeba[Cave[x][y+1]] || - tab_amoeba[Cave[x-1][y]]) - { - Lboom_bug(x, y); - - return; - } - - switch (Cave[x][y-1]) - { - case Xblank: - case Xacid_splash_e: - case Xacid_splash_w: - 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[x][y] = Ybug_w_n; - Next[x][y] = Xbug_2_n; - play_element_sound(x, y, SOUND_bug, Xbug_1_w); - return; - - default: - Lbug_w(x, y); - return; - } -} - -static void Lbug_2_w(int x, int y) -{ - if (tab_amoeba[Cave[x][y-1]] || - tab_amoeba[Cave[x+1][y]] || - tab_amoeba[Cave[x][y+1]] || - tab_amoeba[Cave[x-1][y]]) - { - Lboom_bug(x, y); - - return; - } - - Lbug_w(x, y); -} - -static void Ltank_n(int x, int y) -{ - switch (Cave[x][y-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[x][y] = Ytank_nB; - if (Cave[x+1][y-2] == Xblank) - Cave[x+1][y-2] = Xacid_splash_e; - if (Cave[x-1][y-2] == Xblank) - Cave[x-1][y-2] = Xacid_splash_w; - Next[x][y] = Xblank; - play_element_sound(x, y, SOUND_acid, Xacid_1); - return; - - case Xblank: - case Xacid_splash_e: - case Xacid_splash_w: - case Xplant: - case Yplant: - case Zplayer: - Cave[x][y] = Ytank_nB; - Cave[x][y-1] = Ytank_n; - Next[x][y] = Xblank; - Next[x][y-1] = Xtank_1_n; - play_element_sound(x, y, SOUND_tank, Xtank_1_n); - return; - - default: - Cave[x][y] = Ytank_n_e; - Next[x][y] = Xtank_2_e; - play_element_sound(x, y, SOUND_tank, Xtank_1_n); - return; - } -} - -static void Ltank_1_n(int x, int y) -{ - if (tab_amoeba[Cave[x][y-1]] || - tab_amoeba[Cave[x+1][y]] || - tab_amoeba[Cave[x][y+1]] || - tab_amoeba[Cave[x-1][y]]) - { - Lboom_tank(x, y); - - return; - } - - switch (Cave[x-1][y]) - { - case Xblank: - case Xacid_splash_e: - case Xacid_splash_w: - 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[x][y] = Ytank_n_w; - Next[x][y] = Xtank_2_w; - play_element_sound(x, y, SOUND_tank, Xtank_1_n); - return; - - default: - Ltank_n(x, y); - return; - } -} - -static void Ltank_2_n(int x, int y) -{ - if (tab_amoeba[Cave[x][y-1]] || - tab_amoeba[Cave[x+1][y]] || - tab_amoeba[Cave[x][y+1]] || - tab_amoeba[Cave[x-1][y]]) - { - Lboom_tank(x, y); - - return; - } - - Ltank_n(x, y); -} - -static void Ltank_e(int x, int y) -{ - switch (Cave[x+1][y]) - { - 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[x][y] = Ytank_eB; - if (Cave[x+2][y-1] == Xblank) - Cave[x+2][y-1] = Xacid_splash_e; - if (Cave[x][y-1] == Xblank) - Cave[x][y-1] = Xacid_splash_w; - Next[x][y] = Xblank; - play_element_sound(x, y, SOUND_acid, Xacid_1); - return; - - case Xblank: - case Xacid_splash_e: - case Xacid_splash_w: - case Xplant: - case Yplant: - case Zplayer: - Cave[x][y] = Ytank_eB; - Cave[x+1][y] = Ytank_e; - Next[x][y] = Xblank; - Next[x+1][y] = Xtank_1_e; - play_element_sound(x, y, SOUND_tank, Xtank_1_e); - return; - - default: - Cave[x][y] = Ytank_e_s; - Next[x][y] = Xtank_2_s; - play_element_sound(x, y, SOUND_tank, Xtank_1_e); - return; - } -} - -static void Ltank_1_e(int x, int y) -{ - if (tab_amoeba[Cave[x][y-1]] || - tab_amoeba[Cave[x+1][y]] || - tab_amoeba[Cave[x][y+1]] || - tab_amoeba[Cave[x-1][y]]) - { - Lboom_tank(x, y); - - return; - } - - switch (Cave[x][y-1]) - { - case Xblank: - case Xacid_splash_e: - case Xacid_splash_w: - 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[x][y] = Ytank_e_n; - Next[x][y] = Xtank_2_n; - play_element_sound(x, y, SOUND_tank, Xtank_1_e); - return; - - default: - Ltank_e(x, y); - return; - } -} - -static void Ltank_2_e(int x, int y) -{ - if (tab_amoeba[Cave[x][y-1]] || - tab_amoeba[Cave[x+1][y]] || - tab_amoeba[Cave[x][y+1]] || - tab_amoeba[Cave[x-1][y]]) - { - Lboom_tank(x, y); - - return; - } - - Ltank_e(x, y); -} - -static void Ltank_s(int x, int y) -{ - switch (Cave[x][y+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[x][y] = Ytank_sB; - if (Cave[x+1][y] == Xblank) - Cave[x+1][y] = Xacid_splash_e; - if (Cave[x-1][y] == Xblank) - Cave[x-1][y] = Xacid_splash_w; - Next[x][y] = Xblank; - play_element_sound(x, y, SOUND_acid, Xacid_1); - return; - - case Xblank: - case Xacid_splash_e: - case Xacid_splash_w: - case Xplant: - case Yplant: - case Zplayer: - Cave[x][y] = Ytank_sB; - Cave[x][y+1] = Ytank_s; - Next[x][y] = Xblank; - Next[x][y+1] = Xtank_1_s; - play_element_sound(x, y, SOUND_tank, Xtank_1_s); - return; - - default: - Cave[x][y] = Ytank_s_w; - Next[x][y] = Xtank_2_w; - play_element_sound(x, y, SOUND_tank, Xtank_1_s); - return; - } -} - -static void Ltank_1_s(int x, int y) -{ - if (tab_amoeba[Cave[x][y-1]] || - tab_amoeba[Cave[x+1][y]] || - tab_amoeba[Cave[x][y+1]] || - tab_amoeba[Cave[x-1][y]]) - { - Lboom_tank(x, y); - - return; - } - - switch (Cave[x+1][y]) - { - case Xblank: - case Xacid_splash_e: - case Xacid_splash_w: - 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[x][y] = Ytank_s_e; - Next[x][y] = Xtank_2_e; - play_element_sound(x, y, SOUND_tank, Xtank_1_s); - return; - - default: - Ltank_s(x, y); - return; - } -} - -static void Ltank_2_s(int x, int y) -{ - if (tab_amoeba[Cave[x][y-1]] || - tab_amoeba[Cave[x+1][y]] || - tab_amoeba[Cave[x][y+1]] || - tab_amoeba[Cave[x-1][y]]) - { - Lboom_tank(x, y); - - return; - } - - Ltank_s(x, y); -} - -static void Ltank_w(int x, int y) -{ - switch (Cave[x-1][y]) - { - 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[x][y] = Ytank_wB; - if (Cave[x][y-1] == Xblank) - Cave[x][y-1] = Xacid_splash_e; - if (Cave[x-2][y-1] == Xblank) - Cave[x-2][y-1] = Xacid_splash_w; - Next[x][y] = Xblank; - play_element_sound(x, y, SOUND_acid, Xacid_1); - return; - - case Xblank: - case Xacid_splash_e: - case Xacid_splash_w: - case Xplant: - case Yplant: - case Zplayer: - Cave[x][y] = Ytank_wB; - Cave[x-1][y] = Ytank_w; - Next[x][y] = Xblank; - Next[x-1][y] = Xtank_1_w; - play_element_sound(x, y, SOUND_tank, Xtank_1_w); - return; - - default: - Cave[x][y] = Ytank_w_n; - Next[x][y] = Xtank_2_n; - play_element_sound(x, y, SOUND_tank, Xtank_1_w); - return; - } -} - -static void Ltank_1_w(int x, int y) -{ - if (tab_amoeba[Cave[x][y-1]] || - tab_amoeba[Cave[x+1][y]] || - tab_amoeba[Cave[x][y+1]] || - tab_amoeba[Cave[x-1][y]]) - { - Lboom_tank(x, y); - - return; - } - - switch (Cave[x][y+1]) - { - case Xblank: - case Xacid_splash_e: - case Xacid_splash_w: - 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[x][y] = Ytank_w_s; - Next[x][y] = Xtank_2_s; - play_element_sound(x, y, SOUND_tank, Xtank_1_w); - return; - - default: - Ltank_w(x, y); - return; - } -} - -static void Ltank_2_w(int x, int y) -{ - if (tab_amoeba[Cave[x][y-1]] || - tab_amoeba[Cave[x+1][y]] || - tab_amoeba[Cave[x][y+1]] || - tab_amoeba[Cave[x-1][y]]) - { - Lboom_tank(x, y); - - return; - } - - Ltank_w(x, y); -} - -static void Lemerald(int x, int y) -{ - switch (Cave[x][y+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[x][y] = Yemerald_sB; - if (Cave[x+1][y] == Xblank) - Cave[x+1][y] = Xacid_splash_e; - if (Cave[x-1][y] == Xblank) - Cave[x-1][y] = Xacid_splash_w; - Next[x][y] = Xblank; - play_element_sound(x, y, SOUND_acid, Xacid_1); - return; - - case Xblank: - case Xacid_splash_e: - case Xacid_splash_w: - Cave[x][y] = Yemerald_sB; - Cave[x][y+1] = Yemerald_s; - Next[x][y] = Xblank; - Next[x][y+1] = Xemerald_fall; - return; - - 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 Xslidewall_ns: - case Xslidewall_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 Xroundwall_1: - case Xroundwall_2: - case Xroundwall_3: - case Xroundwall_4: - if (RANDOM(2)) - { - if (tab_blank[Cave[x+1][y]] && tab_acid[Cave[x+1][y+1]]) - { - Cave[x][y] = Yemerald_eB; - Cave[x+1][y] = Yemerald_e; - Next[x][y] = Xblank; - Next[x+1][y] = Xemerald_pause; - return; - } - - if (tab_blank[Cave[x-1][y]] && tab_acid[Cave[x-1][y+1]]) - { - Cave[x][y] = Yemerald_wB; - Cave[x-1][y] = Yemerald_w; - Next[x][y] = Xblank; - Next[x-1][y] = Xemerald_pause; - return; - } - } - else - { - if (tab_blank[Cave[x-1][y]] && tab_acid[Cave[x-1][y+1]]) - { - Cave[x][y] = Yemerald_wB; - Cave[x-1][y] = Yemerald_w; - Next[x][y] = Xblank; - Next[x-1][y] = Xemerald_pause; - return; - } - - if (tab_blank[Cave[x+1][y]] && tab_acid[Cave[x+1][y+1]]) - { - Cave[x][y] = Yemerald_eB; - Cave[x+1][y] = Yemerald_e; - Next[x][y] = Xblank; - Next[x+1][y] = Xemerald_pause; - return; - } - } - - default: - if (++lev.shine_cnt > 50) - { - lev.shine_cnt = RANDOM(8); - Cave[x][y] = Xemerald_shine; - } - - return; - } -} - -static void Lemerald_pause(int x, int y) -{ - switch (Cave[x][y+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[x][y] = Yemerald_sB; - if (Cave[x+1][y] == Xblank) - Cave[x+1][y] = Xacid_splash_e; - if (Cave[x-1][y] == Xblank) - Cave[x-1][y] = Xacid_splash_w; - Next[x][y] = Xblank; - play_element_sound(x, y, SOUND_acid, Xacid_1); - return; - - case Xblank: - case Xacid_splash_e: - case Xacid_splash_w: - Cave[x][y] = Yemerald_sB; - Cave[x][y+1] = Yemerald_s; - Next[x][y] = Xblank; - Next[x][y+1] = Xemerald_fall; - return; - - default: - Cave[x][y] = Xemerald; - Next[x][y] = Xemerald; - return; - } -} - -static void Lemerald_fall(int x, int y) -{ - switch (Cave[x][y+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[x][y] = Yemerald_sB; - if (Cave[x+1][y] == Xblank) - Cave[x+1][y] = Xacid_splash_e; - if (Cave[x-1][y] == Xblank) - Cave[x-1][y] = Xacid_splash_w; - Next[x][y] = Xblank; - play_element_sound(x, y, SOUND_acid, Xacid_1); - return; - - case Xblank: - case Xacid_splash_e: - case Xacid_splash_w: - case Zplayer: - Cave[x][y] = Yemerald_sB; - Cave[x][y+1] = Yemerald_s; - Next[x][y] = Xblank; - Next[x][y+1] = Xemerald_fall; - return; - - case Xwonderwall: - if (lev.wonderwall_time) - { - lev.wonderwall_state = 1; - Cave[x][y] = Yemerald_sB; - if (tab_blank[Cave[x][y+2]]) - { - Cave[x][y+2] = Ydiamond_s; - Next[x][y+2] = Xdiamond_fall; - } - - Next[x][y] = Xblank; - play_element_sound(x, y, SOUND_wonderfall, Xwonderwall); - return; - } - - default: - Cave[x][y] = Xemerald; - Next[x][y] = Xemerald; - play_element_sound(x, y, SOUND_diamond, Xemerald); - return; - } -} - -static void Ldiamond(int x, int y) -{ - switch (Cave[x][y+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[x][y] = Ydiamond_sB; - if (Cave[x+1][y] == Xblank) - Cave[x+1][y] = Xacid_splash_e; - if (Cave[x-1][y] == Xblank) - Cave[x-1][y] = Xacid_splash_w; - Next[x][y] = Xblank; - play_element_sound(x, y, SOUND_acid, Xacid_1); - return; - - case Xblank: - case Xacid_splash_e: - case Xacid_splash_w: - Cave[x][y] = Ydiamond_sB; - Cave[x][y+1] = Ydiamond_s; - Next[x][y] = Xblank; - Next[x][y+1] = Xdiamond_fall; - return; - - 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 Xslidewall_ns: - case Xslidewall_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 Xroundwall_1: - case Xroundwall_2: - case Xroundwall_3: - case Xroundwall_4: - if (RANDOM(2)) - { - if (tab_blank[Cave[x+1][y]] && tab_acid[Cave[x+1][y+1]]) - { - Cave[x][y] = Ydiamond_eB; - Cave[x+1][y] = Ydiamond_e; - Next[x][y] = Xblank; - Next[x+1][y] = Xdiamond_pause; - return; - } - - if (tab_blank[Cave[x-1][y]] && tab_acid[Cave[x-1][y+1]]) - { - Cave[x][y] = Ydiamond_wB; - Cave[x-1][y] = Ydiamond_w; - Next[x][y] = Xblank; - Next[x-1][y] = Xdiamond_pause; - return; - } - } - else - { - if (tab_blank[Cave[x-1][y]] && tab_acid[Cave[x-1][y+1]]) - { - Cave[x][y] = Ydiamond_wB; - Cave[x-1][y] = Ydiamond_w; - Next[x][y] = Xblank; - Next[x-1][y] = Xdiamond_pause; - return; - } - - if (tab_blank[Cave[x+1][y]] && tab_acid[Cave[x+1][y+1]]) - { - Cave[x][y] = Ydiamond_eB; - Cave[x+1][y] = Ydiamond_e; - Next[x][y] = Xblank; - Next[x+1][y] = Xdiamond_pause; - return; - } - } - - default: - if (++lev.shine_cnt > 50) - { - lev.shine_cnt = RANDOM(8); - Cave[x][y] = Xdiamond_shine; - } - - return; - } -} - -static void Ldiamond_pause(int x, int y) -{ - switch (Cave[x][y+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[x][y] = Ydiamond_sB; - if (Cave[x+1][y] == Xblank) - Cave[x+1][y] = Xacid_splash_e; - if (Cave[x-1][y] == Xblank) - Cave[x-1][y] = Xacid_splash_w; - Next[x][y] = Xblank; - play_element_sound(x, y, SOUND_acid, Xacid_1); - return; - - case Xblank: - case Xacid_splash_e: - case Xacid_splash_w: - Cave[x][y] = Ydiamond_sB; - Cave[x][y+1] = Ydiamond_s; - Next[x][y] = Xblank; - Next[x][y+1] = Xdiamond_fall; - return; - - default: - Cave[x][y] = Xdiamond; - Next[x][y] = Xdiamond; - return; - } -} - -static void Ldiamond_fall(int x, int y) -{ - switch (Cave[x][y+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[x][y] = Ydiamond_sB; - if (Cave[x+1][y] == Xblank) - Cave[x+1][y] = Xacid_splash_e; - if (Cave[x-1][y] == Xblank) - Cave[x-1][y] = Xacid_splash_w; - Next[x][y] = Xblank; - play_element_sound(x, y, SOUND_acid, Xacid_1); - return; - - case Xblank: - case Xacid_splash_e: - case Xacid_splash_w: - case Zplayer: - Cave[x][y] = Ydiamond_sB; - Cave[x][y+1] = Ydiamond_s; - Next[x][y] = Xblank; - Next[x][y+1] = Xdiamond_fall; - return; - - case Xwonderwall: - if (lev.wonderwall_time) - { - lev.wonderwall_state = 1; - Cave[x][y] = Ydiamond_sB; - if (tab_blank[Cave[x][y+2]]) - { - Cave[x][y+2] = Ystone_s; - Next[x][y+2] = Xstone_fall; - } - - Next[x][y] = Xblank; - play_element_sound(x, y, SOUND_wonderfall, Xwonderwall); - return; - } - - default: - Cave[x][y] = Xdiamond; - Next[x][y] = Xdiamond; - play_element_sound(x, y, SOUND_diamond, Xdiamond); - return; - } -} - -static void Lstone(int x, int y) -{ - switch (Cave[x][y+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[x][y] = Ystone_sB; - if (Cave[x+1][y] == Xblank) - Cave[x+1][y] = Xacid_splash_e; - if (Cave[x-1][y] == Xblank) - Cave[x-1][y] = Xacid_splash_w; - Next[x][y] = Xblank; - play_element_sound(x, y, SOUND_acid, Xacid_1); - return; - - case Xblank: - case Xacid_splash_e: - case Xacid_splash_w: - case Xplant: - case Yplant: -#ifdef EM_ENGINE_USE_ADDITIONAL_ELEMENTS - case Xfake_acid_1: - case Xfake_acid_2: - case Xfake_acid_3: - case Xfake_acid_4: - case Xfake_acid_5: - case Xfake_acid_6: - case Xfake_acid_7: - case Xfake_acid_8: -#endif - Cave[x][y] = Ystone_sB; - Cave[x][y+1] = Ystone_s; - Next[x][y] = Xblank; - Next[x][y+1] = Xstone_fall; - return; - - case Xsand: - Cave[x][y] = Xsand_stonein_1; - Cave[x][y+1] = Xsand_sandstone_1; - Next[x][y] = Xsand_stonein_2; - Next[x][y+1] = Xsand_sandstone_2; - return; - - 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 Xslidewall_ns: - case Xslidewall_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 Xroundwall_1: - case Xroundwall_2: - case Xroundwall_3: - case Xroundwall_4: - if (RANDOM(2)) - { - if (tab_blank[Cave[x+1][y]] && tab_acid[Cave[x+1][y+1]]) - { - Cave[x][y] = Ystone_eB; - Cave[x+1][y] = Ystone_e; - Next[x][y] = Xblank; - Next[x+1][y] = Xstone_pause; - return; - } - - if (tab_blank[Cave[x-1][y]] && tab_acid[Cave[x-1][y+1]]) - { - Cave[x][y] = Ystone_wB; - Cave[x-1][y] = Ystone_w; - Next[x][y] = Xblank; - Next[x-1][y] = Xstone_pause; - return; - } - } - else - { - if (tab_blank[Cave[x-1][y]] && tab_acid[Cave[x-1][y+1]]) - { - Cave[x][y] = Ystone_wB; - Cave[x-1][y] = Ystone_w; - Next[x][y] = Xblank; - Next[x-1][y] = Xstone_pause; - return; - } - - if (tab_blank[Cave[x+1][y]] && tab_acid[Cave[x+1][y+1]]) - { - Cave[x][y] = Ystone_eB; - Cave[x+1][y] = Ystone_e; - Next[x][y] = Xblank; - Next[x+1][y] = Xstone_pause; - return; - } - } - } -} - -static void Lstone_pause(int x, int y) -{ - switch (Cave[x][y+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[x][y] = Ystone_sB; - if (Cave[x+1][y] == Xblank) - Cave[x+1][y] = Xacid_splash_e; - if (Cave[x-1][y] == Xblank) - Cave[x-1][y] = Xacid_splash_w; - Next[x][y] = Xblank; - play_element_sound(x, y, SOUND_acid, Xacid_1); - return; - - case Xblank: - case Xacid_splash_e: - case Xacid_splash_w: -#ifdef EM_ENGINE_USE_ADDITIONAL_ELEMENTS - case Xfake_acid_1: - case Xfake_acid_2: - case Xfake_acid_3: - case Xfake_acid_4: - case Xfake_acid_5: - case Xfake_acid_6: - case Xfake_acid_7: - case Xfake_acid_8: -#endif - Cave[x][y] = Ystone_sB; - Cave[x][y+1] = Ystone_s; - Next[x][y] = Xblank; - Next[x][y+1] = Xstone_fall; - return; - - default: - Cave[x][y] = Xstone; - Next[x][y] = Xstone; - return; - } -} - -static void Lstone_fall(int x, int y) -{ - switch (Cave[x][y+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[x][y] = Ystone_sB; - if (Cave[x+1][y] == Xblank) - Cave[x+1][y] = Xacid_splash_e; - if (Cave[x-1][y] == Xblank) - Cave[x-1][y] = Xacid_splash_w; - Next[x][y] = Xblank; - play_element_sound(x, y, SOUND_acid, Xacid_1); - return; - - case Xblank: - case Xacid_splash_e: - case Xacid_splash_w: - case Zplayer: -#ifdef EM_ENGINE_USE_ADDITIONAL_ELEMENTS - case Xfake_acid_1: - case Xfake_acid_2: - case Xfake_acid_3: - case Xfake_acid_4: - case Xfake_acid_5: - case Xfake_acid_6: - case Xfake_acid_7: - case Xfake_acid_8: -#endif - Cave[x][y] = Ystone_sB; - Cave[x][y+1] = Ystone_s; - Next[x][y] = Xblank; - Next[x][y+1] = Xstone_fall; - return; - - case Xnut: - case Xnut_pause: - Cave[x][y+1] = Ynut_stone; - Next[x][y] = Xstone; - Next[x][y+1] = Xemerald; - play_element_sound(x, y, SOUND_crack, Xnut); - score += lev.nut_score; - return; - - case Xbug_1_n: - case Xbug_1_e: - case Xbug_1_s: - case Xbug_1_w: - case Xbug_2_n: - case Xbug_2_e: - case Xbug_2_s: - case Xbug_2_w: - Cave[x][y] = Ystone_sB; - Cave[x][y+1] = Ybug_stone; - Next[x][y+1] = Znormal; - Boom[x-1][y] = Xemerald; - Boom[x][y] = Xemerald; - Boom[x+1][y] = Xemerald; - Boom[x-1][y+1] = Xemerald; - Boom[x][y+1] = Xdiamond; - Boom[x+1][y+1] = Xemerald; - Boom[x-1][y+2] = Xemerald; - Boom[x][y+2] = Xemerald; - Boom[x+1][y+2] = Xemerald; -#if PLAY_ELEMENT_SOUND - play_element_sound(x, y, SOUND_boom, Xstone_fall); -#endif - score += lev.bug_score; - return; - - case Xtank_1_n: - case Xtank_1_e: - case Xtank_1_s: - case Xtank_1_w: - case Xtank_2_n: - case Xtank_2_e: - case Xtank_2_s: - case Xtank_2_w: - Cave[x][y] = Ystone_sB; - Cave[x][y+1] = Ytank_stone; - Next[x][y+1] = Znormal; - Boom[x-1][y] = Xblank; - Boom[x][y] = Xblank; - Boom[x+1][y] = Xblank; - Boom[x-1][y+1] = Xblank; - Boom[x][y+1] = Xblank; - Boom[x+1][y+1] = Xblank; - Boom[x-1][y+2] = Xblank; - Boom[x][y+2] = Xblank; - Boom[x+1][y+2] = Xblank; -#if PLAY_ELEMENT_SOUND - play_element_sound(x, y, SOUND_boom, Xstone_fall); -#endif - score += lev.tank_score; - return; - - case Xspring: - if (RANDOM(2)) - { - switch (Cave[x+1][y+1]) - { - case Xblank: - case Xacid_splash_e: - case Xacid_splash_w: - case Xalien: - case Xalien_pause: - Cave[x][y+1] = Xspring_e; - break; - - default: - Cave[x][y+1] = Xspring_w; - break; - } - } - else - { - switch (Cave[x-1][y+1]) - { - case Xblank: - case Xacid_splash_e: - case Xacid_splash_w: - case Xalien: - case Xalien_pause: - Cave[x][y+1] = Xspring_w; - break; - default: - Cave[x][y+1] = Xspring_e; - break; - } - } - - Next[x][y] = Xstone; - return; - - case Xeater_n: - case Xeater_e: - case Xeater_s: - case Xeater_w: - Cave[x][y] = Ystone_sB; - Cave[x][y+1] = Yeater_stone; - Next[x][y+1] = Znormal; - Boom[x-1][y] = lev.eater_array[lev.eater_pos][0]; - Boom[x][y] = lev.eater_array[lev.eater_pos][1]; - Boom[x+1][y] = lev.eater_array[lev.eater_pos][2]; - Boom[x-1][y+1] = lev.eater_array[lev.eater_pos][3]; - Boom[x][y+1] = lev.eater_array[lev.eater_pos][4]; - Boom[x+1][y+1] = lev.eater_array[lev.eater_pos][5]; - Boom[x-1][y+2] = lev.eater_array[lev.eater_pos][6]; - Boom[x][y+2] = lev.eater_array[lev.eater_pos][7]; - Boom[x+1][y+2] = lev.eater_array[lev.eater_pos][8]; -#if PLAY_ELEMENT_SOUND - play_element_sound(x, y, SOUND_boom, Xstone_fall); -#endif - lev.eater_pos = (lev.eater_pos + 1) & 7; - score += lev.eater_score; - return; - - case Xalien: - case Xalien_pause: - Cave[x][y] = Ystone_sB; - Cave[x][y+1] = Yalien_stone; - Next[x][y+1] = Znormal; - Boom[x-1][y] = Xblank; - Boom[x][y] = Xblank; - Boom[x+1][y] = Xblank; - Boom[x-1][y+1] = Xblank; - Boom[x][y+1] = Xblank; - Boom[x+1][y+1] = Xblank; - Boom[x-1][y+2] = Xblank; - Boom[x][y+2] = Xblank; - Boom[x+1][y+2] = Xblank; -#if PLAY_ELEMENT_SOUND - play_element_sound(x, y, SOUND_boom, Xstone_fall); -#endif - score += lev.alien_score; - return; - - case Xdiamond: - case Xdiamond_pause: - switch (Cave[x][y+2]) - { - case Xblank: - case Xacid_splash_e: - case Xacid_splash_w: - case Zplayer: - case Xbug_1_n: - case Xbug_1_e: - case Xbug_1_s: - case Xbug_1_w: - case Xbug_2_n: - case Xbug_2_e: - case Xbug_2_s: - case Xbug_2_w: - case Xtank_1_n: - case Xtank_1_e: - case Xtank_1_s: - case Xtank_1_w: - case Xtank_2_n: - case Xtank_2_e: - case Xtank_2_s: - case Xtank_2_w: - 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[x][y] = Xstone; - play_element_sound(x, y, SOUND_stone, Xstone); - return; - } - - Cave[x][y] = Ystone_sB; - Cave[x][y+1] = Ydiamond_stone; - Next[x][y] = Xblank; - Next[x][y+1] = Xstone_pause; - play_element_sound(x, y, SOUND_squash, Xdiamond); - return; - - case Xbomb: - case Xbomb_pause: - Cave[x][y+1] = Ybomb_blank; - Next[x][y+1] = Znormal; - Boom[x-1][y] = Xblank; - Boom[x][y] = Xblank; - Boom[x+1][y] = Xblank; - Boom[x-1][y+1] = Xblank; - Boom[x][y+1] = Xblank; - Boom[x+1][y+1] = Xblank; - Boom[x-1][y+2] = Xblank; - Boom[x][y+2] = Xblank; - Boom[x+1][y+2] = Xblank; -#if PLAY_ELEMENT_SOUND - play_element_sound(x, y, SOUND_boom, Xstone_fall); -#endif - return; - - case Xwonderwall: - if (lev.wonderwall_time) - { - lev.wonderwall_state = 1; - Cave[x][y] = Ystone_sB; - - if (tab_blank[Cave[x][y+2]]) - { - Cave[x][y+2] = Yemerald_s; - Next[x][y+2] = Xemerald_fall; - } - - Next[x][y] = Xblank; - play_element_sound(x, y, SOUND_wonderfall, Xwonderwall); - return; - } - - default: - Cave[x][y] = Xstone; - Next[x][y] = Xstone; - play_element_sound(x, y, SOUND_stone, Xstone); - return; - } -} - -static void Lbomb(int x, int y) -{ - switch (Cave[x][y+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[x][y] = Ybomb_sB; - if (Cave[x+1][y] == Xblank) - Cave[x+1][y] = Xacid_splash_e; - if (Cave[x-1][y] == Xblank) - Cave[x-1][y] = Xacid_splash_w; - Next[x][y] = Xblank; - play_element_sound(x, y, SOUND_acid, Xacid_1); - return; - - case Xblank: - case Xacid_splash_e: - case Xacid_splash_w: - Cave[x][y] = Ybomb_sB; - Cave[x][y+1] = Ybomb_s; - Next[x][y] = Xblank; - Next[x][y+1] = Xbomb_fall; - return; - - 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 Xslidewall_ns: - case Xslidewall_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 Xroundwall_1: - case Xroundwall_2: - case Xroundwall_3: - case Xroundwall_4: - if (RANDOM(2)) - { - if (tab_blank[Cave[x+1][y]] && tab_acid[Cave[x+1][y+1]]) - { - Cave[x][y] = Ybomb_eB; - Cave[x+1][y] = Ybomb_e; - Next[x][y] = Xblank; - Next[x+1][y] = Xbomb_pause; - return; - } - - if (tab_blank[Cave[x-1][y]] && tab_acid[Cave[x-1][y+1]]) - { - Cave[x][y] = Ybomb_wB; - Cave[x-1][y] = Ybomb_w; - Next[x][y] = Xblank; - Next[x-1][y] = Xbomb_pause; - return; - } - } - else - { - if (tab_blank[Cave[x-1][y]] && tab_acid[Cave[x-1][y+1]]) - { - Cave[x][y] = Ybomb_wB; - Cave[x-1][y] = Ybomb_w; - Next[x][y] = Xblank; - Next[x-1][y] = Xbomb_pause; - return; - } - - if (tab_blank[Cave[x+1][y]] && tab_acid[Cave[x+1][y+1]]) - { - Cave[x][y] = Ybomb_eB; - Cave[x+1][y] = Ybomb_e; - Next[x][y] = Xblank; - Next[x+1][y] = Xbomb_pause; - return; - } - } - } -} - -static void Lbomb_pause(int x, int y) -{ - switch (Cave[x][y+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[x][y] = Ybomb_sB; - if (Cave[x+1][y] == Xblank) - Cave[x+1][y] = Xacid_splash_e; - if (Cave[x-1][y] == Xblank) - Cave[x-1][y] = Xacid_splash_w; - Next[x][y] = Xblank; - play_element_sound(x, y, SOUND_acid, Xacid_1); - return; - - case Xblank: - case Xacid_splash_e: - case Xacid_splash_w: - Cave[x][y] = Ybomb_sB; - Cave[x][y+1] = Ybomb_s; - Next[x][y] = Xblank; - Next[x][y+1] = Xbomb_fall; - return; - - default: - Cave[x][y] = Xbomb; - Next[x][y] = Xbomb; - return; - } -} - -static void Lbomb_fall(int x, int y) -{ - switch (Cave[x][y+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[x][y] = Ybomb_sB; - if (Cave[x+1][y] == Xblank) - Cave[x+1][y] = Xacid_splash_e; - if (Cave[x-1][y] == Xblank) - Cave[x-1][y] = Xacid_splash_w; - Next[x][y] = Xblank; - play_element_sound(x, y, SOUND_acid, Xacid_1); - return; - - case Xblank: - case Xacid_splash_e: - case Xacid_splash_w: - Cave[x][y] = Ybomb_sB; - Cave[x][y+1] = Ybomb_s; - Next[x][y] = Xblank; - Next[x][y+1] = Xbomb_fall; - return; - - default: - Cave[x][y] = Ybomb_blank; - Next[x][y] = Znormal; - Boom[x-1][y-1] = Xblank; - Boom[x][y-1] = Xblank; - Boom[x+1][y-1] = Xblank; - Boom[x-1][y] = Xblank; - Boom[x][y] = Xblank; - Boom[x+1][y] = Xblank; - Boom[x-1][y+1] = Xblank; - Boom[x][y+1] = Xblank; - Boom[x+1][y+1] = Xblank; -#if PLAY_ELEMENT_SOUND - play_element_sound(x, y, SOUND_boom, Xbomb_fall); -#endif - return; - } -} - -static void Lnut(int x, int y) -{ - switch (Cave[x][y+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[x][y] = Ynut_sB; - if (Cave[x+1][y] == Xblank) - Cave[x+1][y] = Xacid_splash_e; - if (Cave[x-1][y] == Xblank) - Cave[x-1][y] = Xacid_splash_w; - Next[x][y] = Xblank; - play_element_sound(x, y, SOUND_acid, Xacid_1); - return; - - case Xblank: - case Xacid_splash_e: - case Xacid_splash_w: - Cave[x][y] = Ynut_sB; - Cave[x][y+1] = Ynut_s; - Next[x][y] = Xblank; - Next[x][y+1] = Xnut_fall; - return; - - 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 Xslidewall_ns: - case Xslidewall_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 Xroundwall_1: - case Xroundwall_2: - case Xroundwall_3: - case Xroundwall_4: - if (RANDOM(2)) - { - if (tab_blank[Cave[x+1][y]] && tab_acid[Cave[x+1][y+1]]) - { - Cave[x][y] = Ynut_eB; - Cave[x+1][y] = Ynut_e; - Next[x][y] = Xblank; - Next[x+1][y] = Xnut_pause; - return; - } - - if (tab_blank[Cave[x-1][y]] && tab_acid[Cave[x-1][y+1]]) - { - Cave[x][y] = Ynut_wB; - Cave[x-1][y] = Ynut_w; - Next[x][y] = Xblank; - Next[x-1][y] = Xnut_pause; - return; - } - } - else - { - if (tab_blank[Cave[x-1][y]] && tab_acid[Cave[x-1][y+1]]) - { - Cave[x][y] = Ynut_wB; - Cave[x-1][y] = Ynut_w; - Next[x][y] = Xblank; - Next[x-1][y] = Xnut_pause; - return; - } - - if (tab_blank[Cave[x+1][y]] && tab_acid[Cave[x+1][y+1]]) - { - Cave[x][y] = Ynut_eB; - Cave[x+1][y] = Ynut_e; - Next[x][y] = Xblank; - Next[x+1][y] = Xnut_pause; - return; - } - } - } -} - -static void Lnut_pause(int x, int y) -{ - switch (Cave[x][y+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[x][y] = Ynut_sB; - if (Cave[x+1][y] == Xblank) - Cave[x+1][y] = Xacid_splash_e; - if (Cave[x-1][y] == Xblank) - Cave[x-1][y] = Xacid_splash_w; - Next[x][y] = Xblank; - play_element_sound(x, y, SOUND_acid, Xacid_1); - return; - - case Xblank: - case Xacid_splash_e: - case Xacid_splash_w: - Cave[x][y] = Ynut_sB; - Cave[x][y+1] = Ynut_s; - Next[x][y] = Xblank; - Next[x][y+1] = Xnut_fall; - return; - - default: - Cave[x][y] = Xnut; - Next[x][y] = Xnut; - return; - } -} - -static void Lnut_fall(int x, int y) -{ - switch (Cave[x][y+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[x][y] = Ynut_sB; - if (Cave[x+1][y] == Xblank) - Cave[x+1][y] = Xacid_splash_e; - if (Cave[x-1][y] == Xblank) - Cave[x-1][y] = Xacid_splash_w; - Next[x][y] = Xblank; - play_element_sound(x, y, SOUND_acid, Xacid_1); - return; - - case Xblank: - case Xacid_splash_e: - case Xacid_splash_w: - case Zplayer: - Cave[x][y] = Ynut_sB; - Cave[x][y+1] = Ynut_s; - Next[x][y] = Xblank; - Next[x][y+1] = Xnut_fall; - return; - - default: - Cave[x][y] = Xnut; - Next[x][y] = Xnut; - play_element_sound(x, y, SOUND_nut, Xnut); - return; - } -} - -static void Lspring(int x, int y) -{ - switch (Cave[x][y+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[x][y] = Yspring_sB; - if (Cave[x+1][y] == Xblank) - Cave[x+1][y] = Xacid_splash_e; - if (Cave[x-1][y] == Xblank) - Cave[x-1][y] = Xacid_splash_w; - Next[x][y] = Xblank; - play_element_sound(x, y, SOUND_acid, Xacid_1); - return; - - case Xblank: - case Xacid_splash_e: - case Xacid_splash_w: - case Xplant: - case Yplant: - Cave[x][y] = Yspring_sB; - Cave[x][y+1] = Yspring_s; - Next[x][y] = Xblank; - Next[x][y+1] = Xspring_fall; - return; - - 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 Xslidewall_ns: - case Xslidewall_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 Xroundwall_1: - case Xroundwall_2: - case Xroundwall_3: - case Xroundwall_4: - if (RANDOM(2)) - { - if (tab_blank[Cave[x+1][y]] && tab_acid[Cave[x+1][y+1]]) - { - Cave[x][y] = Yspring_eB; - Cave[x+1][y] = Yspring_e; - if (Cave[x][y+1] == Xbumper) - Cave[x][y+1] = XbumperB; - Next[x][y] = Xblank; - -#ifdef SPRING_ROLL - Next[x+1][y] = Xspring_e; -#else - Next[x+1][y] = Xspring_pause; -#endif - return; - } - - if (tab_blank[Cave[x-1][y]] && tab_acid[Cave[x-1][y+1]]) - { - Cave[x][y] = Yspring_wB; - Cave[x-1][y] = Yspring_w; - if (Cave[x][y+1] == Xbumper) - Cave[x][y+1] = XbumperB; - Next[x][y] = Xblank; - -#ifdef SPRING_ROLL - Next[x-1][y] = Xspring_w; -#else - Next[x-1][y] = Xspring_pause; -#endif - return; - } - } - else - { - if (tab_blank[Cave[x-1][y]] && tab_acid[Cave[x-1][y+1]]) - { - Cave[x][y] = Yspring_wB; - Cave[x-1][y] = Yspring_w; - if (Cave[x][y+1] == Xbumper) - Cave[x][y+1] = XbumperB; - Next[x][y] = Xblank; - -#ifdef SPRING_ROLL - Next[x-1][y] = Xspring_w; -#else - Next[x-1][y] = Xspring_pause; -#endif - return; - } - - if (tab_blank[Cave[x+1][y]] && tab_acid[Cave[x+1][y+1]]) - { - Cave[x][y] = Yspring_eB; - Cave[x+1][y] = Yspring_e; - if (Cave[x][y+1] == Xbumper) - Cave[x][y+1] = XbumperB; - Next[x][y] = Xblank; - -#ifdef SPRING_ROLL - Next[x+1][y] = Xspring_e; -#else - Next[x+1][y] = Xspring_pause; -#endif - return; - } - } - } -} - -static void Lspring_pause(int x, int y) -{ - switch (Cave[x][y+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[x][y] = Yspring_sB; - if (Cave[x+1][y] == Xblank) - Cave[x+1][y] = Xacid_splash_e; - if (Cave[x-1][y] == Xblank) - Cave[x-1][y] = Xacid_splash_w; - Next[x][y] = Xblank; - play_element_sound(x, y, SOUND_acid, Xacid_1); - return; - - case Xblank: - case Xacid_splash_e: - case Xacid_splash_w: - Cave[x][y] = Yspring_sB; - Cave[x][y+1] = Yspring_s; - Next[x][y] = Xblank; - Next[x][y+1] = Xspring_fall; - return; - - default: - Cave[x][y] = Xspring; - Next[x][y] = Xspring; - return; - } -} - -static void Lspring_e(int x, int y) -{ - switch (Cave[x][y+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[x][y] = Yspring_sB; - if (Cave[x+1][y] == Xblank) - Cave[x+1][y] = Xacid_splash_e; - if (Cave[x-1][y] == Xblank) - Cave[x-1][y] = Xacid_splash_w; - Next[x][y] = Xblank; - play_element_sound(x, y, SOUND_acid, Xacid_1); - return; - - case Xblank: - case Xacid_splash_e: - case Xacid_splash_w: - Cave[x][y] = Yspring_sB; - Cave[x][y+1] = Yspring_s; - Next[x][y] = Xblank; - Next[x][y+1] = Xspring_fall; - return; - - case Xbumper: - Cave[x][y+1] = XbumperB; - } - - switch (Cave[x+1][y]) - { - 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[x][y] = Yspring_eB; - if (Cave[x+2][y-1] == Xblank) - Cave[x+2][y-1] = Xacid_splash_e; - if (Cave[x][y-1] == Xblank) - Cave[x][y-1] = Xacid_splash_w; - Next[x][y] = Xblank; - play_element_sound(x, y, SOUND_acid, Xacid_1); - return; - - case Xblank: - case Xacid_splash_e: - case Xacid_splash_w: - case Yalien_nB: - case Yalien_eB: - case Yalien_sB: - case Yalien_wB: - Cave[x][y] = Yspring_eB; - Cave[x+1][y] = Yspring_e; - Next[x][y] = Xblank; - Next[x+1][y] = Xspring_e; - return; - - case Xalien: - case Xalien_pause: - case Yalien_n: - case Yalien_e: - case Yalien_s: - case Yalien_w: - Cave[x][y] = Yspring_alien_eB; - Cave[x+1][y] = Yspring_alien_e; - Next[x][y] = Xblank; - Next[x+1][y] = Xspring_e; - play_element_sound(x, y, SOUND_slurp, Xalien); - score += lev.slurp_score; - return; - - case Xbumper: - case XbumperB: - Cave[x+1][y] = XbumperB; - Next[x][y] = Xspring_w; - play_element_sound(x, y, SOUND_spring, Xspring); - return; - - default: - Cave[x][y] = Xspring; - Next[x][y] = Xspring; - play_element_sound(x, y, SOUND_spring, Xspring); - return; - } -} - -static void Lspring_w(int x, int y) -{ - switch (Cave[x][y+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[x][y] = Yspring_sB; - if (Cave[x+1][y] == Xblank) - Cave[x+1][y] = Xacid_splash_e; - if (Cave[x-1][y] == Xblank) - Cave[x-1][y] = Xacid_splash_w; - Next[x][y] = Xblank; - play_element_sound(x, y, SOUND_acid, Xacid_1); - return; - - case Xblank: - case Xacid_splash_e: - case Xacid_splash_w: - Cave[x][y] = Yspring_sB; - Cave[x][y+1] = Yspring_s; - Next[x][y] = Xblank; - Next[x][y+1] = Xspring_fall; - return; - - case Xbumper: - Cave[x][y+1] = XbumperB; - } - - switch (Cave[x-1][y]) - { - 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[x][y] = Yspring_wB; - if (Cave[x][y-1] == Xblank) - Cave[x][y-1] = Xacid_splash_e; - if (Cave[x-2][y-1] == Xblank) - Cave[x-2][y-1] = Xacid_splash_w; - Next[x][y] = Xblank; - play_element_sound(x, y, SOUND_acid, Xacid_1); - return; - - case Xblank: - case Xacid_splash_e: - case Xacid_splash_w: - case Yalien_nB: - case Yalien_eB: - case Yalien_sB: - case Yalien_wB: - Cave[x][y] = Yspring_wB; - Cave[x-1][y] = Yspring_w; - Next[x][y] = Xblank; - Next[x-1][y] = Xspring_w; - return; - - case Xalien: - case Xalien_pause: - case Yalien_n: - case Yalien_e: - case Yalien_s: - case Yalien_w: - Cave[x][y] = Yspring_alien_wB; - Cave[x-1][y] = Yspring_alien_w; - Next[x][y] = Xblank; - Next[x-1][y] = Xspring_w; - play_element_sound(x, y, SOUND_slurp, Xalien); - score += lev.slurp_score; - return; - - case Xbumper: - case XbumperB: - Cave[x-1][y] = XbumperB; - Next[x][y] = Xspring_e; - play_element_sound(x, y, SOUND_spring, Xspring); - return; - - default: - Cave[x][y] = Xspring; - Next[x][y] = Xspring; - play_element_sound(x, y, SOUND_spring, Xspring); - return; - } -} - -static void Lspring_fall(int x, int y) -{ - switch (Cave[x][y+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[x][y] = Yspring_sB; - if (Cave[x+1][y] == Xblank) - Cave[x+1][y] = Xacid_splash_e; - if (Cave[x-1][y] == Xblank) - Cave[x-1][y] = Xacid_splash_w; - Next[x][y] = Xblank; - play_element_sound(x, y, SOUND_acid, Xacid_1); - return; - - case Xblank: - case Xacid_splash_e: - case Xacid_splash_w: - case Zplayer: - Cave[x][y] = Yspring_sB; - Cave[x][y+1] = Yspring_s; - Next[x][y] = Xblank; - Next[x][y+1] = Xspring_fall; - return; - - case Xbomb: - case Xbomb_pause: - Cave[x][y+1] = Ybomb_blank; - Next[x][y+1] = Znormal; - Boom[x-1][y] = Xblank; - Boom[x][y] = Xblank; - Boom[x+1][y] = Xblank; - Boom[x-1][y+1] = Xblank; - Boom[x][y+1] = Xblank; - Boom[x+1][y+1] = Xblank; - Boom[x-1][y+2] = Xblank; - Boom[x][y+2] = Xblank; - Boom[x+1][y+2] = Xblank; -#if PLAY_ELEMENT_SOUND - play_element_sound(x, y, SOUND_boom, Xspring_fall); -#endif - return; - - case Xbug_1_n: - case Xbug_1_e: - case Xbug_1_s: - case Xbug_1_w: - case Xbug_2_n: - case Xbug_2_e: - case Xbug_2_s: - case Xbug_2_w: - Cave[x][y] = Yspring_sB; - Cave[x][y+1] = Ybug_spring; - Next[x][y+1] = Znormal; - Boom[x-1][y] = Xemerald; - Boom[x][y] = Xemerald; - Boom[x+1][y] = Xemerald; - Boom[x-1][y+1] = Xemerald; - Boom[x][y+1] = Xdiamond; - Boom[x+1][y+1] = Xemerald; - Boom[x-1][y+2] = Xemerald; - Boom[x][y+2] = Xemerald; - Boom[x+1][y+2] = Xemerald; -#if PLAY_ELEMENT_SOUND - play_element_sound(x, y, SOUND_boom, Xspring_fall); -#endif - score += lev.bug_score; - return; - - case Xtank_1_n: - case Xtank_1_e: - case Xtank_1_s: - case Xtank_1_w: - case Xtank_2_n: - case Xtank_2_e: - case Xtank_2_s: - case Xtank_2_w: - Cave[x][y] = Yspring_sB; - Cave[x][y+1] = Ytank_spring; - Next[x][y+1] = Znormal; - Boom[x-1][y] = Xblank; - Boom[x][y] = Xblank; - Boom[x+1][y] = Xblank; - Boom[x-1][y+1] = Xblank; - Boom[x][y+1] = Xblank; - Boom[x+1][y+1] = Xblank; - Boom[x-1][y+2] = Xblank; - Boom[x][y+2] = Xblank; - Boom[x+1][y+2] = Xblank; -#if PLAY_ELEMENT_SOUND - play_element_sound(x, y, SOUND_boom, Xspring_fall); -#endif - score += lev.tank_score; - return; - - case Xeater_n: - case Xeater_e: - case Xeater_s: - case Xeater_w: - Cave[x][y] = Yspring_sB; - Cave[x][y+1] = Yeater_spring; - Next[x][y+1] = Znormal; - Boom[x-1][y] = lev.eater_array[lev.eater_pos][0]; - Boom[x][y] = lev.eater_array[lev.eater_pos][1]; - Boom[x+1][y] = lev.eater_array[lev.eater_pos][2]; - Boom[x-1][y+1] = lev.eater_array[lev.eater_pos][3]; - Boom[x][y+1] = lev.eater_array[lev.eater_pos][4]; - Boom[x+1][y+1] = lev.eater_array[lev.eater_pos][5]; - Boom[x-1][y+2] = lev.eater_array[lev.eater_pos][6]; - Boom[x][y+2] = lev.eater_array[lev.eater_pos][7]; - Boom[x+1][y+2] = lev.eater_array[lev.eater_pos][8]; -#if PLAY_ELEMENT_SOUND - play_element_sound(x, y, SOUND_boom, Xspring_fall); -#endif - lev.eater_pos = (lev.eater_pos + 1) & 7; - score += lev.eater_score; - return; - - case Xalien: - case Xalien_pause: - Cave[x][y] = Yspring_sB; - Cave[x][y+1] = Yalien_spring; - Next[x][y+1] = Znormal; - Boom[x-1][y] = Xblank; - Boom[x][y] = Xblank; - Boom[x+1][y] = Xblank; - Boom[x-1][y+1] = Xblank; - Boom[x][y+1] = Xblank; - Boom[x+1][y+1] = Xblank; - Boom[x-1][y+2] = Xblank; - Boom[x][y+2] = Xblank; - Boom[x+1][y+2] = Xblank; -#if PLAY_ELEMENT_SOUND - play_element_sound(x, y, SOUND_boom, Xspring_fall); -#endif - score += lev.alien_score; - return; - - default: - Cave[x][y] = Xspring; - Next[x][y] = Xspring; - play_element_sound(x, y, SOUND_spring, Xspring); - return; - } -} - -static void Lpush_emerald_e(int x, int y) -{ - switch (Cave[x+1][y]) - { - case Zborder: - case Znormal: - case Zdynamite: - case Xboom_bug: - case Xboom_bomb: - case Xboom_android: - case Xboom_1: - case Zplayer: - Cave[x][y] = Xemerald; - Next[x][y] = Xemerald; - return; - - default: - Cave[x][y] = Yemerald_eB; - Cave[x+1][y] = Yemerald_e; - Next[x][y] = Xblank; - Next[x+1][y] = Xemerald_pause; - return; - } -} - -static void Lpush_emerald_w(int x, int y) -{ - switch (Cave[x-1][y]) - { - case Zborder: - case Znormal: - case Zdynamite: - case Xboom_bug: - case Xboom_bomb: - case Xboom_android: - case Xboom_1: - case Zplayer: - Cave[x][y] = Xemerald; - Next[x][y] = Xemerald; - return; - - default: - Cave[x][y] = Yemerald_wB; - Cave[x-1][y] = Yemerald_w; - Next[x][y] = Xblank; - Next[x-1][y] = Xemerald_pause; - return; - } -} - -static void Lpush_diamond_e(int x, int y) -{ - switch (Cave[x+1][y]) - { - case Zborder: - case Znormal: - case Zdynamite: - case Xboom_bug: - case Xboom_bomb: - case Xboom_android: - case Xboom_1: - case Zplayer: - Cave[x][y] = Xdiamond; - Next[x][y] = Xdiamond; - return; - - default: - Cave[x][y] = Ydiamond_eB; - Cave[x+1][y] = Ydiamond_e; - Next[x][y] = Xblank; - Next[x+1][y] = Xdiamond_pause; - return; - } -} - -static void Lpush_diamond_w(int x, int y) -{ - switch (Cave[x-1][y]) - { - case Zborder: - case Znormal: - case Zdynamite: - case Xboom_bug: - case Xboom_bomb: - case Xboom_android: - case Xboom_1: - case Zplayer: - Cave[x][y] = Xdiamond; - Next[x][y] = Xdiamond; - return; - - default: - Cave[x][y] = Ydiamond_wB; - Cave[x-1][y] = Ydiamond_w; - Next[x][y] = Xblank; - Next[x-1][y] = Xdiamond_pause; - return; - } -} - -static void Lpush_stone_e(int x, int y) -{ - switch (Cave[x+1][y]) - { - case Zborder: - case Znormal: - case Zdynamite: - case Xboom_bug: - case Xboom_bomb: - case Xboom_android: - case Xboom_1: - case Zplayer: - Cave[x][y] = Xstone; - Next[x][y] = Xstone; - return; - - default: - Cave[x][y] = Ystone_eB; - Cave[x+1][y] = Ystone_e; - Next[x][y] = Xblank; - Next[x+1][y] = Xstone_pause; - return; - } -} - -static void Lpush_stone_w(int x, int y) -{ - switch (Cave[x-1][y]) - { - case Zborder: - case Znormal: - case Zdynamite: - case Xboom_bug: - case Xboom_bomb: - case Xboom_android: - case Xboom_1: - case Zplayer: - Cave[x][y] = Xstone; - Next[x][y] = Xstone; - return; - - default: - Cave[x][y] = Ystone_wB; - Cave[x-1][y] = Ystone_w; - Next[x][y] = Xblank; - Next[x-1][y] = Xstone_pause; - return; - } -} - -static void Lpush_bomb_e(int x, int y) -{ - switch (Cave[x+1][y]) - { - case Zborder: - case Znormal: - case Zdynamite: - case Xboom_bug: - case Xboom_bomb: - case Xboom_android: - case Xboom_1: - case Zplayer: - Cave[x][y] = Xbomb; - Next[x][y] = Xbomb; - return; - - default: - Cave[x][y] = Ybomb_eB; - Cave[x+1][y] = Ybomb_e; - Next[x][y] = Xblank; - Next[x+1][y] = Xbomb_pause; - return; - } -} - -static void Lpush_bomb_w(int x, int y) -{ - switch (Cave[x-1][y]) - { - case Zborder: - case Znormal: - case Zdynamite: - case Xboom_bug: - case Xboom_bomb: - case Xboom_android: - case Xboom_1: - case Zplayer: - Cave[x][y] = Xbomb; - Next[x][y] = Xbomb; - return; - - default: - Cave[x][y] = Ybomb_wB; - Cave[x-1][y] = Ybomb_w; - Next[x][y] = Xblank; - Next[x-1][y] = Xbomb_pause; - return; - } -} - -static void Lpush_nut_e(int x, int y) -{ - switch (Cave[x+1][y]) - { - case Zborder: - case Znormal: - case Zdynamite: - case Xboom_bug: - case Xboom_bomb: - case Xboom_android: - case Xboom_1: - case Zplayer: - Cave[x][y] = Xnut; - Next[x][y] = Xnut; - return; - - default: - Cave[x][y] = Ynut_eB; - Cave[x+1][y] = Ynut_e; - Next[x][y] = Xblank; - Next[x+1][y] = Xnut_pause; - return; - } -} - -static void Lpush_nut_w(int x, int y) -{ - switch (Cave[x-1][y]) - { - case Zborder: - case Znormal: - case Zdynamite: - case Xboom_bug: - case Xboom_bomb: - case Xboom_android: - case Xboom_1: - case Zplayer: - Cave[x][y] = Xnut; - Next[x][y] = Xnut; - return; - - default: - Cave[x][y] = Ynut_wB; - Cave[x-1][y] = Ynut_w; - Next[x][y] = Xblank; - Next[x-1][y] = Xnut_pause; - return; - } -} - -static void Lpush_spring_e(int x, int y) -{ - switch (Cave[x+1][y]) - { - case Zborder: - case Znormal: - case Zdynamite: - case Xboom_bug: - case Xboom_bomb: - case Xboom_android: - case Xboom_1: - case Zplayer: - Cave[x][y] = Xspring; - Next[x][y] = Xspring; - return; - - default: - Cave[x][y] = Yspring_eB; - Cave[x+1][y] = Yspring_e; - Next[x][y] = Xblank; - Next[x+1][y] = Xspring_e; - return; - } -} - -static void Lpush_spring_w(int x, int y) -{ - switch (Cave[x-1][y]) - { - case Zborder: - case Znormal: - case Zdynamite: - case Xboom_bug: - case Xboom_bomb: - case Xboom_android: - case Xboom_1: - case Zplayer: - Cave[x][y] = Xspring; - Next[x][y] = Xspring; - return; - - default: - Cave[x][y] = Yspring_wB; - Cave[x-1][y] = Yspring_w; - Next[x][y] = Xblank; - Next[x-1][y] = Xspring_w; - return; - } -} - -static void Ldynamite_1(int x, int y) -{ - play_element_sound(x, y, SOUND_tick, Xdynamite_1); - Next[x][y] = Xdynamite_2; -} - -static void Ldynamite_2(int x, int y) -{ - play_element_sound(x, y, SOUND_tick, Xdynamite_2); - Next[x][y] = Xdynamite_3; -} - -static void Ldynamite_3(int x, int y) -{ - play_element_sound(x, y, SOUND_tick, Xdynamite_3); - Next[x][y] = Xdynamite_4; -} - -static void Ldynamite_4(int x, int y) -{ - play_element_sound(x, y, SOUND_tick, Xdynamite_4); - Next[x][y] = Zdynamite; - Boom[x-1][y-1] = Xblank; - Boom[x][y-1] = Xblank; - Boom[x+1][y-1] = Xblank; - Boom[x-1][y] = Xblank; - Boom[x][y] = Xblank; - Boom[x+1][y] = Xblank; - Boom[x-1][y+1] = Xblank; - Boom[x][y+1] = Xblank; - Boom[x+1][y+1] = Xblank; -} - -static void Lfake_door_1(int x, int y) -{ - if (lev.magnify_cnt) - Cave[x][y] = Xdoor_1; -} - -static void Lfake_door_2(int x, int y) -{ - if (lev.magnify_cnt) - Cave[x][y] = Xdoor_2; -} - -static void Lfake_door_3(int x, int y) -{ - if (lev.magnify_cnt) - Cave[x][y] = Xdoor_3; -} - -static void Lfake_door_4(int x, int y) -{ - if (lev.magnify_cnt) - Cave[x][y] = Xdoor_4; -} - -static void Lfake_door_5(int x, int y) -{ - if (lev.magnify_cnt) - Cave[x][y] = Xdoor_5; -} - -static void Lfake_door_6(int x, int y) -{ - if (lev.magnify_cnt) - Cave[x][y] = Xdoor_6; -} - -static void Lfake_door_7(int x, int y) -{ - if (lev.magnify_cnt) - Cave[x][y] = Xdoor_7; -} - -static void Lfake_door_8(int x, int y) -{ - if (lev.magnify_cnt) - Cave[x][y] = Xdoor_8; -} - -static void Lballoon(int x, int y) -{ - if (lev.wind_cnt == 0) - return; - - switch (lev.wind_direction) - { - case 0: /* north */ - switch (Cave[x][y-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[x][y] = Yballoon_nB; - if (Cave[x+1][y-2] == Xblank) - Cave[x+1][y-2] = Xacid_splash_e; - if (Cave[x-1][y-2] == Xblank) - Cave[x-1][y-2] = Xacid_splash_w; - Next[x][y] = Xblank; - play_element_sound(x, y, SOUND_acid, Xacid_1); - return; - - case Xblank: - case Xacid_splash_e: - case Xacid_splash_w: - Cave[x][y] = Yballoon_nB; - Cave[x][y-1] = Yballoon_n; - Next[x][y] = Xblank; - Next[x][y-1] = Xballoon; - return; - } - break; - - case 1: /* east */ - switch (Cave[x+1][y]) - { - 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[x][y] = Yballoon_eB; - if (Cave[x+2][y-1] == Xblank) - Cave[x+2][y-1] = Xacid_splash_e; - if (Cave[x][y-1] == Xblank) - Cave[x][y-1] = Xacid_splash_w; - Next[x][y] = Xblank; - play_element_sound(x, y, SOUND_acid, Xacid_1); - return; - - case Xblank: - case Xacid_splash_e: - case Xacid_splash_w: - Cave[x][y] = Yballoon_eB; - Cave[x+1][y] = Yballoon_e; - Next[x][y] = Xblank; - Next[x+1][y] = Xballoon; - return; - } - break; - - case 2: /* south */ - switch (Cave[x][y+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[x][y] = Yballoon_sB; - if (Cave[x+1][y] == Xblank) - Cave[x+1][y] = Xacid_splash_e; - if (Cave[x-1][y] == Xblank) - Cave[x-1][y] = Xacid_splash_w; - Next[x][y] = Xblank; - play_element_sound(x, y, SOUND_acid, Xacid_1); - return; - - case Xblank: - case Xacid_splash_e: - case Xacid_splash_w: - Cave[x][y] = Yballoon_sB; - Cave[x][y+1] = Yballoon_s; - Next[x][y] = Xblank; - Next[x][y+1] = Xballoon; - return; - } - break; - - case 3: /* west */ - switch (Cave[x-1][y]) - { - 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[x][y] = Yballoon_wB; - if (Cave[x][y-1] == Xblank) - Cave[x][y-1] = Xacid_splash_e; - if (Cave[x-2][y-1] == Xblank) - Cave[x-2][y-1] = Xacid_splash_w; - Next[x][y] = Xblank; - play_element_sound(x, y, SOUND_acid, Xacid_1); - return; - - case Xblank: - case Xacid_splash_e: - case Xacid_splash_w: - Cave[x][y] = Yballoon_wB; - Cave[x-1][y] = Yballoon_w; - Next[x][y] = Xblank; - Next[x-1][y] = Xballoon; - return; - } - break; - } -} - -static void Lball_common(int x, int y) -{ - play_element_sound(x, y, SOUND_ball, Xball_1); - - if (lev.ball_random) - { - switch (RANDOM(8)) - { - case 0: - if (lev.ball_array[lev.ball_pos][0] != Xblank && - tab_blank[Cave[x-1][y-1]]) - { - Cave[x-1][y-1] = Yball_blank; - Next[x-1][y-1] = lev.ball_array[lev.ball_pos][0]; - } - break; - - case 1: - if (lev.ball_array[lev.ball_pos][1] != Xblank && - tab_blank[Cave[x][y-1]]) - { - Cave[x][y-1] = Yball_blank; - Next[x][y-1] = lev.ball_array[lev.ball_pos][1]; - } - break; - - case 2: - if (lev.ball_array[lev.ball_pos][2] != Xblank && - tab_blank[Cave[x+1][y-1]]) - { - Cave[x+1][y-1] = Yball_blank; - Next[x+1][y-1] = lev.ball_array[lev.ball_pos][2]; - } - break; - - case 3: - if (lev.ball_array[lev.ball_pos][3] != Xblank && - tab_blank[Cave[x-1][y]]) - { - Cave[x-1][y] = Yball_blank; - Next[x-1][y] = lev.ball_array[lev.ball_pos][3]; - } - break; - - case 4: - if (lev.ball_array[lev.ball_pos][4] != Xblank && - tab_blank[Cave[x+1][y]]) - { - Cave[x+1][y] = Yball_blank; - Next[x+1][y] = lev.ball_array[lev.ball_pos][4]; - } - break; - - case 5: - if (lev.ball_array[lev.ball_pos][5] != Xblank && - tab_blank[Cave[x-1][y+1]]) - { - Cave[x-1][y+1] = Yball_blank; - Next[x-1][y+1] = lev.ball_array[lev.ball_pos][5]; - } - break; - - case 6: - if (lev.ball_array[lev.ball_pos][6] != Xblank && - tab_blank[Cave[x][y+1]]) - { - Cave[x][y+1] = Yball_blank; - Next[x][y+1] = lev.ball_array[lev.ball_pos][6]; - } - break; - - case 7: - if (lev.ball_array[lev.ball_pos][7] != Xblank && - tab_blank[Cave[x+1][y+1]]) - { - Cave[x+1][y+1] = Yball_blank; - Next[x+1][y+1] = lev.ball_array[lev.ball_pos][7]; - } - break; - } - } - else - { - if (lev.ball_array[lev.ball_pos][0] != Xblank && - tab_blank[Cave[x-1][y-1]]) - { - Cave[x-1][y-1] = Yball_blank; - Next[x-1][y-1] = lev.ball_array[lev.ball_pos][0]; - } - - if (lev.ball_array[lev.ball_pos][1] != Xblank && - tab_blank[Cave[x][y-1]]) - { - Cave[x][y-1] = Yball_blank; - Next[x][y-1] = lev.ball_array[lev.ball_pos][1]; - } - - if (lev.ball_array[lev.ball_pos][2] != Xblank && - tab_blank[Cave[x+1][y-1]]) - { - Cave[x+1][y-1] = Yball_blank; - Next[x+1][y-1] = lev.ball_array[lev.ball_pos][2]; - } - - if (lev.ball_array[lev.ball_pos][3] != Xblank && - tab_blank[Cave[x-1][y]]) - { - Cave[x-1][y] = Yball_blank; - Next[x-1][y] = lev.ball_array[lev.ball_pos][3]; - } - - if (lev.ball_array[lev.ball_pos][4] != Xblank && - tab_blank[Cave[x+1][y]]) - { - Cave[x+1][y] = Yball_blank; - Next[x+1][y] = lev.ball_array[lev.ball_pos][4]; - } - - if (lev.ball_array[lev.ball_pos][5] != Xblank && - tab_blank[Cave[x-1][y+1]]) - { - Cave[x-1][y+1] = Yball_blank; - Next[x-1][y+1] = lev.ball_array[lev.ball_pos][5]; - } - - if (lev.ball_array[lev.ball_pos][6] != Xblank && - tab_blank[Cave[x][y+1]]) - { - Cave[x][y+1] = Yball_blank; - Next[x][y+1] = lev.ball_array[lev.ball_pos][6]; - } - - if (lev.ball_array[lev.ball_pos][7] != Xblank && - tab_blank[Cave[x+1][y+1]]) - { - Cave[x+1][y+1] = Yball_blank; - Next[x+1][y+1] = lev.ball_array[lev.ball_pos][7]; - } - } - - lev.ball_pos = (lev.ball_pos + 1) % lev.num_ball_arrays; -} - -static void Lball_1(int x, int y) -{ - if (lev.ball_state == 0) - return; - - Cave[x][y] = Yball_1; - Next[x][y] = Xball_2; - if (lev.ball_cnt) - return; - - Lball_common(x, y); -} - -static void Lball_2(int x, int y) -{ - if (lev.ball_state == 0) - return; - - Cave[x][y] = Yball_2; - Next[x][y] = Xball_1; - if (lev.ball_cnt) - return; - - Lball_common(x, y); -} - -static void Ldrip(int x, int y) -{ - Next[x][y] = Xdrip_fall; -} - -static void Ldrip_fall(int x, int y) -{ - int temp; - - switch (Cave[x][y+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[x][y] = Ydrip_1_sB; - if (Cave[x+1][y] == Xblank) - Cave[x+1][y] = Xacid_splash_e; - if (Cave[x-1][y] == Xblank) - Cave[x-1][y] = Xacid_splash_w; - Next[x][y] = Xdrip_stretchB; - play_element_sound(x, y, SOUND_acid, Xacid_1); - return; - - case Xblank: - case Xacid_splash_e: - case Xacid_splash_w: - case Xplant: - case Yplant: - case Zplayer: - Cave[x][y] = Ydrip_1_sB; - Cave[x][y+1] = Ydrip_1_s; - Next[x][y] = Xdrip_stretchB; - Next[x][y+1] = Xdrip_stretch; - return; - - default: - switch (RANDOM(8)) - { - case 0: temp = Xamoeba_1; break; - case 1: temp = Xamoeba_2; break; - case 2: temp = Xamoeba_3; break; - case 3: temp = Xamoeba_4; break; - case 4: temp = Xamoeba_5; break; - case 5: temp = Xamoeba_6; break; - case 6: temp = Xamoeba_7; break; - case 7: temp = Xamoeba_8; break; - } - - Cave[x][y] = temp; - Next[x][y] = temp; - play_element_sound(x, y, SOUND_drip, Xdrip_fall); - return; - } -} - -static void Ldrip_stretch(int x, int y) -{ - Cave[x][y] = Ydrip_2_s; - Next[x][y] = Xdrip_fall; -} - -static void Ldrip_stretchB(int x, int y) -{ - Cave[x][y] = Ydrip_2_sB; - Next[x][y] = Xblank; -} - -static void Lwonderwall(int x, int y) -{ - if (lev.wonderwall_time && lev.wonderwall_state) - { - Cave[x][y] = XwonderwallB; - play_element_sound(x, y, SOUND_wonder, Xwonderwall); - } -} - -static void Lwheel(int x, int y) -{ - if (lev.wheel_cnt && x == lev.wheel_x && y == lev.wheel_y) - Cave[x][y] = XwheelB; -} - -static void Lswitch(int x, int y) -{ - if (lev.ball_state) - Cave[x][y] = XswitchB; -} - -static void Lfake_blank(int x, int y) -{ - if (lev.lenses_cnt) - Cave[x][y] = Xfake_blankB; -} - -static void Lfake_grass(int x, int y) -{ - if (lev.magnify_cnt) - Cave[x][y] = Xfake_grassB; -} - -static void Lfake_amoeba(int x, int y) -{ - if (lev.lenses_cnt) - Cave[x][y] = Xfake_amoebaB; -} - -static void Lsand_stone(int x, int y) -{ - switch (Cave[x][y+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[x][y] = Xsand_stonesand_quickout_1; - if (Cave[x+1][y] == Xblank) - Cave[x+1][y] = Xacid_splash_e; - if (Cave[x-1][y] == Xblank) - Cave[x-1][y] = Xacid_splash_w; - Next[x][y] = Xsand_stonesand_quickout_2; - play_element_sound(x, y, SOUND_acid, Xacid_1); - return; - - case Xblank: - case Xacid_splash_e: - case Xacid_splash_w: - Cave[x][y] = Xsand_stonesand_quickout_1; - Cave[x][y+1] = Xsand_stoneout_1; - Next[x][y] = Xsand_stonesand_quickout_2; - Next[x][y+1] = Xsand_stoneout_2; - return; - - case Xsand: - Cave[x][y] = Xsand_stonesand_1; - Cave[x][y+1] = Xsand_sandstone_1; - Next[x][y] = Xsand_stonesand_2; - Next[x][y+1] = Xsand_sandstone_2; - return; - } -} - -static void Lsand_stonein_1(int x, int y) -{ - Next[x][y] = Xsand_stonein_2; -} - -static void Lsand_stonein_2(int x, int y) -{ - Next[x][y] = Xsand_stonein_3; -} - -static void Lsand_stonein_3(int x, int y) -{ - Next[x][y] = Xsand_stonein_4; -} - -static void Lsand_stonein_4(int x, int y) -{ - Next[x][y] = Xblank; -} - -static void Lsand_sandstone_1(int x, int y) -{ - Next[x][y] = Xsand_sandstone_2; -} - -static void Lsand_sandstone_2(int x, int y) -{ - Next[x][y] = Xsand_sandstone_3; -} - -static void Lsand_sandstone_3(int x, int y) -{ - Next[x][y] = Xsand_sandstone_4; -} - -static void Lsand_sandstone_4(int x, int y) -{ - Next[x][y] = Xsand_stone; -} - -static void Lsand_stonesand_1(int x, int y) -{ - Next[x][y] = Xsand_stonesand_2; -} - -static void Lsand_stonesand_2(int x, int y) -{ - Next[x][y] = Xsand_stonesand_3; -} - -static void Lsand_stonesand_3(int x, int y) -{ - Next[x][y] = Xsand_stonesand_4; -} - -static void Lsand_stonesand_4(int x, int y) -{ - Next[x][y] = Xsand; -} - -static void Lsand_stoneout_1(int x, int y) -{ - Next[x][y] = Xsand_stoneout_2; -} - -static void Lsand_stoneout_2(int x, int y) -{ - Next[x][y] = Xstone_fall; -} - -#ifdef EM_ENGINE_USE_ADDITIONAL_ELEMENTS -static void Lsand_stonesand_quickout_1(int x, int y) -{ - Next[x][y] = Xsand_stonesand_quickout_2; -} - -static void Lsand_stonesand_quickout_2(int x, int y) -{ - Next[x][y] = Xsand; -} -#endif - -static void Lslidewall_ns(int x, int y) -{ - if (tab_blank[Cave[x][y-1]]) - { - Cave[x][y-1] = Yslidewall_ns_blank; - Next[x][y-1] = Xslidewall_ns; - play_element_sound(x, y, SOUND_slidewall, Xslidewall_ns); - } - - if (tab_blank[Cave[x][y+1]]) - { - Cave[x][y+1] = Yslidewall_ns_blank; - Next[x][y+1] = Xslidewall_ns; - play_element_sound(x, y, SOUND_slidewall, Xslidewall_ns); - } -} - -static void Lslidewall_ew(int x, int y) -{ - if (tab_blank[Cave[x+1][y]]) - { - Cave[x+1][y] = Yslidewall_ew_blank; - Next[x+1][y] = Xslidewall_ew; - play_element_sound(x, y, SOUND_slidewall, Xslidewall_ew); - } - - if (tab_blank[Cave[x-1][y]]) - { - Cave[x-1][y] = Yslidewall_ew_blank; - Next[x-1][y] = Xslidewall_ew; - play_element_sound(x, y, SOUND_slidewall, Xslidewall_ew); - } -} - -static void Lexit(int x, int y) -{ - if (lev.required > 0) - return; - - switch (RANDOM(64) / 21) - { - case 0: - Cave[x][y] = Xexit_1; - Next[x][y] = Xexit_2; - break; - - case 1: - Cave[x][y] = Xexit_2; - Next[x][y] = Xexit_3; - break; - - default: - Cave[x][y] = Xexit_3; - Next[x][y] = Xexit_1; - break; - } - - play_element_sound(x, y, SOUND_exit_open, Xexit); -} - -static void Lexit_1(int x, int y) -{ - Next[x][y] = Xexit_2; -} - -static void Lexit_2(int x, int y) -{ - Next[x][y] = Xexit_3; -} - -static void Lexit_3(int x, int y) -{ - Next[x][y] = Xexit_1; -} - -static void Lpause(int x, int y) -{ - Next[x][y] = Xblank; -} - -static void Lboom_1(int x, int y) -{ - Next[x][y] = Xboom_2; -#if !PLAY_ELEMENT_SOUND - if (x != lev.exit_x && y != lev.exit_y) - play_sound(x, y, SOUND_boom); - else - lev.exit_x = lev.exit_y = -1; -#endif -} - -static void Lboom_2(int x, int y) -{ - Next[x][y] = Boom[x][y]; -} - -static void Lboom_android(int x, int y) -{ -#if PLAY_ELEMENT_SOUND - play_element_sound(x, y, SOUND_boom, Xandroid); -#endif - - Lboom_1(x, y); -} - -static void handle_tile(int x, int y) -{ - switch (Cave[x][y]) - { - case Xacid_1: Lacid_1(x, y); break; - case Xacid_2: Lacid_2(x, y); break; - case Xacid_3: Lacid_3(x, y); break; - case Xacid_4: Lacid_4(x, y); break; - case Xacid_5: Lacid_5(x, y); break; - case Xacid_6: Lacid_6(x, y); break; - case Xacid_7: Lacid_7(x, y); break; - case Xacid_8: Lacid_8(x, y); break; - -#ifdef EM_ENGINE_USE_ADDITIONAL_ELEMENTS - case Xfake_acid_1: Lfake_acid_1(x, y); break; - case Xfake_acid_2: Lfake_acid_2(x, y); break; - case Xfake_acid_3: Lfake_acid_3(x, y); break; - case Xfake_acid_4: Lfake_acid_4(x, y); break; - case Xfake_acid_5: Lfake_acid_5(x, y); break; - case Xfake_acid_6: Lfake_acid_6(x, y); break; - case Xfake_acid_7: Lfake_acid_7(x, y); break; - case Xfake_acid_8: Lfake_acid_8(x, y); break; -#endif - - case Xandroid: Landroid(x, y); break; - case Xandroid_1_n: Landroid_1_n(x, y); break; - case Xandroid_2_n: Landroid_2_n(x, y); break; - case Xandroid_1_e: Landroid_1_e(x, y); break; - case Xandroid_2_e: Landroid_2_e(x, y); break; - case Xandroid_1_s: Landroid_1_s(x, y); break; - case Xandroid_2_s: Landroid_2_s(x, y); break; - case Xandroid_1_w: Landroid_1_w(x, y); break; - case Xandroid_2_w: Landroid_2_w(x, y); break; - - case Xeater_n: Leater_n(x, y); break; - case Xeater_e: Leater_e(x, y); break; - case Xeater_s: Leater_s(x, y); break; - case Xeater_w: Leater_w(x, y); break; - - case Xalien: Lalien(x, y); break; - case Xalien_pause: Lalien_pause(x, y); break; - - case Xbug_1_n: Lbug_1_n(x, y); break; - case Xbug_2_n: Lbug_2_n(x, y); break; - case Xbug_1_e: Lbug_1_e(x, y); break; - case Xbug_2_e: Lbug_2_e(x, y); break; - case Xbug_1_s: Lbug_1_s(x, y); break; - case Xbug_2_s: Lbug_2_s(x, y); break; - case Xbug_1_w: Lbug_1_w(x, y); break; - case Xbug_2_w: Lbug_2_w(x, y); break; - - case Xtank_1_n: Ltank_1_n(x, y); break; - case Xtank_2_n: Ltank_2_n(x, y); break; - case Xtank_1_e: Ltank_1_e(x, y); break; - case Xtank_2_e: Ltank_2_e(x, y); break; - case Xtank_1_s: Ltank_1_s(x, y); break; - case Xtank_2_s: Ltank_2_s(x, y); break; - case Xtank_1_w: Ltank_1_w(x, y); break; - case Xtank_2_w: Ltank_2_w(x, y); break; - - case Xemerald: Lemerald(x, y); break; - case Xemerald_pause: Lemerald_pause(x, y); break; - case Xemerald_fall: Lemerald_fall(x, y); break; - - case Xdiamond: Ldiamond(x, y); break; - case Xdiamond_pause: Ldiamond_pause(x, y); break; - case Xdiamond_fall: Ldiamond_fall(x, y); break; - - case Xstone: Lstone(x, y); break; - case Xstone_pause: Lstone_pause(x, y); break; - case Xstone_fall: Lstone_fall(x, y); break; - - case Xbomb: Lbomb(x, y); break; - case Xbomb_pause: Lbomb_pause(x, y); break; - case Xbomb_fall: Lbomb_fall(x, y); break; - - case Xnut: Lnut(x, y); break; - case Xnut_pause: Lnut_pause(x, y); break; - case Xnut_fall: Lnut_fall(x, y); break; - - case Xspring: Lspring(x, y); break; - case Xspring_pause: Lspring_pause(x, y); break; - case Xspring_e: Lspring_e(x, y); break; - case Xspring_w: Lspring_w(x, y); break; - case Xspring_fall: Lspring_fall(x, y); break; - - case Xpush_emerald_e: Lpush_emerald_e(x, y); break; - case Xpush_emerald_w: Lpush_emerald_w(x, y); break; - case Xpush_diamond_e: Lpush_diamond_e(x, y); break; - case Xpush_diamond_w: Lpush_diamond_w(x, y); break; - case Xpush_stone_e: Lpush_stone_e(x, y); break; - case Xpush_stone_w: Lpush_stone_w(x, y); break; - case Xpush_bomb_e: Lpush_bomb_e(x, y); break; - case Xpush_bomb_w: Lpush_bomb_w(x, y); break; - case Xpush_nut_e: Lpush_nut_e(x, y); break; - case Xpush_nut_w: Lpush_nut_w(x, y); break; - case Xpush_spring_e: Lpush_spring_e(x, y); break; - case Xpush_spring_w: Lpush_spring_w(x, y); break; - - case Xdynamite_1: Ldynamite_1(x, y); break; - case Xdynamite_2: Ldynamite_2(x, y); break; - case Xdynamite_3: Ldynamite_3(x, y); break; - case Xdynamite_4: Ldynamite_4(x, y); break; - - case Xfake_door_1: Lfake_door_1(x, y); break; - case Xfake_door_2: Lfake_door_2(x, y); break; - case Xfake_door_3: Lfake_door_3(x, y); break; - case Xfake_door_4: Lfake_door_4(x, y); break; - case Xfake_door_5: Lfake_door_5(x, y); break; - case Xfake_door_6: Lfake_door_6(x, y); break; - case Xfake_door_7: Lfake_door_7(x, y); break; - case Xfake_door_8: Lfake_door_8(x, y); break; - - case Xballoon: Lballoon(x, y); break; - - case Xball_1: Lball_1(x, y); break; - case Xball_2: Lball_2(x, y); break; - - case Xdrip: Ldrip(x, y); break; - case Xdrip_fall: Ldrip_fall(x, y); break; - case Xdrip_stretch: Ldrip_stretch(x, y); break; - case Xdrip_stretchB: Ldrip_stretchB(x, y); break; - - case Xwonderwall: Lwonderwall(x, y); break; - - case Xwheel: Lwheel(x, y); break; - - case Xswitch: Lswitch(x, y); break; - - case Xfake_blank: Lfake_blank(x, y); break; - case Xfake_grass: Lfake_grass(x, y); break; - case Xfake_amoeba: Lfake_amoeba(x, y); break; - - case Xsand_stone: Lsand_stone(x, y); break; - case Xsand_stonein_1: Lsand_stonein_1(x, y); break; - case Xsand_stonein_2: Lsand_stonein_2(x, y); break; - case Xsand_stonein_3: Lsand_stonein_3(x, y); break; - case Xsand_stonein_4: Lsand_stonein_4(x, y); break; - case Xsand_sandstone_1: Lsand_sandstone_1(x, y); break; - case Xsand_sandstone_2: Lsand_sandstone_2(x, y); break; - case Xsand_sandstone_3: Lsand_sandstone_3(x, y); break; - case Xsand_sandstone_4: Lsand_sandstone_4(x, y); break; - case Xsand_stonesand_1: Lsand_stonesand_1(x, y); break; - case Xsand_stonesand_2: Lsand_stonesand_2(x, y); break; - case Xsand_stonesand_3: Lsand_stonesand_3(x, y); break; - case Xsand_stonesand_4: Lsand_stonesand_4(x, y); break; - case Xsand_stoneout_1: Lsand_stoneout_1(x, y); break; - case Xsand_stoneout_2: Lsand_stoneout_2(x, y); break; -#ifdef EM_ENGINE_USE_ADDITIONAL_ELEMENTS - case Xsand_stonesand_quickout_1: Lsand_stonesand_quickout_1(x, y); break; - case Xsand_stonesand_quickout_2: Lsand_stonesand_quickout_2(x, y); break; -#endif - - case Xslidewall_ns: Lslidewall_ns(x, y); break; - case Xslidewall_ew: Lslidewall_ew(x, y); break; - - case Xexit: Lexit(x, y); break; - case Xexit_1: Lexit_1(x, y); break; - case Xexit_2: Lexit_2(x, y); break; - case Xexit_3: Lexit_3(x, y); break; - - case Xpause: Lpause(x, y); break; - - case Xboom_bug: Lboom_bug(x, y); break; - case Xboom_bomb: Lboom_tank(x, y); break; - case Xboom_android: Lboom_android(x, y); break; - case Xboom_1: Lboom_1(x, y); break; - case Xboom_2: Lboom_2(x, y); break; - } -} - -void synchro_2(void) -{ - int x, y; - - seed = RandomEM; - score = 0; - - for (y = 1; y < HEIGHT - 1; y++) - for (x = 0; x < WIDTH; x++) - handle_tile(x, y); - - if (ply[0].alive || ply[1].alive || ply[2].alive || ply[3].alive) - lev.score += score; /* only add a score if someone is alive */ - else - game_em.game_over = TRUE; - - RandomEM = seed; - - /* triple buffering */ - void *temp = Cave; - Cave = Next; - Next = Draw; - Draw = temp; -} diff --git a/src/game_em/synchro_3.c b/src/game_em/synchro_3.c deleted file mode 100644 index 8ec410d3..00000000 --- a/src/game_em/synchro_3.c +++ /dev/null @@ -1,112 +0,0 @@ -/* third part of synchro. - * - * handle global elements. - * - * this should be spread over the frames for reduced cpu load. - */ - -#include "main_em.h" - - -void synchro_3(void) -{ - int x; - int y; - int count; - unsigned int random; - - /* update variables */ - - if (lev.score > 9999) - lev.score = 9999; - - 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.wheel_cnt) - play_element_sound(lev.wheel_x, lev.wheel_y, SOUND_wheel, Xwheel); - - /* grow amoeba */ - - random = RandomEM; - - for (count = lev.amoeba_time; count--;) - { - x = (random >> 10) % (WIDTH - 2); - y = (random >> 20) % (HEIGHT - 2); - switch (Cave[x][y]) - { - case Xblank: - case Xacid_splash_e: - case Xacid_splash_w: - case Xgrass: - case Xdirt: - case Xsand: - case Xplant: - case Yplant: - if (tab_amoeba[Cave[x][y-1]] || - tab_amoeba[Cave[x+1][y]] || - tab_amoeba[Cave[x][y+1]] || - tab_amoeba[Cave[x-1][y]]) - Cave[x][y] = Xdrip; - } - - random = random * 129 + 1; - } - - RandomEM = random; - - /* handle explosions */ - - for (y = 1; y < HEIGHT - 1; y++) - for (x = 1; x < WIDTH - 1; x++) - { - switch (Cave[x][y]) - { - case Znormal: - Cave[x][y] = Xboom_1; - Cave[x][y-1] = tab_explode_normal[Cave[x][y-1]]; - Cave[x-1][y] = tab_explode_normal[Cave[x-1][y]]; - Cave[x+1][y] = tab_explode_normal[Cave[x+1][y]]; - Cave[x][y+1] = tab_explode_normal[Cave[x][y+1]]; - Cave[x-1][y-1] = tab_explode_normal[Cave[x-1][y-1]]; - Cave[x+1][y-1] = tab_explode_normal[Cave[x+1][y-1]]; - Cave[x-1][y+1] = tab_explode_normal[Cave[x-1][y+1]]; - Cave[x+1][y+1] = tab_explode_normal[Cave[x+1][y+1]]; - break; - - case Zdynamite: - Cave[x][y] = Xboom_1; - Cave[x][y-1] = tab_explode_dynamite[Cave[x][y-1]]; - Cave[x-1][y] = tab_explode_dynamite[Cave[x-1][y]]; - Cave[x+1][y] = tab_explode_dynamite[Cave[x+1][y]]; - Cave[x][y+1] = tab_explode_dynamite[Cave[x][y+1]]; - Cave[x-1][y-1] = tab_explode_dynamite[Cave[x-1][y-1]]; - Cave[x+1][y-1] = tab_explode_dynamite[Cave[x+1][y-1]]; - Cave[x-1][y+1] = tab_explode_dynamite[Cave[x-1][y+1]]; - Cave[x+1][y+1] = tab_explode_dynamite[Cave[x+1][y+1]]; - break; - } - } - - /* triple buffering */ - - for (y = 0; y < HEIGHT; y++) - for (x = 0; x < WIDTH; x++) - Next[x][y] = Cave[x][y]; -}