// Includes
#include <PA9.h>       // Include for PA_Lib
#include <stdlib.h>
#include "efs_lib.h"
 
void Iniciar_EFS(void);
u8* Obtener_Archivo(char* path);
void Cargar_Bg(u8 pantalla,char* path);
 
// Function: main()
int main(int argc, char ** argv)
{
	PA_Init();    // Initializes PA_Lib
	PA_InitVBL(); // Initializes a standard VBL
 
	PA_InitText(0,0);
 
	Iniciar_EFS();
	PA_Init16bitBg(1,3);
	Cargar_Bg(1,"pantallainicio2");
 
	// Infinite loop to keep the program running
	while (1)
	{
		PA_WaitForVBL();
	}
 
	return 0;
} // End of main()
 
void Iniciar_EFS(void)
{
   if(!EFS_Init(EFS_AND_FAT | EFS_DEFAULT_DEVICE, NULL))
   {
      PA_OutputText(0,1,1,"EFS Error!!");
      while(true)	{PA_WaitForVBL();}
   }
   else
	{
	   PA_OutputText(0,1,1,"EFS ok!!");
	   PA_ClearTextBg(0);
	}   
}
 
//Obtención de datos del archivo
u8* Obtener_Archivo(char* path)
{
   FILE* file;	//Variable que apunta al fichero
   u8* archivo;	//Variable puntero u8
   int size;
   struct stat st;	//Variable stat para el fichero
   file=fopen(path,"rb");	//Abrimos el archivo(forma binaria)
   if(file!=NULL)	//Comprobación: ¿Existe el fichero? Si existe...
   {
      stat(path,&st);	//Metemos el fichero en la estructura stat (volcado de datos)
      size=st.st_size;
      archivo=(u8*)malloc(size);	//El puntero apunta al archivo
      fread(archivo,1,size,file);	//Volcado del archivo
      fclose(file);	//Acabado el volcado, el archivo se cierra
      return(archivo);
   }
	else	//Si no existe...
	{
	   PA_OutputText(0,0,0,"File not found!");
	   while(true)	PA_WaitForVBL();
	   return(0);
	}
}
 
//Cargado del fondo
void Cargar_Bg(u8 pantalla,char* path)
{ 
	u32* info;
	char path_info [EFS_MAXPATHLEN];
	sprintf (path_info, "%s_Bitmap.bin", path);  // Completamos el path del info
	info = Obtener_Archivo (path_info);
	PA_Load16bitBitmap(pantalla,(u32*)info);<textarea name='code' class='c' language='c'>void Iniciar_EFS(void)
{
   if(!EFS_Init(EFS_AND_FAT | EFS_DEFAULT_DEVICE, NULL))
   {
      PA_OutputText(0,1,1,"EFS Error!!");
      while(true)	{PA_WaitForVBL();}
   }
   else
	{
	   PA_OutputText(0,1,1,"EFS ok!!");
	   PA_ClearTextBg(0);
	}   
}
 
//Obtención de datos del archivo
u8* Obtener_Archivo(char* path)
{
   FILE* file;	//Variable que apunta al fichero
   u8* archivo;	//Variable puntero u8
   int size;
   struct stat st;	//Variable stat para el fichero
   file=fopen(path,"rb");	//Abrimos el archivo(forma binaria)
   if(file!=NULL)	//Comprobación: ¿Existe el fichero? Si existe...
   {
      stat(path,&st);	//Metemos el fichero en la estructura stat (volcado de datos)
      size=st.st_size;
      archivo=(u8*)malloc(size);	//El puntero apunta al archivo
      fread(archivo,1,size,file);	//Volcado del archivo
      fclose(file);	//Acabado el volcado, el archivo se cierra
      return(archivo);
   }
	else	//Si no existe...
	{
	   PA_OutputText(0,0,0,"File not found!");
	   while(true)	PA_WaitForVBL();
	   return(0);
	}
}
 
//Cargado del fondo
void Cargar_Bg(u8 pantalla,char* path)
{ 
	u32* info;
	char path_info [EFS_MAXPATHLEN];
	sprintf (path_info, "%s_Bitmap.bin", path);  // Completamos el path del info
	info = Obtener_Archivo (path_info);
	PA_Load16bitBitmap(pantalla,info);
}