1 /* first part of synchro.
3 * game logic for players.
5 * large switch statement for tiles the player interacts with.
14 static void player(struct PLAYER *);
15 static int test(struct PLAYER *);
16 static void die(struct PLAYER *);
20 /* must test for death and actually kill separately */
21 char ply1_kill = test(&ply1);
22 char ply2_kill = test(&ply2);
24 if (ply1.alive && ply1_kill)
26 if (ply2.alive && ply2_kill)
30 ply1.alive = 1; /* debugging */
35 ply1.anim = SPR_still;
38 ply2.anim = SPR_still;
42 if (ply1.alive) player(&ply1);
43 if (ply2.alive) player(&ply2);
47 if (ply2.alive) player(&ply2);
48 if (ply1.alive) player(&ply1);
53 if (Cave[ply1.oldy][ply1.oldx] == Zplayer)
55 Cave[ply1.oldy][ply1.oldx] = Xblank;
56 Next[ply1.oldy][ply1.oldx] = Xblank;
59 if (Cave[ply1.y][ply1.x] == Xblank)
61 Cave[ply1.y][ply1.x] = Zplayer;
62 Next[ply1.y][ply1.x] = Zplayer;
68 if (Cave[ply2.oldy][ply2.oldx] == Zplayer)
70 Cave[ply2.oldy][ply2.oldx] = Xblank;
71 Next[ply2.oldy][ply2.oldx] = Xblank;
74 if (Cave[ply2.y][ply2.x] == Xblank)
76 Cave[ply2.y][ply2.x] = Zplayer;
77 Next[ply2.y][ply2.x] = Zplayer;
82 static int test(struct PLAYER *ply)
84 register unsigned int x = ply->x;
85 register unsigned int y = ply->y;
177 case Yacid_splash_eB:
178 case Yacid_splash_wB:
190 static void die(struct PLAYER *ply)
192 register unsigned int x = ply->x;
193 register unsigned int y = ply->y;
207 Cave[y-1][x] = Xboom_bug;
218 Cave[y-1][x] = Xboom_bomb;
232 Cave[y][x+1] = Xboom_bug;
243 Cave[y][x+1] = Xboom_bomb;
257 Cave[y+1][x] = Xboom_bug;
268 Cave[y+1][x] = Xboom_bomb;
282 Cave[y][x-1] = Xboom_bug;
293 Cave[y][x-1] = Xboom_bomb;
302 play_sound(x, y, SAMPLE_exit);
306 play_sound(x, y, SAMPLE_die);
310 Cave[y][x] = Xboom_1;
314 static void player(struct PLAYER *ply)
316 register unsigned int x = ply->x;
317 register unsigned int y = ply->y;
318 unsigned int anim = 0; /* initialized to make compilers happy */
321 if ((ply->joy_spin = !ply->joy_spin))
384 if (dx == 0 && dy == 0)
390 if (++ply->dynamite_cnt == 5 && ply->dynamite)
392 Cave[y][x] = Xdynamite_1;
393 play_sound(x, y, SAMPLE_dynamite);
399 ply->dynamite_cnt = 0;
402 Random += 7; /* bit more random if we dont move */
408 ply->joy_n = ply->joy_e = ply->joy_s = ply->joy_w = 0;
409 ply->dynamite_cnt = 0; /* reset dynamite timer if we move */
411 if (ply->joy_fire == 0)
415 /* fire is released */
417 case Yacid_splash_eB:
418 case Yacid_splash_wB:
419 Cave[y][x] = Zplayer;
420 Next[y][x] = Zplayer;
421 play_sound(x, y, SAMPLE_blank);
422 ply->anim = SPR_walk + anim;
453 ply->anim = SPR_walk + anim;
459 Cave[y][x] = (dy ? (dy < 0 ? Ygrass_nB : Ygrass_sB) :
460 (dx > 0 ? Ygrass_eB : Ygrass_wB));
461 Next[y][x] = Zplayer;
462 play_sound(x, y, SAMPLE_dirt);
463 ply->anim = SPR_walk + anim;
469 Cave[y][x] = (dy ? (dy < 0 ? Ydirt_nB : Ydirt_sB) :
470 (dx > 0 ? Ydirt_eB : Ydirt_wB));
471 Next[y][x] = Zplayer;
472 play_sound(x, y, SAMPLE_dirt);
473 ply->anim = SPR_walk + anim;
480 Cave[y][x] = Ydiamond_eat;
481 Next[y][x] = Zplayer;
482 play_sound(x, y, SAMPLE_collect);
483 lev.score += lev.diamond_score;
484 lev.required = lev.required < 3 ? 0 : lev.required - 3;
485 ply->anim = SPR_walk + anim;
492 Cave[y][x] = Yemerald_eat;
493 Next[y][x] = Zplayer;
494 play_sound(x, y, SAMPLE_collect);
495 lev.score += lev.emerald_score;
496 lev.required = lev.required < 1 ? 0 : lev.required - 1;
497 ply->anim = SPR_walk + anim;
503 Cave[y][x] = Ydynamite_eat;
504 Next[y][x] = Zplayer;
505 play_sound(x, y, SAMPLE_collect);
506 lev.score += lev.dynamite_score;
507 ply->dynamite = ply->dynamite > 9998 ? 9999 : ply->dynamite + 1;
508 ply->anim = SPR_walk + anim;
547 Cave[y][x] = Yball_eat;
548 Next[y][x] = Zplayer;
549 play_sound(x, y, SAMPLE_collect);
550 lev.score += lev.key_score;
551 ply->anim = SPR_walk + anim;
557 Cave[y][x] = Yball_eat;
558 Next[y][x] = Zplayer;
559 play_sound(x, y, SAMPLE_collect);
560 lev.score += lev.lenses_score;
561 lev.lenses_cnt = lev.lenses_time;
562 ply->anim = SPR_walk + anim;
568 Cave[y][x] = Yball_eat;
569 Next[y][x] = Zplayer;
570 play_sound(x, y, SAMPLE_collect);
571 lev.score += lev.magnify_score;
572 lev.magnify_cnt = lev.magnify_time;
573 ply->anim = SPR_walk + anim;
582 switch(Cave[y][x+dx])
592 if (Cave[y-1][x+dx+1] == Xblank)
593 Cave[y-1][x+dx+1] = Yacid_splash_eB;
594 if (Cave[y-1][x+dx-1] == Xblank)
595 Cave[y-1][x+dx-1] = Yacid_splash_wB;
596 play_sound(x, y, SAMPLE_acid);
600 case Yacid_splash_eB:
601 case Yacid_splash_wB:
602 Cave[y][x+dx] = dx > 0 ? Ystone_e : Ystone_w;
603 Next[y][x+dx] = Xstone_pause;
607 Cave[y][x] = dx > 0 ? Ystone_eB : Ystone_wB;
608 Next[y][x] = Zplayer;
609 play_sound(x, y, SAMPLE_roll);
613 ply->anim = SPR_push + anim;
620 switch(Cave[y][x+dx])
630 if (Cave[y-1][x+dx+1] == Xblank)
631 Cave[y-1][x+dx+1] = Yacid_splash_eB;
632 if (Cave[y-1][x+dx-1] == Xblank)
633 Cave[y-1][x+dx-1] = Yacid_splash_wB;
634 play_sound(x, y, SAMPLE_acid);
638 case Yacid_splash_eB:
639 case Yacid_splash_wB:
640 Cave[y][x+dx] = dx > 0 ? Ybomb_e : Ybomb_w;
641 Next[y][x+dx] = Xbomb_pause;
645 Cave[y][x] = dx > 0 ? Ybomb_eB : Ybomb_wB;
646 Next[y][x] = Zplayer;
647 play_sound(x, y, SAMPLE_roll);
651 ply->anim = SPR_push + anim;
658 switch(Cave[y][x+dx])
668 if (Cave[y-1][x+dx+1] == Xblank)
669 Cave[y-1][x+dx+1] = Yacid_splash_eB;
670 if (Cave[y-1][x+dx-1] == Xblank)
671 Cave[y-1][x+dx-1] = Yacid_splash_wB;
672 play_sound(x, y, SAMPLE_acid);
676 case Yacid_splash_eB:
677 case Yacid_splash_wB:
678 Cave[y][x+dx] = dx > 0 ? Ynut_e : Ynut_w;
679 Next[y][x+dx] = Xnut_pause;
683 Cave[y][x] = dx > 0 ? Ynut_eB : Ynut_wB;
684 Next[y][x] = Zplayer;
685 play_sound(x, y, SAMPLE_roll);
689 ply->anim = SPR_push + anim;
696 switch(Cave[y][x+dx])
700 Cave[y][x] = dx > 0 ? Yspring_kill_eB : Yspring_kill_wB;
701 Cave[y][x+dx] = dx > 0 ? Yspring_kill_e : Yspring_kill_w;
702 Next[y][x] = Zplayer;
703 Next[y][x+dx] = dx > 0 ? Xspring_e : Xspring_w;
704 play_sound(x, y, SAMPLE_slurp);
705 lev.score += lev.slurp_score;
717 if (Cave[y-1][x+dx+1] == Xblank)
718 Cave[y-1][x+dx+1] = Yacid_splash_eB;
719 if (Cave[y-1][x+dx-1] == Xblank)
720 Cave[y-1][x+dx-1] = Yacid_splash_wB;
721 play_sound(x, y, SAMPLE_acid);
725 case Yacid_splash_eB:
726 case Yacid_splash_wB:
727 Cave[y][x+dx] = dx > 0 ? Yspring_e : Yspring_w;
728 Next[y][x+dx] = dx > 0 ? Xspring_e : Xspring_w;
731 Cave[y][x] = dx > 0 ? Yspring_eB : Yspring_wB;
732 Next[y][x] = Zplayer;
733 play_sound(x, y, SAMPLE_roll);
737 ply->anim = SPR_push + anim;
744 case Xsand_stonein_1:
745 case Xsand_stonein_2:
746 case Xsand_stonein_3:
747 case Xsand_stonein_4:
751 ply->anim = SPR_push + anim;
755 switch(Cave[y+dy][x+dx])
765 if (Cave[y+dy-1][x+dx+1] == Xblank)
766 Cave[y+dy-1][x+dx+1] = Yacid_splash_eB;
767 if (Cave[y+dy-1][x+dx-1] == Xblank)
768 Cave[y+dy-1][x+dx-1] = Yacid_splash_wB;
769 play_sound(x, y, SAMPLE_acid);
773 case Yacid_splash_eB:
774 case Yacid_splash_wB:
775 Cave[y+dy][x+dx] = (dy ? (dy < 0 ? Yballoon_n : Yballoon_s) :
776 (dx > 0 ? Yballoon_e : Yballoon_w));
777 Next[y+dy][x+dx] = Xballoon;
780 Cave[y][x] = (dy ? (dy < 0 ? Yballoon_nB : Yballoon_sB) :
781 (dx > 0 ? Yballoon_eB : Yballoon_wB));
782 Next[y][x] = Zplayer;
783 play_sound(x, y, SAMPLE_push);
788 ply->anim = SPR_push + anim;
800 switch(Cave[y+dy][x+dx])
810 if (Cave[y+dy-1][x+dx+1] == Xblank)
811 Cave[y+dy-1][x+dx+1] = Yacid_splash_eB;
812 if (Cave[y+dy-1][x+dx-1] == Xblank)
813 Cave[y+dy-1][x+dx-1] = Yacid_splash_wB;
814 play_sound(x, y, SAMPLE_acid);
818 case Yacid_splash_eB:
819 case Yacid_splash_wB:
820 Cave[y+dy][x+dx] = (dy ? (dy < 0 ? Yandroid_n : Yandroid_s) :
821 (dx > 0 ? Yandroid_e : Yandroid_w));
822 Next[y+dy][x+dx] = (dy ? (dy < 0 ? Xandroid_2_n : Xandroid_2_s) :
823 (dx > 0 ? Xandroid_2_e : Xandroid_2_w));
826 Cave[y][x] = (dy ? (dy < 0 ? Yandroid_nB : Yandroid_sB) :
827 (dx > 0 ? Yandroid_eB : Yandroid_wB));
828 Next[y][x] = Zplayer;
829 play_sound(x, y, SAMPLE_push);
834 ply->anim = SPR_push + anim;
839 if (ply->keys & 0x01)
846 if (ply->keys & 0x02)
853 if (ply->keys & 0x04)
860 if (ply->keys & 0x08)
867 if (ply->keys & 0x10)
874 if (ply->keys & 0x20)
881 if (ply->keys & 0x40)
888 if (ply->keys & 0x80)
894 if (!tab_blank[Cave[y+dy][x+dx]])
897 Cave[y+dy][x+dx] = Zplayer;
898 Next[y+dy][x+dx] = Zplayer;
899 play_sound(x, y, SAMPLE_door);
900 ply->anim = SPR_walk + anim;
906 play_sound(x, y, SAMPLE_press);
907 lev.wheel_cnt = lev.wheel_time;
913 lev.wind_direction = 0;
917 lev.wind_direction = 1;
921 lev.wind_direction = 2;
925 lev.wind_direction = 3;
929 lev.wind_direction = dy ? (dy < 0 ? 0 : 2) : (dx > 0 ? 1 : 3);
933 play_sound(x, y, SAMPLE_press);
934 lev.wind_cnt = lev.wind_time;
938 play_sound(x, y, SAMPLE_press);
943 play_sound(x, y, SAMPLE_press);
944 lev.ball_cnt = lev.ball_time;
945 lev.ball_state = !lev.ball_state;
951 play_sound(x, y, SAMPLE_blank);
952 ply->anim = SPR_walk + anim;
960 play_sound(x, y, SAMPLE_exit);
962 lev.score += lev.time * lev.exit_score / 100;
963 ply->anim = SPR_walk + anim;
973 /* fire is pressed */
977 Cave[y][x] = Yball_eat;
979 play_sound(x, y, SAMPLE_dirt);
980 ply->anim = SPR_spray + anim;
985 Cave[y][x] = Ydiamond_eat;
987 play_sound(x, y, SAMPLE_collect);
988 lev.score += lev.diamond_score;
989 lev.required = lev.required < 3 ? 0 : lev.required - 3;
990 ply->anim = SPR_walk + anim;
995 Cave[y][x] = Yemerald_eat;
997 play_sound(x, y, SAMPLE_collect);
998 lev.score += lev.emerald_score;
999 lev.required = lev.required < 1 ? 0 : lev.required - 1;
1000 ply->anim = SPR_walk + anim;
1004 Cave[y][x] = Ydynamite_eat;
1005 Next[y][x] = Xblank;
1006 play_sound(x, y, SAMPLE_collect);
1007 lev.score += lev.dynamite_score;
1008 ply->dynamite = ply->dynamite > 9998 ? 9999 : ply->dynamite + 1;
1009 ply->anim = SPR_walk + anim;
1045 Cave[y][x] = Yball_eat;
1046 Next[y][x] = Xblank;
1047 play_sound(x, y, SAMPLE_collect);
1048 lev.score += lev.key_score;
1049 ply->anim = SPR_walk + anim;
1053 Cave[y][x] = Yball_eat;
1054 Next[y][x] = Xblank;
1055 play_sound(x, y, SAMPLE_collect);
1056 lev.score += lev.lenses_score;
1057 lev.lenses_cnt = lev.lenses_time;
1058 ply->anim = SPR_walk + anim;
1062 Cave[y][x] = Yball_eat;
1063 Next[y][x] = Xblank;
1064 play_sound(x, y, SAMPLE_collect);
1065 lev.score += lev.magnify_score;
1066 lev.magnify_cnt = lev.magnify_time;
1067 ply->anim = SPR_walk + anim;