#include "cg.h"

main()
{
	int i;
	int x,y,x0,y0;
	int f;
	int b[1];

	mode(CLEAR);
	mode(PLOT);
	mode(BINARY);
	while(1)
	{
		mode(XYON);
		x = cursor();
		y = cursor();
		mode(XYOFF);
		mode(HOME);
		mode(CHAR);
		printf("%d,%d\n", x,y);
		mode(PLOT);
		catvec(x,y);
	}
	mode(CHAR);
}

mode(s)
	char *s;
{
	write(1, s, strlen(s));
}

vector(x0,y0,x1,y1)
{
	mode(VECTOR);
	coord(x0);
	coord(y0);
	coord(x1);
	coord(y1);
}

catvec(x,y)
{
	mode(CATVEC);
	coord(x);
	coord(y);
}

coord(c)
{
	char c0 = (c&077)|0100;
	char c1 = ((c>>6)&07)|0100;
	write(1, &c0, 1);
	write(1, &c1, 1);
}

rectangle(x0,y0,x1,y1)
{
	mode(RECT);
	coord(x0);
	coord(y0);
	coord(x1);
	coord(y1);
}

cursor()
{
	char c0;
	char c1;
	int x;

	read(0,&c0,1);
	read(0,&c1,1);
	x = (c1&077) | ((c0&07)<<6);
	return(x);
}
