/*****************************************/
/* 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++)
		{}
	}
} 

/* 發(fā)送數(shù)據(jù)函數(shù) */
void senddata(uchar *buf)
{
	uchar i;
	uchar len;					// 保存數(shù)據(jù)長度
	uchar ecc;					// 保存校驗字節(jié)

	len = strlen(buf);			// 計算要發(fā)送數(shù)據(jù)的長度
	ecc = len;					// 開始進行校驗字節(jié)計算

	/* 發(fā)送數(shù)據(jù)長度 */
	TI = 0;
	TB8 = 0;					// 發(fā)送數(shù)據(jù)幀
	SBUF = len;					// 發(fā)送長度
	while(!TI);
	TI = 0;

	/* 發(fā)送數(shù)據(jù) */
	for (i=0;i<len;i++)
	{
		ecc = ecc^(*buf);
		TB8 = 0;				// 發(fā)送數(shù)據(jù)幀
		SBUF = *buf;	
		buf++;
		while(!TI);
		TI = 0;
	}
	
	/* 發(fā)送校驗字節(jié) */
	TB8 = 0;					// 發(fā)送數(shù)據(jù)幀
	SBUF = ecc;
	while(!TI);
	TI = 0;
}

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

/* 主程序 */
void main()
{ 
	uchar i = 0;
	uchar tmp; 

	/* 為緩沖區(qū)賦初值 */
	P0 = 0xff;
	while(P1!=0)				// 每隔100ms從P0口讀取，讀取到0表示數(shù)據(jù)采集結(jié)束
	{
		*(buf+i) = P0;
		delay(100);				// 延時100ms
		P0 = 0xff;
		i++;
	}
	*(buf+i) = 0;				// 緩沖區(qū)最后一個字節(jié)為0表示數(shù)據(jù)結(jié)束

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

	init_serial();				// 串口初始化 

	EA = 0;						// 關(guān)閉所有中斷
	
	/* 發(fā)送地址幀并接收應(yīng)答信息，如果接收的信號與發(fā)送的地址信息不同，則重新發(fā)送地址幀 */
	tmp = addr-1;
	while(tmp!=addr)			
	{
		/* 發(fā)送從機地址 */
		TI = 0;
		TB8 = 1;				// 發(fā)送地址幀	
		SBUF = addr;
		while(!TI);
		TI = 0;

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

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