單片機按鍵調節電熱絲功率大小已做出實物和程序

ID:37147 · 發表于 2017-5-31 10:12

這是一個取暖功能，風扇是起給外殼降溫作用的，還用了一個電子式傾倒開關，一旦傾倒，立即關閉取暖功能，起保護作用，以免發生火災，并且在傾倒后，風扇繼續延時散熱，給外殼降溫，我這里為了迅速看到效果，延時時間設置10S，經測試，良好，沒有發現程序控制錯亂問題，如果大家有發現，告知哈，一起學習~~

實物圖：

電路原理圖如下：

單片機源程序如下:

#include <STC15F2K60S2.H>
#define uchar unsigned char
#define uint unsigned int
sbit led1=P1^0;
sbit led2=P3^7;
sbit pwm=P1^1;
sbit wind=P3^6;
sbit k1=P5^5;
sbit sw=P1^2;//傾倒開關
uchar num=0,num2=0,scale=0;
uint a=0,t=0,t1=0;
bit flag1=0,flag2=0,flag3=0;
bit flag4=0,flag5=1;
void delay(uint xms)
{
uint i,j;
for(i=xms;i>0;i--)
for(j=110;j>0;j--);
}
void cloud()
{
if(flag3==1)
{
num2++;
if(num2==200)
{
num2=0;
a++;
if(a==500) //50一秒，500就是10秒
{
TR0=0;
a=0;
wind=0;
flag1=0;
flag2=0;
}
}
}
}
void keyscan()
{
if(flag4==0)
{
if(flag2==0)
{
if(flag1==0)
{
if(k1==0) //一檔
delay(10);
if(k1==0)
{
while(!k1); //松手檢測
EX0=1; //開外部中斷
wind=1; //開風扇
scale=10; //賦初值
led1=0; //點亮LED1
led2=1; //關閉LED2
flag1=1; //置1
flag3=0; //清零
}
}
if(flag1==1)
{
if(k1==0) //二檔
delay(10);
if(k1==0)
{
while(!k1);
EX0=1; //
scale=60;
led1=1;
led2=0;
flag1=0;
flag2=1;
flag3=0;
}
}
}
if(flag2==1)
{
if(k1==0) //三檔
delay(10);
if(k1==0)
{
while(!k1);
EX0=0; //關外部中斷
led1=1; //關2個LED指示燈
led2=1;
num2=0; //清零
a=0;
flag2=0; //
flag3=1; //調用風扇延時函數。
}
}
}
if(sw==1) //判斷傾倒
delay(10);
if(sw==1)
{
flag4=1; //一旦傾倒，調用傾倒程序
}
if(sw==0) //傾倒復位
delay(10);
if(sw==0)
{
flag4=0; //清零，不調用傾倒程序。
t=0;
}
}
void main()
{
P3M0=0x40;
P3M1=0x00;
TMOD=0x01;
TH0=0xff;//定時0.1ms
TL0=0x9c;
EA=1;
ET0=1;
IT0=0;//必須設外部中斷觸發方式為上升沿下降沿同時觸發。STC最新15系列單片機外部中斷INT0口有上下沿同時觸發功能
led1=1;
led2=1;
pwm=1;
wind=0;
k1=1;
while(1)
{
keyscan(); //按鍵掃描程序
}
}
void ex0() interrupt 0
{
IE0=0;
num=0;
TR0=1; //交流過零點的時候，清楚標志、計數變量并啟動定時器。
}
void t0() interrupt 1
{
unsigned char i;
TH0=0xff;
TL0=0x9c;
if(flag3==0)
{
num++;
if(num==scale) //改變num的值即可改變移相觸發時間，即改變負載功率大小
{
pwm=0; //觸發MOC3021導通，即觸發可控硅導通
for(i=0;i<2;i++);//延時2us
pwm=1; //延時2us之后，關掉脈沖輸出，因為可控硅在非過零點情況下觸發信號丟失，會繼續保持導通。
……………………
…………限于本文篇幅余下代碼請從51黑下載附件…………

復制代碼

所有資料51hei提供下載:

取暖設備控制.rar (253.62 KB, 下載次數: 81)

ID:205314 · 發表于 2017-5-31 16:37

頂頂樓主用用心了，有點不懂的地方可控規的控制是怎么完成的？小白一個希望樓主給解答

ID:37147 · 發表于 2017-6-1 08:21

shixijiang 發表于 2017-5-31 16:37
頂頂樓主用用心了，有點不懂的地方可控規的控制是怎么完成的？小白一個希望樓主給解答

你可以看我上個帖子，你參考下，我有說明。我也是花了幾個禮拜才搞明白的，想搞明白，自己好好琢磨琢磨哈。

ID:105786 · 發表于 2017-7-25 16:45

正在尋找資料，收藏了，謝謝

ID:369516 · 發表于 2018-7-11 15:33

正在尋找資料

ID:119238 · 發表于 2018-7-11 16:02

交流直流共地會不會不太安全啊？過零檢測應該可以光耦隔離吧

ID:380389 · 發表于 2018-7-29 09:39

收藏了，謝謝提供資料

ID:377382 · 發表于 2018-7-31 09:30

非常的給力，謝謝了

ID:1129414 · 發表于 2024-8-14 14:22

收藏了，謝謝提供資料，對移相控制有很好幫助

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

wwwxxx国产_337p日本欧洲亚洲大胆张筱雨_免费在线看成人av_日本黄色不卡视频_国产精品成熟老女人_99视频一区_亚洲精品97久久中文字幕_免费精品视频在线_亚洲色图欧美视频_欧美一区二三区

單片機按鍵調節電熱絲功率大小已做出實物和程序

評分

wwwxxx国产_337p日本欧洲亚洲大胆张筱雨_免费在线看成人av_日本黄色不卡视频_国产精品成熟老女人_99视频一区_亚洲精品97久久中文字幕_免费精品视频在线_亚洲色图欧美视频_欧美一区二三区

單片機按鍵調節電熱絲功率大小 已做出實物和程序

評分

單片機按鍵調節電熱絲功率大小已做出實物和程序