music.c

51单片机驱动无源蜂鸣器进行音乐输出1 使用了定时器

//音乐输出函数模块
#define uchar unsigned char
#define uint  unsigned int
#define ulong unsigned long
#include <reg52.h>
#include <stdio.h>
//#include "study.h"

sbit led3=P1^0;
sbit led4=P1^1;
sbit led5=P1^2;
sbit led6=P1^3;


sbit key1=P3^2;
sbit key2=P3^5;
sbit key3=P2^4;
sbit key4=P2^5;

//*************************
//T0的值,及输出频率对照表
uchar code freq[74*2]={
	0x20,0xE6,//00139HZ 
	0x89,0xE7,//00147HZ 
	0xF3,0xE8,//00156HZ 
	0x35,0xEA,//00165HZ  
	0x74,0xEB,//00175HZ 
	0x91,0xEC,//00185HZ 
	0xA8,0xED,//00196HZ 
	0xB8,0xEE,//00208HZ 
	0xA9,0xEF,//00220HZ ,1
	0x93,0xF0,//00233HZ ,1#
	0x73,0xF1,//00247HZ ,2
	0x49,0xF2,//00262HZ ,2#
	0x07,0xF3,//00277HZ ,3
	0xC8,0xF3,//00294HZ ,4
	0x73,0xF4,//00311HZ ,4#
	0x1E,0xF5,//00330HZ ,5 
	0xB6,0xF5,//00349HZ ,5#
	0x4C,0xF6,//00370HZ ,6
	0xD7,0xF6,//00392HZ ,6#
	0x5A,0xF7,//00415HZ ,7    
	0xD8,0xF7,//00440HZ 1     //21
	0x4D,0xF8,//00466HZ 1#    //22
	0xBD,0xF8,//00494HZ 2     //23
	0x24,0xF9,//00523HZ 2#    //24
	0x87,0xF9,//00554HZ 3     //25
	0xE4,0xF9,//00587HZ 4     //26
	0x3D,0xFA,//00622HZ 4#    //27
	0x90,0xFA,//00659HZ 5     //28
	0xDE,0xFA,//00698HZ 5#    //29
	0x29,0xFB,//00740HZ 6     //30
	0x6F,0xFB,//00784HZ 6#    //31
	0xB1,0xFB,//00831HZ 7     //32
	0xEF,0xFB,//00880HZ `1
	0x2A,0xFC,//00932HZ `1#
	0x62,0xFC,//00988HZ `2
	0x95,0xFC,//01046HZ `2#
	0xC7,0xFC,//01109HZ `3
	0xF6,0xFC,//01175HZ `4
	0x22,0xFD,//01244HZ    `4#
	0x4B,0xFD,//01318HZ `5
	0x73,0xFD,//01397HZ `5#
	0x98,0xFD,//01480HZ `6
	0xBB,0xFD,//01568HZ `6#
	0xDC,0xFD,//01661HZ `7
	0xFB,0xFD,//01760HZ 
	0x18,0xFE,//01865HZ
	0x28,0xFE,//01926HZ
	0x43,0xFE,//02039HZ
	0x5C,0xFE,//02160HZ
	0x74,0xFE,//02288HZ
	0x8A,0xFE,//02422HZ
	0x9F,0xFE,//02565HZ
	0xB3,0xFE,//02716HZ
	0xC6,0xFE,//02877HZ
	0xD8,0xFE,//03047HZ
	0xE9,0xFE,//03226HZ
	0xF9,0xFE,//03417HZ
	0x08,0xFF,//03618HZ
	0x16,0xFF,//03832HZ
	0x23,0xFF,//04058HZ
	0x30,0xFF,//04297HZ
	0x3C,0xFF,//04551HZ
	0x47,0xFF,//04819HZ
	0x52,0xFF,//05104HZ
	0x5C,0xFF,//05405HZ
	0x65,0xFF,//05724HZ
	0x6E,0xFF,//06061HZ
	0x77,0xFF,//06419HZ
	0x7F,0xFF,//06798HZ
	0x86,0xFF,//07166HZ
	0x8E,0xFF//07625HZ
};

uchar th0_f; //在中断中装载的T0的值
uchar tl0_f; //


