找回密碼
 立即注冊(cè)

QQ登錄

只需一步,快速開(kāi)始

搜索
查看: 7000|回復(fù): 5
收起左側(cè)

C51單片機(jī)控制40w調(diào)光電源C語(yǔ)言程序

[復(fù)制鏈接]
ID:51707 發(fā)表于 2013-7-11 02:04 | 顯示全部樓層 |閱讀模式
C51單片機(jī)控制40w調(diào)光電源C語(yǔ)言程序,12M晶振,500Hz 2ms,1000Hz 1ms,300Hz 3.3ms,330Hz 3ms 。3ms為一個(gè)周期,30us中斷一次,共可以有100次中斷, 中斷次數(shù)n即占空比D,調(diào)光分3檔,33% 66% 100%。
#include <REG51.H>
#define uchar unsigned char
#define uint unsigned int
#define ulong unsigned long

/************* 1、紅外遙控 *****************/
uchar code table_duan[16]=
{
0x3F,0x06,0x5B,0x4F,0x66,
0x6D,0x7D,0x07,0x7F,0x6F,
0x77,0x7C,0x39,0x5E,0x79,0x71
};

uchar code table_wei[8]=
{
0xE3,0xE7,0xEB,0xEF,
0xF3,0xF7,0xFB,0xFF
};

#define Imax  14000
#define Imin  8000
#define Inum1 1450
#define Inum2 700
#define Inum3 3000

uchar Im[4]={0x00,0x00,0x00,0x00};
uchar show[2]={0,0};
ulong mm,Tc;
uchar IrOK;
uchar ff;
uchar t_display;

/************* 1、紅外遙控 *****************/

uchar aa,bb,cc,ss;

#define D33  3     //調(diào)光等級(jí)
#define D66  7
#define D100 16

uchar D,n,pwmoff,njk,jkdelay,spkn,spkxx,spkm,spkopen,spkclose;
sbit pwm1=P3^0;//外部中斷0 P3.2  IR
sbit pwm2=P3^4;
sbit jk4=P3^7; //大
sbit jk3=P1^0; //中
sbit jk2=P1^5; //小
sbit jk1=P1^7; //ON/OFF
sbit spk1=P3^1;
void delay(uint z)
{   
  uint x,y; //x,y為局部變量,只在當(dāng)前函數(shù)出現(xiàn)并有效
  for(x=z;x>0;x--)
      for(y=200;y>0;y--);
}

//外部中斷解碼程序
void IR_code(void)interrupt 0 using 1     //P3^2 外部中斷0
{
Tc=TH0*256+TL0;    //提取中斷時(shí)間間隔長(zhǎng)
TH0=0;
TL0=0;
if(Tc>Imin&&Tc<Imax) //Imin=8000  Imax=14000;
{
mm=0;
ff=1;
return; //直接跳出中斷,無(wú)返回值 (不執(zhí)行下個(gè)if)
}
if(ff==1) //ff=1找到啟始碼
{
if(Tc>Inum1&&Tc<Inum3) //Inum1=1450  Inum3=3000;
{
Im[mm/8]=Im[mm/8]>>1|0x80;    // | 按位“或” 0x80=10000000
mm++;   
}
if(Tc>Inum2&&Tc<Inum1) //Inum2=700  Inum1=1450;
{
Im[mm/8]=Im[mm/8]>>1; //取碼
mm++;   
}
     if(mm==32)
{
mm=0;
ff=0;
if(Im[2]==~Im[3])
{
IrOK=1;
}
else {IrOK=0;} //取完碼后判斷讀碼是否正確
}
///////準(zhǔn)備讀下一碼
}
}

//定時(shí)中斷1
void timer1() interrupt 3 using 2    //定時(shí)器1中斷
{
     TH1=(65536-200)/256;
TL1=(65536-200)%256;
t_display++;
n++;
if(n==16)   
n=0; //n=16時(shí)周期約3.3ms,300Hz   

if(spkopen==1)    //開(kāi)蜂鳴器
       {
    spk1=0;
    spkn++;
if(spkn==150)     //響一次
{
      spkn=0;
spk1=1;    //關(guān)蜂鳴器
spkm--;    //響的次數(shù)spkm
     if(spkm==0)
  {
spkopen=0;
     spkclose=0;   
  }
else {spkopen=0; spkclose=1; }
}
  }
   
if(spkclose==1)     
       {
         spkn++;
if(spkn==150)
{
spkopen=1;    //開(kāi)蜂鳴器
spkclose=0;   
}

  }     

if(jkdelay==1)
{
njk++;
       if(njk==150)
{
njk=0; //n=150時(shí)約30ms,繼電器安全動(dòng)作時(shí)間   
     switch (spkxx)
{
case 0x1c:jkdelay=0;jk2=0;jk1=0;
       break;
case 0x0d:jkdelay=0;jk3=0;jk1=0;
       break;
case 0x0e:jkdelay=0;jk4=0;jk1=0;
       break;
default:
break;
   }
}     }

if(aa==1)
bb++; //第二步,去抖計(jì)數(shù)。
}

