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

#include "PMPDataT.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;
	TB8 = 0;					// 發送數據幀
	SBUF = len;					// 發送長度
	while(!TI);
	TI = 0;

	/* 發送數據 */
	for (i=0;i<len;i++)
	{
		ecc = ecc^(*buf);
		TB8 = 0;				// 發送數據幀
		SBUF = *buf;	
		buf++;
		while(!TI);
		TI = 0;
	}
	
	/* 發送校驗字節 */
	TB8 = 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 = 0xd0;				// 工作方式，9位數據位，波特率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表示數據結束

	/* 通過P0口讀要訪問的從機地址 */
	P0 = 0xff;
	addr = P0;

	init_serial();				// 串口初始化 

	EA = 0;						// 關閉所有中斷
	
	/* 發送地址幀并接收應答信息，如果接收的信號與發送的地址信息不同，則重新發送地址幀 */
	tmp = addr-1;
	while(tmp!=addr)			
	{
		/* 發送從機地址 */
		TI = 0;
		TB8 = 1;				// 發送地址幀	
		SBUF = addr;
		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;
	}
}