1 /* first part of synchro.
3 * game logic for players.
5 * large switch statement for tiles the player interacts with.
14 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)
453 printf("::: up == %d, down == %d, left == %d, right == %d, fire == %d [spin == %d, stick == %d]\n",
454 ply->joy_n, ply->joy_s, ply->joy_w, ply->joy_e, ply->joy_fire,
455 ply->joy_spin, ply->joy_stick);
459 if (ply->joy_w) /* west */
465 else if (ply->joy_e) /* east */
472 if (ply->joy_n) /* north */
478 else if (ply->joy_s) /* south */
487 if ((ply->joy_spin = !ply->joy_spin))
489 if (ply->joy_n) /* north */
495 else if (ply->joy_e) /* east */
501 else if (ply->joy_s) /* south */
507 else if (ply->joy_w) /* west */
516 if (ply->joy_w) /* west */
522 else if (ply->joy_s) /* south */
528 else if (ply->joy_e) /* east */
534 else if (ply->joy_n) /* north */
549 boolean can_move = TRUE;
554 can_move = (centered_player_nr != -1 || checkIfAllPlayersFitToScreen());
561 ply->joy_n = ply->joy_e = ply->joy_s = ply->joy_w = 0;
567 if (dx == 0 && dy == 0)
573 if (++ply->dynamite_cnt == 5 && ply->dynamite)
575 Cave[y][x] = Xdynamite_1;
576 play_element_sound(x, y, SAMPLE_dynamite, Xdynamite_1);
582 ply->dynamite_cnt = 0;
585 RandomEM += 7; /* be a bit more random if the player doesn't move */
591 ply->joy_n = ply->joy_e = ply->joy_s = ply->joy_w = 0;
592 ply->dynamite_cnt = 0; /* reset dynamite timer if we move */
593 ply->joy_spin = !ply->joy_spin;
595 if (ply->joy_snap == 0) /* player wants to move */
597 boolean moved = FALSE;
599 if (ply->last_move_dir & MV_HORIZONTAL)
601 if (!(moved = player_digfield(ply, 0, dy)))
602 moved = player_digfield(ply, dx, 0);
606 if (!(moved = player_digfield(ply, dx, 0)))
607 moved = player_digfield(ply, 0, dy);
613 ply->last_move_dir = (dx < 0 ? MV_LEFT : MV_RIGHT);
614 else if (oldy != ply->y)
615 ply->last_move_dir = (dy < 0 ? MV_UP : MV_DOWN);
617 game_em.any_player_moving = TRUE;
618 game_em.last_moving_player = ply->num;
619 game_em.last_player_direction[ply->num] = ply->last_move_dir;
622 else /* player wants to snap */
624 player_digfield(ply, dx, dy);
628 static boolean player_digfield(struct PLAYER *ply, int dx, int dy)
630 int anim = (dx < 0 ? 3 : dx > 0 ? 1 : dy < 0 ? 0 : dy > 0 ? 2 : 2);
635 boolean result = TRUE;
637 if (!dx && !dy) /* no direction specified */
640 if (dx && dy && ply->joy_snap) /* more than one direction specified */
643 if (ply->joy_snap == 0) /* player wants to move */
645 int element = Cave[y][x];
649 /* fire is released */
651 case Yacid_splash_eB:
652 case Yacid_splash_wB:
653 Cave[y][x] = Zplayer;
654 Next[y][x] = Zplayer;
665 play_element_sound(x, y, SAMPLE_blank, Xblank);
666 ply->anim = SPR_walk + anim;
681 if (Cave[y-1][x+1] == Xblank)
682 Cave[y-1][x+1] = Yacid_splash_eB;
683 if (Cave[y-1][x-1] == Xblank)
684 Cave[y-1][x-1] = Yacid_splash_wB;
685 play_element_sound(x, y, SAMPLE_acid, Xacid_1);
715 ply->anim = SPR_walk + anim;
721 Cave[y][x] = (dy ? (dy < 0 ? Ygrass_nB : Ygrass_sB) :
722 (dx > 0 ? Ygrass_eB : Ygrass_wB));
723 Next[y][x] = Zplayer;
724 play_element_sound(x, y, SAMPLE_dirt, Xgrass);
725 ply->anim = SPR_walk + anim;
731 Cave[y][x] = (dy ? (dy < 0 ? Ydirt_nB : Ydirt_sB) :
732 (dx > 0 ? Ydirt_eB : Ydirt_wB));
733 Next[y][x] = Zplayer;
734 play_element_sound(x, y, SAMPLE_dirt, Xdirt);
735 ply->anim = SPR_walk + anim;
742 Cave[y][x] = Ydiamond_eat;
743 Next[y][x] = Zplayer;
744 play_element_sound(x, y, SAMPLE_collect, element);
745 lev.score += lev.diamond_score;
746 lev.required = lev.required < 3 ? 0 : lev.required - 3;
747 ply->anim = SPR_walk + anim;
754 Cave[y][x] = Yemerald_eat;
755 Next[y][x] = Zplayer;
756 play_element_sound(x, y, SAMPLE_collect, element);
757 lev.score += lev.emerald_score;
758 lev.required = lev.required < 1 ? 0 : lev.required - 1;
759 ply->anim = SPR_walk + anim;
765 Cave[y][x] = Ydynamite_eat;
766 Next[y][x] = Zplayer;
767 play_element_sound(x, y, SAMPLE_collect, element);
768 lev.score += lev.dynamite_score;
769 ply->dynamite = ply->dynamite > 9998 ? 9999 : ply->dynamite + 1;
770 ply->anim = SPR_walk + anim;
777 Cave[y][x] = Ykey_1_eat;
782 Cave[y][x] = Ykey_2_eat;
787 Cave[y][x] = Ykey_3_eat;
792 Cave[y][x] = Ykey_4_eat;
797 Cave[y][x] = Ykey_5_eat;
802 Cave[y][x] = Ykey_6_eat;
807 Cave[y][x] = Ykey_7_eat;
812 Cave[y][x] = Ykey_8_eat;
817 Next[y][x] = Zplayer;
818 play_element_sound(x, y, SAMPLE_collect, element);
819 lev.score += lev.key_score;
820 ply->anim = SPR_walk + anim;
826 Cave[y][x] = Ylenses_eat;
827 Next[y][x] = Zplayer;
828 play_element_sound(x, y, SAMPLE_collect, element);
829 lev.score += lev.lenses_score;
830 lev.lenses_cnt = lev.lenses_time;
831 ply->anim = SPR_walk + anim;
837 Cave[y][x] = Ymagnify_eat;
838 Next[y][x] = Zplayer;
839 play_element_sound(x, y, SAMPLE_collect, element);
840 lev.score += lev.magnify_score;
841 lev.magnify_cnt = lev.magnify_time;
842 ply->anim = SPR_walk + anim;
851 switch(Cave[y][x+dx])
861 if (Cave[y-1][x+dx+1] == Xblank)
862 Cave[y-1][x+dx+1] = Yacid_splash_eB;
863 if (Cave[y-1][x+dx-1] == Xblank)
864 Cave[y-1][x+dx-1] = Yacid_splash_wB;
865 play_element_sound(x, y, SAMPLE_acid, Xacid_1);
869 case Yacid_splash_eB:
870 case Yacid_splash_wB:
871 Cave[y][x+dx] = dx > 0 ? Ystone_e : Ystone_w;
872 Next[y][x+dx] = Xstone_pause;
876 Cave[y][x] = dx > 0 ? Ystone_eB : Ystone_wB;
877 Next[y][x] = Zplayer;
878 play_element_sound(x, y, SAMPLE_roll, Xstone);
882 ply->anim = SPR_push + anim;
889 switch(Cave[y][x+dx])
899 if (Cave[y-1][x+dx+1] == Xblank)
900 Cave[y-1][x+dx+1] = Yacid_splash_eB;
901 if (Cave[y-1][x+dx-1] == Xblank)
902 Cave[y-1][x+dx-1] = Yacid_splash_wB;
903 play_element_sound(x, y, SAMPLE_acid, Xacid_1);
907 case Yacid_splash_eB:
908 case Yacid_splash_wB:
909 Cave[y][x+dx] = dx > 0 ? Ybomb_e : Ybomb_w;
910 Next[y][x+dx] = Xbomb_pause;
914 Cave[y][x] = dx > 0 ? Ybomb_eB : Ybomb_wB;
915 Next[y][x] = Zplayer;
916 play_element_sound(x, y, SAMPLE_roll, Xbomb);
920 ply->anim = SPR_push + anim;
927 switch(Cave[y][x+dx])
937 if (Cave[y-1][x+dx+1] == Xblank)
938 Cave[y-1][x+dx+1] = Yacid_splash_eB;
939 if (Cave[y-1][x+dx-1] == Xblank)
940 Cave[y-1][x+dx-1] = Yacid_splash_wB;
941 play_element_sound(x, y, SAMPLE_acid, Xacid_1);
945 case Yacid_splash_eB:
946 case Yacid_splash_wB:
947 Cave[y][x+dx] = dx > 0 ? Ynut_e : Ynut_w;
948 Next[y][x+dx] = Xnut_pause;
952 Cave[y][x] = dx > 0 ? Ynut_eB : Ynut_wB;
953 Next[y][x] = Zplayer;
954 play_element_sound(x, y, SAMPLE_roll, Xnut);
958 ply->anim = SPR_push + anim;
965 switch(Cave[y][x+dx])
969 Cave[y][x] = dx > 0 ? Yspring_kill_eB : Yspring_kill_wB;
970 Cave[y][x+dx] = dx > 0 ? Yspring_kill_e : Yspring_kill_w;
971 Next[y][x] = Zplayer;
972 Next[y][x+dx] = dx > 0 ? Xspring_e : Xspring_w;
973 play_element_sound(x, y, SAMPLE_slurp, Xalien);
974 lev.score += lev.slurp_score;
986 if (Cave[y-1][x+dx+1] == Xblank)
987 Cave[y-1][x+dx+1] = Yacid_splash_eB;
988 if (Cave[y-1][x+dx-1] == Xblank)
989 Cave[y-1][x+dx-1] = Yacid_splash_wB;
990 play_element_sound(x, y, SAMPLE_acid, Xacid_1);
994 case Yacid_splash_eB:
995 case Yacid_splash_wB:
996 Cave[y][x+dx] = dx > 0 ? Yspring_e : Yspring_w;
997 Next[y][x+dx] = dx > 0 ? Xspring_e : Xspring_w;
1000 Cave[y][x] = dx > 0 ? Yspring_eB : Yspring_wB;
1001 Next[y][x] = Zplayer;
1002 play_element_sound(x, y, SAMPLE_roll, Xspring);
1006 ply->anim = SPR_push + anim;
1013 case Xsand_stonein_1:
1014 case Xsand_stonein_2:
1015 case Xsand_stonein_3:
1016 case Xsand_stonein_4:
1020 ply->anim = SPR_push + anim;
1024 switch(Cave[y+dy][x+dx])
1034 if (Cave[y+dy-1][x+dx+1] == Xblank)
1035 Cave[y+dy-1][x+dx+1] = Yacid_splash_eB;
1036 if (Cave[y+dy-1][x+dx-1] == Xblank)
1037 Cave[y+dy-1][x+dx-1] = Yacid_splash_wB;
1038 play_element_sound(x, y, SAMPLE_acid, Xacid_1);
1042 case Yacid_splash_eB:
1043 case Yacid_splash_wB:
1044 Cave[y+dy][x+dx] = (dy ? (dy < 0 ? Yballoon_n : Yballoon_s) :
1045 (dx > 0 ? Yballoon_e : Yballoon_w));
1046 Next[y+dy][x+dx] = Xballoon;
1049 Cave[y][x] = (dy ? (dy < 0 ? Yballoon_nB : Yballoon_sB) :
1050 (dx > 0 ? Yballoon_eB : Yballoon_wB));
1051 Next[y][x] = Zplayer;
1052 play_element_sound(x, y, SAMPLE_push, Xballoon);
1057 ply->anim = SPR_push + anim;
1069 switch(Cave[y+dy][x+dx])
1079 if (Cave[y+dy-1][x+dx+1] == Xblank)
1080 Cave[y+dy-1][x+dx+1] = Yacid_splash_eB;
1081 if (Cave[y+dy-1][x+dx-1] == Xblank)
1082 Cave[y+dy-1][x+dx-1] = Yacid_splash_wB;
1083 play_element_sound(x, y, SAMPLE_acid, Xacid_1);
1087 case Yacid_splash_eB:
1088 case Yacid_splash_wB:
1089 Cave[y+dy][x+dx] = (dy ? (dy < 0 ? Yandroid_n : Yandroid_s) :
1090 (dx > 0 ? Yandroid_e : Yandroid_w));
1091 Next[y+dy][x+dx] = (dy ? (dy < 0 ? Xandroid_2_n : Xandroid_2_s) :
1092 (dx > 0 ? Xandroid_2_e : Xandroid_2_w));
1095 Cave[y][x] = (dy ? (dy < 0 ? Yandroid_nB : Yandroid_sB) :
1096 (dx > 0 ? Yandroid_eB : Yandroid_wB));
1097 Next[y][x] = Zplayer;
1098 play_element_sound(x, y, SAMPLE_push, Xandroid);
1103 ply->anim = SPR_push + anim;
1108 if (ply->keys & 0x01)
1115 if (ply->keys & 0x02)
1122 if (ply->keys & 0x04)
1129 if (ply->keys & 0x08)
1136 if (ply->keys & 0x10)
1143 if (ply->keys & 0x20)
1150 if (ply->keys & 0x40)
1157 if (ply->keys & 0x80)
1163 if (!tab_blank[Cave[y+dy][x+dx]])
1166 Cave[y+dy][x+dx] = Zplayer;
1167 Next[y+dy][x+dx] = Zplayer;
1168 play_element_sound(x, y, SAMPLE_door, element);
1169 ply->anim = SPR_walk + anim;
1175 play_element_sound(x, y, SAMPLE_press, element);
1176 lev.wheel_cnt = lev.wheel_time;
1182 lev.wind_direction = 0;
1186 lev.wind_direction = 1;
1190 lev.wind_direction = 2;
1194 lev.wind_direction = 3;
1198 lev.wind_direction = dy ? (dy < 0 ? 0 : 2) : (dx > 0 ? 1 : 3);
1202 play_element_sound(x, y, SAMPLE_press, element);
1203 lev.wind_cnt = lev.wind_time;
1207 play_element_sound(x, y, SAMPLE_press, element);
1212 play_element_sound(x, y, SAMPLE_press, element);
1213 lev.ball_cnt = lev.ball_time;
1214 lev.ball_state = !lev.ball_state;
1218 Cave[y][x] = Yplant;
1219 Next[y][x] = Xplant;
1220 play_element_sound(x, y, SAMPLE_blank, Xplant);
1221 ply->anim = SPR_walk + anim;
1229 play_element_sound(x, y, SAMPLE_exit_leave, Xexit_1);
1234 /* !!! CHECK SCORE CALCULATION !!! */
1235 if (lev.home == 0 && lev.time_initial > 0) /* game won */
1236 lev.score += lev.time * lev.exit_score / 100;
1239 ply->anim = SPR_walk + anim;
1246 if (ply->x == oldx && ply->y == oldy) /* no movement */
1249 else /* player wants to snap */
1251 int element = Cave[y][x];
1255 /* fire is pressed */
1258 Cave[y][x] = Ygrass_eat;
1259 Next[y][x] = Xblank;
1260 play_element_sound(x, y, SAMPLE_dirt, element);
1261 ply->anim = SPR_spray + anim;
1265 Cave[y][x] = Ydirt_eat;
1266 Next[y][x] = Xblank;
1267 play_element_sound(x, y, SAMPLE_dirt, element);
1268 ply->anim = SPR_spray + anim;
1272 case Xdiamond_pause:
1273 Cave[y][x] = Ydiamond_eat;
1274 Next[y][x] = Xblank;
1275 play_element_sound(x, y, SAMPLE_collect, element);
1276 lev.score += lev.diamond_score;
1277 lev.required = lev.required < 3 ? 0 : lev.required - 3;
1278 ply->anim = SPR_walk + anim;
1282 case Xemerald_pause:
1283 Cave[y][x] = Yemerald_eat;
1284 Next[y][x] = Xblank;
1285 play_element_sound(x, y, SAMPLE_collect, element);
1286 lev.score += lev.emerald_score;
1287 lev.required = lev.required < 1 ? 0 : lev.required - 1;
1288 ply->anim = SPR_walk + anim;
1292 Cave[y][x] = Ydynamite_eat;
1293 Next[y][x] = Xblank;
1294 play_element_sound(x, y, SAMPLE_collect, element);
1295 lev.score += lev.dynamite_score;
1296 ply->dynamite = ply->dynamite > 9998 ? 9999 : ply->dynamite + 1;
1297 ply->anim = SPR_walk + anim;
1302 Cave[y][x] = Ykey_1_eat;
1307 Cave[y][x] = Ykey_2_eat;
1312 Cave[y][x] = Ykey_3_eat;
1317 Cave[y][x] = Ykey_4_eat;
1322 Cave[y][x] = Ykey_5_eat;
1327 Cave[y][x] = Ykey_6_eat;
1332 Cave[y][x] = Ykey_7_eat;
1337 Cave[y][x] = Ykey_8_eat;
1341 Next[y][x] = Xblank;
1342 play_element_sound(x, y, SAMPLE_collect, element);
1343 lev.score += lev.key_score;
1344 ply->anim = SPR_walk + anim;
1348 Cave[y][x] = Ylenses_eat;
1349 Next[y][x] = Xblank;
1350 play_element_sound(x, y, SAMPLE_collect, element);
1351 lev.score += lev.lenses_score;
1352 lev.lenses_cnt = lev.lenses_time;
1353 ply->anim = SPR_walk + anim;
1357 Cave[y][x] = Ymagnify_eat;
1358 Next[y][x] = Xblank;
1359 play_element_sound(x, y, SAMPLE_collect, element);
1360 lev.score += lev.magnify_score;
1361 lev.magnify_cnt = lev.magnify_time;
1362 ply->anim = SPR_walk + anim;