#include?
#include?
//#include?

sbit?LCD_RS=P2^0;//定義引腳
sbit?LCD_RW=P2^1;
sbit?LCD_E=P2^2;
#define?LCD_Data?P0
#define?Busy????0x80?//用于檢測(cè)LCD狀態(tài)字中的Busy標(biāo)識(shí)



void?WriteDataLCD（unsigned?char?WDLCD）;
void?WriteCommandLCD（unsigned?char?WCLCDBuysC）;
unsigned?char?ReadDataLCD（void）;
unsigned?char?ReadStatusLCD（void）;
void?LCDInit（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）;


unsigned?char?code?uctech[]?=?{“1111.taobao.co“};
unsigned?char?code?net[]?=?{“Happy?every?day!“};

void?main（void）
{
?Delay400Ms（）;?//啟動(dòng)等待，等LCD講入工作狀態(tài)
?LCDInit（）;?//LCM初始化
?Delay5Ms（）;?//延時(shí)片刻（可不要）

?DisplayListChar（0?0?uctech）;
?DisplayListChar（0?5?net）;
?ReadDataLCD（）;//測(cè)試用句無(wú)意義
?while（1）;
}

//寫數(shù)據(jù)
void?WriteDataLCD（unsigned?char?WDLCD）
{
?ReadStatusLCD（）;?//檢測(cè)忙
?LCD_Data?=?WDLCD;
?LCD_RS?=?1;
?LCD_RW?=?0;
?LCD_E?=?0;?//若晶振速度太高可以在這后加小的延時(shí)
?LCD_E?=?0;?//延時(shí)
?LCD_E?=?1;
}

//寫指令
void?WriteCommandLCD（unsigned?char?WCLCDBuysC）?//BuysC為0時(shí)忽略忙檢測(cè)
{
?if?（BuysC）?ReadStatusLCD（）;?//根據(jù)需要檢測(cè)忙
?LCD_Data?=?WCLCD;
?LCD_RS?=?0;
?LCD_RW?=?0;?
?LCD_E?=?0;
?LCD_E?=?0;
?LCD_E?=?1;?
}

//讀數(shù)據(jù)
unsigned?char?ReadDataLCD（void）
{
?LCD_RS?=?1;?
?LCD_RW?=?1;
?LCD_E?=?0;
?LCD_E?=?0;
?LCD_E?=?1;
?return（LCD_Data）;
}

//讀狀態(tài)
unsigned?char?ReadStatusLCD（void）
{
?LCD_Data?=?0xFF;?
?LCD_RS?=?0;
?LCD_RW?=?1;
?LCD_E?=?0;
?LCD_E?=?0;
?LCD_E?=?1;
?while?（LCD_Data?&?Busy）;?//檢測(cè)忙信號(hào)
?return（LCD_Data）;
}

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

?WriteCommandLCD（0x381）;?//顯示模式設(shè)置開始要求每次檢測(cè)忙信號(hào)
?WriteCommandLCD（0x081）;?//關(guān)閉顯示
?WriteCommandLCD（0x011）;?//顯示清屏
?WriteCommandLCD（0x061）;?//?顯示光標(biāo)移動(dòng)設(shè)置
?WriteCommandLCD（0x0C1）;?//?顯示開及光標(biāo)設(shè)置
}

//按指定位置顯示一個(gè)字符
void?DisplayOneChar（unsigned?char?X?unsigned?char?Y?unsigned?char?DData）
{
?Y?&=?0x1;
?X?&=?0xF;?//限制X不能大于15，Y不能大于1
?if?（Y）?X?|=?0x40;?//當(dāng)要顯示第二行時(shí)地址碼+0x40;
?X?|=?0x80;?//?算出指令碼
?WriteCommandLCD（X?0）;?//這里不檢測(cè)忙信號(hào)，發(fā)送地址碼
?WriteDataLCD（DData）;
}

//按指定位置顯示一串字符
void?DisplayListChar（unsigned?char?X?unsigned?char?Y?unsigned?char?code?*DData）
{
?unsigned?char?ListLength;

??ListLength?=?0;
?Y?&=?0x1;
?X?&=?0xF;?//限制X不能大于15，Y不能大于1
?while?（DData[ListLength]>=0x20）?//若到達(dá)字串尾則退出
??{
???if?（X?<=?0xF）?//X坐標(biāo)應(yīng)小于0xF
????{
?????DisplayOneChar（X?Y?DData[ListLength]）;?//顯示單個(gè)字符
?????ListLength++;
?????X++;
????}
??}
}

//5ms延時(shí)
void?Delay5Ms（void）
{
?unsigned?int?TempCyc?=?5552;
?while（TempCyc--）;
}

