/*******************************************************************************************
* 程序名：	P89C669雙串口軸溫轉發盒程序

* 功能描述：串口0的硬軟件
*******************************************************************************************/

//包含文件
#include <reg669.h>


//常量定義
#define	MyAddr	0x0a					//本中轉盒地址（沿用這個ID）
#define	BPS		9600L					//波特率
#define	FX		2*11059200L				//本單元時鐘頻率：由于669是24MHz的CPU時鐘，一個機器周期包含6個時鐘周期，
										//所以*2
#define STX     0xaa					//數據禎頭標志
#define ETX     0x55					//數據禎尾標志
#define FMaxLength	40
#define TOTAL	13
#define	CmdRST	0

#define	CmdTEP	1
#define	TMEDIR	0
#define	HostDIR	0x80					//主機數據（bit7）						
//變量定義
sbit 	TXEN =P3^4;					   	//TXD 串口0發送使能
sbit 	TXEN1 =P1^3;              		//TXD1 串口1發送使能
unsigned char idata TmpVal[20];			//數據接收緩存
unsigned char idata data1Buf[FMaxLength];  		//接收和發送數據區,半雙工485可以只用一個數據區
unsigned char idata data2Buf[FMaxLength];
unsigned char *bfpt0[9],*bfpt1[9];
unsigned char data RXLength;                 //暫時存儲長度，RXD
unsigned char data TXLength;

unsigned char data *TX_P;    	  	    //指向PCji緩沖區的指針（指向數組，注意回到數組首址
unsigned char data *RX_P;

unsigned char data RXTimeOut;   	    //數據幀過長或幀在接收完整前等待的時間，即接收超時。

bit  gRXCompFlag=0;						//接收完一幀數據標記



//宏定義
#define	TXD_EN()		TXEN=1			//485_0發送有效
#define	RXD_EN()		TXEN=0			//485_0允許接受
#define	TXD1_EN()		TXEN1=1			//485_1發送有效
#define	RXD1_EN()		TXEN1=0			//485_1允許接受

/*******************************************************************************************
* 函數名：	Uart1Init UART1

* 功能描述：初始化串口0、串口1

× 詳細說明：串口0的設置：中斷方式收發
	串口1按查詢方式收發，有主程序調用控制。
*******************************************************************************************/
void Uart1Init( void )
{
	//串口0初始化	
	TMOD|=0X20;				//||TMOD;   //T1方式2uart
    TH1=0xfa;//256-(FX)/(384*BPS);	//0xfd;			//0xfd:9600bps  //0xf4:2400bps
    TL1=0xfa;//256-FX/(384*BPS);	//0xfd;			//11.0592MHz    //d0:600bps
    TR1=1;					//定時器開始運行
    SCON=0X50;
	ES0=1;
	PS0=1;
	RXD_EN();				//相對主機而言，轉發單元的串口0應常處于接收狀態


	//串口1初始化	
	S1STAT = 0x20 ; 		//區分接收和發送中斷
	S1CON = 0x00 ; 			//串口控制寄存器清零
	REN_1 = 1 ;				//串口1接受允許						
	SM0_1 = 0 ;				//設定串口通訊方式為模式1
	SM1_1 = 1 ; 		

	BRGCON = 0 ; 			//設置波特率
	BRGR1 = 1136 >> 8 ;
	BRGR0 = 1136 & 0x0ff ;
	BRGCON = 1 ;
	TI_1=1;

}




/*********************************************************************************************************
** 函數名稱: 串口中斷服務子程序serial
** 功能描述: 結束和發送數據并處理鏈路（幀格式）,發送數據在data1Buf/*TX_P中，指明長度TXLength
             接收沒有考慮緩沖區
**-------------------------------------------------------------------------------------------------------
** 修　改:
** 日　期:
**-------------------------------------------------------------------------------------------------------
********************************************************************************************************/
void serial(void) interrupt 4 using 1
{
	static unsigned char data FRXLength;				
	static unsigned char data sumCS;					
    unsigned char data comBuff;

    if(TI_0)
    {
        TI_0=0;
        if (TXLength==0)
			RXD_EN();                           
	    else
		{
	        SBUF=*TX_P;TX_P++;                  
	        TXLength--;
		}
    }
    if(RI_0)                                     //接收
    {
	    RI_0=0;
	    comBuff=SBUF;
		RXTimeOut=10;							
		RXLength++;								
		*RX_P=comBuff;							
		RX_P++;
		sumCS=sumCS+comBuff;					

		if (RXLength==1)						
		{
			if (comBuff!=STX)					
			{	RXLength=0;
				RX_P=data2Buf;
			}
			return;
		}

		if (RXLength==2)							
		{
			FRXLength=comBuff;						
			sumCS=comBuff;							
			if (comBuff>FMaxLength)					
			{
				RXLength=0;						
				RX_P=data2Buf;					
			}
			return;
		}
		if (RXLength==3)							
		{
			if(comBuff!=MyAddr)
			{
				RX_P=data2Buf;					
				RXLength=0;						
			}
			return;
		}
		if (RXLength>FRXLength+3)			
		{
			RX_P--;RX_P--;
			comBuff=(*RX_P)<<1;
			if (sumCS==(comBuff+ETX))		
				gRXCompFlag=1;				
			RX_P=data2Buf;
			RXLength=0;
		}
    }
}