mar.c

#include <time.h>
#include <math.h>
#include <stdlib.h>
#include <stdio.h>
#include <allegro.h>
#include "bib/tipos.h"
#include "bib/mar.h"
#include "bib/desloc.h"
#include "bib/colisao.h"
#include "entidades/botes.h"
#include "entidades/pessoas.h"
#include "entidades/estaticos.h"
#include "configurador/configs.h"

/*#define VERCOLISAO if(COLISAO) circle(buffer, proximo->p.pos.x,proximo->p.pos.y ,proximo->p.raio, VERMELHO);
#define COLISAO 0 *//* Se quiser ver os circulos da colisao setar 1 */

int validaPos(lista_pessoas lista_p, lista_estaticos lista_e, lista_botes lista_b, pessoa * p, estatico * e, bote * b)
{
/*
Essa função recebe as listas de elementos do mar e apenas um tipo de estrutura apontada (pessoa, bote ou estatico). Os tipos que não forem o desejado serão passados como NULL.
A função verificará a possibilidade de criação da estrutura desejada em determinado lugar do mar, vendo se há outras estruturas lá.
OBS: se a estrutura for um bote, a existencia de pessoas não impossibilita a sua criação (recolhe as pessoas).
*/


	lista_pessoas aux_p;
	lista_estaticos aux_e;
	lista_botes aux_b;
	char tipo;

	aux_p = lista_p;
	aux_e = lista_e;
	aux_b = lista_b;

	if(p != NULL)
		tipo = 'p';
	if(e != NULL)
		tipo = 'e';
	if(b != NULL)
		tipo = 'b';

	/*Percorrendo a lista de pessoas (se não for bote!)*/

	if(tipo != 'b')
	{
		while(aux_p != NULL)
		{
			if(tipo == 'p')
			{

				if((aux_p->pss.atr.raio + p->atr.raio) >= distancia(aux_p->pss.atr.pos, p->atr.pos))
				{ 	
					/*Verifica se a pessoa a inserir não eh a mesma que está no meio do caminho na lista.*/
					if(p != &aux_p->pss)
						return 0;
				}
				aux_p = aux_p->prox;
			}

			else if(tipo == 'e')
			{
				
				if((aux_p->pss.atr.raio + e->raio) >= distancia(aux_p->pss.atr.pos, e->pos))
					return 0;

				aux_p = aux_p->prox;

			}
		}
	}

	/*Percorrendo a lista de estaticos*/

	while(aux_e != NULL)
	{
		if(tipo == 'p')
		{
			if((aux_e->stc.raio + p->atr.raio) >= distancia(aux_e->stc.pos, p->atr.pos))
				return 0;

			aux_e = aux_e->prox;
		}

		else if(tipo == 'e')
		{
			
			if((aux_e->stc.raio + e->raio) >= distancia(aux_e->stc.pos, e->pos))
			{
				/*Verifica se o estatico a inserir não eh o mesmo que está no meio do caminho na lista.*/

				if(e != &aux_e->stc)
					return 0;
			}
			
			aux_e = aux_e->prox;

		}

		else if(tipo == 'b')
		{
			if((aux_e->stc.raio + b->atr.raio) >= distancia(aux_e->stc.pos, b->atr.pos))
				return 0;

			aux_e = aux_e->prox;
		}

	}


	/*Percorrendo a lista de botes*/

	while(aux_b != NULL)
	{
		if(tipo == 'p')
		{

			if((aux_b->bt.atr.raio + p->atr.raio) >= distancia(aux_b->bt.atr.pos, p->atr.pos))
				return 0;

			aux_b = aux_b->prox;
		}

		else if(tipo == 'e')
		{
			
			if((aux_b->bt.atr.raio + e->raio) >= distancia(aux_b->bt.atr.pos, e->pos))
				return 0;
				
			aux_b = aux_b->prox;
		}

		else if(tipo == 'b')
		{
			if((aux_b->bt.atr.raio + b->atr.raio) >= distancia(aux_b->bt.atr.pos, b->atr.pos))
			{
				/*Verifica se o bote a inserir não eh o mesmo que está no meio do caminho na lista.*/
				if(b != &aux_b->bt)
					return 0;

				
			}
			aux_b = aux_b->prox;
		}
	}

	return 1;

}



