找回密碼
 立即注冊

QQ登錄

只需一步,快速開始

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

STC89C52控制24顆LED彩燈同時(shí)實(shí)現(xiàn)播放音樂

[復(fù)制鏈接]
ID:77398 發(fā)表于 2015-12-21 17:42 | 顯示全部樓層 |閱讀模式
看到很多做心形燈的例子,自己也想著做一個(gè),但是覺得僅有彩燈,不太完美,于是想加上音樂播放的程序。這次做了一個(gè)STC89C52的P0,P1,P2口控制24顆彩燈,P3^7口控制蜂鳴器發(fā)出音樂的例子。在仿真程序里面可以實(shí)現(xiàn),但是移植到硬件上程序會(huì)跑飛,貼出來給大家看看,網(wǎng)上說中斷容易讓程序跑飛,這次STC89C52的T0,T1,INT0,INT1都使用了。其中T0是一個(gè)10ms中斷用于音樂基準(zhǔn),T1是一個(gè)50ms中斷,通過改變numtop的值,可以改變花樣燈額、的切換速度,INT0控制播放哪首曲子,INT1用于改變numtop的值,改變此數(shù)值就可以改變花樣燈的切換速度。

                                           /*12Mhz晶振*/
#include <reg52.h>
#define uint unsigned int
#define uchar unsigned char
sbit key2=P3^3;//key2外部中斷1 控制花樣燈的切換速度
sbit key1=P3^2;//key1外部中斷0 控制播放哪首曲子
sbit voice=P3^7;//蜂鳴器定義
uchar code sound[]={0xff,                 //每個(gè)音階  不同拍子的數(shù)據(jù)  限于篇幅,完整數(shù)據(jù)請下載壓縮包
0x60,0x10,0x55,0x10,0x4c,0x10,0x48,0x10,0x40,0x10,0x39,0x10,0x33,0x10,
0x30,0x10,0x2b,0x10,0x26,0x10,0x24,0x10,0x20,0x10,0x1c,0x10,0x19,0x10,
0x18,0x10,0x15,0x10,0x13,0x10,0x12,0x10,0x10,0x10,0x0e,0x10,0x0d,0x10,//1/4拍子低音1到高音7
0x00};
uchar code kanong[]={0xff,                //卡農(nóng)  限于篇幅,完整數(shù)據(jù)請下載壓縮包
0x13,0x20,0x15,0x20,0x18,0x20,0x19,0x20,0x1c,0x20,0x20,0x20,0x1c,0x20,0x19,0x20,//第一行
0x18,0x20,0x19,0x20,0x1c,0x20,0x20,0x20,0x24,0x20,0x26,0x20,0x24,0x20,0x2b,0x20,//第二行

0x00};
code unsigned long Pattern[]={         //24顆LED燈花樣數(shù)據(jù)   限于篇幅,完整數(shù)據(jù)請下載壓縮包
0x00000000,0x00ffffff,0x00000000,0x00ffffff,//全亮全滅
};
uchar zdjs=0,jp,i=0;
uchar num=0,numtop=5,count=0;
void del(yj);
void delay(uint z);
void play(void)
{
        uint dpjs=0;
        uchar yj;
        while(1)
        {  
                zdjs=0;  
                if(count==0)
                {       
                        TR0=0;
                        break;
                }
                if(count==1)        //選曲
                {
                        dpjs++; yj=sound[dpjs];    //取出音階的頻率
                        dpjs++; jp=sound[dpjs];           //取出延時(shí)時(shí)長
                }
                if(count==2)
                {
                        dpjs++; yj=kanong[dpjs];
                        dpjs++; jp=kanong[dpjs];
                        jp=jp*4;   //這句是調(diào)音的
                }                  

                         while(zdjs!=(jp))
                         {
                                 if(yj!=0xff)
                                 {
                                         if(yj!=0)  //判斷音樂是否播放完畢
                                         {
                                                 voice=!voice;
                                                 del(yj);
                                         }
                                         else
                                         {
                                                 dpjs=0;
                                                 break;
                                         }
                                 }
                                 else
                                 {
                                         voice=0;
                                         del(jp);
                                 }
                        }
                 }
}
void Time0() interrupt 1  using 1           //產(chǎn)生音樂基準(zhǔn)
{
        TH0=0xd8, TL0=0xf0;
        zdjs++;
}
void Time1() interrupt 3                             //控制花樣燈的切換
{
       
        TH1=0x3C, TL1=0xB0;
        num++;
        if(num==numtop)
        {
                num=0;
                P0=Pattern[i];
                P1=Pattern[i]>>8;
                P2=Pattern[i]>>16;
                i++;
                if(i==135) i=0;
        }
}                         
void int0() interrupt 0                 //key1外部中斷0 控制播放哪首曲子
{
        del(5);         
        EA=0;
        if(key1==0)
        {
                count++;                  //count決定播放哪一首曲子
                while(!key1);
                if(count==4) count=0;       
        }
        EA=1;
}
void int1() interrupt 2                   //key2外部中斷1 控制花樣燈的切換速度
{
        del(5);  //去抖
        EA=0;    //關(guān)總中斷
        numtop++;
//        while(!key2);         //去抖動(dòng)
        if(numtop==10) numtop=0;                //numtop 代表最長延時(shí)時(shí)間
        EA=1;  //開總中斷
}                                  
void del(yj)                 //簡單延時(shí)函數(shù)
{
        uchar yj2=2;
    while(yj!=0)
    {      
            while(yj2!=0)
        {
                yj2--;
        }
        yj2=2;
        yj--;  
    }

}
void main()
{
                TMOD=0x11,IE=0x8a;
                TH0=0xd8, TL0=0xf0;  //10ms音樂基準(zhǔn)
                TH1=0x3C, TL1=0xB0;  //50MS
                EX0=1;//開外部中斷0
                IT0=0;//外部中斷0下降沿觸發(fā)方式
                EX1=1;//開外部中斷1
                IT1=0;//外部中斷1下降沿觸發(fā)方式          
                TR0=1; TR1=1;
            play();
}



仿真可行,但是硬件上會(huì)跑飛!。!
哪位功夫深厚,能夠?qū)⑺晟??br />

捕獲.PNG

單片機(jī)課程制作數(shù)組法.rar

745.65 KB, 下載次數(shù): 46

回復(fù)

使用道具 舉報(bào)

您需要登錄后才可以回帖 登錄 | 立即注冊

本版積分規(guī)則

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

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

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