基于51單片機(jī)和紅外收發(fā)模塊的遠(yuǎn)程溫度控制與檢測(cè)

ID:223492 · 發(fā)表于 2017-7-31 10:20

紅外線(xiàn)遙控Proteus仿真電路+發(fā)射+接收程序

仿真原理圖如下（proteus仿真工程文件可到本帖附件中下載）

同時(shí)還附帶了大量的相關(guān)新資料：

目錄：
hw+ds1307\
38kHz 紅外發(fā)射與接收.doc
8050.pdf
8050S.pdf
90182.pdf
901850303.pdf
S8050.pdf
wendu.ldb
基于M50462AP和CX20106A芯片的雙工紅外線(xiàn)通信系統(tǒng).pdf
基于nRF9E5的多點(diǎn)無(wú)線(xiàn)溫度采集系統(tǒng)設(shè)計(jì).pdf
基于ZigBee技術(shù)的公共場(chǎng)所無(wú)線(xiàn)溫度采集系統(tǒng).pdf
微機(jī)—單片機(jī)紅外線(xiàn)通信.pdf
無(wú)線(xiàn)溫度采集系統(tǒng).doc
無(wú)線(xiàn)溫度采集系統(tǒng).pdf
無(wú)線(xiàn)溫度采集系統(tǒng)的設(shè)計(jì).pdf
無(wú)線(xiàn)溫度采集系統(tǒng)設(shè)計(jì)報(bào)告.doc
用89C51單片機(jī)控制紅外線(xiàn)通信接口電路設(shè)計(jì).pdf
短距離無(wú)線(xiàn)溫度采集系統(tǒng)設(shè)計(jì).pdf
線(xiàn)溫度采集系統(tǒng).pdf

單片機(jī)發(fā)送源程序如下:

