#include "serlibbase.h"
#include "serlib.h"

struct SerLibBase	*SerLibBase;
struct SerStatus ss;
struct SerLibData	*sld;

char buf[2048];
ULONG len;
main()
{
	SerLibBase=(struct SerLibBase *)OpenLibrary("serlib.library",3L);
	sld=OpenSerial("serial.device",0,2400,8,1,(ULONG)(SERF_7WIRE|SERF_SHARED));
	if (!sld) printf("Couldn't open...");
	else {
		ChangeData(sld,2400,8,1,(ULONG)(SERF_RAD_BOOGIE|SERF_7WIRE|SERF_SHARED));
		WriteSer(sld,"AT$\r",4);
		Delay(20);
		GetStatus(sld,&ss);
		printf("Bytes unread: %ld\nStatus: %lx\n",ss.ss_unread,ss.ss_status);
		Delay(20);
		WriteSer(sld," ",1);
		Delay(20);
		GetStatus(sld,&ss);
		printf("Bytes unread: %ld\nStatus: %lx\n",ss.ss_unread,ss.ss_status);
loop:
		len=ReadSer(sld,buf,2040);
		buf[len]='\0';
		printf("%s",buf);
		GetStatus(sld,&ss);
		if (ss.ss_unread>0) goto loop;
		CloseSerial(sld);
	}
	CloseLibrary(SerLibBase);
}