#include <iom64v.h>
#include <macros.h>
#define  uchar unsigned char
#define  uint  unsigned int
uchar senddata[9]={0x01,'1','a','r','t','s','e','n','r'};
uchar senddata2[9]={0x02,'2','a','r','t','s','e','n','r'};
uchar receive_data[9];
#pragma interrupt_handler uart_rx:19
uchar rdata,flag;
uchar uart_send_over,rx_num;
static unsigned char auchCRCHi[]={
0x00,0xC1,0x81,0x40,0x01,0xC0,0x80,0x41,0x01,0xC0,
0x80,0x41,0x00,0xC1,0x81,0x40,0x01,0xC0,0x80,0x41,
0x00,0xC1,0x81,0x40,0x00,0xC1,0x81,0x40,0x01,0xC0,
0x80,0x41,0x01,0xC0,0x80,0x41,0x00,0xC1,0x81,0x40,
0x00,0xC1,0x81,0x40,0x01,0xC0,0x80,0x41,0x00,0xC1,
0x81,0x40,0x01,0xC0,0x80,0x41,0x01,0xC0,0x80,0x41,
0x00,0xC1,0x81,0x40,0x01,0xC0,0x80,0x41,0x00,0xC1,
0x81,0x40,0x00,0xC1,0x81,0x40,0x01,0xC0,0x80,0x41,
0x00,0xC1,0x81,0x40,0x01,0xC0,0x80,0x41,0x01,0xC0,
0x80,0x41,0x00,0xC1,0x81,0x40,0x00,0xC1,0x81,0x40,
0x01,0xC0,0x80,0x41,0x01,0xC0,0x80,0x41,0x00,0xC1,
0x81,0x40,0x01,0xC0,0x80,0x41,0x00,0xC1,0x81,0x40,
0x00,0xC1,0x81,0x40,0x01,0xC0,0x80,0x41,0x01,0xC0,
0x80,0x41,0x00,0xC1,0x81,0x40,0x00,0xC1,0x81,0x40,
0x01,0xC0,0x80,0x41,0x00,0xC1,0x81,0x40,0x01,0xC0,
0x80,0x41,0x01,0xC0,0x80,0x41,0x00,0xC1,0x81,0x40,
0x00,0xC1,0x81,0x40,0x01,0xC0,0x80,0x41,0x01,0xC0,
0x80,0x41,0x00,0xC1,0x81,0x40,0x01,0xC0,0x80,0x41,
0x00,0xC1,0x81,0x40,0x00,0xC1,0x81,0x40,0x01,0xC0,
0x80,0x41,0x00,0xC1,0x81,0x40,0x01,0xC0,0x80,0x41,
0x01,0xC0,0x80,0x41,0x00,0xC1,0x81,0x40,0x01,0xC0,
0x80,0x41,0x00,0xC1,0x81,0x40,0x00,0xC1,0x81,0x40,
0x01,0xC0,0x80,0x41,0x01,0xC0,0x80,0x41,0x00,0xC1,
0x81,0x40,0x00,0xC1,0x81,0x40,0x01,0xC0,0x80,0x41,
0x00,0xC1,0x81,0x40,0x01,0xC0,0x80,0x41,0x01,0xC0,
0x80,0x41,0x00,0xC1,0x81,0x40
};
/*CRC低位字節(jié)值表*/
static char auchCRCLo[]={
0x00,0xC0,0xC1,0x01,0xC3,0x03,0x02,0xC2,0xC6,0x06,
0x07,0xC7,0x05,0xC5,0xC4,0x04,0xCC,0x0C,0x0D,0xCD,
0x0F,0xCF,0xCE,0x0E,0x0A,0xCA,0xCB,0x0B,0xC9,0x09,
0x08,0xC8,0xD8,0x18,0x19,0xD9,0x1B,0xDB,0xDA,0x1A,
0x1E,0xDE,0xDF,0x1F,0xDD,0x1D,0x1C,0xDC,0x14,0xD4,
0xD5,0x15,0xD7,0x17,0x16,0xD6,0xD2,0x12,0x13,0xD3,
0x11,0xD1,0xD0,0x10,0xF0,0x30,0x31,0xF1,0x33,0xF3,
0xF2,0x32,0x36,0xF6,0xF7,0x37,0xF5,0x35,0x34,0xF4,
0x3C,0xFC,0xFD,0x3D,0xFF,0x3F,0x3E,0xFE,0xFA,0x3A,
0x3B,0xFB,0x39,0xF9,0xF8,0x38,0x28,0xE8,0xE9,0x29,
0xEB,0x2B,0x2A,0xEA,0xEE,0x2E,0x2F,0xEF,0x2D,0xED,
0xEC,0x2C,0xE4,0x24,0x25,0xE5,0x27,0xE7,0xE6,0x26,
0x22,0xE2,0xE3,0x23,0xE1,0x21,0x20,0xE0,0xA0,0x60,
0x61,0xA1,0x63,0xA3,0xA2,0x62,0x66,0xA6,0xA7,0x67,
0xA5,0x65,0x64,0xA4,0x6C,0xAC,0xAD,0x6D,0xAF,0x6F,
0x6E,0xAE,0xAA,0x6A,0x6B,0xAB,0x69,0xA9,0xA8,0x68,
0x78,0xB8,0xB9,0x79,0xBB,0x7B,0x7A,0xBA,0xBE,0x7E,
0x7F,0xBF,0x7D,0xBD,0xBC,0x7C,0xB4,0x74,0x75,0xB5,
0x77,0xB7,0xB6,0x76,0x72,0xB2,0xB3,0x73,0xB1,0x71,
0x70,0xB0,0x50,0x90,0x91,0x51,0x93,0x53,0x52,0x92,
0x96,0x56,0x57,0x97,0x55,0x95,0x94,0x54,0x9C,0x5C,
0x5D,0x9D,0x5F,0x9F,0x9E,0x5E,0x5A,0x9A,0x9B,0x5B,
0x99,0x59,0x58,0x98,0x88,0x48,0x49,0x89,0x4B,0x8B,
0x8A,0x4A,0x4E,0x8E,0x8F,0x4F,0x8D,0x4D,0x4C,0x8C,
0x44,0x84,0x85,0x45,0x87,0x47,0x46,0x86,0x82,0x42,
0x43,0x83,0x41,0x81,0x80,0x40
};
/*要進(jìn)行CRC校驗(yàn)的消息*//*消息中字節(jié)數(shù)*/
unsigned short CRC16(unsigned char *puchMsg,unsigned short usDataLen)
{
unsigned char uchCRCHi=0xFF;/*高CRC字節(jié)初始化*/
unsigned char uchCRCLo=0xFF;/*低CRC字節(jié)初始化*/
unsigned uIndex;/*CRC循環(huán)中的索引*/
while(usDataLen--)/*傳輸消息緩沖區(qū)*/
{
uIndex=uchCRCHi^*puchMsg++;/*計(jì)算CRC*/
uchCRCHi=uchCRCLo^auchCRCHi[uIndex];
uchCRCLo=auchCRCLo[uIndex];
}
return(uchCRCHi<<8|uchCRCLo);
}
void delay(uint ms)
{
        uint i,j;
	for(i=0;i<ms;i++)
	   {
	   for(j=0;j<1141;j++);
       }
}

