// Includes
#include <PA9.h>       // Include for PA_Lib
#include "gfx/all_gfx.c"
#include "gfx/all_gfx.h"
 
// Function: main()
int main(int argc, char ** argv)
{
    u8 i;
 
	PA_Init();    // Initializes PA_Lib
	PA_InitVBL(); // Initializes a standard VBL
 
 
 
	bool menu; // Cargamos Booleano
	menu=false; // Le aplicamos un valor.
 
	bool juego;
	juego=false;
 
	PA_EasyBgLoad(1, 3, bg2);
	PA_EasyBgLoad(0, 3, bg2);
 
	// Infinite loop to keep the program running
	while (1)
	{
	   if ((Stylus.Newpress) && (menu == false))
		{
		   PA_DeleteBg(0,3);
		   PA_DeleteBg(1,3);
			PA_EasyBgLoad(0,3, bg3);
			menu=true;
		}
 
 
		if ((PA_StylusInZone(5,116,253,144))&&(menu==true))
		{
		   menu=false;
 
			PA_EasyBgLoad(0,3, bg2);
		}
 
		if ((PA_StylusInZone(57,22,185,70))&& (juego==false))
		{
		    juego=true;
 
		   PA_DeleteBg(0,3);	
		   PA_DeleteBg(1,3);	
 
			PA_EasyBgLoad(1, 3, bg0); //imagen en la pantalla de arriba
         PA_EasyBgLoad(0, 3, bg1);//imagen de la pantalla tactil 
 
			PA_LoadSpritePal(0, 0, (void*)sprite0_Pal); 
			PA_LoadSpritePal(0, 1, (void*)sprite1_Pal);  
 
PA_CreateSprite(0, 0,(void*)ficha1_Sprite, OBJ_SIZE_32X32,1, 0, PA_Rand()%192,PA_Rand()%128);
PA_CreateSprite(0, 1,(void*)ficha1_Sprite, OBJ_SIZE_32X32,1, 0, PA_Rand()%192,PA_Rand()%128);
PA_CreateSprite(0, 2,(void*)ficha1_Sprite, OBJ_SIZE_32X32,1, 0, PA_Rand()%192,PA_Rand()%128);
PA_CreateSprite(0, 3,(void*)ficha2_Sprite, OBJ_SIZE_32X32,1, 1, PA_Rand()%192,PA_Rand()%128);
PA_CreateSprite(0, 4,(void*)ficha2_Sprite, OBJ_SIZE_32X32,1, 1, PA_Rand()%192,PA_Rand()%128);
PA_CreateSprite(0, 5,(void*)ficha2_Sprite, OBJ_SIZE_32X32,1, 1, PA_Rand()%192,PA_Rand()%128);
 
}
 
		PA_WaitForVBL();
		for(i=0;i<6;i++) PA_MoveSprite(i);
	}
 
	return 0;
} // End of main()