/*============================================================
//HC-SRO4?超聲波測(cè)距模塊?DEMO?程序
//??QQ：?517535000
//淘寶店鋪:http://shop58246706.taobao.com
?????
==============================================================
SMC1602A（16*2）模擬口線接線方式
連接線圖:	
???????---------------------------------------------------
???????|LCM-----51???|	LCM-----51???|	LCM------51??????|
???????--------------------------------------------------|
???????|DB0-----P1.0?|	DB4-----P1.4?|	RW-------P3.4????|
???????|DB1-----P1.1?|	DB5-----P1.5?|	RS-------P3.3????|
???????|DB2-----P1.2?|	DB6-----P1.6?|	E--------P3.5????|
???????|DB3-----P1.3?|	DB7-----P1.7?|	VLCD接1K電阻到GND|
???????---------------------------------------------------
接線：模塊TRIG接?P2.6??ECH0?接P2.7

本程序源碼只供學(xué)習(xí)參考，不得應(yīng)用于商業(yè)用途，如有需要請(qǐng)聯(lián)系作者。

[注:AT89x51使用12M或11.0592M晶振實(shí)測(cè)使用11.0592M]
=============================================================*/
#include?		//器件配置文件
#include?
#define??RX??P2_7
#define??TX??P2_6

#define?LCM_RW??P3_4?//定義LCD引腳
#define?LCM_RS??P3_3
#define?LCM_E???P3_5
#define?LCM_Data??P1

#define?Key_Data?P2_0?//定義Keyboard引腳
#define?Key_CLK??P3_2

#define?Busy????0x80?//用于檢測(cè)LCM狀態(tài)字中的Busy標(biāo)識(shí)

void?LCMInit（void）;
void?DisplayOneChar（unsigned?char?X?unsigned?char?Y?unsigned?char?DData）;
void?DisplayListChar（unsigned?char?X?unsigned?char?Y?unsigned?char?code?*DData）;
void?Delay5Ms（void）;
void?Delay400Ms（void）;
void?Decode（unsigned?char?ScanCode）;
void?WriteDataLCM（unsigned?char?WDLCM）;
void?WriteCommandLCM（unsigned?char?WCLCMBuysC）;

unsigned?char?ReadDataLCM（void）;
unsigned?char?ReadStatusLCM（void）;
unsigned?char?code?mcustudio[]?={“mcustudio.com.cn“};
unsigned?char?code?email[]?=????{“fhwxaoo@163.com?“};
unsigned?char?code?Cls[]?=??????{“????????????????“};
unsigned?char?code?ASCII[15]?=????{‘0‘‘1‘‘2‘‘3‘‘4‘‘5‘‘6‘‘7‘‘8‘‘9‘‘.‘‘-‘‘M‘};

static?unsigned?char?DisNum?=?0;?//顯示用指針				??
???????unsigned?int??time=0;
	???unsigned?long?S=0;
	???bit??????flag?=0;
	???unsigned?char?disbuff[4]	???={?0000};


//寫(xiě)數(shù)據(jù)
void?WriteDataLCM（unsigned?char?WDLCM）?
{
	ReadStatusLCM（）;?//檢測(cè)忙
	LCM_Data?=?WDLCM;
	LCM_RS?=?1;
	LCM_RW?=?0;
	LCM_E?=?0;?//若晶振速度太高可以在這后加小的延時(shí)
	LCM_E?=?0;?//延時(shí)
	LCM_E?=?1;
}

//寫(xiě)指令
void?WriteCommandLCM（unsigned?char?WCLCMBuysC）?//BuysC為0時(shí)忽略忙檢測(cè)
{
	if?（BuysC）?ReadStatusLCM（）;?//根據(jù)需要檢測(cè)忙
	LCM_Data?=?WCLCM;
	LCM_RS?=?0;
	LCM_RW?=?0;	
	LCM_E?=?0;
	LCM_E?=?0;
	LCM_E?=?1;	
}

//讀數(shù)據(jù)
unsigned?char?ReadDataLCM（void）
{
	LCM_RS?=?1;?
	LCM_RW?=?1;
	LCM_E?=?0;
	LCM_E?=?0;
	LCM_E?=?1;
	return（LCM_Data）;
}

//讀狀態(tài)
unsigned?char?ReadStatusLCM（void）
{
	LCM_Data?=?0xFF;?
	LCM_RS?=?0;
	LCM_RW?=?1;
	LCM_E?=?0;
	LCM_E?=?0;
	LCM_E?=?1;
	while?（LCM_Data?&?Busy）;?//檢測(cè)忙信號(hào)
	return（LCM_Data）;
}

