AT89C51单片机快热式热水器程序设计

发布时间:2023-06-27  

快热式热水器程序MCU AT89C51 XAL 12MHz

//#pragmaSRC

#include

#include

#include

voiddelay(unsignedint);//延时函数

voiddisplay(void);//显示函数

unsignedcharkeysCAN(void);//按键扫描处理函数

voidheatCTRl(void);//加热控制函数

voidtemptest(void);//测温函数

sbitswkey=P1^0;//开关键

sbitupkey=P1^1;//加热档位“+”键

sbitdownkey=P1^2;//加热档位“-”键

sbitbuzz=P1^05;//蜂鸣器输出端

sbittriac=P1^6;//可控硅触发信号输出端

sbitrelay=P1^7;//继电器控制信号输出端

sbitLED1=P2^5;//加热档位指示灯1

sbitled2=P2^6;//加热档位指示灯2

sbitled3=P2^7;//加热档位指示灯3

signedchardatactemp;//当前测得水温寄存器

unsignedchardatadispram[2]={0x10,0x10};//显示区缓存

unsignedchardataheatpower,px0count;//加热档位寄存器、外中断0计数器

bittempov,t0tst,testok;//超温标志、测温开始标志、测温完成标志

AT89C51单片机快热式热水器程序设计

/*----------------------------------------------

主函数voidmain(void)

无参数,无返回值

循环调用显示、键扫描、温度检测、加热控制函数

----------------------------------------------*/

voidmain(void)

{

unsignedchari,j;

ctemp=15;//初始化水温寄存器

heatpower=5;//初始化加热档位为5当

tempov=0;//清除超温标志

swkey=0;//默认开关键被按下,进入待机状态

TMOD=0x11;//设定T0和T1工作方式为16位定时器

TCON=0x05;//设置外中断0和1为下降沿触发

IP=0x01;//设置外中断0优先

IE=0x80;//打开总中断

while(1)

{

i=1;

do{

for(j=0;j《100;j++)//循环100次约0.5s

{

if(keyscan())i=6;//如果有键按下,显示当前档位3s

display();//调用显示函数一次约4ms

heatctrl();//调用加热控制函数

}//endfor(b=0;b《100;b++)

temptest();//每0.5s进行一次测温

}while(--i);//通过改变循环次数i的大小决定是否刷新显示

j=abs(ctemp);//取温度绝对值

dispram[1]=j%10;//取个位数送显示

j/=10;//取十位数

dispram[0]=j?j:0x11;//送显示(带灭零)

}//endwhile(1)

}

/*--------------------------------------

延时函数voiddelay(unsignedintdt)

参数:dt,无返回值

延时时间=dt*500机器周期

--------------------------------------*/

voiddelay(unsignedintdt)

{

registerunsignedcharbt;//定义寄存器变量

for(;dt;dt--)

for(bt=250;--bt;);//此句编译时以“DJNZ”实现,250*2=500机器周期

}

/*--------------------------------------

显示函数voiddisplay(void)

无参数,无返回值

两位共阳数码管扫描显示

--------------------------------------*/

voiddisplay(void)

{

unsignedcharcodetable[]={0xc0,0xf9,0xa4,0xb0,0x99,0x92,0x82,0xf8,0x80,0x90,

0x88,0x83,0xc6,0xa1,0x86,0x8e,0xbf,0xff};

unsignedchari,a;

a=0xfe;//位选赋初值

for(i=0;i《2;i++)//循环扫描两位数码管

{

P2|=0x1f;//清除位选

P0=table[dispram[i]];//送显示段码

P2&=a;//选通一位

delay(4);//延时2ms

a=_crol_(a,1);//改变位选字

P0=0xff;//消影

}

}

/*----------------------------------------------------------

按键扫描处理函数unsignedcharkeyscan(void)

无参数,返回值:无符号字符型,无键按下为0,有键按下为其它

影响全局变量:heatpower

----------------------------------------------------------*/

unsignedcharkeyscan(void)

