找回密码
 立即注册

QQ登录

只需一步,快速开始

搜索
查看: 2864|回复: 3
打印 上一主题 下一主题
收起左侧

单片机控制可控硅调光

[复制链接]
跳转到指定楼层
楼主
ID:318883 发表于 2018-4-29 13:47 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
#include <reg52.h>
#define uchar unsigned   char
#define uint unsigned int
sbit key1=P1^0;     //开
sbit key2=P1^1;     //关
sbit key3=P1^2;     //减
sbit key4=P1^3;     //增
sbit out=P2^0;
uint up=1;
//-------------------------------------------------------------------
//** 延时子程序  **
//-------------------------------------------------------------------
void Delayms(uint n)  //延时n*0.5毫秒
{
   uint i,j;
   for(j=n;j>0;j--)
   for(i=60;i>0;i--);
}
void Delay500us(void)     //脉冲宽度延时500us
{
   uint j;
   for(j=60;j>0;j--);
}
//-------------------------------------------------------------------
//** 外部中断0服务程序  **
//-------------------------------------------------------------------
void intersvr0(void) interrupt 0 using1
{
Delayms(up);       //延时up*0.5毫秒后再给触发脉冲
out=0;  
Delay500us();      //给触发脉冲500us的宽度
out=1;
}
//-------------------------------------------------------------------
//** 主程序  **
//-------------------------------------------------------------------
void main(void)
{
IT0=1;                            //外部中断0初始化
EX0=1;
while(1)
{
/****************************/
   if(key1==0)    //开关打开
    {
    Delayms(20);//按键消抖
   if(key1==0)         
     {
       up=0;
       EA=1;
       out=0;  
     }
    }
  while(key1==0);
/****************************/
    if(key2==0)  //开关关断
    {
     Delayms(20); //按键消抖
    if(key2==0)            
     {
        EA=0;
       out=1;
     }
    }   
    while(key2==0);
/****************************/
  if(key3==0)     //减光
  {
    Delayms(20);//按键消抖
   if(key3==0)
    {
       up++;
       if(up>19) up=19;
    }
  }
    while(key3==0);
/****************************/
  if(key4==0)     //增光
  {
    Delayms(20);//按键消抖   
   if(key4==0)
    {
       up--;
       if(up<1||up>20) up=1;
    }
  }
    while(key4==0);
}
}   

分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏 分享淘帖 顶 踩
回复

使用道具 举报

沙发
ID:1 发表于 2018-4-29 15:23 | 只看该作者
过零检测接哪里呢?
回复

使用道具 举报

板凳
ID:309130 发表于 2018-6-12 08:12 | 只看该作者
admin 发表于 2018-4-29 15:23
过零检测接哪里呢?

INTO  P32
回复

使用道具 举报

地板
ID:96072 发表于 2018-6-23 17:15 | 只看该作者
楼主,这个程序调光效果怎么呀?
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

小黑屋|51黑电子论坛 |51黑电子论坛6群 QQ 管理员QQ:125739409;技术交流QQ群281945664

Powered by 单片机教程网

快速回复 返回顶部 返回列表