void?LCMInit（void）?//LCM初始化
{
	LCM_Data?=?0;
	WriteCommandLCM（0x380）;?//三次顯示模式設(shè)置，不檢測(cè)忙信號(hào)
	Delay5Ms（）;?
	WriteCommandLCM（0x380）;
	Delay5Ms（）;?
	WriteCommandLCM（0x380）;
	Delay5Ms（）;?

	WriteCommandLCM（0

?屬性????????????大小?????日期????時(shí)間???名稱
-----------?---------??----------?-----??----

?????文件?????228932??2010-03-26?17:35??超聲波測(cè)距資料\HC-SR04超聲波測(cè)距模塊.pdf

?????文件???????1672??2010-06-20?22:41??超聲波測(cè)距資料\超聲波PIC單片機(jī)C程序.rar

?????文件????1067134??2009-11-29?19:09??超聲波測(cè)距資料\超聲波模塊參考.pdf

?????文件???????2229??2010-06-20?22:41??超聲波測(cè)距資料\超聲波測(cè)距51C程序.rar

?????文件??????26951??2010-06-20?22:41??超聲波測(cè)距資料\超聲波測(cè)距LC1602顯示.rar

?????文件??????32489??2010-06-20?22:41??超聲波測(cè)距資料\超聲波測(cè)距LCD12864顯示.rar

?????文件??????79344??2010-06-20?22:41??超聲波測(cè)距資料\超聲波測(cè)距串口顯示.rar

?????文件??????76598??2010-06-20?22:41??超聲波測(cè)距資料\超聲波測(cè)距數(shù)碼管顯示.rar

?????文件??????86392??2009-11-01?21:08??超聲波測(cè)距資料\超聲波測(cè)距數(shù)碼管顯示\數(shù)碼管接線方式.jpg

?????文件???????8338??2010-05-01?20:56??超聲波測(cè)距資料\超聲波測(cè)距數(shù)碼管顯示\脈寬測(cè)量

?????文件???????2872??2010-06-20?22:35??超聲波測(cè)距資料\超聲波測(cè)距數(shù)碼管顯示\脈寬測(cè)量.c

?????文件???????4247??2010-05-01?20:56??超聲波測(cè)距資料\超聲波測(cè)距數(shù)碼管顯示\脈寬測(cè)量.hex

?????文件?????????33??2010-05-01?20:56??超聲波測(cè)距資料\超聲波測(cè)距數(shù)碼管顯示\脈寬測(cè)量.lnp

?????文件???????6639??2010-05-01?20:56??超聲波測(cè)距資料\超聲波測(cè)距數(shù)碼管顯示\脈寬測(cè)量.LST

?????文件???????9187??2010-05-01?20:56??超聲波測(cè)距資料\超聲波測(cè)距數(shù)碼管顯示\脈寬測(cè)量.M51

?????文件???????8063??2010-05-01?20:56??超聲波測(cè)距資料\超聲波測(cè)距數(shù)碼管顯示\脈寬測(cè)量.OBJ

?????文件???????1161??2010-05-01?20:56??超聲波測(cè)距資料\超聲波測(cè)距數(shù)碼管顯示\脈寬測(cè)量.Opt

?????文件????????404??2010-05-01?20:56??超聲波測(cè)距資料\超聲波測(cè)距數(shù)碼管顯示\脈寬測(cè)量.plg

?????文件???????2148??2010-04-25?15:32??超聲波測(cè)距資料\超聲波測(cè)距數(shù)碼管顯示\脈寬測(cè)量.Uv2

?????文件???????1164??2010-04-25?15:42??超聲波測(cè)距資料\超聲波測(cè)距數(shù)碼管顯示\脈寬測(cè)量_Opt.Bak

?????文件???????2114??2009-08-06?15:12??超聲波測(cè)距資料\超聲波測(cè)距數(shù)碼管顯示\脈寬測(cè)量_Uv2.Bak

?????文件??????78451??2009-11-01?20:47??超聲波測(cè)距資料\超聲波測(cè)距串口顯示\串口接線方式.jpg

?????文件??????10584??2010-05-01?20:54??超聲波測(cè)距資料\超聲波測(cè)距串口顯示\測(cè)距程序

?????文件???????2369??2010-06-20?22:34??超聲波測(cè)距資料\超聲波測(cè)距串口顯示\測(cè)距程序.C

?????文件???????8432??2010-05-01?20:54??超聲波測(cè)距資料\超聲波測(cè)距串口顯示\測(cè)距程序.hex

?????文件?????????48??2010-05-01?20:54??超聲波測(cè)距資料\超聲波測(cè)距串口顯示\測(cè)距程序.lnp

?????文件???????5734??2010-05-01?20:54??超聲波測(cè)距資料\超聲波測(cè)距串口顯示\測(cè)距程序.LST

?????文件??????11174??2010-05-01?20:54??超聲波測(cè)距資料\超聲波測(cè)距串口顯示\測(cè)距程序.M51

?????文件???????7703??2010-05-01?20:54??超聲波測(cè)距資料\超聲波測(cè)距串口顯示\測(cè)距程序.OBJ

?????文件????????978??2010-05-01?20:54??超聲波測(cè)距資料\超聲波測(cè)距串口顯示\測(cè)距程序.Opt

............此處省略40個(gè)文件信息