单片机音乐代码

#include "reg51h"

#define uint unsigned int

#define uchar unsigned char

uchar TABLE ;

code uint TABLE1 [15]={64260,64400,64524,64580,

64684,64777,64820,64898,

64968,65030,65058,65110,

65157,65178,65217};

code uchar SONG [ ]={

//1 迟来的爱

};

code uchar SONG1 [ ]={

//2两只蝴蝶

};

code uchar SONG3 [ ]={

//4一个师傅三个徒弟

};

uchar hjsz;

uchar ljsz;

uchar jpm;

uchar yfm;

uchar t0 =0;

uint i=0;

sbit Speaker =P1^0;

uint k;

void Delay1()

{

for ( k=0;k<20000;k++);

}

void Lignt( )

{ uchar t;

for(t=0;t<10;t++)

{

P2=0xff;

Delay1();

P2=0x00;

Delay1();

}

}

void Lignt1( )

{

P2=0xaa;

Delay1();

P2=0x55;

Delay1();

}

void Delay(uchar t0)//延时

{

while(t0--) //决定节拍

Lignt1();

}

void Delay2(uchar w0)//延时

{

while(w0--) //决定节拍

Lignt();

}

void T0Int() interrupt 1//TIMER0

{

TL0 = ljsz;

TH0 = hjsz;

Speaker=!Speaker;

}

void ExtInt0() interrupt 0//INT0

{

if(t0>10)

t0=0;

i=0; // 全局变量，指向歌谱的第1个

switch(t0++)

{

case 0 : TABLE=SONG;break; //选择第1首

case 1 : TABLE=SONG1;break;//选择第2首

case 2 : TABLE=SONG2;break;//选择第3首

case 3 : TABLE=SONG3;break;//选择第4首

case 4 : TABLE=SONG4;break;//选择第5首

case 5 : TABLE=SONG5;break;//选择第6首

case 6 : TABLE=SONG6;break;//选择第7首

case 7 : TABLE=SONG7;break;//选择第8首

case 8 : TABLE=SONG8;break;//选择第9首

case 9 : TABLE=SONG9;break;//选择第10首

}

}

void songsing()//发音程序

{

i=0;

while(TABLE[i])

{

jpm=TABLE[i]&0x0f; //节拍值

yfm=(TABLE[i]>>0x04)&0x0f;//简谱值

if(yfm) //简谱为1，取计数值

{

yfm=yfm-1;

hjsz=(uchar)(TABLE1[yfm]>>0x08);//取计数值高字节

TH0 = hjsz;

ljsz=(uchar)(TABLE1[yfm]); //取计数值低字节

TL0 = ljsz;

TR0 = 1; //启动TIMER0

}

else TR0 = 0; //简谱为0，不发音

Delay(jpm); //节拍延时

i++;

}

}

void main(void)

{

TMOD =0X01;//设TIMER0在MODE1

TCON =0X01;//外部中断INT0，下降沿触发

IE =0x83;//开中断（INT0，TIMER0）

IP =0x00;//设置中断优先级

TABLE=SONG0;

while(1)

{

Lignt( );

songsing();//调用发音程序

TR0 = 0;//停止TIMER0

Delay2(1);

TABLE=SONG0;// 更改歌曲0

songsing();

}

}

#define uchar unsigned char //定义一下方便使用

#define uint unsigned int

#define ulong unsigned long

#include <reg52h> //包括一个52标准内核的头文件

char code dx516[3] _at_ 0x003b;//这是为了仿真设置的

sbit BEEP=P1^7; //喇叭输出脚

sbit P10=P1^0;

sbit K1= P3^2;

sbit K2= P3^5;

sbit K3= P2^4;

sbit K4= P2^5;

uchar th0_f; //在中断中装载的T0的值高8位

uchar tl0_f; //在中断中装载的T0的值低8位

//T0的值,及输出频率对照表