//400ms延時(shí)
void?Delay400Ms（void）
{
?unsigned?char?TempCycA?=?5;
?unsigned?int?TempCycB;
?while（TempCycA--）
?{
??TempCycB=7269;
??while（TempCycB--）;
?};
}

?屬性????????????大小?????日期????時(shí)間???名稱
-----------?---------??----------?-----??----
?????目錄???????????0??2018-04-11?19:56??基于紅外感應(yīng)的溫控轉(zhuǎn)速型風(fēng)扇設(shè)計(jì)資料\
?????目錄???????????0??2017-04-20?22:55??基于紅外感應(yīng)的溫控轉(zhuǎn)速型風(fēng)扇設(shè)計(jì)資料\1602廠家說(shuō)明書+例子程序\
?????文件??????356922??2017-03-22?16:22??基于紅外感應(yīng)的溫控轉(zhuǎn)速型風(fēng)扇設(shè)計(jì)資料\1602廠家說(shuō)明書+例子程序\LCD1602A-5V廠家說(shuō)明書.pdf
?????目錄???????????0??2017-04-20?22:55??基于紅外感應(yīng)的溫控轉(zhuǎn)速型風(fēng)扇設(shè)計(jì)資料\1602廠家說(shuō)明書+例子程序\例程-LCD1602（請(qǐng)使用keil?uvision3或以上版本打開）\
?????文件????????3189??2017-04-09?23:48??基于紅外感應(yīng)的溫控轉(zhuǎn)速型風(fēng)扇設(shè)計(jì)資料\1602廠家說(shuō)明書+例子程序\例程-LCD1602（請(qǐng)使用keil?uvision3或以上版本打開）\1602.c
?????文件????????7972??2017-04-09?23:48??基于紅外感應(yīng)的溫控轉(zhuǎn)速型風(fēng)扇設(shè)計(jì)資料\1602廠家說(shuō)明書+例子程序\例程-LCD1602（請(qǐng)使用keil?uvision3或以上版本打開）\1602.OBJ
?????文件????????6705??2017-04-09?23:48??基于紅外感應(yīng)的溫控轉(zhuǎn)速型風(fēng)扇設(shè)計(jì)資料\1602廠家說(shuō)明書+例子程序\例程-LCD1602（請(qǐng)使用keil?uvision3或以上版本打開）\LCD1602
?????文件????????1147??2017-04-09?23:48??基于紅外感應(yīng)的溫控轉(zhuǎn)速型風(fēng)扇設(shè)計(jì)資料\1602廠家說(shuō)明書+例子程序\例程-LCD1602（請(qǐng)使用keil?uvision3或以上版本打開）\LCD1602.hex
?????文件??????????51??2017-04-09?23:48??基于紅外感應(yīng)的溫控轉(zhuǎn)速型風(fēng)扇設(shè)計(jì)資料\1602廠家說(shuō)明書+例子程序\例程-LCD1602（請(qǐng)使用keil?uvision3或以上版本打開）\LCD1602.lnp
?????文件????????1013??2012-04-12?16:21??基于紅外感應(yīng)的溫控轉(zhuǎn)速型風(fēng)扇設(shè)計(jì)資料\1602廠家說(shuō)明書+例子程序\例程-LCD1602（請(qǐng)使用keil?uvision3或以上版本打開）\LCD1602.opt.bak
?????文件?????????260??2017-04-20?22:55??基于紅外感應(yīng)的溫控轉(zhuǎn)速型風(fēng)扇設(shè)計(jì)資料\1602廠家說(shuō)明書+例子程序\例程-LCD1602（請(qǐng)使用keil?uvision3或以上版本打開）\LCD1602.plg
?????文件????????2115??2012-02-11?13:49??基于紅外感應(yīng)的溫控轉(zhuǎn)速型風(fēng)扇設(shè)計(jì)資料\1602廠家說(shuō)明書+例子程序\例程-LCD1602（請(qǐng)使用keil?uvision3或以上版本打開）\LCD1602.Uv2.bak
?????文件???????75219??2017-04-20?22:55??基于紅外感應(yīng)的溫控轉(zhuǎn)速型風(fēng)扇設(shè)計(jì)資料\1602廠家說(shuō)明書+例子程序\例程-LCD1602（請(qǐng)使用keil?uvision3或以上版本打開）\LCD1602.uvopt
?????文件???????13243??2017-04-10?00:40??基于紅外感應(yīng)的溫控轉(zhuǎn)速型風(fēng)扇設(shè)計(jì)資料\1602廠家說(shuō)明書+例子程序\例程-LCD1602（請(qǐng)使用keil?uvision3或以上版本打開）\LCD1602.uvproj
?????文件????????1015??2012-02-11?13:49??基于紅外感應(yīng)的溫控轉(zhuǎn)速型風(fēng)扇設(shè)計(jì)資料\1602廠家說(shuō)明書+例子程序\例程-LCD1602（請(qǐng)使用keil?uvision3或以上版本打開）\LCD1602_Opt.Bak
?????文件????????1861??2008-04-02?16:30??基于紅外感應(yīng)的溫控轉(zhuǎn)速型風(fēng)扇設(shè)計(jì)資料\1602廠家說(shuō)明書+例子程序\例程-LCD1602（請(qǐng)使用keil?uvision3或以上版本打開）\LCD1602_Uv2.Bak
?????文件???????75193??2017-04-10?17:28??基于紅外感應(yīng)的溫控轉(zhuǎn)速型風(fēng)扇設(shè)計(jì)資料\1602廠家說(shuō)明書+例子程序\例程-LCD1602（請(qǐng)使用keil?uvision3或以上版本打開）\LCD1602_uvopt.bak
?????文件????????5115??2002-04-16?14:32??基于紅外感應(yīng)的溫控轉(zhuǎn)速型風(fēng)扇設(shè)計(jì)資料\1602廠家說(shuō)明書+例子程序\例程-LCD1602（請(qǐng)使用keil?uvision3或以上版本打開）\STARTUP.A51
?????文件????????9055??2007-03-18?22:23??基于紅外感應(yīng)的溫控轉(zhuǎn)速型風(fēng)扇設(shè)計(jì)資料\1602廠家說(shuō)明書+例子程序\例程-LCD1602（請(qǐng)使用keil?uvision3或以上版本打開）\Text1.c
?????文件?????2063705??2011-02-24?15:46??基于紅外感應(yīng)的溫控轉(zhuǎn)速型風(fēng)扇設(shè)計(jì)資料\DS18b20cn.pdf
?????目錄???????????0??2017-04-20?22:56??基于紅外感應(yīng)的溫控轉(zhuǎn)速型風(fēng)扇設(shè)計(jì)資料\HC-SR501模塊新資料\
?????目錄???????????0??2017-04-20?22:56??基于紅外感應(yīng)的溫控轉(zhuǎn)速型風(fēng)扇設(shè)計(jì)資料\HC-SR501模塊新資料\HC-SR501模塊\
?????文件??????717709??2015-12-01?11:43??基于紅外感應(yīng)的溫控轉(zhuǎn)速型風(fēng)扇設(shè)計(jì)資料\HC-SR501模塊新資料\HC-SR501模塊\HC-SR501人體感應(yīng)模塊.pdf
?????文件???????48047??2013-06-05?12:42??基于紅外感應(yīng)的溫控轉(zhuǎn)速型風(fēng)扇設(shè)計(jì)資料\HC-SR501模塊新資料\HC-SR501模塊\原理圖.png
?????文件???????44473??2013-06-05?13:21??基于紅外感應(yīng)的溫控轉(zhuǎn)速型風(fēng)扇設(shè)計(jì)資料\HC-SR501模塊新資料\HC-SR501模塊\參考電路.jpg
?????文件???????25600??2017-04-14?00:04??基于紅外感應(yīng)的溫控轉(zhuǎn)速型風(fēng)扇設(shè)計(jì)資料\HC-SR501模塊新資料\HC-SR501模塊\熱釋電傳感器基本知識(shí)和使用中的常見問(wèn)題.wps
?????文件?????1141248??2017-04-10?13:37??基于紅外感應(yīng)的溫控轉(zhuǎn)速型風(fēng)扇設(shè)計(jì)資料\L298N_電機(jī)驅(qū)動(dòng)模塊_程序書.doc
?????文件???????90867??2017-04-20?00:17??基于紅外感應(yīng)的溫控轉(zhuǎn)速型風(fēng)扇設(shè)計(jì)資料\作品電路設(shè)計(jì)圖.png
?????文件???????51354??2017-04-20?22:44??基于紅外感應(yīng)的溫控轉(zhuǎn)速型風(fēng)扇設(shè)計(jì)資料\基于紅外感應(yīng)的溫控轉(zhuǎn)速型風(fēng)扇電路設(shè)計(jì)圖.pdf
?????目錄???????????0??2018-04-03?23:50??基于紅外感應(yīng)的溫控轉(zhuǎn)速型風(fēng)扇設(shè)計(jì)資料\控制程序\
?????文件???????18069??2017-04-20?22:53??基于紅外感應(yīng)的溫控轉(zhuǎn)速型風(fēng)扇設(shè)計(jì)資料\控制程序\1
............此處省略20個(gè)文件信息