/* 雙機點對點通信的從(cong) 機部分 */
#ifndef __P2P_S_C__
#define __P2P_S_C__

#include <AT89X51.H>
#include <STRING.H>

#define __MAX_LEN_ 64    // 數據最大長度
#define _MHZ_ 11    // 設置單片機使用的晶振頻率(11.0592MHz)

/* 以下為(wei) 程序協議中使用的握手信號 */
#define __RDY_ 0x06    // 主機開始通信時發送的呼叫信號
#define __BUSY_ 0x15    // 從(cong) 機忙應答
#define __OK_ 0x00    // 從(cong) 機準備好
#define __SUCC_ 0x0f    // 數據傳(chuan) 送成功
#define __ERR_ 0xf0    // 數據傳(chuan) 送錯誤

void init_serial();    // 串口初始化
unsigned char recv_data(unsigned char *buf);    // 接收數據
void Beep_ok();    // 蜂鳴表示數據接收ok，該函數代碼未給出

void main()
{
 char buf[__MAX_LEN_];
 unsigned char i = 0;
 unsigned char tmp = 0xff;

 /* 串口初始化 */
 init_serial();    // 初始化串口
 EA = 0;    // 關(guan) 閉所有中斷

 /* 進入設備應答階段 */
 while(1)
 {
  /* 如果接收到的數據不是握手信號__RDY_，則繼續等待 */
  while(tmp != __RDY_)
  {
   RI = 0;
   while(!RI);
   tmp = SBUF;
   RI = 0;
  }
  /* 程序通過檢測P0口數據判斷當前設備狀態，若P0=0xab，表示當前設備忙 */
  P0 = 0xff;
  tmp = P0;
  if(tmp == 0xab)    // 如果P0口數據為(wei) 0x,則當前設備忙，發送__BUSY_信號
  {
   TI = 0;
   SBUF = __BUSY_;
   while(!TI);
   TI = 0;
   continue;
  }
  TI = 0;    // 否則發送__OK_信號表示可以接收數據
  SBUF = __OK_;
  while(!TI);
  TI = 0;
  /* 數據接收 */
  tmp = 0xff;
  while(tmp == 0xff)
  {
   tmp = recv_data(buf);    // 校驗失敗返回0xff，接收成功則返回0
  }
  Beep_ok();    // 蜂鳴表示數據接收成功 
 }
}

/* 初始化串口 */
void init_serial()
{
 TMOD = 0x20; //定時器T1使用工作方式2
 TH1 = 250;    // 設置初值
 TL1 = 250;
 TR1 = 1;    // 開始計時
 PCON = 0x80;    // SMOD = 1
 SCON = 0x50; //工作方式1，波特率9600bps，允許接收
}

/* 接收數據，注意該函數使用buf指向的緩衝(chong) 區保存數據，在數據末尾使用’\0’表示數據結束
 * 返回值為(wei) 0，數據校驗成功，返回值為(wei) 0xff，數據校驗失敗  
 */
unsigned char recv_data(unsigned char *buf)
{
 unsigned char len;    // 該字節用於(yu) 保存數據長度
 unsigned char ecc;    // 該字節用於(yu) 保存校驗字節
 unsigned char i,tmp;
 /* 接收數據長度 */
 RI = 0;
 while(!RI);
 len = SBUF;
 RI = 0;
 /* 使用len的值為(wei) 校驗字節ecc賦初值 */
 ecc = len;
 /* 接收數據 */
 for(i=0; i<len; i++)
 {
  while(!RI);
  *buf = SBUF;    // 接收數據
  ecc = ecc^(*buf);    // 進行字節校驗
  RI = 0;
  buf++;
 }
 *buf = 0;    // 表示數據結束
 /* 接收校驗字節 */
 while(!RI);
 tmp = SBUF;
 RI = 0;
 /* 進行數據校驗 */
 ecc = tmp^ecc;
 if(ecc != 0)    // 校驗失敗
 {
  *(buf-len) = 0;    // 清空數據緩衝(chong) 區
  TI = 0;    // 發送校驗失敗信號
  SBUF = __ERR_;
  while(!TI);
  TI = 0;
  return 0xff;    // 返回0xff表示校驗錯誤
 }
 TI = 0;    // 校驗成功
 SBUF = __SUCC_;
 while(!TI);
 TI = 0;
 return 0;    // 校驗成功，返回0
}

#endif