#include <stdio.h>

#include <stdlib.h>

static int width, height;

static char bname[50] = "noname";

static int perline = 13;

static char mask[9] = { 0x00, 0x80, 0xc0, 0xe0, 0xf0, 0xf8, 0xfc, 0xfe, 0xff };

static char imask[9] = { 0x00, 0x01, 0x03, 0x07, 0x0f, 0x1f, 0x3f, 0x7f, 0xff };

void

parameters(const int argn, char **argc)

{

	if (argn != 3)

	{

		fprintf(stderr, "usage: %s <width> <height>\n", argc[0]);

		exit(1);

	}

	width = atoi(argc[1]);

	height = atoi(argc[2]);

}

void

writesize(int w, int h)

{

	printf("#define %s_width %i\n", bname, w);

	printf("#define %s_height %i\n", bname, h);

}

char

cstart(int p, int n)

{

	char c;

	if (p==0)

		c=0xaa;

	else

		c=0x55;

	return c & mask[n];

}

char

cend(int p, int n)

{

	char c;

	if (p==0)

		c=0xaa;

	else

		c=0x55;

	return c & imask[n];

}

void

writebits(int w, int h)

{

	int column;

	int i;

	int bits;

	unsigned char c;

	int pair; /* boolean */

	int leftline;

	printf("static char %s_bits[] = {\n", bname);

	bits=w*h;

	leftline=w;

	i=0;

	column=0;

	pair=0;

	while(i < bits)

	{

		if(column == 0)

			putchar(' ');

		/*fprintf(stderr, "leftline=%i\n", leftline);*/

		if (leftline >= 8)

		{

			c = cstart(pair, 8);

			printf("0x%2x", (unsigned int) c);

			column++;

			leftline -= 8;

			i += 8;

		}

		else if (leftline > 0)

		{

			c = cend(pair, leftline);

			pair ^= 1; /* 1->0, 0->1 */

			c |= cstart(pair, 8 - leftline);

			printf("0x%2x", (unsigned int) c);

			i += leftline;

			leftline = w;

			column++;

		}

		else if (leftline == 0)

		{	

			leftline = w;

			pair ^= 1; /* 1->0, 0->1 */

		}

		if(i < bits && leftline != 0)

			putchar(',');

		if (column > perline && leftline != 0)

		{

			putchar('\n');

			column = 0;

		}

	}

	printf("};\n");

}

int main(int argn, char **argc)

{

	parameters(argn, argc);

	writesize(width, height);

	writebits(width, height);

	return 0;

}