196 lines
7.0 KiB
C++
Executable File
196 lines
7.0 KiB
C++
Executable File
#include <windows.h>
|
|
#include <stdio.h>
|
|
#include <stdlib.h>
|
|
#include <ctype.h>
|
|
#include <time.h>
|
|
#include "picture.h"
|
|
|
|
char str[1000], name[1000], *s;
|
|
int type;
|
|
|
|
int mx = 0, my = 0, slen;
|
|
BYTE *tex = 0;
|
|
|
|
inline void out_uc(unsigned char c, int &k)
|
|
{
|
|
if (k < 0) {printf("\n\""); k = 0;}
|
|
printf("\\x%02X", c);
|
|
k++;
|
|
if (k >= 20) {printf("\""); k = -1;}
|
|
}
|
|
|
|
inline void out_cl(int &k)
|
|
{
|
|
if (k >= 0) {printf("\""); k = -1;}
|
|
}
|
|
|
|
inline void out_end(int &k)
|
|
{
|
|
if (k == -10) return;
|
|
if (type == 0) {out_uc(0, k); out_uc(255, k);}
|
|
out_cl(k);
|
|
printf(";\n\n");
|
|
k = -10;
|
|
}
|
|
|
|
void del_last_space(char *s0)
|
|
{
|
|
char *s1;
|
|
for (s1 = s0; *s1; s1++)
|
|
{
|
|
if (!isspace(*s1)) s0 = s1 + 1;
|
|
}
|
|
*s0 = 0;
|
|
}
|
|
|
|
int main()
|
|
{
|
|
BYTE *t0;
|
|
int i, j, k, m, t, v;
|
|
// randomize();
|
|
srand(time(NULL));
|
|
i = rand() + (rand() << 16);
|
|
j = rand() + (rand() << 16);
|
|
k = rand() + (rand() << 16);
|
|
printf("#ifndef _INCLUDE_BITMAP_%08X_%08X_%08X__PICTURE_\n", i, j, k);
|
|
printf("#define _INCLUDE_BITMAP_%08X_%08X_%08X__PICTURE_\n", i, j, k);
|
|
strcpy(name, "bitmap_pictures");
|
|
type = 0;
|
|
k = -10;
|
|
while (!feof(stdin))
|
|
{
|
|
memset(str, 0, sizeof(str));
|
|
fgets(str, sizeof(str)-1, stdin);
|
|
s = str;
|
|
while (*s && isspace(*s)) s++;
|
|
if (strncmp(s, "rem", 3) != 0) continue;
|
|
s += 3;
|
|
if (!isspace(*s)) continue;
|
|
while (*s && isspace(*s)) s++;
|
|
if (strncmp(s, "<array", 6) == 0)
|
|
{
|
|
s += 6;
|
|
if (strncmp(s, ":bmp>", 5) == 0) {s += 5; v = 0;}
|
|
else if (strncmp(s, ":set>", 5) == 0) {s += 5; v = 1;}
|
|
else if (strncmp(s, ":life>", 6) == 0) {s += 6; v = 2;}
|
|
else continue;
|
|
if (!isspace(*s)) continue;
|
|
while (*s && isspace(*s)) s++;
|
|
if (!*s) continue;
|
|
del_last_space(s);
|
|
strcpy(name, s);
|
|
out_end(k);
|
|
type = v;
|
|
continue;
|
|
}
|
|
else if (strncmp(s, "<skip>", 6) == 0)
|
|
{
|
|
s += 6;
|
|
if (!isspace(*s)) continue;
|
|
while (*s && isspace(*s)) s++;
|
|
if (!*s) continue;
|
|
i = 2*atoi(s);
|
|
while (--i >= 0) out_uc(0, k);
|
|
continue;
|
|
}
|
|
else if (strncmp(s, "<bitmap", 7) == 0)
|
|
{
|
|
s += 7; v = 0;
|
|
for (;;)
|
|
{
|
|
if (strncmp(s, ":inv", 4) == 0) {s += 4; v ^= 1;}
|
|
else break;
|
|
}
|
|
if (s[0] == '>') s++;
|
|
else continue;
|
|
}
|
|
else continue;
|
|
if (!isspace(*s)) continue;
|
|
while (*s && isspace(*s)) s++;
|
|
if (!*s) continue;
|
|
del_last_space(s);
|
|
if ((PictureFileOpen(mx, my, tex, s) & PFO_MASK_ERROR) != 0) continue;
|
|
if (!tex || mx <= 0 || my <= 0) continue;
|
|
if (type == 0 || type == 1)
|
|
{
|
|
if (mx >= 256 || my >= 256) continue;
|
|
}
|
|
else if (type == 2)
|
|
{
|
|
if (mx >= 65536 || my >= 65536) continue;
|
|
}
|
|
slen = GetStringPictLenght(mx);
|
|
if (k == -10)
|
|
{
|
|
printf("\nconst unsigned char %s[] = \"", name);
|
|
if (type == 2) printf("#LifeBin 2.0\\n");
|
|
printf("\"");
|
|
k = -1;
|
|
}
|
|
if (v & 1)
|
|
{
|
|
for (i = 0; i < my; i++)
|
|
{
|
|
t0 = tex + slen * i;
|
|
for (j = 3*mx; j > 0; j--)
|
|
{
|
|
t0[0] = (unsigned char)~t0[0];
|
|
t0++;
|
|
}
|
|
}
|
|
}
|
|
m = 0; t = 0;
|
|
if (type == 0 || type == 1)
|
|
{
|
|
out_uc((unsigned char)mx, k); out_uc((unsigned char)my, k);
|
|
}
|
|
else if (type == 2)
|
|
{
|
|
out_uc((unsigned char)mx, k); out_uc((unsigned char)(mx >> 8), k);
|
|
out_uc((unsigned char)my, k); out_uc((unsigned char)(my >> 8), k);
|
|
}
|
|
for (i = 0; i < my; i++)
|
|
{
|
|
t0 = tex + slen * i;
|
|
for (j = mx; j > 0; j--)
|
|
{
|
|
if (type == 0)
|
|
{
|
|
out_uc(t0[2], k); out_uc(t0[1], k); out_uc(t0[0], k);
|
|
}
|
|
else if (type == 1)
|
|
{
|
|
m |= ((int)t0[0] + (int)t0[1] + (int)t0[2] >= 384) << t;
|
|
if (++t >= 8) {out_uc((unsigned char)m, k); m = 0; t = 0;}
|
|
}
|
|
else if (type == 2)
|
|
{
|
|
if ((int)t0[0] + (int)t0[1] + (int)t0[2] >= 384)
|
|
{
|
|
if (m) {out_uc((unsigned char)m, k); m = 0;}
|
|
out_uc(0, k);
|
|
}
|
|
else
|
|
{
|
|
if (m == 255) {out_uc((unsigned char)m, k); m = 0;}
|
|
m++;
|
|
}
|
|
}
|
|
t0 += 3;
|
|
}
|
|
}
|
|
if (type == 1)
|
|
{
|
|
if (t) out_uc((unsigned char)m, k);
|
|
}
|
|
else if (type == 2)
|
|
{
|
|
if (m) out_uc((unsigned char)m, k);
|
|
}
|
|
}
|
|
if (tex) delete[] tex;
|
|
out_end(k);
|
|
printf("#endif\n");
|
|
return 0;
|
|
}
|