int main(){
 
	PA_Init(); // iniziamos PAlib
	PA_InitVBL(); // Iniziamos VBL
 
	PA_InitText(1,0);
 
	PA_LoadBackground(0,0,&Nada);
 
   while(1){	
 
    if (Stylus.Newpress && PA_StylusInZone(4,4,114,81)) {PA_OutputSimpleText(1,2,5,"Verde"); PA_LoadBackground(0,1,&Verde);}
 
  	if (Stylus.Newpress && PA_StylusInZone(4,109,114,184)) {PA_OutputSimpleText(1,2,5,"Amarillo"); PA_LoadBackground(0,2,&Amarillo);}
 
	if (Stylus.Newpress && PA_StylusInZone(140,4,250,81)) {PA_OutputSimpleText(1,2,5,"Rojo"); PA_LoadBackground(0,3,&Rojo);}
 
    if (Stylus.Newpress && PA_StylusInZone(140,109,250,184)) {PA_OutputSimpleText(1,2,5,"Azul"); PA_LoadBackground(0,4,&Azul);}
 
	if (Stylus.Released) {PA_LoadBackground(0,0,&Nada); PA_OutputSimpleText(1,2,5,"           ");}
 
   }
 
 
	// Infinite loop to keep the program running
	while(true){
		PA_WaitForVBL();
	}
}