supercasiobros/src/mario.c

#include <mario.h>

#include "tile.h"
#include "world.h"
#include <gint/display.h>
#include <keyboard.h>
#include "box.h"
#include "score.h"
#include "bonus.h"
#include <bullets.h>
#include <camera.h>
#include <base.h>


int id_frame=0;

pnj mario=
{
	{26,17,6,8,0,0,0,1},
	M_SMALL,
	M_RIGHT1, M_WALK,
	0
};

int mario_has_bullets=0;
static int mario_timeAccel=0;
int mario_dead=0;

// Used to draw mario (mario direction)
int last_vx_sign=1;

// After he becomes little
int mario_immunity=0;


int mario_starMode=0;

void marioBigger()
{
	mario.p.h=16;
	mario.size=M_BIG;
	mario_has_bullets=0;
}

void marioSmaller()
{
	mario.p.h=8;
	mario.size=M_SMALL;
	mario_has_bullets=0;
	if (mario_immunity==0)
	mario_immunity=1;
	//mario.p.vy=5;
}

void marioDraw()
{
	if ( (mario_immunity==0 || (mario_immunity/7)%2==0) && (mario_starMode/2)%2==0)
	{
		const int mx=mario.p.x-cameraX(mario.p.x)-1;
		const int my=mario.p.y-cameraY(mario.p.y);
		if (mario.size==M_SMALL)
		{
			if (abs(mario.p.vx)>=3) tileDraw(mx, my, &mario_small, 2*last_vx_sign+(id_frame/4)%2, 0);
			else if (abs(mario.p.vx)>=1) tileDraw(mx, my, &mario_small, 2*last_vx_sign+(id_frame/8)%2, 0);
			else tileDraw(mx, my, &mario_small, 2*last_vx_sign, 0);
		}
		else
		{
			if (abs(mario.p.vx)>=3) tileDraw(mx, my, &mario_big, 1+3*last_vx_sign+(id_frame/4)%2, mario_has_bullets);
			else if (abs(mario.p.vx)>=1) tileDraw(mx, my, &mario_big, 1+3*last_vx_sign+(id_frame/8)%2, mario_has_bullets);
			else tileDraw(mx, my, &mario_big, 3*last_vx_sign, mario_has_bullets);
		}
	}
}

int test_sol_le_plus_proche(int x, int y)
{
	int distance=0;
	int t=0;
	while (t==0)
	{
		int type_sol = worldGetCellCategory(x, y-1);
		if (type_sol==CTG_SOIL)
		t=1;
		if (type_sol==CTG_DEATH)
		return distance+1;
		type_sol = worldGetCellCategory(x+7, y-1);
		if (type_sol==CTG_SOIL)
		t=1;
		if (type_sol==CTG_DEATH)
		return distance+1;
		y--;
		distance++;
	}
	return distance;
}

static int jump_buffering=0;
static int coyote_time=5;

void resetMarioJump()
{
	jump_buffering=0;
	coyote_time=5;
}

