/* 程序中增加了在P2口显示启动信号AA、回答信号BB、发送数据和校验和 */
/* SEND_RECI_LINE＝1，设置发送; SEND_RECI_LINE＝0，设置接收*/
#include <REG52.H> 
#include <intrins.h>
#include <stdio.h>
#define uchar unsigned char
#define uint unsigned int

sbit SEND_RECI_CTRL = P1^0;
sbit CTRL_BUTTON = P1^7; /* CTRL_BUTTON＝0，设置错误校验和 */
uchar idata sbuf [32] _at_ 0x30;	/*发送内容*/
uchar idata rbuf [32] _at_ 0x30;	/*接收缓冲区*/
void initUart(void);			/*初始化串口波特率，使用定时器1*/
void send(uchar idata *d);	   /*发送函数*/
void receive(uchar idata *d);  /*接收函数*/
void initArray();				/*数组初始化*/
code unsigned char stop[3] _at_ 0x3b;
/***********ms延时程序******************/
void delay(uint z)/*延时函数*/
{
	uint i;
   	for(i=0;i<z;i++);
}
/******** main 函数 *********/
void main (void) {	
	initArray();
	delay(10);			/* 延时等待外围器件完成复位 */
	initUart();			/* 初始化串口 */
  	if(SEND_RECI_CTRL){	/*发送*/
  		send(sbuf);
  	}
  	else{				/*接收*/
  		receive(rbuf);  
  	}
	while(1){}
}
/********** 数组初始化************/
void initArray()
{
	uchar i;
	for(i=0;i<32;i++)
	{
		sbuf[i]=i;	
	}	
}
/********** 初始化串口波特率 ************/
void initUart(void)/*初始化串口波特率，使用定时器1*/
{
/* Setup the serial port for 9600 baud at 11.0592MHz */
	SCON  = 0x50;  /*串口工作在方式1*/
	TMOD  = 0x20;
	PCON  = 0x0;
	ACC		= 0xfd;
	TL1   = ACC;
	TH1   = ACC;
	TCON  = 0x40;
}

void send(uchar idata *d) /*发送函数*/
{
uchar i,pf;
	do{			
		P2=0xaa;
		SBUF=0xaa;  /*发送联络信号*/
		while(TI==0){}TI=0;	
		while(RI==0){}RI=0;
	}while((SBUF^0xbb)!=0);  /*乙机未准备好，继续联络*/
	P2=SBUF;delay(50000);
	do{
   		pf=0;    /*清校验和*/
		for(i=0;i<32;i++){   		
   			P2=d[i];delay(50000);
			SBUF=d[i];	/*发送一个data,come from sbuf,initarray*/
   			pf+=d[i]; 	/*求校验和*/
			while(TI==0){}TI=0;
  		}
		if(!CTRL_BUTTON) pf++; /* CTRL_BUTTON＝0，设置错误校验和 */
		P2=pf;delay(50000);	   /*显示校验和*/
  		SBUF=pf;               /*发送校验和*/
		while(TI==0){}TI=0;
		while(RI==0){}RI=0;
		P2=SBUF;delay(50000);
  	}while(SBUF!=0);  /*回答出错, 则重发*/
} 

void receive(uchar idata *d)/*接收函数*/
{
uchar i,pf;
	do{
		while(RI==0){}RI=0;
		P2=SBUF;delay(50000);
    }while((SBUF^0xaa)!=0); /*判甲机请求否*/
	P2=0xbb;delay(50000);
    SBUF=0xbb; 	/*发应答信号*/
	while(TI==0){}TI=0;
    while(1){
    	pf=0;  /*清校验和*/
		for(i=0; i<32; i++){
			while(RI==0){}RI=0;
	   		d[i]=SBUF; 	/*接收一个数据*/
			P2=d[i];	/*显示接收数据*/
	   		pf+=d[i]; 	/*求校验和*/
		}
		P2=pf;  /*显示校验和*/
		while(RI==0){}RI=0;
		P2=SBUF;
		if((SBUF^pf)==0){/*比较校验和*/
			P2=0;delay(50000);
	   		SBUF=0x00;/*校验和相同发"0x00"*/
			while(TI==0){}TI=0;			
		}
		else{
	    	P2=0xff;delay(50000);
			SBUF=0xff;while(TI==0){}TI=0; /*校验和不同发"0xff", 重新接收*/
			
		}
	}
}