lista_pessoas atualizaMar(lista_pessoas lista_p, lista_estaticos lista_e, lista_botes lista_b, double deltaT, int mkv)
{
	lista_pessoas aux_p = lista_p;
	
	/* Ver se não estão sendo gerados no mesmo lugar */

	while(aux_p!=NULL) 
	{
		aux_p->pss.atr.atualizada = 0; 
		aux_p = aux_p->prox;
	} 
	

	detectaColisao(&lista_p, &lista_e, &lista_b, deltaT);

		
	aux_p = lista_p;
	
	while( aux_p != NULL)
	{
		if(!aux_p->pss.atr.atualizada)
		{
			if(mkv)
			{
				markov(&aux_p->pss,deltaT);
        			aux_p->pss.atr.atualizada = 1;
			}				
			else
				movePessoa(&aux_p->pss,deltaT);

			if( (aux_p->pss.atr.pos.y - aux_p->pss.atr.raio) < 0)
				colidePessoaComBorda(lista_p, lista_e, lista_b, 0, &aux_p->pss);				
			else if( (aux_p->pss.atr.pos.y + aux_p->pss.atr.raio) > tela.altura)
				colidePessoaComBorda(lista_p, lista_e, lista_b, 1, &aux_p->pss);
			else if( (aux_p->pss.atr.pos.x - aux_p->pss.atr.raio) < 0)
				colidePessoaComBorda(lista_p, lista_e, lista_b, 2, &aux_p->pss);
			else if( (aux_p->pss.atr.pos.x + aux_p->pss.atr.raio) > tela.comprimento )
				colidePessoaComBorda(lista_p, lista_e, lista_b, 3, &aux_p->pss);		
		}
		
		aux_p = aux_p -> prox;

	}
	
	return lista_p;
}

/*void imprimeMar(lista_pessoas lista_p, lista_estaticos lista_e, lista_botes lista_b)
{
	lista_pessoas aux_p;
	lista_estaticos aux_e;
	lista_botes aux_b;

	BITMAP *buffer;

	buffer = create_bitmap(screen->w, screen->h);
  
	clear_to_color(buffer, AZUL);

	

	

	for(aux_p = lista_p; aux_p != NULL; aux_p = aux_p -> prox)
	{
		circlefill(buffer, aux_p->pss.atr.pos.x, aux_p->pss.atr.pos.y ,aux_p->pss.atr.raio, PRETO);                          


	}




	for(aux_e = lista_e; aux_e != NULL; aux_e = aux_e -> prox)
	{
		if( aux_e->stc.tipo == 'r' )
		{	
      circlefill(buffer, aux_e->stc.pos.x ,aux_e->stc.pos.y ,aux_e->stc.raio, MARROM);
		}

		else if( aux_e->stc.tipo == 'a')
		{
      circlefill(buffer, aux_e->stc.pos.x ,aux_e->stc.pos.y ,aux_e->stc.raio, VERDE);
		}


	}



	for(aux_b = lista_b; aux_b != NULL; aux_b = aux_b -> prox)
	{
		if( aux_b->bt.jogador == 1 )
		{
			triangle(buffer, (aux_b->bt.atr.pos.x-15), (aux_b->bt.atr.pos.y-17), (aux_b->bt.atr.pos.x), (aux_b->bt.atr.pos.y+20), (aux_b->bt.atr.pos.x+15), (aux_b->bt.atr.pos.y-17),LARANJA);

		}

		else if( aux_b->bt.jogador == 2 )
		{
			triangle(buffer, (aux_b->bt.atr.pos.x-15), (aux_b->bt.atr.pos.y-17), (aux_b->bt.atr.pos.x), (aux_b->bt.atr.pos.y+20), (aux_b->bt.atr.pos.x+15), (aux_b->bt.atr.pos.y-17),BRANCO);

		}


	}

	
	blit(buffer, screen, 0, 0, 0, 0, screen->w, screen->h);  
	destroy_bitmap(buffer);

}*/

void liberaMar(lista_pessoas lista_p, lista_estaticos lista_e, lista_botes lista_b)
{
	lista_pessoas aux_p;
	lista_estaticos aux_e;
	lista_botes aux_b;	


	while(lista_p != NULL)
	{
		aux_p = lista_p;
		lista_p = lista_p->prox;		
		free(aux_p);
	}

	while(lista_e != NULL)
	{
		aux_e = lista_e;
		lista_e = lista_e->prox;		
		free(aux_e);
	}

	while(lista_b != NULL)
	{
		aux_b = lista_b;
		lista_b = lista_b->prox;		
		free(aux_b);
	}
}