/*****************************************/
/* Copyright (c) 2005, 通信工程學院      */
/* All rights reserved.                  */
/* 作    者：戴 佳						 */
/*****************************************/

#include "PPDataT.h"

/* 延時t毫秒 */
void delay(uint t)
{
	uint i;
	while(t--)
	{
		/* 對于11.0592M時鐘，約延時1ms */
		for (i=0;i<125;i++)
		{}
	}
} 

/* 發送數據函數 */
void senddata(uchar *buf)
{
	uchar i;
	uchar len;					// 保存數據長度
	uchar ecc;					// 保存校驗字節

	len = strlen(buf);			// 計算要發送數據的長度
	ecc = len;					// 開始進行校驗字節計算

	/* 發送數據長度 */
	TI = 0;
	SBUF = len;					// 發送長度
	while(!TI);
	TI = 0;

	/* 發送數據 */
	for (i=0;i<len;i++)
	{
		ecc = ecc^(*buf);		// 異或運算
		SBUF = *buf;
		buf++;
		while(!TI);
		TI = 0;
	}
	
	/* 發送校驗字節 */
	SBUF = ecc;
	while(!TI);
	TI = 0;
}

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

/* 主程序 */
void main()
{ 
	uchar i = 0;
	uchar tmp; 
	/* 為緩沖區賦初值 */
	P0 = 0xff;
	while(P1!=0)			// 每隔100ms從P0口讀取，讀取到0表示數據采集結束
	{
		*(buf+i) = P0;
		delay(100);			// 延時100ms
		P0 = 0xff;
		i++;
	}
	*(buf+i) = 0;			// 緩沖區最后一個字節為0表示數據結束

	init_serial();			// 串口初始化 

	EA = 0;					// 關閉所有中斷
	
	/* 發送呼叫信號CALL并接收應答信息，如果沒有接收到從機準備好的信號，則重新發送呼叫幀 */
	tmp = BUSY;
	while(tmp!=OK)			
	{
		/* 發送呼叫信號CALL */
		TI = 0;
		SBUF = CALL;
		while(!TI);
		TI = 0;

		/* 接收從機應答 */
		RI = 0;
		while(!RI);
		tmp = SBUF;
		RI = 0;		
	}

	/* 發送數據并接收校驗信息，如果接收到SUCC，表示從機接收成功，否則將重新發送該組數據 */	
	tmp = ERR;
  	while(tmp!=SUCC)
    {
		senddata(buf);				// 發送數據
		RI = 0;
		while(!RI);
		tmp	= SBUF;
		RI = 0;
	}
}