void start()
{
t_display=0;

aa=0;
bb=0;
cc=0;
ss=0;
}

void pwm()
{
if(pwmoff==0)
{
if(n<=D)
{
     pwm1=0;
pwm2=0;
}
if(n>D)
{
     pwm1=1;
pwm2=1;
}
}
}


void main()
{
    delay(100);
pwm1=1;//
pwm2=1;//
jk4=1; //大
jk3=1; //中
jk2=1; //小
jk1=1; //ON/OFF
spk1=1;
D=D100;

start();
mm=0;
ff=0;
IT0=1; //外部中斷0下降沿觸發(fā)
EX0=1; //開(kāi)外部中斷0 P3^2 外部中斷0    ,P3^3 外部中斷1
EA=1;  //開(kāi)總中斷
TMOD=0x11; //0x11=00010001 設(shè)置T0、T1為16位定時(shí)器
TH0=0;
TL0=0;
TR0=1; //開(kāi)T0計(jì)時(shí)

TH1=(65536-100)/256;
TL1=(65536-100)%256;
ET1=1;
TR1=1;

while(1)
{
if(IrOK==1)
{
show[1]=Im[2]&0x0f;     //取鍵碼的低四位 0x0f=00001111;
show[0]=Im[2]>>4;     //取鍵碼的高四位
if(Im[2]==spkxx)  
                      {spkm=2;}     //設(shè)置蜂鳴器響的次數(shù)
else {spkm=1;}
      
switch (Im[2])
{
case 0x04:spkopen=1;pwmoff=1;pwm1=1;pwm2=1;    //關(guān)燈
break;
case 0x10:spkopen=1;pwmoff=0;D=D33;
break;
case 0x0a:spkopen=1;pwmoff=0;D=D66;
break;
case 0x03:spkopen=1;pwmoff=0;D=D100;
       break;
case 0x48:spkopen=1;jk1=1;    //關(guān)電機(jī)   其實(shí)3個(gè)繼電器就能搞定了jk2=0;jk3=0;jk4=0;
       break;   
case 0x1c:spkopen=1;jkdelay=1;jk2=1;jk3=1;jk4=1;
       break;
case 0x0d:spkopen=1;jkdelay=1;jk2=1;jk3=1;jk4=1;
       break;
case 0x0e:spkopen=1;jkdelay=1;jk2=1;jk3=1;jk4=1;
       break;
default:
break;
   }
IrOK=0;
                spkxx=Im[2];
Im[2]=0xff;   
}
pwm();
           }   

}
回復(fù)

使用道具 舉報(bào)

ID:55601 發(fā)表于 2013-10-3 16:56 | 顯示全部樓層
好東東,學(xué)習(xí)中
回復(fù)

使用道具 舉報(bào)

ID:61326 發(fā)表于 2014-5-4 14:17 | 顯示全部樓層
謝謝分享
回復(fù)

使用道具 舉報(bào)

ID:61869 發(fā)表于 2014-5-16 09:29 | 顯示全部樓層
回復(fù)

使用道具 舉報(bào)

ID:75280 發(fā)表于 2016-7-16 08:38 | 顯示全部樓層
謝謝分享
回復(fù)

使用道具 舉報(bào)

ID:272625 發(fā)表于 2018-1-24 09:16 | 顯示全部樓層
好資料,樓主有仿真圖嗎
回復(fù)

使用道具 舉報(bào)

本版積分規(guī)則

手機(jī)版|小黑屋|51黑電子論壇 |51黑電子論壇6群 QQ 管理員QQ:125739409;技術(shù)交流QQ群281945664

Powered by 單片機(jī)教程網(wǎng)

快速回復(fù) 返回頂部 返回列表