struct
    {
        WORD Magic_Number;          // Numero magico debe ser igual 0x9119
        WORD Width;                        // Ancho de la imagen
        WORD Heigh;                        // Alto de la imagen
        WORD Horiz;                         // Posicion horizontal
        WORD Vert;                           // Posicion vertical
        BYTE BPP;                             // Bits Por Pixel (8)
        BYTE Compresion;                 // Tipo de compresion (0=no comprimido)
         long Size;                             // Tamaño en bytes de la imagen
         BYTE Reservados[16];           // Reservados para futuras ampliaciones
} CelHead;

    FILE *f;

    if((f=fopen(filename, "rb"))==NULL)  return ARCHIVO_NO_ENCONTRADO;

    // Leemos la cabecera
    fread(&CelHead, sizeof(char), 32, f);

    if(CelHead.Magic_Number!=0x9119)
    {
        fclose(f);
        return NO_ES_CEL;
    }

    // Se reserva memoria para guardar la imagen y 4 bytes mas para guardar
    // el ancho y el alto (2 bytes cada uno)
    if((*where=(BYTE*)malloc((CelHead.Width*CelHead.Height)+4))==NULL)
    {
        fclose(f);
        return NO_HAY_MEMORIA;
    }

    // Guardamos los valores del ancho y el alto
    memcpy(*where, &CelHead.Width, 2);
    memcpy(*where+2, &CelHead.Height, 2);

    // Leemos la paleta
    fread(paleta, sizeof(char), 768, f);

    // Leemos la imagen y la copiamos a *where+4 despues del ancho y alto
    fread(*where+4, sizeof(char), (CelHead.Width*CelHead.Height), f);

    fclose(f);

    return OK;
}