/* file name: icom2.c,    iview com2 to i7065D       */
/* put command to di, check response  */
#include <iVIEW.H>
#include <mmi100.H>

void main(void)
{
   	int  port=2, quit=0,i;
   	char di1[4]="@01\r", di2[5];
   
	InitLib();
 	InitLCD();
 	LcdSetCursorOn();
 	Print(">TEST IVIEW-100: ...");
//   	if ( initLCD()>0) Print("LCD Wrong\n\r");
//   	else
//   	{
   		ClrScrn();
   		LcdPrintfAt(1,1, "iView-100 OK");
   		LcdPrintfAt(1,2, ">");
   		SetCursorAt(2, 2);
  		Print("LCD OK\n\r");
//   	}
   	
//test i-7065D
	Print("Test tocom:(any key)\n\r command: ");
   	Getch();
	InstallCom(port,115200L,8,0,1);
	ClearCom(port);
	for (i=0;i<4;i++) 
	{
		ToCom(port,di1[i]);
		TextOutAt(2+i, 2, &di1[i] );
  		Print("%c",di1[i]);
	}
	SetCursorAt(6, 2);
	Print("\r\nTest readcom:(any key)\n\r response: ");
   	Getch();
	for (i=0;i<5;i++) 
	{
		if(IsCom(port))
		{
			di2[i]=ReadCom(port);
			TextOutAt(1+i, 3,&di2[i] );
  			Print("%c",di2[i]);
	  	}
	}
	SetCursorAt(7, 3);
	Print("\n\r any key to quit.\n\r");
	Getch();
	RestoreCom(port);
   	ClrScrn();
     	CloseLCD();
}