51單片機(jī)智能溫控風(fēng)扇Proteus仿真+程序

ID:366860 · 發(fā)表于 2019-5-8 08:11

用51單片機(jī)通過外界環(huán)境溫度控制風(fēng)扇的轉(zhuǎn)速。話不多說，直接上圖；

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

單片機(jī)源程序如下:

#include<reg51.h>
#include<intrins.h> //包含頭文件
#define uchar unsigned char
#define uint unsigned int //宏定義
////////////////////
sbit dj=P1^0;//電機(jī)控制端接口
sbit DQ=P1^6;//溫度傳感器接口
//////////按鍵接口/////////////////////////////////
sbit key1=P3^5;//設(shè)置溫度
sbit key2=P3^6;//溫度加
sbit key3=P3^7;//溫度減
//////////////////////////////////////////////////////
sbit w1=P2^4;
sbit w2=P2^5;
sbit w3=P2^6;
sbit w4=P2^7; //數(shù)碼管的四個(gè)位
/////共陰數(shù)碼管段選//////////////////////////////////////////////
uchar table[22]=
{0x3F,0x06,0x5B,0x4F,0x66,
0x6D,0x7D,0x07,0x7F,0x6F,
0x77,0x7C,0x39,0x5E,0x79,0x71,
0x40,0x38,0x76,0x00,0xff,0x37};//'-',L,H,滅,全亮，n 16-21
uint wen_du; //溫度變量
uint shang,xia; //對比溫度暫存變量
uchar dang;//檔位顯示
uchar flag;
uchar d1,d2,d3;//顯示數(shù)據(jù)暫存變量
void delay(uint ms) //延時(shí)函數(shù)，大約延時(shí)25us
{
uchar x;
for(ms;ms>0;ms--)
for(x=10;x>0;x--);
}
/***********ds18b20延遲子函數(shù)（晶振12MHz ）*******/
void delay_18B20(uint i)
{
while(i--);
}
/**********ds18b20初始化函數(shù)**********************/
void Init_DS18B20()
{
uchar x=0;
DQ=1; //DQ復(fù)位
delay_18B20(8); //稍做延時(shí)
DQ=0; //單片機(jī)將DQ拉低
delay_18B20(80); //精確延時(shí) 大于 480us
DQ=1; //拉高總線
delay_18B20(14);
x=DQ; //稍做延時(shí)后如果x=0則初始化成功 x=1則初始化失敗
delay_18B20(20);
}
/***********ds18b20讀一個(gè)字節(jié)**************/
uchar ReadOneChar()
{
uchar i=0;
uchar dat=0;
for (i=8;i>0;i--)
{
DQ=0; // 給脈沖信號
dat>>=1;
DQ=1; // 給脈沖信號
if(DQ)
dat|=0x80;
delay_18B20(4);
}
return(dat);
}
/*************ds18b20寫一個(gè)字節(jié)****************/
void WriteOneChar(uchar dat)
{
uchar i=0;
for (i=8;i>0;i--)
{
DQ=0;
DQ=dat&0x01;
delay_18B20(5);
DQ=1;
dat>>=1;
}
}
/**************讀取ds18b20當(dāng)前溫度************/
void ReadTemperature()
{
uchar a=0;
uchar b=0;
uchar t=0;
Init_DS18B20();
WriteOneChar(0xCC); // 跳過讀序號列號的操作
WriteOneChar(0x44); // 啟動溫度轉(zhuǎn)換
delay_18B20(100); // this message is wery important
Init_DS18B20();
WriteOneChar(0xCC); //跳過讀序號列號的操作
WriteOneChar(0xBE); //讀取溫度寄存器等（共可讀9個(gè)寄存器）前兩個(gè)就是溫度
delay_18B20(100);
a=ReadOneChar(); //讀取溫度值低位
b=ReadOneChar(); //讀取溫度值高位
wen_du=((b*256+a)>>4); //當(dāng)前采集溫度值除16得實(shí)際溫度值
}
void display()//顯示溫度
{
w1=0;P0=table[d1];delay(10); //第1位
P0=0x00;w1=1;delay(1);
w2=0;P0=table[16];delay(10);//第2位
P0=0x00;w2=1;delay(1);
w3=0;P0=table[d2]; delay(10);//第3位
P0=0x00;w3=1;delay(1);
w4=0;P0=table[d3];delay(10);//第4位
P0=0x00;w4=1;delay(1);
}
void zi_keyscan()//自動模式按鍵掃描函數(shù)
{
if(key1==0) //設(shè)置鍵按下
{
delay(30); //延時(shí)去抖
if(key1==0)flag=1; //再次判斷按鍵，按下的話進(jìn)入設(shè)置狀態(tài)
while(key1==0);//松手檢測 //按鍵釋放
}
while(flag==1) //進(jìn)入設(shè)置上限狀態(tài)
{
d1=18;d2=shang/10;d3=shang%10; //顯示字母H 和上限溫度值
display(); //調(diào)用顯示函數(shù)
if(key1==0) //判斷設(shè)置鍵是否按下
{
delay(30); //延時(shí)去抖
if(key1==0)flag=2; //按鍵按下，進(jìn)入設(shè)置下限模式
while(key1==0);//松手檢測
}
if(key2==0) //加鍵按下
{
delay(30); //延時(shí)去抖
if(key2==0) //加鍵按下
{
shang+=5; //上限加5
if(shang>=100)shang=100; //上限最大加到100
}while(key2==0);//松手檢測
}
if(key3==0) //減鍵按下
{
delay(30); //延時(shí)去抖
if(key3==0) //減鍵按下
{
shang-=1; //上限減1
if(shang<=10)shang=10; //上限最小減到10
}while(key3==0);//松手檢測
}
}
while(flag==2) //設(shè)置下限
{
d1=17;d2=xia/10;d3=xia%10; //顯示字母L 顯示下限溫度值
display(); //以下注釋同上
if(key1==0)
{
delay(30);
if(key1==0)flag=0;
while(key1==0);//松手檢測
}
if(key2==0)
{
delay(30);
if(key2==0)
{
xia+=5;
if(xia>=95)xia=95;
}while(key2==0);//松手檢測
}
if(key3==0)
{
delay(30);
if(key3==0)
{
xia-=1;
if(xia<=0)xia=0;
}while(key3==0);//松手檢測
}
}
}
void zi_dong()//自動溫控模式
{
uchar i;
d1=dang;d2=wen_du/10;d3=wen_du%10; //顯示檔位，顯示當(dāng)前溫度值
zi_keyscan();//按鍵掃描函數(shù)
display(); //調(diào)用顯示函數(shù)
if(wen_du<xia){dj=0;dang=0;}//低于下限檔位為0 電機(jī)停止
if((wen_du>=xia)&&(wen_du<=shang))//溫度大于下限，小于上限 1擋
{
dang=1; //檔位置1
for(i=0;i<3;i++){dj=0;display();zi_keyscan();} //PWM通過延時(shí)得到
for(i=0;i<6;i++){dj=1;display();zi_keyscan();}
}
if(wen_du>shang){dj=1;dang=2;}//高溫全速
}
void main() //主函數(shù)
{
uchar j;
dj=0; //電機(jī)開
shang=30;
xia=20; //初始上下限值
for(j=0;j<80;j++) //先讀取溫度值，防止開機(jī)顯示85
ReadTemperature();
while(1) //進(jìn)入while循環(huán)
{
ReadTemperature(); //讀取溫度值
for(j=0;j<100;j++)zi_dong();//自動溫控模式
}
}