//******************************
//音乐符号串解释函数
//入口:要解释的音乐符号串,输出的音调串,输出的时长串
changedata(uchar *song,uchar *diao,uchar *jie)
{
    uchar i,i1,j;
    char gaodi; //高低+/-12音阶
    uchar banyin;//有没有半个升音阶
    uchar yinchang;//音长
    uchar code jie7[8]={0,21,23,25,26,28,30,32}; //C调的7个值

    *diao=*song;
    for(i=0,i1=0;;)
    {
        gaodi=0; //高低=0
        banyin=0;//半音=0
        yinchang=4;//音长1拍
        if((*(song+i)=='|') || (*(song+i)==' ')) i++; 
		//拍子间隔和一个空格过滤

        switch(*(song+i)) 
        {    
            case ',': gaodi=-12;i++;//低音
            break;
    
            case '`': gaodi=12;i++; //高音
            break;
        }

        if(*(song+i)==0)  //遇到0结束
        {
            *(diao+i1)=0; //加入结束标志0
            *(jie+i1)=0;
            return;
        }

        j=*(song+i)-0x30; i++; //取出基准音
        j=jie7[j]+gaodi; //加上高低音
						

yinc:    switch(*(song+i)) 
        {    
            case '#': //有半音j加一个音阶 
                i++;j++; 
                
            break;

            case '-': //有一个音节加长
                yinchang+=4;
                i++; 
                goto yinc;

            case '_': //有一个音节缩短
                yinchang/=2;
                i++; 
            break;
            
            case '.': //有一个加半拍
                i++;
                yinchang=yinchang+yinchang/2;
            break;
        }
        if(*(song+i)=='.') {i++;yinchang=yinchang+yinchang/2; }; //对反向排列的延时符号处理
        if(*(song+i)=='-'){yinchang+=4;i++;}
        if(*(song+i)=='-'){yinchang+=4;i++;}
        if(*(song+i)=='-'){yinchang+=4;i++;}

        *(diao+i1)=j; //记录音符
        *(jie+i1)=yinchang; //记录音长
        i1++;    

        if(*(song+i)==0) //遇到0结束
        {
            *(diao+i1)=0; //加入结束标志0
            *(jie+i1)=0;
            return;
        }
    }
}
//******************************************
//奏乐函数
//入口:要演奏的音乐符号串
void play(uchar *songdata)
{
    uchar i,c;
    uint xdata n;
    uchar xdata diaodata[256]; //音调缓冲,最大256字节
    uchar xdata jiedata[256];  //音长缓冲,最大256字节

    changedata(songdata,diaodata,jiedata); //解释音乐符号串
    ET0=1;
    for(i=0;diaodata[i]!=0;i++)  //逐个符号演奏
    {
        tl0_f=freq[diaodata[i]*2]; //取出对应的定时值送给T0
        th0_f=freq[diaodata[i]*2+1];
        for(c=0;c<jiedata[i];c++) //按照音长延时
            for(n=0;n<12000;n++);
        ET0=0;
        for(n=0;n<500;n++);    //音符间延时
        ET0=1;
		if (!key4){
		//	printf("User Cancel!\n");	
		break;
		}
    }
    ET0=0;
}

//**********************************
//定时中断0,用于产生唱歌频率

sbit MIO=P1^7;

timer0() interrupt 1 
{
    TL0=tl0_f;TH0=th0_f;  //调入新的定时值
    MIO=~MIO;                //取反音乐输出IO
}

//****************************************
//音乐符号的书写规定
//1 2 3 4 5 6 7 为7个基本音阶
//前面加逗号','表示这是低音
//前面加上点号'`'表示这是高音
//后面加'#',表示这个音符升半个音阶
//后面加'.',表示这个音符要再加长自身一半的延时
//后面加'-',每个表示延时一拍
//后面加'_',表示这个音符要缩短自身一半的时长
//************************************************


//仙剑
uchar code song0[]={
"|3_3_3_2_3-|2_3_2_2_,6,6_,7_|12_1_,7,6_,5_|,6---|"
"3_3_3_2_3.6_|5_6_5_5_22_3_|45_4_32_1_|3.--3_|"
"67_6_55_3_|5--3_5_|26_5_32_3_|3---|"
"26_6_6-|16_6_66_7_|`17_6_76_7_|3.--3_|"
"67_6_55_3_|5--3_5_|67_6_76_7_|3---|"
"26_6_6-|16_6_66_7_|`17_6_7.5_|6---|"
};
//小燕子
uchar code song1[]={
"|5`1_6_55|3_5_6_`1_55|65_3_22|35_3_2_3_1|6_5_6_5_3_6_5|2_5_3_2_1-|,6_1_2_3_1-|"
};




//我是一只菠萝
uchar code song2[]={
"1-|2_4_3_2_55|5_6_3_4_22|2_4_3_2_1_`1_7_6_|5_4_2_3_11|"
"2_4_3_2_55|5_6_3_4_22|2_4_3_2_1_5_2_3_|1---|"
};


uchar code song3[]={
"5-5_3_2_1_|3---|6-6_4_2_1_"
",7--,5_|1.3_5.1_|,7.3_5 5_|"
"5.,7`1.6_|6_5_5-3_2_|1.1_13_2_|"
"1.1_12_3_|2.1_,62_3_|2-- ,5_|"
"1.3_5.1_|,7.3_55_|6.7_`1.6_|"
"6_5_5-3_2|1.1_13_2_|1.1_12_3_"
"2.,6_,71_2_|1--"
};
/*
uchar code song3[]={
//"1155665_|4433221|5544332_|5544332_|1155665_|4433221_|"
"111_|123_55__|35_6_3_211__|321,6_,6__|321,6_,6__|,61_2_3_55____"
};
*/

unsigned char getkey2(unsigned char t)
{
	if(!key1){
		return '1';
	}else if(!key2){
		return '2';
	}else if(!key3){
		return '3';
	}else{
		return 0;
	}
}


//************************************************
//唱歌菜单
void playmusic(void)
{
    uchar ch;
    while(1)
    {
        //cls(8);  //打印提示
        //setcursor(0,0);
        //lcdstring("1.仙剑奇侠传 \r\n2.小燕子\r\n3.我是一只菠萝\r\n4.连续播放");

        while((ch=getkey2(1000))==0); //等待按键

        switch(ch) 
        {
            case '1':
				led3 = 0;
                play(song0);
				led3 = 1;
            break;
    
            case '2':
				led4 = 0;
                play(song1);
				led4 = 1;
            break;
    
            case '3':    
				led5 = 0;
                play(song3);
				led5 = 1;
            break;

            default:break;
        }
    }
}

uchar code dx58[3] _at_ 0x3b;

void main()
{
	TMOD = 0x01;
	TR0 = 1;
	ET0 = 0;
	EA = 1;
EA = 1;
	playmusic();
}