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

#include "DPRamComm.h"

/* 40ms定時中斷服務(wù)子程序：
   定期更新左端單片機的狀態(tài)信息，查詢右端單片機的狀態(tài)信息*/
void timer0_int() interrupt 1 using 1
{
	TR0 = 0;						// 關(guān)閉T0
  	TH0 = 0x70;						// 重置40ms定時器的計數(shù)初值
  	TL0 = 0x00; 
  	FillState();					// 定期更新左端單片機狀態(tài)讓右端單片機可查詢
  	GetState();						// 定期查詢右端單片機的狀態(tài)信息   
}

/* 外部中斷0服務(wù)子程序：
   設(shè)置中斷標(biāo)志位int0flag，讀清中斷*/
void out_int0() interrupt 0 using 1
{
  	uchar ch;
  	int0flag = 1;					// 表示外部中斷0，實際是雙口RAM產(chǎn)生的中斷
  
  	get_sem(&INTL_SEM);				// 申請并獲得左中斷旗語
  	ch = DPRAM_INTR;    			// 讀清中斷
  	INTL_SEM = 0x01;				// 釋放左中斷旗語
}	

/* 主程序 */
void main()
{ 
	int0flag = 0;
	rdyflag = 0;
	ProvTimes = 0;

	LpStateRamAddr = 0x2000;
	LpProvRamAddr = 0x2400;
	RpStateRamAddr = 0x3000;
	RpProvRamAddr = 0x3400;


	/* 等待右端單片機準(zhǔn)備就緒 */
	while(rdyflag!=1)
	{
		get_sem(&RP_STT_SEM);		// 申請并獲得右端狀態(tài)旗語
		if (*RpStateRamAddr == READY)	
			rdyflag = 1;			// 右端單片機準(zhǔn)備就緒標(biāo)志置1
		RP_STT_SEM = 0x01;			// 釋放右端狀態(tài)旗語
	}

	/* 對右端單片機進(jìn)行初始配置 */
	InitProvRP();	
	
	/* 通過向左端狀態(tài)空間的第一地址單元寫READY向右端表示左端準(zhǔn)備就緒 */
	get_sem(&LP_STT_SEM);			// 申請并獲得左端狀態(tài)旗語
	*LpStateRamAddr = READY;		// 左端單片機準(zhǔn)備就緒
	LP_STT_SEM = 0x01;				// 釋放左端狀態(tài)旗語

	ProvTimes++;					// 對右端口的配置次數(shù)加1		

	EA = 1;							// 開CPU中斷
  	EX0 = 1;						// 開外部中斷0 
	ET0 =1;							// 開T/C0中斷
  	PX0	= 0;						// 外部中斷低優(yōu)先級
  	PT0 = 1;						// 計數(shù)器高優(yōu)先級
  	TMOD = 0x01;					// T/C0工作在方式1
  	TH0 = 0x70;						// 預(yù)置40ms定時器的計數(shù)初值
  	TL0 = 0x00;
  	TR0 = 0;						// 不啟動T0

	/* 右端單片機接收左端對其的初始化配置，運行正常后觸發(fā)雙口RAM的
	左端中斷，左端單片機受中斷觸發(fā)后對右端單片機作第二次配置，并啟
	動40ms定時器，開始定期更新本機的狀態(tài)信息并監(jiān)測右端單片機的狀態(tài) */
    while(int0flag==1)
	{
		if (ProvTimes==1)
		{
			ProvTimes++;			// 對右端口的配置次數(shù)加1
			Prov();					// 對右端口單片機二次配置
			
			/* 通過出發(fā)右端中斷，通知右端單片機接受二次配置*/
			get_sem(&INTR_SEM);		// 申請并獲得右中斷旗語
  			DPRAM_INTL = 0xFF;    	// ITNR腳為低，出發(fā)右端單片機中斷
  			INTR_SEM = 0x01;		// 釋放右中斷旗語
		}

		TR0 = 1;					// 啟動40ms定時器T0		
	}  	
}

/* 申請并獲得旗語函數(shù) */
bit get_sem(uchar *sem_type)         	
{
  	*sem_type = 0x00;				// 申請旗語
  	while((*sem_type!=0x00));		// 無限循環(huán)直至獲得旗語    
  	return(1);
}


/* 對右端單片機的初始化配置函數(shù)：為簡化起見，通過向左端的配置
   空間2500H~25FFH全寫0x22，表示對右端單片機的初始配置命令  */
void InitProvRP(void)
{
	uchar i;
	get_sem(&LP_PRO_SEM);			// 申請左端配置旗語	
	for (i=0;i++;i<=255)
		*(LpProvRamAddr+i) = 0x22; 
	LP_PRO_SEM = 0x01;				// 釋放左端配置旗語		
}

/* 對右端單片機的二次配置函數(shù)：為簡化起見，通過向左端的配置
   空間2500H~25FFH全寫0x33，表示對右端單片機的初始配置命令  */
void Prov(void)
{
	uchar i;
	get_sem(&LP_PRO_SEM);			// 申請左端配置旗語	
	for (i=0;i++;i<=255)
		*(LpProvRamAddr+i) = 0x33; 
	LP_PRO_SEM = 0x01;				// 釋放左端配置旗語
}


/* 更新本機狀態(tài)函數(shù)：為了簡化起見，此函數(shù)表示為向左端狀態(tài)空
   間第一地址單元（存放設(shè)備就緒信息）以后的254字節(jié)全寫0x44  */
void FillState(void)
{
	uchar i;
	get_sem(&LP_STT_SEM);			// 申請并獲得左端狀態(tài)旗語
	for (i=0;i++;i<=254)
		*(LpStateRamAddr+i+1) = 0x44;
	LP_STT_SEM = 0x01;				// 釋放左端狀態(tài)旗語
}

/* 查詢另一端單片機狀態(tài)函數(shù)：為簡化起見，此函數(shù)表示為用數(shù)組
   ArrayState存取右端狀態(tài)空間第一地址單元（存放設(shè)備就緒信息）
   以后的254字節(jié)（3001H～30FFH）包含的狀態(tài)信息		*/ 
void GetState(void)
{
	uchar i;
	get_sem(&RP_STT_SEM);			// 申請并獲得右端狀態(tài)旗語
	for (i=0;i++;i<=254)
		ArrayState[i] = *(RpStateRamAddr+i+1);
	RP_STT_SEM = 0x01;				// 釋放右端狀態(tài)旗語
}