#include<reg52.h>
#include<intrins.h>
#include<absacc.h>
#define uchar unsigned char
#define uint unsigned int
#define Write_comm XBYTE[0XFCFF] //RS=0,RW=0,指令寄存器寫(xiě)入 0100 0000
#define Read_addr XBYTE[0XFEFF] //RS=0,RW=1,忙標(biāo)志和地址計(jì)數(shù)器讀出 0100 0010
#define Write_data XBYTE[0X4DFF]
sbit DATA = P1^0; //DS18B20接入口
uchar t;
uchar xsd;
delay1(uint i) //延時(shí)1MS
{
uint j,k;
for(j=0;j<i;j++)
for(k=0;k<120;k++);
}
/*延時(shí)子函數(shù)*/
void delay(uint num)
{
while(num--) ;
}
void LCDBusy() //------------lcd忙碌判斷
{
uchar a;
do{
P0=0xFF;
a=Read_addr;
}
while ((a&0x80)!=0x00);
}
void LCDInit() //---------------lcd初始化
{
LCDBusy();
Write_comm=0x38; //使用8 位數(shù)據(jù)，顯示兩行，使用5*7 的字型
LCDBusy();
Write_comm=0x01; //清屏
LCDBusy();
Write_comm=0x06; //字符不動(dòng)，光標(biāo)自動(dòng)右移一格
LCDBusy();
Write_comm=0x0c; //顯示器開(kāi)，光標(biāo)不顯示，字符不閃爍
}
lcd1() //---------數(shù)據(jù)處理，液晶顯示屏第一行處理程序
{
LCDBusy();
Write_comm=0x80;
LCDBusy();
Write_data=(0x54); //T
LCDBusy();
Write_data=(0x65); //e
LCDBusy();
Write_data=(0x6d); //m
LCDBusy();
Write_data=(0x70); //p
LCDBusy();
Write_data=(0x65); //e
LCDBusy();
Write_data=(0x72); //r
LCDBusy();
Write_data=(0x61); //a
LCDBusy();
Write_data=(0x74); //t
LCDBusy();
Write_data=(0x75); //u
LCDBusy();
Write_data=(0x72); //r
LCDBusy();
Write_data=(0x65); //e
LCDBusy();
Write_data=(0x3a); //:
LCDBusy();
Write_comm=0xc0;
LCDBusy();
Write_data=0x2b;
LCDBusy();
Write_comm=0xc4;
LCDBusy();
Write_data=0x2e;
LCDBusy();
Write_comm=0xc6;
LCDBusy();
Write_data=0xdf;
LCDBusy();
Write_data=0x43;
}
xsdcl() //小數(shù)點(diǎn)位處理程序
{
switch(xsd)
{
case 0x00: return(0); break;
case 0x01: return(0); break;
case 0x02: return(1); break;
case 0x03: return(1); break;
case 0x04: return(2); break;
case 0x05: return(3); break;
case 0x06: return(3); break;
case 0x07: return(4); break;
case 0x08: return(5); break;
case 0x09: return(5); break;
case 0x0a: return(6); break;
case 0x0b: return(6); break;
case 0x0c: return(7); break;
case 0x0d: return(8); break;
case 0x0e: return(8); break;
case 0x0f: return(9); break;
default: break;
}
}
lcd2() //---------數(shù)據(jù)處理，液晶顯示屏第二行處理程序，顯示當(dāng)前溫度
{
uchar a[4];
a[0]=t/100;
a[1]=(t%100)/10;
a[2]=t%10;
a[3]=xsdcl();
LCDBusy();
Write_comm=0xc1;
LCDBusy();
Write_data=a[0]+0x30; //百位
LCDBusy();
Write_data=a[1]+0x30; //十位
LCDBusy();
Write_data=a[2]+0x30; //個(gè)
LCDBusy();
Write_comm=0xc5;
LCDBusy();
Write_data=a[3]+0x30; //小數(shù)點(diǎn)位
}
/*******************************************DS18b20溫度傳感器函數(shù)***************************************/
//傳感器初始化
Init_DS18B20(void)
{
uchar x=0;
DATA = 1; //DQ復(fù)位
delay(10); //稍做延時(shí)
DATA = 0; //單片機(jī)將DQ拉低
delay(80); //精確延時(shí) 大于 480us //450
DATA = 1; //拉高總線(xiàn)
delay(20);
x=DATA; //稍做延時(shí)后如果x=0則初始化成功 x=1則初始化失敗
delay(30);
}
//讀一個(gè)字節(jié)
ReadOneChar(void)
{
uchar i=0;
uchar dat = 0;
for (i=8;i>0;i--)
{
DATA = 0; // 給脈沖信號(hào)
dat>>=1;
DATA = 1; // 給脈沖信號(hào)
if(DATA)
dat|=0x80;
delay(8);
}
return(dat);
}
//寫(xiě)一個(gè)字節(jié)
WriteOneChar(unsigned char dat)
{
uchar i=0;
for (i=8; i>0; i--)
{
DATA = 0;
DATA = dat&0x01;
delay(10);
DATA = 1;
dat>>=1;
}
delay(8);
}
//讀取溫度
ReadTemperature(void)
{
uchar a=0;
uchar b=0;
//int t=0;
float tt=0;
Init_DS18B20();
WriteOneChar(0xCC); // 跳過(guò)讀序號(hào)列號(hào)的操作
WriteOneChar(0x44); // 啟動(dòng)溫度轉(zhuǎn)換
Init_DS18B20();
WriteOneChar(0xCC); //跳過(guò)讀序號(hào)列號(hào)的操作
WriteOneChar(0xBE); //讀取溫度寄存器等（共可讀9個(gè)寄存器）前兩個(gè)就是溫度
a=ReadOneChar();//低位
b=ReadOneChar();//高位
//b=b&0x0f;
t=b<<4;
xsd=a&0x0f;
a=a>>4;
t=t|a;
}
/*********************************************************************************************************/
//*****************溫度采集單片機(jī)串行口發(fā)送程序***********************//
void transdata()
{
uchar m[2];
uchar i;
m[0]=t;
m[1]=xsd;
for(i=0;i<2;i++)
{
SBUF=m[i];
while(!TI);
TI=0;
}
}
//**********串行口初始化，串行工作在工作方式1，T1定時(shí)，工作在方式2，波特率不加倍*************//
void Initial()
……………………
…………限于本文篇幅余下代碼請(qǐng)從51黑下載附件…………

復(fù)制代碼

所有資料51hei提供下載:

基于51單片機(jī)和紅外收發(fā)模塊的遠(yuǎn)程溫度控制與檢測(cè).rar (2.37 MB, 下載次數(shù): 113)

ID:102679 · 發(fā)表于 2017-8-5 10:53

謝謝分享

ID:294229 · 發(fā)表于 2018-3-23 09:37

謝謝您的分享，很有幫助

ID:294229 · 發(fā)表于 2018-3-23 09:38

謝謝分享，很有幫助

ID:297180 · 發(fā)表于 2018-3-26 13:10

感謝分享

ID:322550 · 發(fā)表于 2018-5-5 10:02

謝謝分享

ID:328844 · 發(fā)表于 2018-5-13 14:31

謝謝分享

ID:440585 · 發(fā)表于 2019-12-7 15:40

樓主您好這個(gè)程序非常實(shí)用能幫我加一個(gè)接收模塊上當(dāng)溫度達(dá)到255.9度時(shí)P1^7腳輸出低電平嗎？謝謝了

ID:698376 · 發(fā)表于 2020-3-23 17:00

感謝分享

帳號(hào)		自動(dòng)登錄	找回密碼
密碼			立即注冊(cè)

欧美极品高清xxxxhd,国产日产欧美最新,无码AV国产东京热AV无码,国产精品人与动性XXX,国产传媒亚洲综合一区二区,四库影院永久国产精品,毛片免费免费高清视频,福利所导航夜趣136

基于51單片機(jī)和紅外收發(fā)模塊的遠(yuǎn)程溫度控制與檢測(cè)