2018-07-25 05:05:44 +00:00
|
|
|
/* Convert a 40x96 image into two, 40x48 images suitable of loading */
|
|
|
|
/* with my kfest18 based code */
|
|
|
|
|
2018-07-25 04:49:30 +00:00
|
|
|
#include <stdio.h>
|
|
|
|
#include <stdlib.h>
|
|
|
|
|
|
|
|
#include <unistd.h>
|
|
|
|
#include <stdlib.h>
|
|
|
|
#include <stdio.h>
|
|
|
|
#include <string.h>
|
|
|
|
#include <stdarg.h>
|
|
|
|
|
2018-07-25 05:05:44 +00:00
|
|
|
#include <png.h>
|
2018-07-25 04:49:30 +00:00
|
|
|
|
2019-09-04 19:49:53 +00:00
|
|
|
#include "loadpng.h"
|
2018-07-25 05:05:44 +00:00
|
|
|
|
2019-09-04 19:49:53 +00:00
|
|
|
#define OUTPUT_C 0
|
|
|
|
#define OUTPUT_ASM 1
|
|
|
|
#define OUTPUT_RAW 2
|
2018-07-25 05:05:44 +00:00
|
|
|
|
2018-07-25 04:49:30 +00:00
|
|
|
/*****************************************/
|
|
|
|
/* \/ \/ */
|
|
|
|
/* Converts a PNG to RLE compressed data */
|
|
|
|
/*****************************************/
|
|
|
|
|
|
|
|
|
|
|
|
static int print_run(int count, int out_type, int run, int last) {
|
|
|
|
|
|
|
|
int size=0;
|
|
|
|
|
|
|
|
if (count==0) {
|
|
|
|
if (out_type==OUTPUT_C) {
|
|
|
|
printf("\n\t");
|
|
|
|
}
|
|
|
|
else {
|
|
|
|
printf("\n\t.byte ");
|
|
|
|
}
|
|
|
|
}
|
|
|
|
else {
|
|
|
|
if (out_type==OUTPUT_C) {
|
|
|
|
}
|
|
|
|
else {
|
|
|
|
printf(", ");
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
if (run==1) {
|
|
|
|
if (out_type==OUTPUT_C) {
|
|
|
|
printf("0x%02X,",last);
|
|
|
|
}
|
|
|
|
else {
|
|
|
|
printf("$%02X",last);
|
|
|
|
}
|
|
|
|
size++;
|
|
|
|
}
|
|
|
|
if (run==2) {
|
|
|
|
if (out_type==OUTPUT_C) {
|
|
|
|
printf("0x%02X,0x%02X,",last,last);
|
|
|
|
}
|
|
|
|
else {
|
|
|
|
printf("$%02X,$%02X",last,last);
|
|
|
|
}
|
|
|
|
size+=2;
|
|
|
|
}
|
|
|
|
|
|
|
|
if ((run>2) && (run<16)) {
|
|
|
|
if (out_type==OUTPUT_C) {
|
|
|
|
printf("0x%02X,0x%02X,",0xA0|run,last);
|
|
|
|
}
|
|
|
|
else {
|
|
|
|
printf("$%02X,$%02X",0xA0|run,last);
|
|
|
|
}
|
|
|
|
size+=2;
|
|
|
|
}
|
|
|
|
|
|
|
|
if (run>=16) {
|
|
|
|
if (out_type==OUTPUT_C) {
|
|
|
|
printf("0x%02X,0x%02X,0x%02X,",0xA0,run,last);
|
|
|
|
}
|
|
|
|
else {
|
|
|
|
printf("$%02X,$%02X,$%02X",0xA0,run,last);
|
|
|
|
}
|
|
|
|
size+=3;
|
|
|
|
}
|
|
|
|
|
|
|
|
return size;
|
|
|
|
}
|
|
|
|
|
|
|
|
int rle_smaller(int out_type, char *varname,
|
2018-07-25 05:05:44 +00:00
|
|
|
int xsize,int ysize, unsigned char *image,int high) {
|
2018-07-25 04:49:30 +00:00
|
|
|
|
|
|
|
int run=0;
|
|
|
|
int x;
|
|
|
|
|
|
|
|
int last=-1,next;
|
|
|
|
int size=0;
|
|
|
|
int count=0;
|
|
|
|
|
|
|
|
x=0;
|
|
|
|
|
|
|
|
/* Write out xsize and ysize */
|
|
|
|
|
|
|
|
if (out_type==OUTPUT_C) {
|
2018-07-25 05:05:44 +00:00
|
|
|
fprintf(stdout,"unsigned char %s_%s[]={\n",varname,
|
|
|
|
high?"high":"low");
|
2018-07-25 04:49:30 +00:00
|
|
|
fprintf(stdout,"\t0x%X, /* ysize=%d */",xsize,ysize);
|
|
|
|
}
|
|
|
|
else {
|
2018-07-25 05:05:44 +00:00
|
|
|
fprintf(stdout,"%s_%s:",varname,high?"high":"low");
|
2018-07-25 04:49:30 +00:00
|
|
|
fprintf(stdout,"\t.byte $%X ; ysize=%d",xsize,ysize);
|
|
|
|
}
|
|
|
|
|
|
|
|
size+=2;
|
|
|
|
|
|
|
|
/* Get first top/bottom color pair */
|
|
|
|
last=image[x];
|
|
|
|
run++;
|
|
|
|
x++;
|
|
|
|
|
|
|
|
while(1) {
|
|
|
|
|
|
|
|
/* get next top/bottom color pair */
|
|
|
|
next=image[x];
|
|
|
|
|
|
|
|
if ((next&0xf0)==0xA0) {
|
|
|
|
fprintf(stderr,"Warning! Using color A (grey2)!\n");
|
|
|
|
next&=~0xf0;
|
|
|
|
next|=0x50; // substitute grey1
|
|
|
|
}
|
|
|
|
|
|
|
|
/* If color change (or too big) then output our run */
|
|
|
|
/* Note 0xff for run length is special case meaning "finished" */
|
|
|
|
if ((next!=last) || (run>254)) {
|
|
|
|
|
|
|
|
size+=print_run(count,out_type,run,last);
|
|
|
|
|
|
|
|
count++;
|
|
|
|
run=0;
|
|
|
|
last=next;
|
|
|
|
}
|
|
|
|
|
|
|
|
x++;
|
|
|
|
|
|
|
|
/* If we reach the end */
|
|
|
|
if (x>=xsize*(ysize/2)) {
|
|
|
|
run++;
|
|
|
|
|
|
|
|
size+=print_run(count,out_type,run,last);
|
|
|
|
|
|
|
|
break;
|
|
|
|
|
|
|
|
}
|
|
|
|
|
|
|
|
run++;
|
|
|
|
if (count>6) count=0;
|
|
|
|
|
|
|
|
}
|
|
|
|
|
|
|
|
/* Print closing marker */
|
|
|
|
|
|
|
|
if (out_type==OUTPUT_C) {
|
|
|
|
fprintf(stdout,"0xA1,");
|
|
|
|
fprintf(stdout,"\t};\n");
|
|
|
|
} else {
|
|
|
|
fprintf(stdout,"\n\t.byte $A1\n");
|
|
|
|
}
|
|
|
|
|
|
|
|
size+=1;
|
|
|
|
|
|
|
|
return size;
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
/* Converts a PNG to RLE compressed data */
|
|
|
|
|
|
|
|
int main(int argc, char **argv) {
|
|
|
|
|
|
|
|
unsigned char *image;
|
|
|
|
int xsize,ysize;
|
|
|
|
int size=0;
|
|
|
|
int out_type=OUTPUT_C;
|
|
|
|
|
|
|
|
if (argc<4) {
|
|
|
|
fprintf(stderr,"Usage:\t%s type INFILE varname\n\n",argv[0]);
|
|
|
|
fprintf(stderr,"\ttype: c or asm\n");
|
|
|
|
fprintf(stderr,"\tvarname: label for graphic\n");
|
|
|
|
fprintf(stderr,"\n");
|
|
|
|
|
|
|
|
exit(-1);
|
|
|
|
}
|
|
|
|
|
|
|
|
if (!strcmp(argv[1],"c")) {
|
|
|
|
out_type=OUTPUT_C;
|
|
|
|
}
|
|
|
|
else if (!strcmp(argv[1],"asm")) {
|
|
|
|
out_type=OUTPUT_ASM;
|
|
|
|
}
|
|
|
|
|
2019-09-04 19:49:53 +00:00
|
|
|
if (loadpng(argv[2],&image,&xsize,&ysize,PNG_ODDLINES)<0) {
|
2018-07-25 05:05:44 +00:00
|
|
|
fprintf(stderr,"Error loading png!\n");
|
|
|
|
exit(-1);
|
|
|
|
}
|
|
|
|
|
|
|
|
fprintf(stderr,"Loaded image %d by %d\n",xsize,ysize);
|
|
|
|
|
|
|
|
// size=rle_original(out_type,argv[3],
|
|
|
|
// xsize,ysize,image);
|
|
|
|
|
|
|
|
size=rle_smaller(out_type,argv[3],
|
|
|
|
xsize,ysize,image,0);
|
|
|
|
|
|
|
|
fprintf(stderr,"Size %d bytes\n",size);
|
|
|
|
|
2019-09-04 19:49:53 +00:00
|
|
|
if (loadpng(argv[2],&image,&xsize,&ysize,PNG_EVENLINES)<0) {
|
2018-07-25 04:49:30 +00:00
|
|
|
fprintf(stderr,"Error loading png!\n");
|
|
|
|
exit(-1);
|
|
|
|
}
|
|
|
|
|
|
|
|
fprintf(stderr,"Loaded image %d by %d\n",xsize,ysize);
|
|
|
|
|
|
|
|
// size=rle_original(out_type,argv[3],
|
|
|
|
// xsize,ysize,image);
|
|
|
|
|
|
|
|
size=rle_smaller(out_type,argv[3],
|
2018-07-25 05:05:44 +00:00
|
|
|
xsize,ysize,image,1);
|
2018-07-25 04:49:30 +00:00
|
|
|
|
|
|
|
fprintf(stderr,"Size %d bytes\n",size);
|
|
|
|
|
2018-07-25 05:05:44 +00:00
|
|
|
|
2018-07-25 04:49:30 +00:00
|
|
|
return 0;
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
2018-07-25 05:05:44 +00:00
|
|
|
|
|
|
|
|
|
|
|
|