#include?//器件配置文件
#include?
//傳感器接口
sbit?RX??=?P3^2;
sbit?TX??=?P3^3;
//按鍵聲明
sbit?S1??=?P1^4;
sbit?S2??=?P1^5;
sbit?S3??=?P1^6;
//蜂鳴器
sbit?Feng=?P2^0;

sbit?W1=P1^0;
sbit?W2=P1^1;
sbit?W3=P1^2;
sbit?W4=P1^3;
//變量聲明
unsigned?int??time=0;
unsigned?int??timer=0;
unsigned?char?posit=0;
unsigned?long?S=0;
unsigned?long?BJS=50;//報警距離80CM
//模式?0正常模式?1調整
char?Mode=0;
bit??flag=0;
bit?flag_KEY=0;
unsigned?char?const?discode[]?={0x3f0x060x5b0x4f0x660x6d0x7d0x070x7f0x6f0x400xff/*-*/};	
//數碼管顯示碼0123456789-和不顯示unsigned?char?const?positon[4]={0xfd0xfb0xf70xfe};	//位選
unsigned?char?disbuff[4]	???={0000};		?//數組用于存放距離信息
unsigned?char?disbuff_BJ[4]	={0000};//報警信息
void?Display（）;
//延時20ms（不精確）
void?delay（void）
{
????unsigned?char?abc;
????for（c=2;c>0;c--）
????????for（b=38;b>0;b--）
????????????for（a=60;a>0;a--）;
}

//按鍵掃描
void?Key_（）
{
	if（flag_KEY==0）
	{
		if（Mode!=0）
		{
			//+
			if（S1==0）
			{
				delay（）;	???/

?屬性????????????大小?????日期????時間???名稱
-----------?---------??----------?-----??----
?????目錄???????????0??2019-07-07?09:41??超聲波測距\
?????文件??????138224??2018-01-10?14:12??超聲波測距\Last?Loaded?超聲測距原理圖.DBK
?????文件??????983040??2018-06-11?15:02??超聲波測距\MyDesign2.ddb
?????文件?????????162??2019-07-07?09:41??超聲波測距\~$大三上實訓.doc
?????文件?????4072960??2018-06-11?15:43??超聲波測距\大三上實訓.doc
?????文件????????4645??2018-01-10?14:01??超聲波測距\程序
?????文件???????14950??2018-01-10?14:01??超聲波測距\程序.LST
?????文件???????14792??2018-01-10?14:01??超聲波測距\程序.M51
?????文件????????5411??2018-01-10?14:01??超聲波測距\程序.OBJ
?????文件????????2100??2013-09-05?23:36??超聲波測距\程序.Uv2.bak
?????文件????????5712??2018-01-10?10:57??超聲波測距\程序.c
?????文件????????5948??2018-01-10?14:01??超聲波測距\程序.hex
?????文件??????????40??2018-01-10?14:01??超聲波測距\程序.lnp
?????文件?????????829??2013-09-05?23:41??超聲波測距\程序.opt.bak
?????文件?????????149??2018-06-11?15:00??超聲波測距\程序.plg
?????文件???????55347??2018-06-11?15:00??超聲波測距\程序.uvopt
?????文件???????13201??2018-01-10?00:19??超聲波測距\程序.uvproj
?????文件?????????825??2013-09-05?23:36??超聲波測距\程序_Opt.Bak
?????文件????????1662??2011-04-09?18:58??超聲波測距\程序_Uv2.Bak
?????文件???????55339??2018-06-11?15:00??超聲波測距\程序_uvopt.bak
?????文件???????13202??2013-09-06?19:59??超聲波測距\程序_uvproj.bak
?????文件??????138224??2018-01-10?16:59??超聲波測距\超聲測距原理圖.DSN
?????文件????????1078??2018-06-11?15:05??超聲波測距\超聲測距原理圖.PWI
?????文件???????23056??2019-06-28?09:28??超聲波測距\超聲測距原理圖.pdsprj
?????文件?????????328??2020-03-09?21:41??超聲波測距\超聲測距原理圖.pdsprj.LAPTOP-4UVQGUS3.54383.workspace