#include?
#include?
#include?
#include?
#include?
#include?

#define?uchar?unsigned?char
#define?uint??unsigned?int
sbit?GCLK?=?P0^1;
sbit?GDATE?=?P0^5;
sbit?SCLK?=?P0^0;
sbit?SDATE?=?P0^2;
sbit?Answer?=?P0^3;
sbit?Down?=?P0^4;
sbit?Alarm?=?P0^6;
//unsigned?char?code?tab[]={0x3F0x060x5b0x4F0x660x6D0x7D0x070x7F0X6F};//0-9	共陰極數碼管
//unsigned?char?code?tab[]={0xC00xF90xA40xB00x990x920x820xF80x800x90};//0-9	共陽極數碼管
uchar?code?tab[]={0x7e0x300x6d0x790x330x5b0x5f0x700x7F0X7b};//0-9	共陰極數碼管???protues與實物段位不符
uchar?Jianpantab[16]={0};
uchar?Count;
bit?BJflag;
bit?Keyflag;
bit?Chushiflag;
bit?Answerflag;
//uchar?Answerdata;
uchar?Key_Time;
uchar?Chushitime;
uint??Answertime;
uchar?temp;
uchar?k;
uchar?t;

/****************************************************/
/*????????????????????1ms延時程序????????????????????	*/
/****************************************************/
void?delay（uchar?n）?//延時程序
{???
????uchar?ij;
????for（i=n;i>0;i--）
???????for（j=112;j>0;j--）;
}
/****************************************************/
/*?????????????向十位74LS164發送數據???????????????	*/
/****************************************************/
void?Ssendbyte（uchar?byte）
{?
??uchar?numd;?
??num=tab[byte];
??for（d=0;d<7;d++）
?????{
????????SCLK=0;
????????SDATE=num&0x01;
????????SCLK=1;
????????num>>=1;
???????}
?}
?/****************************************************/
/*?????????????向個位74LS164發送數據???????????????	*/
/****************************************************/
void?Gsendbyte（uchar?byte）
{?
??uchar?numd;?
??num=tab[byte];
??for（d=0;d<7;d++）
?????{
????????GCLK=0;
????????GDATE=num&0x01;
????????GCLK=1;
????????num>>=1;
???????}
}
/****************************************************/
/*????????????????4*4鍵盤讀取程序?????????????????	*/
/****************************************************/
uchar?GetKey?（?）//鍵盤掃描函數，用于識別哪一個鍵按下，并讀取鍵值
{??
????uchar?XYZ;
????P3?=?0xf0;????//先對P3置數?行掃描
	if（P3!=0xf0）?//判斷是否有鍵按下
????{
????????delay（10）;?//延時軟件去干擾
????????if（P3!=0xf0）?//確認按鍵按下X?=?P3;
????????{
????????????X=P3&0xf0;?//保存行掃描時有鍵按下時狀態
			P3=0x0f;?//列掃描
			Y=P3&0x0f;?//保存列掃描時有鍵按下時狀態
			Z=X|Y;?//取出鍵值
			switch?（?Z?）?//判斷鍵值（那一個鍵按下）
			{				
				case?0x7e:?k=1;?break;
				case?0xbe:?k=2;?break;
				case?0xde:?k=3;?break;
				case?0xee:?k=4;?break;	
			???	case?0x7d:?k=5;?break;
				case?0xbd:?k=6;?break;
				case?0xdd:?k=7;?break;
				case?0xed:?k=8;?break;?
				case?0x7b:?k=9;?break;
				case?0xbb:?k=10;?break;
				case?0xdb:?k=11;?break;
				case?0xeb:?k=12;?break;??				?	
				case?0x77:?k=13;?break;?
				case?0xb7:?k=14;?break;?
				case?0xd7:?k=15;?break;?
				case?0xe7:?k=16;?break;?				?
			}
			Keyflag?=?1;
		}
	}
}
/****************************************************/
/*?????????????響應燈顯示???????????????	*/
/****************************************************/
void?Answerled（）
{?
		switch?

?屬性????????????大小?????日期????時間???名稱
-----------?---------??----------?-----??----

?????文件?????133758??2016-05-24?18:26??樓宇對講系統\Last?Loaded?總圖.DBK

?????文件????2268299??2016-05-21?17:25??樓宇對講系統\圖片.docx

?????文件????3910191??2016-05-24?18:48??樓宇對講系統\錄像1.lxe

?????文件?????133758??2016-06-08?09:56??樓宇對講系統\總圖.DSN

?????文件????????768??2018-06-09?08:24??樓宇對講系統\總圖.PWI

?????文件???????8187??2016-05-24?15:48??樓宇對講系統\樓宇對講系統\call.c

?????文件???????8602??2016-05-23?16:50??樓宇對講系統\樓宇對講系統\key.c

?????文件????????455??2014-12-01?21:53??樓宇對講系統\樓宇對講系統\key.h

?????文件??????21657??2016-05-23?21:53??樓宇對講系統\樓宇對講系統\key.LST

?????文件??????17152??2016-05-23?21:53??樓宇對講系統\樓宇對講系統\key.OBJ

?????文件???????8584??2016-05-23?21:04??樓宇對講系統\樓宇對講系統\LCD1602.c

?????文件???????3709??2016-05-23?21:43??樓宇對講系統\樓宇對講系統\LCD1602.h

?????文件??????13797??2018-04-24?09:56??樓宇對講系統\樓宇對講系統\LCD1602.LST

?????文件???????8604??2018-04-24?09:56??樓宇對講系統\樓宇對講系統\LCD1602.OBJ

?????文件???????6376??2009-05-07?14:37??樓宇對講系統\樓宇對講系統\STARTUP.A51

?????文件??????14048??2018-04-24?09:56??樓宇對講系統\樓宇對講系統\STARTUP.LST

?????文件????????749??2018-04-24?09:56??樓宇對講系統\樓宇對講系統\STARTUP.OBJ

?????文件??????10023??2016-05-23?22:53??樓宇對講系統\樓宇對講系統\樓宇.c

?????文件??????32000??2016-05-23?20:48??樓宇對講系統\樓宇對講系統\樓宇.LST

?????文件???????6695??2016-05-25?22:13??樓宇對講系統\樓宇對講系統\樓宇對講.c

?????文件??????20359??2018-04-24?09:56??樓宇對講系統\樓宇對講系統\樓宇對講.LST

?????文件??????13986??2018-04-24?09:56??樓宇對講系統\樓宇對講系統\樓宇對講.OBJ

?????文件??????19469??2018-04-24?09:56??樓宇對講系統\樓宇對講系統\樓宇對講2

?????文件????????782??2018-05-25?14:24??樓宇對講系統\樓宇對講系統\樓宇對講2.build_log.htm

?????文件???????5083??2018-04-24?09:56??樓宇對講系統\樓宇對講系統\樓宇對講2.hex

?????文件?????????81??2018-04-24?09:56??樓宇對講系統\樓宇對講系統\樓宇對講2.lnp

?????文件??????28478??2018-04-24?09:56??樓宇對講系統\樓宇對講系統\樓宇對講2.M51

?????文件????????219??2018-04-28?17:15??樓宇對講系統\樓宇對講系統\樓宇對講2.plg

?????文件??????71717??2018-05-25?14:24??樓宇對講系統\樓宇對講系統\樓宇對講2.uvgui.Administrator

?????文件??????72177??2018-04-24?09:52??樓宇對講系統\樓宇對講系統\樓宇對講2.uvgui_Administrator.bak

............此處省略15個文件信息