AT89C51快热式热水器程序

快热式热水器程序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;//超温标志、测温开始标志、测温完成标志
/*----------------------------------------------
主函数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;//完成可控硅导通信号
}