{

unsignedchari,ch;

if(upkey==0)//“+”键

{

buzz=0;//打开蜂鸣器(发出按键音)

for(i=0;i《5;i++)display();//延时消抖

buzz=1;//关闭蜂鸣器

if(heatpower《9)heatpower++;//档位加一

dispram[0]=0;

dispram[1]=heatpower;//显示当前档位

while(upkey==0)display();//等待键释放

return(1);//返回有键按下

}

elseif(downkey==0)//“-”键

{

buzz=0;//打开蜂鸣器(发出按键音)

for(i=0;i《5;i++)display();//延时消抖

buzz=1;//关闭蜂鸣器

if(heatpower》0)heatpower--;//档位减一

dispram[0]=0;

dispram[1]=heatpower;//显示当前档位

while(downkey==0)display();//等待键释放

return(2);//返回有键按下

}

elseif(swkey==0)//开关键

{

buzz=0;//打开蜂鸣器(发出按键音)

for(i=0;i《30;i++)display();//延时消抖

buzz=1;//关闭蜂鸣器

swkey=1;//置位开关键

while(swkey==0)display();//等待键释放

ch=IE;//暂存中断控制字IE

IE=0x00;//禁止中断

P0=0xff;

P1=0xff;

P2=0xff;//清除端口输出

dispram[0]=0x10;

dispram[1]=0x10;//显示“--”

display();

while(1)

{

while(swkey)display();//等待开关键按下

buzz=0;//打开蜂鸣器(发出按键音)

for(i=0;i《10;i++)display();//延时消抖

buzz=1;//关闭蜂鸣器

if(swkey==0)break;//确认开关键被按下

}

while(swkey==0)display();//等待键释放

IE=ch;//还原中断控制字IE

return(0);//返回无键按下

}

elsereturn(0);//无任何键按下时由此返回

}

/*--------------------------------------

加热控制函数voidheatctrl(void)

无参数,无返回值

判断是否加热、加热功率及档位指示灯处理

--------------------------------------*/

voidheatctrl(void)

{

if(!tempov)//当没有超温标志时

{

relay=0;//接通继电器

buzz=1;//关闭蜂鸣器

switch(heatpower)//判断加热档位

{

case0:{EX1=0;ET1=0;triac=1;led1=1;led2=1;led3=1;break;}//0档不加热,指示灯不亮

case1:

case2:

case3:

case4:{led1=0;led2=1;led3=1;EX1=1;break;}//1~4档1号指示等亮

case5:

case6:

case7:

case8:{led1=0;led2=0;led3=1;EX1=1;break;}//5~8档1号、2号指示灯亮

case9:{EX1=0;ET1=0;led1=0;led2=0;led3=0;triac=0;break;}//9档全功率,指示灯全亮

}

}

else//当有超温标志时

{

relay=1;//断开继电器

EX1=0;ET1=0;triac=1;//关闭可控硅

buzz=0;//蜂鸣报警

}

}

/*--------------------------------------

测温函数voidtemptest(void)

无参数,无返回值,

影响全局变量:ctemp,tempov

测量并查表计算温度,判断是否超温

--------------------------------------*/

voidtemptest(void)

{

signedchartemp,tempmin,tempmax;

unsignedintt0rig;

unsignedintcodetemptab[]={0x6262,0x61eb,0x6171,0x60f7,0x6047,0x5ff7,0x5f6e,0x5eef,0x5e53,0x5dbe,0x5d4b,0x5ca5,0x5c17,

0x5b6b,0x5ada,0x5a5c,0x599b,0x58ff,0x5869,0x57b0,0x570d,0x5663,0x55c6,0x550e,0x5444,0x5396,

0x52dd,0x5240,0x5189,0x50b0,0x5005,0x4f20,0x4e69,0x4db1,0x4cef,0x4c42,0x4b64,0x4aaa,0x49e1,

0x48fc,0x4847,0x476c,0x46b1,0x4604,0x4503,0x4449,0x4356,0x4299,0x41c0,0x40ce,0x3ff0,0x3f2b,

0x3e33,0x3d86,0x3ca6,0x3bd2,0x3b26,0x3a39,0x3973,0x38a6,0x37ef,0x373f,0x3687,0x35c3,0x3507,

0x3487,0x33bc,0x32ed,0x324f,0x319e,0x3106,0x3053,0x2fa6,0x2f2a,0x2e88,0x2e00,0x2d63,0x2cd6,

0x2c65,0x2bae,0x2b28,0x2a97,0x2a07,0x298e,0x2914,0x287a,0x280d,0x278a,0x2703,0x2687,0x2626,

0x25e5,0x256d,0x24ee,0x2489,0x2414,0x23bc,0x2356,0x22d9,0x2278,0x2203};//温度频率表

px0count=2;//测频中断函数参数

t0tst=1;//置测频程序开始标志

EX0=1;//打开测频外中断

testok=0;//清除测频程序完成标志

while(!testok)display();//等待测试完成

t0rig=(unsignedint)TH0《《8|TL0;//字节合成字

tempmin=0;//以下是二分查表法计算温度值

tempmax=100;//tempmin和tempmax为温度表的范围

while(1)

{

temp=(tempmax+tempmin)/2;//假定当前温度为最大值与最小值之中点值

if(t0rig==temptab[temp])break;//若实际值等于假定值结束查找

elseif(t0rig》temptab[temp])tempmax=temp;//若实际值大于假定值,减小查找范围的最大值

elsetempmin=temp;//若实际值小于假定值,增大查找范围的最小值

if(tempmax-tempmin《=1)//若查找范围已缩小到1度之间,

{//判断实际值更接近哪个端点

if(temptab[tempmax]+temptab[tempmin]》2*t0rig)temp=tempmax;//接近最大值取最大值

elsetemp=tempmin;//接近最小值取最小值

break;//结束查找

}

}

ctemp=temp;//刷新当前温度寄存器

if(temp》65)tempov=1;//如果温度超过65度置位超温标志

elseif(temp《45)tempov=0;//当温度回落到45度以下时清除超温标志

}

