/****************************************/
/* Copyright (c) 2005, 通信工程學(xué)院     */
/* All rights reserved.                 */
/****************************************/

#include "485Mon.h"

void main(void)
{
	uchar type;

	/* 初始化 */
	init();
	
	while (1) 
	{
		if (Recv_Data(&type)==0)			// 接收幀錯誤或者地址不符合，丟棄
			continue;
		switch (type)
		{
			case ACTIVE:				// 主機(jī)詢問從機(jī)是否在位
				Send_Data(READY,0,StatusBuf);	// 發(fā)送READY指令
				break;
			case GETDATA:				// 主機(jī)讀設(shè)備請求
				Clr_StatusBuf();
				Get_Stat();				// 數(shù)據(jù)采集函數(shù)
				Send_Data(SENDDATA,strlen(StatusBuf),StatusBuf);
				break;
			default:
				break;					// 指令類型錯誤，丟棄當(dāng)前幀
		}
	}
}

/* 初始化 */
void init(void)
{
	P1 = 0xff;
	DevNo = (P1&0x00111111);			// 讀取本機(jī)設(shè)備號

	TMOD = 0x20;
	SCON = 0x50;
	TH1 = 0xfd;
	TL1 = 0xfd;
	TR1 = 1;
	PCON = 0x00;						// SMOD=0
	EA = 0;
						
}

/* 接收數(shù)據(jù)幀函數(shù)，實際上接收的是主機(jī)的指令 */
bit Recv_Data(uchar *type)
{
	uchar tmp,rCount,i;
	uchar r_buf[RECFRMMAXLEN];			// 保存接收到的幀
	uchar Flag_RecvOver;				// 一幀接收結(jié)束標(biāo)志	
	uchar Flag_StartRec;				// 一幀開始接收標(biāo)志
	uchar CheckSum;						// 校驗和
	uchar DataLen;						// 數(shù)據(jù)字節(jié)長度變量
		
	/* 禁止發(fā)送，允許接收 */
	DE = 0;
	RE = 0;

	/* 接收一幀數(shù)據(jù) */
	rCount = 0;
	Flag_StartRec = 0;
    Flag_RecvOver = 0;
	while (!Flag_RecvOver)
	{
		RI = 0;
		while (!RI);
		tmp = SBUF;
		RI=0;

		/* 判斷是否收到字符'$',其數(shù)值為0x24 */          
		if ((!Flag_StartRec) && (tmp == 0x24))
		{
			Flag_StartRec = 1;	
		}

		if (Flag_StartRec) 
		{
			r_buf[rCount] = tmp;
			rCount ++;		
			
			/* 判斷是否收到字符'*'，其數(shù)值為0x2A，根據(jù)接收的指令設(shè)置相應(yīng)標(biāo)志位 */
			if (tmp == 0x2A)
				Flag_RecvOver = 1;
		}

		if (rCount == RECFRMMAXLEN)		// 幀超長錯誤，返回0
			return 0;
	}
	
	/* 計算校驗和字節(jié) */
	CheckSum = 0;
	DataLen = r_buf[3];
	for (i=0;i++;i<3+DataLen)
	{
		CheckSum = CheckSum + r_buf[i+1];
	}
	
	/* 判斷幀是否錯誤 */
	if (rCount<6)						// 幀過短錯誤，返回0，最短的指令幀為6個字節(jié)						
		return 0;
	if (r_buf[1]!=DevNo)  				// 地址不符合，錯誤，返回0
		return 0;
	if (r_buf[rCount-2]!=CheckSum)		// 校驗錯誤，返回0
    	return 0;

	*type = r_buf[2];					// 獲取指令類型

	return 1;							// 成功，返回1
}

/* 發(fā)送數(shù)據(jù)幀函數(shù) */
void Send_Data(uchar type,uchar len,uchar *buf)
{
	uchar i,tmp;
	uchar CheckSum = 0;
	
	/* 允許發(fā)送，禁止接收 */
	DE = 1;
	RE = 1;
	
	/* 發(fā)送幀起始字節(jié) */
	tmp = 0x24;
	Send(tmp);
	
	Send(DevNo);						// 發(fā)送地址字節(jié)，也即設(shè)備號
	CheckSum = CheckSum + DevNo;
 
	Send(type);							// 發(fā)送類型字節(jié)
	CheckSum = CheckSum + type;

	Send(len);							// 發(fā)送數(shù)據(jù)長度字節(jié)
	CheckSum = CheckSum + len;
 
	/* 發(fā)送數(shù)據(jù) */
	for (i=0;i<len;i++)			
	{
		Send(*buf);
		CheckSum = CheckSum + *buf;
		buf++;
	}
	
	Send(CheckSum);						// 發(fā)送校驗和字節(jié)

	/* 發(fā)送幀結(jié)束字節(jié) */
	tmp = 0x2A;
	Send(tmp);
}

/* 采集數(shù)據(jù)函數(shù)經(jīng)過簡化處理，取固定的10個字節(jié)數(shù)據(jù) */
void Get_Stat(void)
{
	StatusBuf[0]=DATA0;
	StatusBuf[1]=DATA1;
	StatusBuf[2]=DATA2;
	StatusBuf[3]=DATA3;
	StatusBuf[4]=DATA4;
	StatusBuf[5]=DATA5;
	StatusBuf[6]=DATA6;
	StatusBuf[7]=DATA7;
	StatusBuf[8]=DATA8;
	StatusBuf[9]=DATA9;
}

/* 發(fā)送單字節(jié)數(shù)據(jù) */
void Send(uchar m)
{
	TI = 0;
	SBUF = m;
    while(!TI);
	TI = 0;	
}

/* 清除設(shè)備狀態(tài)信息緩沖區(qū)函數(shù)*/
void Clr_StatusBuf(void)
{
	uchar i;
	for (i=0;i<STATUSMAXLEN;i++)
		StatusBuf[i] = 0;	
}