void write_com(uchar com)
{
       PORTC&=~BIT(2);
	   PORTC&=~BIT(1);
	   PORTB=com;
	   PORTC|=BIT(0);
	   delay(1);
	   PORTC&=~BIT(0);
}

void write_dat(uchar dat)
{     
       PORTC|=BIT(2);
	   PORTC&=~BIT(1);
	   PORTB=dat;
	   PORTC|=BIT(0);
	   delay(1);
	   PORTC&=~BIT(0);

}
void  lcd1602_init()
{
     uchar i;
	  DDRB=0XFF;
	  DDRC|=BIT(0)|BIT(1)|BIT(2);
	  PORTC&=~BIT(0);
	  
	   write_com(0X38);
	  delay(5);
	  write_com(0X01);
	  delay(5);
	  write_com(0X0F);
	  delay(5);
	
	  write_com(0X06);
	  delay(5);
	
	  write_com(0X80);
	  delay(5);
	  //write_dat('5')
	 // delay(5);
}

void uart_init()//串口0初始化
{
   UCSR0B=0x00; 
   UCSR0A=0x00; 		    //控制寄存器清零
   UCSR0C=0x26;   //選擇UCSRC，異步模式     校驗(yàn)，1位停止位，8位數(shù)據(jù)位
   UBRR0L=51; 					     	  
   UCSR0B=(1<<TXEN0)|(1<<RXEN0)|(1<<RXCIE0); //接收、發(fā)送使能，接收中斷使能
   SREG=BIT(7);	                //全局中斷開(kāi)放
   DDRE|=0X02;	                //配置TX為輸出（很重要）

}
void uart_sendB(uchar data)
{
   while(!(UCSR0A&(BIT(UDRE0)))) ;
   UDR0=data;
   UCSR0A|=BIT(TXC0);
}
void uart_sendS(uchar *senddata ,uchar datlen)
{
   uchar n,crcl,crch;
   uint temp;
   for(n=0;n<=datlen;n++)
   {
      if(n<datlen)
	  uart_sendB(*senddata++);
	  else if(n==datlen)
	  {
	    temp= CRC16(senddata,8);
		crcl=temp&0x00ff;
		crch=temp>>8;
	    uart_sendB(crcl);
		uart_sendB(crch);
		uart_send_over=1;//fa song wancheng 
	  }
   }
}
void uart_rx()
{ 
	uchar n;
	uint sum;
    UCSR0B&=~BIT(RXCIE0);
	//write_dat('l');
 if(~(0x04&UCSR0A))
 {
	rdata=UDR0;
	if(rx_num<7)
	{
	receive_data[rx_num]=rdata;
	rx_num++;
	 write_dat(rdata);
	 }
	else if(rx_num==7)
	{
	 receive_data[rx_num]=rdata;
	 rx_num++;
	 //rx_num=0;
	 //flag=1;// jie shou wancheng
	 //CRC jiao yan
	}
	else if(rx_num==8)
	{
	 receive_data[rx_num]=rdata;
	 rx_num=0;
	 //rx_num=0;
	 flag=1;// jie shou wancheng
	 //CRC jiao yan
	}

  }
		
	
	UCSR0B|=BIT(RXCIE0);
}
void main()
{
  
	uchar i,j;
	uint temp=0;
	uint sendh,sendl;
	lcd1602_init();
    uart_init();
    while(1)
	{
	  //write_dat('a');
	  delay(2000);
	  uart_sendS(senddata ,8);
	  delay(2000);
	  uart_sendS(senddata2 ,8);
	}

	
}