int global_quit=0;
void marioMove()
{
	id_frame++;

	if (mario_starMode==200) mario_starMode=0;
	else if (mario_starMode) mario_starMode++;

	if (mario_immunity==60) mario_immunity=0;
	else if (mario_immunity) mario_immunity++;

	if (mario_has_bullets==1 && MKB_getKeyState(MK_RUN)==2) bulletThrow();

	if (MKB_getKeyState(MK_JUMP)==2 || jump_buffering) //|| keys[MK_JUMP2]==2)
	{
		if (mario.p.vx*sgn(mario.p.vx)>=6) boxJump(&mario.p, 9);
		else boxJump(&mario.p, 8);

		if (mario.p.vy<=0 && MKB_getKeyState(MK_JUMP)==2 && coyote_time<4) // n'a pas sauté alors que la touche était enfoncée et coyote time =4 frames = 0.2 sec
		{
			if (mario.p.vx*sgn(mario.p.vx)>=6) mario.p.vy=9;
			else mario.p.vy=8;
		}
		// n'a pas sauté alors que la touche était enfoncée
		else if (mario.p.vy<=0 && MKB_getKeyState(MK_JUMP)==2) jump_buffering=5; // Jump buffering during 5-1 frames = 0.2 sec
	}

	if (jump_buffering) jump_buffering--;

	for (int i=0; i<mario.p.w; i++)
	{
		if (worldGetCellCategory(mario.p.x+i, mario.p.y-1)==CTG_SOIL)
		{
			coyote_time=0;
			break;
		}
	}
	coyote_time++;

	if (mario.p.vy>=2 && MKB_getKeyState(MK_JUMP)==0) mario.p.vy-=2; // Custom jump height

	int vx=sgn(MKB_getKeyState(MK_RIGHT)-MKB_getKeyState(MK_LEFT)); // Mario wanted dir (arrows)

	int c1=worldGetCellCategory(mario.p.x, mario.p.y-1/*+mario.p.h*/);
	int c2=worldGetCellCategory(mario.p.x+mario.p.w-1, mario.p.y-1/*+mario.p.h*/);

	mario_timeAccel=1-mario_timeAccel;
	if (vx==-sgn(mario.p.vx)) mario_timeAccel=1;
	if (mario_timeAccel)
	{
		if (vx)
		{
			// sprinte et est sur le sol
			if (MKB_getKeyState(MK_RUN) && (c1==CTG_SOIL || c2==CTG_SOIL) && (abs(mario.p.vx)<=7 || sgn(mario.p.vx)!=vx)) mario.p.vx+=vx;
			else if (abs(mario.p.vx+vx) <= 4) mario.p.vx+=vx;
			// ralentissement si au dela de la vitesse sans sprint
			else if (MKB_getKeyState(MK_RUN)==0 && abs(mario.p.vx)>4) mario.p.vx-=sgn(mario.p.vx);
		}
		else mario.p.vx-=sgn(mario.p.vx);
	}

	if (vx>0 && (c1==CTG_SOIL || c2==CTG_SOIL))
	last_vx_sign=1;
	if (vx<0 && (c1==CTG_SOIL || c2==CTG_SOIL))
	last_vx_sign=0;

	if (mario.p.x+mario.p.vx<cameraX(mario.p.x))
	{
		mario.p.vx=0;
		mario.p.x=cameraX(mario.p.x);
	}
	//teleporteurs_check();
	boxMove(&mario.p); // <-> + gravity

	if (mario.p.y<0)
	mario_dead=1;
	if (mario.p.vx==0)
	mario_timeAccel=0;

	// coins
	coin_t* c;
	c=(coin_t*)worldGetCell(mario.p.x, mario.p.y);
	if (c->type==COIN && c->taken==0)
	{coinAdd();c->taken=1;}
	c=(coin_t*)worldGetCell(mario.p.x+mario.p.w-1, mario.p.y);
	if (c->type==COIN && c->taken==0)
	{coinAdd();c->taken=1;}
	c=(coin_t*)worldGetCell(mario.p.x, mario.p.y+mario.p.h-1);
	if (c->type==COIN && c->taken==0)
	{coinAdd();c->taken=1;}
	c=(coin_t*)worldGetCell(mario.p.x+mario.p.w-1, mario.p.y+mario.p.h-1);
	if (c->type==COIN && c->taken==0)
	{coinAdd();c->taken=1;}

	end_level_t *e1=(end_level_t*)worldGetCell(mario.p.x, mario.p.y), *e2=(end_level_t*)worldGetCell(mario.p.x+mario.p.w-1, mario.p.y);
	if (e1->type==END_LEVEL)
	{
		finish_level=1;
		scoreAdd(400*e1->bonus);
	}
	if (e2->type==END_LEVEL)
	{
		finish_level=1;
		scoreAdd(400*e2->bonus);
	}


	//if ((mario.p.x+mario.p.w/2)/8==(mario.p.x+mario.p.w/2-1)/8)
	//{
	gift_t* t=(gift_t*)worldGetCell((mario.p.x+mario.p.w/2),mario.p.y+mario.p.h);

	if (t->type==GIFT || t->type==BRICK)
	{
		brick_t *c=(brick_t*)t;
		if (c->time_hit_id==0 && mario.p.last_vy>0)
		{
			//mario.p.vy=0;
			if (c->content==0 || c->number)
			{
				c->time_hit_id=1;
				mario.p.last_vy=0;
			}
			if (c->content==1 && c->number)
			{
				c->number--;
				coinAdd();
			}
			else if (c->content==2 && c->number)
			{
				c->number--;
				bonusSet(BONUS_CHAMPI,((mario.p.x+mario.p.w/2)/8)*8,mario.p.y+mario.p.h+8);
			}
			else if (c->content==3 && c->number)
			{
				c->number--;
				bonusSet(BONUS_1UP,((mario.p.x+mario.p.w/2)/8)*8,mario.p.y+mario.p.h+8);
			}
			else if (c->content==4 && c->number)
			{
				c->number--;
				bonusSet(BONUS_STAR,((mario.p.x+mario.p.w/2)/8)*8,mario.p.y+mario.p.h+8);
			}
			else if (c->content==0 && mario.size==M_BIG && c->type==BRICK)
			{
				c->state=1;
				mario.p.vy=0;
			}
			c->hidden=0;
		}
	}

	//}

}