67 lines
1.6 KiB
C
67 lines
1.6 KiB
C
/*
|
|
* OpenTyrian: A modern cross-platform port of Tyrian
|
|
* Copyright (C) 2007-2009 The OpenTyrian Development Team
|
|
*
|
|
* This program is free software; you can redistribute it and/or
|
|
* modify it under the terms of the GNU General Public License
|
|
* as published by the Free Software Foundation; either version 2
|
|
* of the License, or (at your option) any later version.
|
|
*
|
|
* This program is distributed in the hope that it will be useful,
|
|
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
* GNU General Public License for more details.
|
|
*
|
|
* You should have received a copy of the GNU General Public License
|
|
* along with this program; if not, write to the Free Software
|
|
* Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
|
|
*/
|
|
#include "file.h"
|
|
#include "opentyr.h"
|
|
#include "palette.h"
|
|
#include "pcxload.h"
|
|
#include "video.h"
|
|
|
|
void JE_loadPCX( const char *file ) // this is only meant to load tshp2.pcx
|
|
{
|
|
Uint8 *s = VGAScreen->pixels; /* 8-bit specific */
|
|
|
|
FILE *f = dir_fopen_die(data_dir(), file, "rb");
|
|
|
|
fseek(f, -769, SEEK_END);
|
|
|
|
if (fgetc(f) == 12)
|
|
{
|
|
for (int i = 0; i < 256; i++)
|
|
{
|
|
efread(&colors[i].r, 1, 1, f);
|
|
efread(&colors[i].g, 1, 1, f);
|
|
efread(&colors[i].b, 1, 1, f);
|
|
}
|
|
}
|
|
|
|
fseek(f, 128, SEEK_SET);
|
|
|
|
for (int i = 0; i < 320 * 200; )
|
|
{
|
|
Uint8 p = fgetc(f);
|
|
if ((p & 0xc0) == 0xc0)
|
|
{
|
|
i += (p & 0x3f);
|
|
memset(s, fgetc(f), (p & 0x3f));
|
|
s += (p & 0x3f);
|
|
} else {
|
|
i++;
|
|
*s = p;
|
|
s++;
|
|
}
|
|
if (i && (i % 320 == 0))
|
|
{
|
|
s += VGAScreen->pitch - 320;
|
|
}
|
|
}
|
|
|
|
fclose(f);
|
|
}
|
|
|