復(fù)制代碼

所有資料51hei提供下載:

51溫控風(fēng)扇.zip (790.79 KB, 下載次數(shù): 576)

ID:32289 · 發(fā)表于 2019-5-8 22:32

編程實(shí)在是學(xué)不好，只好用智能溫度變送器串一只100Ω電阻取樣，在經(jīng)過1K5Ω電阻驅(qū)動NPN三極管，風(fēng)扇串聯(lián)在三極管C極，通過調(diào)整智能溫度變送器零點(diǎn)、量程來獲得非常滿意風(fēng)扇轉(zhuǎn)速調(diào)節(jié)！

ID:529538 · 發(fā)表于 2019-5-9 09:33

x能不能帶一下材料圖

ID:532081 · 發(fā)表于 2019-5-9 23:06

請問keil c 和Protues各是什么版本？

ID:532185 · 發(fā)表于 2019-5-10 09:09

謝謝了正愁找不到

ID:773671 · 發(fā)表于 2020-6-9 11:22

里面沒proteus仿真文件啊

ID:773993 · 發(fā)表于 2020-6-9 15:47

新來的能先給我借鑒一下么

ID:780768 · 發(fā)表于 2020-6-16 10:49

里面東西全不全

ID:495287 · 發(fā)表于 2020-6-29 12:27

謝謝樓主指點(diǎn)，給了參考思路，最近也正在琢磨這個(gè)問題，
如果有多個(gè)溫度采集點(diǎn)，可否用串口實(shí)現(xiàn)編號采集？

ID:892353 · 發(fā)表于 2021-3-15 22:29

下載了資料，問下怎么仿真？

ID:864055 · 發(fā)表于 2021-4-19 16:58

ladyboss 發(fā)表于 2021-3-15 22:29
下載了資料，問下怎么仿真？

keil編譯生成的hex文件，在proteus單片機(jī)模塊屬性里添加，(如果程序與電路圖無誤)即可仿真。

ID:993551 · 發(fā)表于 2021-12-23 20:36

都能用，沒問題！

ID:1000026 · 發(fā)表于 2022-1-5 20:53

H和L代表的是最高和最低值嗎？

ID:1013777 · 發(fā)表于 2022-3-28 18:21

寫的好清晰，真不錯(cuò)

ID:1013777 · 發(fā)表于 2022-3-28 21:03

happyjavafish 發(fā)表于 2019-5-9 23:06
請問keil c 和Protues各是什么版本？

我覺得keil4和protues 8足以

ID:1020610 · 發(fā)表于 2022-4-22 11:18

可以用Arduino采集數(shù)據(jù)嗎，過程是什么

ID:1077304 · 發(fā)表于 2023-5-20 12:03

為什么超過上限溫度仿真時(shí)電機(jī)不轉(zhuǎn)了

帳號		自動登錄	找回密碼
密碼			立即注冊

久久久久久久999_99精品久久精品一区二区爱城_成人欧美一区二区三区在线播放_国产精品日本一区二区不卡视频_国产午夜视频_欧美精品在线观看免费

51單片機(jī)智能溫控風(fēng)扇Proteus仿真+程序

評分