1 /* first part of synchro.
3 * game logic for players.
5 * large switch statement for tiles the player interacts with.
12 extern int centered_player_nr;
15 extern boolean checkIfAllPlayersFitToScreen();
17 static void check_player(struct PLAYER *);
18 static void kill_player(struct PLAYER *);
19 static boolean player_digfield(struct PLAYER *, int, int);
20 static boolean player_killed(struct PLAYER *);
29 game_em.any_player_moving = FALSE;
31 /* must test for death and actually kill separately */
33 for (i = 0; i < MAX_PLAYERS; i++)
35 boolean ply_kill = player_killed(&ply[i]);
37 if (ply[i].alive && ply_kill)
43 /* must test for death and actually kill separately */
44 boolean ply1_kill = player_killed(&ply1);
45 boolean ply2_kill = player_killed(&ply2);
47 if (ply1.alive && ply1_kill)
49 if (ply2.alive && ply2_kill)
55 ply1.alive = 1; /* debugging */
60 for (i = 0; i < MAX_PLAYERS; i++)
62 ply[i].oldx = ply[i].x;
63 ply[i].oldy = ply[i].y;
64 ply[i].anim = SPR_still;
67 start_check_nr = (RandomEM & 128 ? 0 : 1) * 2 + (RandomEM & 256 ? 0 : 1);
69 for (i = 0; i < MAX_PLAYERS; i++)
71 int check_nr = (start_check_nr + i) % MAX_PLAYERS;
73 if (ply[check_nr].alive)
74 check_player(&ply[check_nr]);
77 for (i = 0; i < MAX_PLAYERS; i++)
82 if (Cave[ply[i].oldy][ply[i].oldx] == Zplayer)
84 Cave[ply[i].oldy][ply[i].oldx] = Xblank;
85 Next[ply[i].oldy][ply[i].oldx] = Xblank;
88 if (Cave[ply[i].y][ply[i].x] == Xblank)
90 Cave[ply[i].y][ply[i].x] = Zplayer;
91 Next[ply[i].y][ply[i].x] = Zplayer;
99 ply1.anim = SPR_still;
102 ply2.anim = SPR_still;
106 if (ply1.alive) check_player(&ply1);
107 if (ply2.alive) check_player(&ply2);
111 if (ply2.alive) check_player(&ply2);
112 if (ply1.alive) check_player(&ply1);
117 if (Cave[ply1.oldy][ply1.oldx] == Zplayer)
119 Cave[ply1.oldy][ply1.oldx] = Xblank;
120 Next[ply1.oldy][ply1.oldx] = Xblank;
123 if (Cave[ply1.y][ply1.x] == Xblank)
125 Cave[ply1.y][ply1.x] = Zplayer;
126 Next[ply1.y][ply1.x] = Zplayer;
132 if (Cave[ply2.oldy][ply2.oldx] == Zplayer)
134 Cave[ply2.oldy][ply2.oldx] = Xblank;
135 Next[ply2.oldy][ply2.oldx] = Xblank;
138 if (Cave[ply2.y][ply2.x] == Xblank)
140 Cave[ply2.y][ply2.x] = Zplayer;
141 Next[ply2.y][ply2.x] = Zplayer;
148 static boolean player_killed(struct PLAYER *ply)
154 printf("::: %d: %d, %d\n", ply->num, x, y);
161 if (lev.killed_out_of_time && setup.time_limit)
164 if (lev.time_initial > 0 && lev.time == 0 && setup.time_limit)
255 case Yacid_splash_eB:
256 case Yacid_splash_wB:
278 static void kill_player(struct PLAYER *ply)
295 Cave[y-1][x] = Xboom_bug;
297 play_element_sound(x, y, SAMPLE_boom, Zplayer);
309 Cave[y-1][x] = Xboom_bomb;
311 play_element_sound(x, y, SAMPLE_boom, Zplayer);
326 Cave[y][x+1] = Xboom_bug;
328 play_element_sound(x, y, SAMPLE_boom, Zplayer);
340 Cave[y][x+1] = Xboom_bomb;
342 play_element_sound(x, y, SAMPLE_boom, Zplayer);
357 Cave[y+1][x] = Xboom_bug;
359 play_element_sound(x, y, SAMPLE_boom, Zplayer);
371 Cave[y+1][x] = Xboom_bomb;
373 play_element_sound(x, y, SAMPLE_boom, Zplayer);
388 Cave[y][x-1] = Xboom_bug;
390 play_element_sound(x, y, SAMPLE_boom, Zplayer);
402 Cave[y][x-1] = Xboom_bomb;
404 play_element_sound(x, y, SAMPLE_boom, Zplayer);
414 play_element_sound(x, y, SAMPLE_exit_leave, Xexit_1);
418 play_element_sound(x, y, SAMPLE_die, Zplayer);
437 Cave[y][x] = Xboom_1;
443 static void check_player(struct PLAYER *ply)
452 game_em.last_player_direction[ply->num] = MV_NONE;
455 printf("::: up == %d, down == %d, left == %d, right == %d, fire == %d [spin == %d, stick == %d]\n",
456 ply->joy_n, ply->joy_s, ply->joy_w, ply->joy_e, ply->joy_fire,
457 ply->joy_spin, ply->joy_stick);
461 if (ply->joy_w) /* west */
467 else if (ply->joy_e) /* east */
474 if (ply->joy_n) /* north */
480 else if (ply->joy_s) /* south */
489 if ((ply->joy_spin = !ply->joy_spin))
491 if (ply->joy_n) /* north */
497 else if (ply->joy_e) /* east */
503 else if (ply->joy_s) /* south */
509 else if (ply->joy_w) /* west */
518 if (ply->joy_w) /* west */
524 else if (ply->joy_s) /* south */
530 else if (ply->joy_e) /* east */
536 else if (ply->joy_n) /* north */
551 boolean players_visible_before_move;
552 boolean players_visible_after_move;
555 players_visible_before_move = checkIfAllPlayersFitToScreen();
560 players_visible_after_move = checkIfAllPlayersFitToScreen();
563 player is allowed to move only in the following cases:
564 - it is not needed to display all players (not focussed to all players)
565 - all players are (still or again) visible after the move
566 - some players were already outside visible screen area before the move
568 can_move = (game.centered_player_nr != -1 ||
569 players_visible_after_move ||
570 !players_visible_before_move);
577 ply->joy_n = ply->joy_e = ply->joy_s = ply->joy_w = 0;
583 if (dx == 0 && dy == 0)
589 if (++ply->dynamite_cnt == 5 && ply->dynamite)
591 Cave[y][x] = Xdynamite_1;
592 play_element_sound(x, y, SAMPLE_dynamite, Xdynamite_1);
598 ply->dynamite_cnt = 0;
601 RandomEM += 7; /* be a bit more random if the player doesn't move */
607 ply->joy_n = ply->joy_e = ply->joy_s = ply->joy_w = 0;
608 ply->dynamite_cnt = 0; /* reset dynamite timer if we move */
609 ply->joy_spin = !ply->joy_spin;
611 if (ply->joy_snap == 0) /* player wants to move */
613 boolean moved = FALSE;
615 if (ply->last_move_dir & MV_HORIZONTAL)
617 if (!(moved = player_digfield(ply, 0, dy)))
618 moved = player_digfield(ply, dx, 0);
622 if (!(moved = player_digfield(ply, dx, 0)))
623 moved = player_digfield(ply, 0, dy);
629 ply->last_move_dir = (dx < 0 ? MV_LEFT : MV_RIGHT);
630 else if (oldy != ply->y)
631 ply->last_move_dir = (dy < 0 ? MV_UP : MV_DOWN);
633 game_em.any_player_moving = TRUE;
634 game_em.last_moving_player = ply->num;
635 game_em.last_player_direction[ply->num] = ply->last_move_dir;
638 else /* player wants to snap */
640 player_digfield(ply, dx, dy);
644 static boolean player_digfield(struct PLAYER *ply, int dx, int dy)
646 int anim = (dx < 0 ? 3 : dx > 0 ? 1 : dy < 0 ? 0 : dy > 0 ? 2 : 2);
651 boolean result = TRUE;
653 if (!dx && !dy) /* no direction specified */
656 if (dx && dy && ply->joy_snap) /* more than one direction specified */
659 if (ply->joy_snap == 0) /* player wants to move */
661 int element = Cave[y][x];
665 /* fire is released */
667 case Yacid_splash_eB:
668 case Yacid_splash_wB:
669 Cave[y][x] = Zplayer;
670 Next[y][x] = Zplayer;
681 play_element_sound(x, y, SAMPLE_blank, Xblank);
682 ply->anim = SPR_walk + anim;
697 if (Cave[y-1][x+1] == Xblank)
698 Cave[y-1][x+1] = Yacid_splash_eB;
699 if (Cave[y-1][x-1] == Xblank)
700 Cave[y-1][x-1] = Yacid_splash_wB;
701 play_element_sound(x, y, SAMPLE_acid, Xacid_1);
731 ply->anim = SPR_walk + anim;
737 Cave[y][x] = (dy ? (dy < 0 ? Ygrass_nB : Ygrass_sB) :
738 (dx > 0 ? Ygrass_eB : Ygrass_wB));
739 Next[y][x] = Zplayer;
740 play_element_sound(x, y, SAMPLE_dirt, Xgrass);
741 ply->anim = SPR_walk + anim;
747 Cave[y][x] = (dy ? (dy < 0 ? Ydirt_nB : Ydirt_sB) :
748 (dx > 0 ? Ydirt_eB : Ydirt_wB));
749 Next[y][x] = Zplayer;
750 play_element_sound(x, y, SAMPLE_dirt, Xdirt);
751 ply->anim = SPR_walk + anim;
758 Cave[y][x] = Ydiamond_eat;
759 Next[y][x] = Zplayer;
760 play_element_sound(x, y, SAMPLE_collect, element);
761 lev.score += lev.diamond_score;
762 lev.required = lev.required < 3 ? 0 : lev.required - 3;
763 ply->anim = SPR_walk + anim;
770 Cave[y][x] = Yemerald_eat;
771 Next[y][x] = Zplayer;
772 play_element_sound(x, y, SAMPLE_collect, element);
773 lev.score += lev.emerald_score;
774 lev.required = lev.required < 1 ? 0 : lev.required - 1;
775 ply->anim = SPR_walk + anim;
781 Cave[y][x] = Ydynamite_eat;
782 Next[y][x] = Zplayer;
783 play_element_sound(x, y, SAMPLE_collect, element);
784 lev.score += lev.dynamite_score;
785 ply->dynamite = ply->dynamite > 9998 ? 9999 : ply->dynamite + 1;
786 ply->anim = SPR_walk + anim;
793 Cave[y][x] = Ykey_1_eat;
798 Cave[y][x] = Ykey_2_eat;
803 Cave[y][x] = Ykey_3_eat;
808 Cave[y][x] = Ykey_4_eat;
813 Cave[y][x] = Ykey_5_eat;
818 Cave[y][x] = Ykey_6_eat;
823 Cave[y][x] = Ykey_7_eat;
828 Cave[y][x] = Ykey_8_eat;
833 Next[y][x] = Zplayer;
834 play_element_sound(x, y, SAMPLE_collect, element);
835 lev.score += lev.key_score;
836 ply->anim = SPR_walk + anim;
842 Cave[y][x] = Ylenses_eat;
843 Next[y][x] = Zplayer;
844 play_element_sound(x, y, SAMPLE_collect, element);
845 lev.score += lev.lenses_score;
846 lev.lenses_cnt = lev.lenses_time;
847 ply->anim = SPR_walk + anim;
853 Cave[y][x] = Ymagnify_eat;
854 Next[y][x] = Zplayer;
855 play_element_sound(x, y, SAMPLE_collect, element);
856 lev.score += lev.magnify_score;
857 lev.magnify_cnt = lev.magnify_time;
858 ply->anim = SPR_walk + anim;
867 switch(Cave[y][x+dx])
877 if (Cave[y-1][x+dx+1] == Xblank)
878 Cave[y-1][x+dx+1] = Yacid_splash_eB;
879 if (Cave[y-1][x+dx-1] == Xblank)
880 Cave[y-1][x+dx-1] = Yacid_splash_wB;
881 play_element_sound(x, y, SAMPLE_acid, Xacid_1);
885 case Yacid_splash_eB:
886 case Yacid_splash_wB:
887 Cave[y][x+dx] = dx > 0 ? Ystone_e : Ystone_w;
888 Next[y][x+dx] = Xstone_pause;
892 Cave[y][x] = dx > 0 ? Ystone_eB : Ystone_wB;
893 Next[y][x] = Zplayer;
894 play_element_sound(x, y, SAMPLE_roll, Xstone);
898 ply->anim = SPR_push + anim;
905 switch(Cave[y][x+dx])
915 if (Cave[y-1][x+dx+1] == Xblank)
916 Cave[y-1][x+dx+1] = Yacid_splash_eB;
917 if (Cave[y-1][x+dx-1] == Xblank)
918 Cave[y-1][x+dx-1] = Yacid_splash_wB;
919 play_element_sound(x, y, SAMPLE_acid, Xacid_1);
923 case Yacid_splash_eB:
924 case Yacid_splash_wB:
925 Cave[y][x+dx] = dx > 0 ? Ybomb_e : Ybomb_w;
926 Next[y][x+dx] = Xbomb_pause;
930 Cave[y][x] = dx > 0 ? Ybomb_eB : Ybomb_wB;
931 Next[y][x] = Zplayer;
932 play_element_sound(x, y, SAMPLE_roll, Xbomb);
936 ply->anim = SPR_push + anim;
943 switch(Cave[y][x+dx])
953 if (Cave[y-1][x+dx+1] == Xblank)
954 Cave[y-1][x+dx+1] = Yacid_splash_eB;
955 if (Cave[y-1][x+dx-1] == Xblank)
956 Cave[y-1][x+dx-1] = Yacid_splash_wB;
957 play_element_sound(x, y, SAMPLE_acid, Xacid_1);
961 case Yacid_splash_eB:
962 case Yacid_splash_wB:
963 Cave[y][x+dx] = dx > 0 ? Ynut_e : Ynut_w;
964 Next[y][x+dx] = Xnut_pause;
968 Cave[y][x] = dx > 0 ? Ynut_eB : Ynut_wB;
969 Next[y][x] = Zplayer;
970 play_element_sound(x, y, SAMPLE_roll, Xnut);
974 ply->anim = SPR_push + anim;
981 switch(Cave[y][x+dx])
985 Cave[y][x] = dx > 0 ? Yspring_kill_eB : Yspring_kill_wB;
986 Cave[y][x+dx] = dx > 0 ? Yspring_kill_e : Yspring_kill_w;
987 Next[y][x] = Zplayer;
988 Next[y][x+dx] = dx > 0 ? Xspring_e : Xspring_w;
989 play_element_sound(x, y, SAMPLE_slurp, Xalien);
990 lev.score += lev.slurp_score;
1002 if (Cave[y-1][x+dx+1] == Xblank)
1003 Cave[y-1][x+dx+1] = Yacid_splash_eB;
1004 if (Cave[y-1][x+dx-1] == Xblank)
1005 Cave[y-1][x+dx-1] = Yacid_splash_wB;
1006 play_element_sound(x, y, SAMPLE_acid, Xacid_1);
1010 case Yacid_splash_eB:
1011 case Yacid_splash_wB:
1012 Cave[y][x+dx] = dx > 0 ? Yspring_e : Yspring_w;
1013 Next[y][x+dx] = dx > 0 ? Xspring_e : Xspring_w;
1016 Cave[y][x] = dx > 0 ? Yspring_eB : Yspring_wB;
1017 Next[y][x] = Zplayer;
1018 play_element_sound(x, y, SAMPLE_roll, Xspring);
1022 ply->anim = SPR_push + anim;
1029 case Xsand_stonein_1:
1030 case Xsand_stonein_2:
1031 case Xsand_stonein_3:
1032 case Xsand_stonein_4:
1036 ply->anim = SPR_push + anim;
1040 switch(Cave[y+dy][x+dx])
1050 if (Cave[y+dy-1][x+dx+1] == Xblank)
1051 Cave[y+dy-1][x+dx+1] = Yacid_splash_eB;
1052 if (Cave[y+dy-1][x+dx-1] == Xblank)
1053 Cave[y+dy-1][x+dx-1] = Yacid_splash_wB;
1054 play_element_sound(x, y, SAMPLE_acid, Xacid_1);
1058 case Yacid_splash_eB:
1059 case Yacid_splash_wB:
1060 Cave[y+dy][x+dx] = (dy ? (dy < 0 ? Yballoon_n : Yballoon_s) :
1061 (dx > 0 ? Yballoon_e : Yballoon_w));
1062 Next[y+dy][x+dx] = Xballoon;
1065 Cave[y][x] = (dy ? (dy < 0 ? Yballoon_nB : Yballoon_sB) :
1066 (dx > 0 ? Yballoon_eB : Yballoon_wB));
1067 Next[y][x] = Zplayer;
1068 play_element_sound(x, y, SAMPLE_push, Xballoon);
1073 ply->anim = SPR_push + anim;
1085 switch(Cave[y+dy][x+dx])
1095 if (Cave[y+dy-1][x+dx+1] == Xblank)
1096 Cave[y+dy-1][x+dx+1] = Yacid_splash_eB;
1097 if (Cave[y+dy-1][x+dx-1] == Xblank)
1098 Cave[y+dy-1][x+dx-1] = Yacid_splash_wB;
1099 play_element_sound(x, y, SAMPLE_acid, Xacid_1);
1103 case Yacid_splash_eB:
1104 case Yacid_splash_wB:
1105 Cave[y+dy][x+dx] = (dy ? (dy < 0 ? Yandroid_n : Yandroid_s) :
1106 (dx > 0 ? Yandroid_e : Yandroid_w));
1107 Next[y+dy][x+dx] = (dy ? (dy < 0 ? Xandroid_2_n : Xandroid_2_s) :
1108 (dx > 0 ? Xandroid_2_e : Xandroid_2_w));
1111 Cave[y][x] = (dy ? (dy < 0 ? Yandroid_nB : Yandroid_sB) :
1112 (dx > 0 ? Yandroid_eB : Yandroid_wB));
1113 Next[y][x] = Zplayer;
1114 play_element_sound(x, y, SAMPLE_push, Xandroid);
1119 ply->anim = SPR_push + anim;
1124 if (ply->keys & 0x01)
1131 if (ply->keys & 0x02)
1138 if (ply->keys & 0x04)
1145 if (ply->keys & 0x08)
1152 if (ply->keys & 0x10)
1159 if (ply->keys & 0x20)
1166 if (ply->keys & 0x40)
1173 if (ply->keys & 0x80)
1179 if (!tab_blank[Cave[y+dy][x+dx]])
1182 Cave[y+dy][x+dx] = Zplayer;
1183 Next[y+dy][x+dx] = Zplayer;
1184 play_element_sound(x, y, SAMPLE_door, element);
1185 ply->anim = SPR_walk + anim;
1191 play_element_sound(x, y, SAMPLE_press, element);
1192 lev.wheel_cnt = lev.wheel_time;
1198 lev.wind_direction = 0;
1202 lev.wind_direction = 1;
1206 lev.wind_direction = 2;
1210 lev.wind_direction = 3;
1214 lev.wind_direction = dy ? (dy < 0 ? 0 : 2) : (dx > 0 ? 1 : 3);
1218 play_element_sound(x, y, SAMPLE_press, element);
1219 lev.wind_cnt = lev.wind_time;
1223 play_element_sound(x, y, SAMPLE_press, element);
1228 play_element_sound(x, y, SAMPLE_press, element);
1229 lev.ball_cnt = lev.ball_time;
1230 lev.ball_state = !lev.ball_state;
1234 Cave[y][x] = Yplant;
1235 Next[y][x] = Xplant;
1236 play_element_sound(x, y, SAMPLE_blank, Xplant);
1237 ply->anim = SPR_walk + anim;
1245 play_element_sound(x, y, SAMPLE_exit_leave, Xexit_1);
1250 /* !!! CHECK SCORE CALCULATION !!! */
1251 if (lev.home == 0 && lev.time_initial > 0) /* game won */
1252 lev.score += lev.time * lev.exit_score / 100;
1255 ply->anim = SPR_walk + anim;
1262 if (ply->x == oldx && ply->y == oldy) /* no movement */
1265 else /* player wants to snap */
1267 int element = Cave[y][x];
1271 /* fire is pressed */
1274 Cave[y][x] = Ygrass_eat;
1275 Next[y][x] = Xblank;
1276 play_element_sound(x, y, SAMPLE_dirt, element);
1277 ply->anim = SPR_spray + anim;
1281 Cave[y][x] = Ydirt_eat;
1282 Next[y][x] = Xblank;
1283 play_element_sound(x, y, SAMPLE_dirt, element);
1284 ply->anim = SPR_spray + anim;
1288 case Xdiamond_pause:
1289 Cave[y][x] = Ydiamond_eat;
1290 Next[y][x] = Xblank;
1291 play_element_sound(x, y, SAMPLE_collect, element);
1292 lev.score += lev.diamond_score;
1293 lev.required = lev.required < 3 ? 0 : lev.required - 3;
1294 ply->anim = SPR_walk + anim;
1298 case Xemerald_pause:
1299 Cave[y][x] = Yemerald_eat;
1300 Next[y][x] = Xblank;
1301 play_element_sound(x, y, SAMPLE_collect, element);
1302 lev.score += lev.emerald_score;
1303 lev.required = lev.required < 1 ? 0 : lev.required - 1;
1304 ply->anim = SPR_walk + anim;
1308 Cave[y][x] = Ydynamite_eat;
1309 Next[y][x] = Xblank;
1310 play_element_sound(x, y, SAMPLE_collect, element);
1311 lev.score += lev.dynamite_score;
1312 ply->dynamite = ply->dynamite > 9998 ? 9999 : ply->dynamite + 1;
1313 ply->anim = SPR_walk + anim;
1318 Cave[y][x] = Ykey_1_eat;
1323 Cave[y][x] = Ykey_2_eat;
1328 Cave[y][x] = Ykey_3_eat;
1333 Cave[y][x] = Ykey_4_eat;
1338 Cave[y][x] = Ykey_5_eat;
1343 Cave[y][x] = Ykey_6_eat;
1348 Cave[y][x] = Ykey_7_eat;
1353 Cave[y][x] = Ykey_8_eat;
1357 Next[y][x] = Xblank;
1358 play_element_sound(x, y, SAMPLE_collect, element);
1359 lev.score += lev.key_score;
1360 ply->anim = SPR_walk + anim;
1364 Cave[y][x] = Ylenses_eat;
1365 Next[y][x] = Xblank;
1366 play_element_sound(x, y, SAMPLE_collect, element);
1367 lev.score += lev.lenses_score;
1368 lev.lenses_cnt = lev.lenses_time;
1369 ply->anim = SPR_walk + anim;
1373 Cave[y][x] = Ymagnify_eat;
1374 Next[y][x] = Xblank;
1375 play_element_sound(x, y, SAMPLE_collect, element);
1376 lev.score += lev.magnify_score;
1377 lev.magnify_cnt = lev.magnify_time;
1378 ply->anim = SPR_walk + anim;