#include <SDL/SDL.h>
#include <stdio.h>

struct spelota
{
	int x;
	int y;
	int dx;
	int dy;
	SDL_Surface *ima;
};


int init (SDL_Surface **screen);
void procesar_eventos (int *salir);
void imprimir (SDL_Surface *screen, struct spelota pelota);
int iniciar_pelota (struct spelota *pelota);
void actualizar(struct spelota *pelota);


int main (void)
{
	SDL_Surface *screen;
	int salir = 0;
	struct spelota pelota;
	
	if (init(&screen))
		return 1;

	if (iniciar_pelota(&pelota))
		return 1;
	
	
	while (! salir) {
		actualizar(&pelota);
		imprimir(screen, pelota);
		procesar_eventos(&salir);
	}
	
	
	SDL_Quit();
	return 0;
}


/*
 * Inicializa la biblioteca SDL y genera la pantalla principal
 */
int init (SDL_Surface **screen)
{
	if (SDL_Init(SDL_INIT_VIDEO) == -1) {
		printf("Error: %s\n", SDL_GetError());
		return 1;
	}

	*screen = SDL_SetVideoMode(320, 200, 16, SDL_DOUBLEBUF | SDL_HWSURFACE);
	
	if (screen == NULL) {
		printf("Error: %s\n", SDL_GetError());
		return 1;
	}
	
	SDL_WM_SetCaption("Bucle básico", NULL);
	
	return 0;
}


/*
 * Informa si el programa debe terminar
 */
void procesar_eventos (int *salir)
{
	SDL_Event event;

	while (SDL_PollEvent(&event)) {
		
		if (event.type == SDL_QUIT)
			*salir = 1;

		if (event.type == SDL_KEYDOWN)
			*salir = 1;
	}
}

/*
 * Imprime la ventana
 */
void imprimir (SDL_Surface *screen, struct spelota pelota)
{
	SDL_Rect dst;
	
	dst.x = pelota.x;
	dst.y = pelota.y;

	SDL_FillRect(screen, NULL, SDL_MapRGB(screen->format, 150, 150, 150));
	SDL_BlitSurface(pelota.ima, NULL, screen, &dst);
	
	SDL_Flip(screen);
}


/*
 * Genera el objeto pelota
 */
int iniciar_pelota (struct spelota *pelota)
{
	pelota->x = 150;
	pelota->y = 100;
	pelota->dx = 1;
	pelota->dy = 1;

	pelota->ima = SDL_LoadBMP("ima.bmp");

	if (pelota->ima == NULL) {
		printf("Error al cargar imagen: %s\n", SDL_GetError());
		return 1;
	}

	return 0;
}


/*
 * Modifica la posicion de la pelota
 */
void actualizar(struct spelota *pelota)
{
	pelota->x += pelota->dx;
	pelota->y += pelota->dy;

	if (pelota->x > 320 - 32)
		pelota->dx = -1;

	if (pelota->y > 200 - 32)
		pelota->dy = -1;

	if (pelota->x < 0)
		pelota->dx = 1;

	if (pelota->y < 0)
		pelota->dy = 1;
}