/*------------------------------------------

测温频率测试函数voidtempFrequency(void)

使用外部X0中断,寄存器组1

测出温度——频率转换电路的频率

------------------------------------------*/

voidtempfrequency(void)interrupt0using1

{

if(--px0count)return;//找齐起点或计数

if(t0tst)//如果是起点

{

t0tst=0;//清除测频开始标志

px0count=100;//取100个方波为一次测频

TH0=0;

TL0=0;//清除计时器T0

TR0=1;//开始计时

}

else//如果是终点

{

TR0=0;//停止计时

EX0=0;//停止测频外中断

testok=1;//置位测频完成标志

}

}

/*--------------------------------------

加热控制过〇检测函数voidpass0(void)

使用外部X1中断,寄存器组2

检测过〇点,给定时器T1赋初值

--------------------------------------*/

voidpass0(void)interrupt2using2

{

unsignedcharcodepowertab[]={0xd8,0xf0,0xe2,0x63,0xe5,0x25,0xe8,0x3e,0xeb,0x16,0xed,0xda,0xf0,0xb2,0xf3,0xcb,0xf7,0x8d,0xf7,0x8d};//10个功率档位的可控硅导通角延时参数表

TH1=powertab[2*heatpower]-1;

TL1=powertab[2*heatpower+1];//市电过零后,根据当前设置的档位给定时器T1赋延时参数

ET1=1;//允许定时器T1中断

TR1=1;//打开定时器T1

}

/*------------------------------------------

可控硅触发信号控制函数voidtriaCCtrl(void)

使用定时器T1中断,寄存器组3

向可控硅送出触发信号

------------------------------------------*/

voidtriacctrl(void)interrupt3using3

{

registerunsignedchari;

triac=0;//输出可控硅导通信号

ET1=0;//关闭定时器T1中断

TR1=0;//终止定时器运行

for(i=0;i《2;i++);//延时,保证导通信号有足够的宽度

triac=1;//完成可控硅导通信号

}


文章来源于:电子工程世界    原文链接
本站所有转载文章系出于传递更多信息之目的,且明确注明来源,不希望被转载的媒体或个人可与我们联系,我们将立即进行删除处理。

我们与500+贴片厂合作,完美满足客户的定制需求。为品牌提供定制化的推广方案、专属产品特色页,多渠道推广,SEM/SEO精准营销以及与公众号的联合推广...详细>>

利用葫芦芯平台的卓越技术服务和新产品推广能力,原厂代理能轻松打入消费物联网(IOT)、信息与通信(ICT)、汽车及新能源汽车、工业自动化及工业物联网、装备及功率电子...详细>>

充分利用其强大的电子元器件采购流量,创新性地为这些物料提供了一个全新的窗口。我们的高效数字营销技术,不仅可以助你轻松识别与连接到需求方,更能够极大地提高“闲置物料”的处理能力,通过葫芦芯平台...详细>>

我们的目标很明确:构建一个全方位的半导体产业生态系统。成为一家全球领先的半导体互联网生态公司。目前,我们已成功打造了智能汽车、智能家居、大健康医疗、机器人和材料等五大生态领域。更为重要的是...详细>>

我们深知加工与定制类服务商的价值和重要性,因此,我们倾力为您提供最顶尖的营销资源。在我们的平台上,您可以直接接触到100万的研发工程师和采购工程师,以及10万的活跃客户群体...详细>>

凭借我们强大的专业流量和尖端的互联网数字营销技术,我们承诺为原厂提供免费的产品资料推广服务。无论是最新的资讯、技术动态还是创新产品,都可以通过我们的平台迅速传达给目标客户...详细>>

我们不止于将线索转化为潜在客户。葫芦芯平台致力于形成业务闭环,从引流、宣传到最终销售,全程跟进,确保每一个potential lead都得到妥善处理,从而大幅提高转化率。不仅如此...详细>>