////////////////////////////
// PAlib project template //
////////////////////////////
 
// Lines starting with two slashes are ignored by the compiler
// Basically you can use them to comment what are you doing
// In fact, this kind of lines are called comments :P
 
// Include PAlib so that you can use it
#include <PA9.h>
 
#include "gfx/all_gfx.c"
#include "gfx/all_gfx.h"
 
s32 r = 31;
s32 g = 31;
s32 b = 31;
s32 dibujo = 0;
 
// Function: main()
int main(int argc, char ** argv)
{
PA_Init();
PA_InitVBL();
PA_InitText(1, 0);
 
bool menu; 
menu = false;
 
bool juego;
juego=false;
 
PA_EasyBgLoad(0, 3,Bienvenida);
 
	// Palette....	
 
 
 
	while (1)
{
if ((Stylus.Newpress) && (menu == false))
   {
   PA_DeleteBg(0, 3);   
	PA_EasyBgLoad(0, 3,menu);
	menu = true;
	}
 
	if ((PA_StylusInZone(55,68,200,88))&& (juego==false))
	{
	   juego=true;
		PA_DeleteBg(0,3);
		PA_EasyBgLoad(1,3,arriba);
		PA_Init16bitBg(0, 3);
 
 
PA_SetBgColor(0,PA_RGB(31, 31, 31));
 
PA_RGB(r, g, b));
}
PA_16bitDraw(0,
PA_RGB(r, g, b));
 
if (Pad.Newpress.L){
 
dibujo = dibujo +1;
 
if (dibujo == 9)
{
dibujo = 0;
}
 
else if (dibujo == 1){
r = 0;
g = 31;
b = 31;
}
else if (dibujo == 2){
r = 20;
g = 6;
b = 0;
}
else if (dibujo == 3){
r = 31;
g = 31;
b = 0;
}
else if (dibujo == 4){
r = 25;
g = 25;
b = 25;
}
else if (dibujo == 5){
r = 0;
g = 31;
b = 0;
}
else if (dibujo == 6){
r = 31;
g = 26;
b = 0;
}
else if (dibujo == 7){
r = 20;
g = 0;
b = 0;
}
else if (dibujo == 8){
r = 0;
g = 31;
b = 19;
}
} 
if (Pad.Newpress.Up){
 
dibujo = dibujo +1;
 
if (dibujo == 8)
{
dibujo = 0;
}
 
else if (dibujo == 1){
r = 0;
g = 17;
b = 31;
}
else if (dibujo == 2){
r = 15;
g = 6;
b = 0;
}
else if (dibujo == 3){
r = 20;
g = 20;
b = 20;
}
else if (dibujo == 4){
r = 0;
g = 25;
b = 0;
}
else if (dibujo == 5){
r = 31;
g = 20;
b = 0;
}
else if (dibujo == 6){
r = 17;
g = 0;
b = 0;
}
else if (dibujo == 7){
r = 0;
g = 25;
b = 14;
}
}
if (Pad.Newpress.B){
PA_Clear16bitBg(0
);
 
}	
 
 
		PA_WaitForVBL();
	}
 
 
   return 0;
}