欧美极品高清xxxxhd,国产日产欧美最新,无码AV国产东京热AV无码,国产精品人与动性XXX,国产传媒亚洲综合一区二区,四库影院永久国产精品,毛片免费免费高清视频,福利所导航夜趣136

標題: 51數碼八音盒 [打印本頁]

作者: yang!@    時間: 2018-7-7 15:29
標題: 51數碼八音盒


#include "reg52.h"                         //此文件中定義了單片機的一些特殊功能寄存器
#include "SoundPlay.h"
#include"music.h"

typedef unsigned int u16;          //對數據類型進行聲明定義
typedef unsigned char u8;



void Delay1ms(unsigned int count)
{
        unsigned int i,j;
        for(i=0;i<count;i++)
        for(j=0;j<120;j++);
}

void main()
{
        InitialSound();
        while(1)
        {
                Play(Music_Girl,0,3,360);
               
                Delay1ms(500);
                Play(Music_Same,0,3,360);
                Delay1ms(500);
                Play(Music_Two,0,3,360);
                Delay1ms(500);
        }
}

***************************************************************************/
#ifndef __SOUNDPLAY_H_REVISION_FIRST__
#define __SOUNDPLAY_H_REVISION_FIRST__

//**************************************************************************
#include"music.h"

#define SYSTEM_OSC                 12000000        //定義晶振頻率12000000HZ
#define SOUND_SPACE         4/5                 //定義普通音符演奏的長度分率,//每4分音符間隔
sbit    BeepIO    =           P1^5;                //定義輸出管腳
unsigned char value=0;
unsigned int  code FreTab[12]  = { 262,277,294,311,330,349,369,392,415,440,466,494 }; //原始頻率表
unsigned char code SignTab[7]  = { 0,2,4,5,7,9,11 };                                                                   //1~7在頻率表中的位置
unsigned char code LengthTab[7]= { 1,2,4,8,16,32,64 };                                               
unsigned char Sound_Temp_TH0,Sound_Temp_TL0;        //音符定時器初值暫存
unsigned char Sound_Temp_TH1,Sound_Temp_TL1;        //音長定時器初值暫存
//**************************************************************************
void InitialSound(void)
{
        BeepIO = 0;
        Sound_Temp_TH1 = (65535-(1/1200)*SYSTEM_OSC)/256;        // 計算TL1應裝入的初值         (10ms的初裝值)
        Sound_Temp_TL1 = (65535-(1/1200)*SYSTEM_OSC)%256;        // 計算TH1應裝入的初值
        TH1 = Sound_Temp_TH1;
        TL1 = Sound_Temp_TL1;
        TMOD  |= 0x11;
        ET0    = 1;
        ET1           = 0;
        TR0           = 0;
        TR1    = 0;
        EA     = 1;
}

void BeepTimer0(void) interrupt 1        //音符發生中斷
{
        static unsigned char i;
        BeepIO = !BeepIO;
        TH0    = Sound_Temp_TH0;
        TL0    = Sound_Temp_TL0;
        i++;
        if(i==100)
        {
                i=0;
                value++;
                if(value==5)value=0;
        }

}
//**************************************************************************
void Play(unsigned char *Sound,unsigned char Signature,unsigned Octachord,unsigned int Speed)
{
        unsigned int NewFreTab[12];                //新的頻率表
        unsigned char i,j;
        unsigned int Point,LDiv,LDiv0,LDiv1,LDiv2,LDiv4,CurrentFre,Temp_T,SoundLength;
        unsigned char Tone,Length,SL,SH,SM,SLen,XG,FD;
        for(i=0;i<12;i++)                                 // 根據調號及升降八度來生成新的頻率表
        {
                j = i + Signature;
                if(j > 11)
                {
                        j = j-12;
                        NewFreTab[i] = FreTab[j]*2;
                }
                else
                        NewFreTab[i] = FreTab[j];

                if(Octachord == 1)
                        NewFreTab[i]>>=2;
                else if(Octachord == 3)
                        NewFreTab[i]<<=2;
        }                                                                       
       
        SoundLength = 0;
        while(Sound[SoundLength] != 0x00)        //計算歌曲長度
        {
                SoundLength+=2;
        }

        Point = 0;
        Tone   = Sound[Point];       
        Length = Sound[Point+1];                         // 讀出第一個音符和它時時值
       
        LDiv0 = 12000/Speed;                                // 算出1分音符的長度(幾個10ms)        
        LDiv4 = LDiv0/4;                                         // 算出4分音符的長度
        LDiv4 = LDiv4-LDiv4*SOUND_SPACE;         // 普通音最長間隔標準
        TR0          = 0;
        TR1   = 1;
        while(Point < SoundLength)
        {
                SL=Tone%10;                                                                 //計算出音符
                SM=Tone/10%10;                                                                 //計算出高低音
                SH=Tone/100;                                                                 //計算出是否升半
                CurrentFre = NewFreTab[SignTab[SL-1]+SH];         //查出對應音符的頻率        
                if(SL!=0)
                {
                        if (SM==1) CurrentFre >>= 2;                 //低音
                        if (SM==3) CurrentFre <<= 2;                 //高音
                        Temp_T = 65536-(50000/CurrentFre)*10/(12000000/SYSTEM_OSC);//計算計數器初值
                        Sound_Temp_TH0 = Temp_T/256;
                        Sound_Temp_TL0 = Temp_T%256;
                        TH0 = Sound_Temp_TH0;  
                        TL0 = Sound_Temp_TL0 + 12; //加12是對中斷延時的補償
                }
                SLen=LengthTab[Length%10];         //算出是幾分音符
                XG=Length/10%10;                         //算出音符類型(0普通1連音2頓音)
                FD=Length/100;
                LDiv=LDiv0/SLen;                         //算出連音音符演奏的長度(多少個10ms)
                if (FD==1)
                        LDiv=LDiv+LDiv/2;
                if(XG!=1)       
                        if(XG==0)                                 //算出普通音符的演奏長度
                                if (SLen<=4)       
                                        LDiv1=LDiv-LDiv4;
                                else
                                        LDiv1=LDiv*SOUND_SPACE;
                        else
                                LDiv1=LDiv/2;                 //算出頓音的演奏長度
                else
                        LDiv1=LDiv;
                if(SL==0) LDiv1=0;
                        LDiv2=LDiv-LDiv1;                 //算出不發音的長度
                  if (SL!=0)
                {
                        TR0=1;
                        for(i=LDiv1;i>0;i--)         //發規定長度的音
                        {
                                while(TF1==0);
                                TH1 = Sound_Temp_TH1;
                                TL1 = Sound_Temp_TL1;
                                TF1=0;
                        }
                }
                if(LDiv2!=0)
                {
                        TR0=0; BeepIO=0;
                        for(i=LDiv2;i>0;i--)         //音符間的間隔
                        {
                                while(TF1==0);
                                TH1 = Sound_Temp_TH1;
                                TL1 = Sound_Temp_TL1;
                                TF1=0;
                        }
                }
                Point+=2;
                Tone=Sound[Point];
                Length=Sound[Point+1];
        }
        BeepIO = 0;
}
//**************************************************************************
#endif



數碼八音盒.docx

16.44 KB, 下載次數: 8, 下載積分: 黑幣 -5


作者: qq2552574    時間: 2019-6-12 13:02
謝謝分享啊




歡迎光臨 (http://m.raoushi.com/bbs/) Powered by Discuz! X3.1