太陽(yáng)能熱水器工程聯(lián)箱自動(dòng)控制系統(tǒng) 單片機(jī)源程序

ID:163099 · 發(fā)表于 2020-10-18 18:42

太陽(yáng)作為免費(fèi)的清潔能源，利用得當(dāng)非常實(shí)惠方便，坐標(biāo)大同市偏遠(yuǎn)縣區(qū)農(nóng)村，空氣清新無(wú)霧霾，光照條件良好，計(jì)劃利用太陽(yáng)能取暖。
   分析：太陽(yáng)能電池板和太陽(yáng)能真空熱水管兩種途徑，太陽(yáng)能電池板轉(zhuǎn)換效率較低，需配備電池組，成本較高，放棄！
   太陽(yáng)能真空管，技術(shù)比較成熟，成本相對(duì)較低，安裝需要專業(yè)技術(shù)，管路防凍等困難較多；
最終選擇太陽(yáng)能真空管方案小試效果，某個(gè)寶弄的50管太陽(yáng)能工程聯(lián)箱，帶支架運(yùn)費(fèi)共1450元，太陽(yáng)能熱水管及接頭若干，循環(huán)泵一個(gè)100+，水空調(diào)一個(gè)400+，儲(chǔ)水桶暫用水桶代替，其余配件過(guò)程中描述。
   利用不長(zhǎng)的假期開始組裝，真空管安裝不小心碰碎2根，好在賣家多發(fā)有結(jié)余有驚無(wú)險(xiǎn)；管路三通各部件連接到位，安裝順序：水桶——水泵——單向閥——太陽(yáng)能聯(lián)箱——水空調(diào)——水桶，室外部分管路做保溫，特別說(shuō)明太陽(yáng)能管最頂端需安裝自動(dòng)排氣閥，用于排空管路積水時(shí)進(jìn)氣，否則強(qiáng)大的大氣壓強(qiáng)回把真空管吸進(jìn)去，把聯(lián)箱吸癟，開始因?yàn)榕艢忾y太小，導(dǎo)致聯(lián)箱已被吸癟，等待通水測(cè)試；
   首次上水要在早晨太陽(yáng)沒出來(lái)之前，太陽(yáng)出來(lái)管內(nèi)溫度太高回造成爆管，上水就比較不順利，水泵買的是暖氣循環(huán)泵，離心泵，100W，功率小上水一半后上不動(dòng)了，多次尋找原因后無(wú)法解決，直接接到自來(lái)水先利用自來(lái)水壓力完成上水，冬天光照較弱，暫時(shí)不需要循環(huán)；臨近春節(jié)，再買水泵已經(jīng)不發(fā)貨了，沒辦法，找到一個(gè)噴農(nóng)藥用的配件隔膜泵，壓力沒問(wèn)題，噪音太大，暫時(shí)忍受吧！還有不知道隔膜泵在熱水工作能撐多久！
   進(jìn)入正題，控制思路簡(jiǎn)單介紹一下：元件：?jiǎn)纹瑱C(jī)STC12單片機(jī)，光線傳感器模塊，繼電器模塊。控制思路：白天：管頂溫度高于60度，循環(huán)泵開始循環(huán)，開20秒停20秒；管頂溫度高于90度，循環(huán)泵一直工作；低于3度，循環(huán)泵開始工作（防凍）；夜晚：管路溫度低于3度，循環(huán)泵開始工作，管路溫度高于10度，循環(huán)泵停止工作；
   測(cè)溫部分：DS18B20溫度傳感器，暫用4個(gè)，分別檢測(cè)：1.聯(lián)箱頂部排氣閥溫度防止結(jié)冰影響工作，2.聯(lián)箱頂部溫度，檢測(cè)水溫，決定是否循環(huán)；3.聯(lián)箱底部底部溫度，總想測(cè)一下，暫時(shí)沒用；4.管路溫度，測(cè)溫決定水泵循環(huán)防止凍管；
   增加功能：溫度數(shù)據(jù)上傳物聯(lián)網(wǎng)，遠(yuǎn)程監(jiān)控：樂(lè)為物聯(lián)！

制作出來(lái)的實(shí)物圖如下：

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

#include"shuiliu.h"
#include"ESP8266.h"
//#include<STC12C5A60S2.h>
#define uchar unsigned char
#define uint unsigned int
uchar table12[]="當(dāng)前水流:00.0L/h";//數(shù)組形式
uint shui,js,ls; //shui傳感器計(jì)數(shù)，js定時(shí)器1計(jì)數(shù)， ls流速
/*******************************************************************************
* 函數(shù) 名 : Int0Init()
* 函數(shù)功能 : 設(shè)置外部中斷0
* 輸入 : 無(wú)
* 輸出 : 無(wú)
*******************************************************************************/
void Int0Init() //外部中斷0
{
//設(shè)置INT1
IT0=1;//跳變沿出發(fā)方式（下降沿）
EX0=1;//打開INT1的中斷允許。
EA=1;//打開總中斷
}
void InitTimer1(void)
{
AUXR = AUXR|0x40; // T1, 1T Mode
TMOD = 0x10;
TH1 = 0x0D4;
TL1 = 0x0CD;
EA = 1;
ET1 = 1;
TR1 = 1;
}
void diplaysl(void) //寫指令
{ shui=0;
js=0;
ls=0;
EX0=1;
ET1=1;
Delay_ms(400);
table12[9]=ls/100+0x30;
if(table12[9]==0)
table12[9]=0x2D;
table12[10]=ls%100/10+0x30;
table12[12]= ls%10+0x30;
Display_String(1, table12);
}
/*******************************************************************************
* 函數(shù) 名 : Int0() interrupt 2
* 函數(shù)功能 : 外部中斷0的中斷函數(shù)
* 輸入 : 無(wú)
* 輸出 : 無(wú)
*******************************************************************************/
void Int0() interrupt 0 //外部中斷1的中斷函數(shù)
{ //過(guò)零中斷計(jì)數(shù) k，n調(diào)溫計(jì)時(shí)
//ET1=1; //延時(shí)消抖
shui++;
}
void Timer1Interrupt(void) interrupt 3
{
TH1 = 0x0D4; //1ms
TL1 = 0x0CD;
//add your code here!
js++;
if(js>=1000) //10ms
{
EX0=0;
ET1=0;
ls= shui*60/45;//shui計(jì)數(shù)除以450除以10=流速L/s； shui計(jì)數(shù)除以450X6=流速L/min；
//Display_String(1, table12);
shui=0;
js=0;
}
}

復(fù)制代碼

所有程序51hei提供下載:

簡(jiǎn)單測(cè)試.rar (472.63 KB, 下載次數(shù): 23)

ID:699723 · 發(fā)表于 2020-10-19 09:17

請(qǐng)收下我膝蓋

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

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

太陽(yáng)能熱水器工程聯(lián)箱自動(dòng)控制系統(tǒng) 單片機(jī)源程序

評(píng)分