单片机按键调节电热丝功率大小已做出实物和程序 -

#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黑下载附件…………

复制代码