uchar code freq[362]={

0xA9,0xEF,//00220HZ ,1 //0

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 //12

0x4D,0xF8,//00466HZ 1# //13

0xBD,0xF8,//00494HZ 2 //14

0x24,0xF9,//00523HZ 2# //15

0x87,0xF9,//00554HZ 3 //16

0xE4,0xF9,//00587HZ 4 //17

0x3D,0xFA,//00622HZ 4# //18

0x90,0xFA,//00659HZ 5 //19

0xDE,0xFA,//00698HZ 5# //20

0x29,0xFB,//00740HZ 6 //21

0x6F,0xFB,//00784HZ 6# //22

0xB1,0xFB,//00831HZ 7 //23

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 //35

};

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

timer0() interrupt 1

{

TL0=tl0_f;TH0=th0_f; //调入预定时值

BEEP=~BEEP; //取反音乐输出IO

}

//

//音乐符号串解释函数

//入口:要解释的音乐符号串,输出的音调串,输出的时长串

changedata(uchar song,uchar diao,uchar jie)

{

uchar i,i1,j;

char gaodi; //高低+/-12音阶

uchar banyin;//有没有半个升音阶

uchar yinchang;//音长

uchar code jie7[8]={0,12,14,16,17,19,21,23}; //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++;

goto yinc;

case '-': //有一个音节加长

yinchang+=4;

i++;

goto yinc;

case '_': //有一个音节缩短

yinchang/=2;

i++;

goto yinc;

case '': //有一个加半拍

yinchang=yinchang+yinchang/2;

i++;

goto yinc;

}

(diao+i1)=j; //记录音符

(jie+i1)=yinchang; //记录音长

i1++;

}

}

//

//奏乐函数

//入口:要演奏的音乐符号串

void play(uchar songdata)

{

uchar i,c,j=0;

uint n;

uchar xdata diaodata[112]; //音调缓冲

uchar xdata jiedata[112]; //音长缓冲

changedata(songdata,diaodata,jiedata); //解释音乐符号串

TR0=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<32000;n++);

if((!K1)||(!K2)||(!K3)||(!K4))//发现按键,立即退出播放

{

TR0=0;

return;

}

}

TR0=0;

for(n=0;n<500;n++); //音符间延时

TR0=1;

}

TR0=0;

}

//仙剑

uchar code xianjian[]={

"|3_3_3_2_3-|2_3_2_2_,6,6_,7_|12_1_,7,6_,5_|,6---|"

"3_3_3_2_36_|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_75_|6---|"

};

uchar code song3[]={

"5-5_3_2_1_|3---|6-6_4_2_1_"

",7--,5_|13_51_|,73_5 5_|"

"67_`16_|6_5_5-3_2_|11_13_2_|"

"11_12_3_|21_,62_3_|2-- ,5_|"

"13_51_|,73_55_|67_`16_|"

"6_5_5-3_2_|11_13_2_|11_12_3_"

"2,6_,71_2_|1--"

};

//世上只有妈妈好

uchar code mamahao[]={

"65_35|`16_5_6-|35_6_53_2_|1_,6_5_3_2-|"

"23_55_6_|321-|53_2_1_,6_1_|,5--"

};

//三个按键选择三首不同的音乐播放,一个键停止播放

void main(void) // 主程序

{

TMOD = 0x01; //使用定时器0的16位工作模式

TR0 = 0;

ET0 = 1; //定时器0中断

EA = 1; //打开总中断

while(1)

{

if(!K1)

{

while(!K1);

play(xianjian); //播放音乐

}

if(!K2)

{

while(!K2);

play(song3); //播放音乐

}

if(!K3)

{

while(!K3);

play(mamahao); //播放音乐

}

}

}

那个数组,3个一组,前两个字节应该是频率,最后一字节是节拍时间

你可以用一个定时器1产生一路PWM去驱动一个蜂鸣器发声,然后再用一个定时器2,用来定时节拍的持续时间

取第一个音阶的频率,做为PWM的频率设定到定时器1,然后再把音阶节拍时间设置到定时器2当节拍时间到达后,再取下一个音阶,重复以上过程就能放出音乐了

以上就是关于单片机音乐代码全部的内容，包括:单片机音乐代码、如何用c语言编写8051单片机音乐程序、单片机用汇编语言写个音乐程序等相关内容解答，如果想了解更多相关内容，可以关注我们，你们的支持是我们更新的动力！