m/grafX2
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

update recoil to version 6.1.0

Browse Source
This commit is contained in:
Thomas Bernard 2021-04-03 14:41:25 +02:00 committed by Adrien Destugues
parent 77f24ad3a4
commit 1e10da1323
2 changed files with 47 additions and 56 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
3rdparty/Makefile vendored
View File

@ -135,14 +135,14 @@ LUAPATCHES = lua-atari-log2.patch \
LATESTLUAVER = $(shell curl -s -S https://www.lua.org/download.html | grep -A1 "current release is" | tail -n1 | sed 's/.*lua-\([0-9.]*\)\.tar.*/\1/' )
LATESTLUA53VER = $(shell curl -s -S https://www.lua.org/versions.html |grep 5[.]3[.] | head -n 1 | sed 's/.*\(5[0-9.]*\).*/\1/' )
# https://storage.googleapis.com/downloads.webmproject.org/releases/webp/libwebp-0.6.1.tar.gz
RECOILVER=5.1.1
RECOILVER=6.1.0
LATESTRECOILVER = $(shell curl -s -S -I https://sourceforge.net/projects/recoil/files/latest/download|grep -i "^location:"|sed 's:.*/\([0-9.]*\)/.*:\1:' )
RECOIL=recoil-$(RECOILVER)
RECOILARCH=$(RECOIL).tar.gz
# https://downloads.sourceforge.net/project/recoil/recoil/4.3.0/recoil-4.3.0.tar.gz
RECOILURL=https://downloads.sourceforge.net/project/recoil/recoil/$(RECOILVER)/$(RECOILARCH)
RECOILURLALT=http://nanard.free.fr/grafx2/$(RECOILARCH)
RECOILSHA256=13ad32d669c73393114da2cc2d1c1af4880fbebcfcc807ca96fc20b181d50db5
RECOILSHA256=a10384a69de0ae4cbc6a21b2bf598e6191da9e8b2847f7aeda66ec18d66e27b9
#https://github.com/redcode/6502/releases/download/v0.1/6502-v0.1.tar.xz
REDCODE6502=6502-v0.1
REDCODE6502ARCH=6502-v0.1.tar.xz

99
src/loadrecoil.c
View File

@ -130,7 +130,6 @@ void Load_Recoil_Image(T_IO_Context *context)
int original_width, original_height;
int x, y;
int x_ratio, y_ratio;
byte * pixels;
const int *palette;
enum PIXEL_RATIO ratio = PIXEL_SIMPLE;
@ -144,69 +143,61 @@ void Load_Recoil_Image(T_IO_Context *context)
ratio = PIXEL_WIDE;
else if(x_ratio == 1 && y_ratio > 1)
ratio = PIXEL_TALL;
pixels = GFX2_malloc(width * height);
if (pixels == NULL)
// try to convert to 8bpp image
File_error = 0;
palette = RECOIL_ToPalette(recoil);
if (palette == NULL)
{
File_error = 1;
// 24bits
const int * tc_pixels;
Pre_load(context, original_width, original_height, file_length, FORMAT_MISC, ratio, 24);
tc_pixels = RECOIL_GetPixels(recoil);
for (y = 0; y < original_height; y++)
{
for (x = 0; x < original_width; x++)
{
Set_pixel_24b(context, x, y, *tc_pixels >> 16, *tc_pixels >> 8, *tc_pixels);
tc_pixels += x_ratio;
}
tc_pixels += width * (y_ratio - 1);
}
}
else
{
// try to convert to 8bpp image
File_error = 0;
palette = RECOIL_ToPalette(recoil, pixels);
if (palette == NULL)
{
// 24bits
const int * tc_pixels;
// 8bits
int i;
int bpp;
int ncolors = RECOIL_GetColors(recoil);
const uint8_t * pixels = RECOIL_GetIndexes(recoil);
const byte * p = pixels;
Pre_load(context, original_width, original_height, file_length, FORMAT_MISC, ratio, 24);
tc_pixels = RECOIL_GetPixels(recoil);
for (y = 0; y < original_height; y++)
{
for (x = 0; x < original_width; x++)
{
Set_pixel_24b(context, x, y, *tc_pixels >> 16, *tc_pixels >> 8, *tc_pixels);
tc_pixels += x_ratio;
}
tc_pixels += width * (y_ratio - 1);
}
}
else
bpp = 8;
while (ncolors <= (1 << (bpp - 1)))
bpp--;
if (Config.Clear_palette)
memset(context->Palette,0,sizeof(T_Palette));
for (i = 0; i < ncolors; i++)
{
// 8bits
int i;
int bpp;
int ncolors = RECOIL_GetColors(recoil);
const byte * p = pixels;
bpp = 8;
while (ncolors <= (1 << (bpp - 1)))
bpp--;
if (Config.Clear_palette)
memset(context->Palette,0,sizeof(T_Palette));
for (i = 0; i < ncolors; i++)
{
context->Palette[i].R = (byte)(palette[i] >> 16);
context->Palette[i].G = (byte)(palette[i] >> 8);
context->Palette[i].B = (byte)(palette[i]);
}
Pre_load(context, original_width, original_height, file_length, FORMAT_MISC, ratio, bpp);
for (y = 0; y < original_height; y++)
{
for (x = 0; x < original_width; x++)
{
Set_pixel(context, x, y, *p);
p += x_ratio;
}
p += width * (y_ratio - 1);
}
context->Palette[i].R = (byte)(palette[i] >> 16);
context->Palette[i].G = (byte)(palette[i] >> 8);
context->Palette[i].B = (byte)(palette[i]);
}
free(pixels);
if (!File_error)
Pre_load(context, original_width, original_height, file_length, FORMAT_MISC, ratio, bpp);
for (y = 0; y < original_height; y++)
{
snprintf(context->Comment, COMMENT_SIZE + 1, "RECOIL: %s %d colors", RECOIL_GetPlatform(recoil), RECOIL_GetColors(recoil));
for (x = 0; x < original_width; x++)
{
Set_pixel(context, x, y, *p);
p += x_ratio;
}
p += width * (y_ratio - 1);
}
}
if (!File_error)
{
snprintf(context->Comment, COMMENT_SIZE + 1, "RECOIL: %s %d colors", RECOIL_GetPlatform(recoil), RECOIL_GetColors(recoil));
}
}
RECOIL_Delete(recoil);
#ifdef WIN32