c51c语言编程的音乐程序,单片机编程 音乐编程程序

原标题:单片机编程 音乐编程程序

#include

#define uchar unsigned char

#define uint unsigned int

#define ulong unsigned long

sbit BEEP=P2^0; //喇叭输出脚

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

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

uchar key;

/*------------------------------------------------

函数声明

------------------------------------------------*/

uchar keyscan(void);//扫描程序

void delay(uint i); //延时子程序

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

uchar code freq[36*2]={

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

0x93,0xF0, //0X3D,0XEF,//00233HZ ,1#

0x73,0xF1, //0X30,0XF0,//00247HZ ,2

0x49,0xF2, //0X18,0XF1,//00262HZ ,2#

0x07,0xF3, //0XE6,0XF1,//00277HZ ,3

0xC8,0xF3, //0XB7,0XF2,//00294HZ ,4

0x73,0xF4, //0X71,0XF3,//00311HZ ,4#

0x1E,0xF5, //0X2A,0XF4,//00330HZ ,5

0xB6,0xF5, //0XCF,0XF4,//00349HZ ,5#

0x4C,0xF6, //0X72,0XF5,//00370HZ ,6

0xD7,0xF6, //0X09,0XF6,//00392HZ ,6#

0x5A,0xF7, //0X97,0XF6,//00415HZ ,7

0xD8,0xF7, //0X20,0XF7,//00440HZ 1 //12

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

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

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

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

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

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

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

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

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

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

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

0xEF,0xFB, //0X90,0XFB,//00880HZ `1

0x2A,0xFC, //0XD0,0XFB,//00932HZ `1#

0x62,0xFC, //0X0C,0XFC,//00988HZ `2

0x95,0xFC, //0X44,0XFC,//01046HZ `2#

0xC7,0xFC, //0X7B,0XFC,//01109HZ `3

0xF6,0xFC, //0XAD,0XFC,//01175HZ `4

0x22,0xFD, //0XDD,0XFC,//01244HZ `4#

0x4B,0xFD, //0X0A,0XFD,//01318HZ `5

0x73,0xFD, //0X35,0XFD,//01397HZ `5#

0x98,0xFD, //0X5D,0XFD,//01480HZ `6

0xBB,0xFD, //0X83,0XFD,//01568HZ `6#

0xDC,0xFD, //0XA6,0XFD,//01661HZ `7 //35

};

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

timer0() 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 diaodata[48]; //音调缓冲

uchar jiedata[48]; //音长缓冲

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

{ key = keyscan();

for(n=0;n<29500;n++); // 29500

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

{

TR0=0;

return;

}

}

TR0=0;

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

TR0=1;

}

TR0=0;

}

//一分钱

uchar code yifenqian[]={

"5`1|6_`1_5|3_5_2_3_|5-|"

"3_5_6_`1_|5_6_5_3_|1.3__|2-|"

"3_2_1_2_|3-|6_5_3_5_|6-|"

"5_`1_6_5_|3_5_2|5_2_3_2_|1-|"

};

//

uchar code mamahao[]={

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

"2.3_55_6_|321-|5.3_2_1_,6_1_|,5--"

};

//找朋友

uchar code zhaopengyou[]={ "5_6_5_6_|5_6_5|5_`1_7_6_|5 3|"

"5_5_3_4_|5_5_3|1_4_3_2_|1_2_1|"

};

//

uchar code molihua[]={"33_5_6_`1_`1_6_|55_6_5-|33_5_6_`1_`1_6_|55_6_5-|"

"5553_5_|665-|32_3_53_2_|11_2_1|"

//"3_2_1_3_2.3_|56_`1_5-|23_5_2_3_1_,6_|,5-,61|"

//"2.3_1_2-1_,6_|,5--"

};

//

uchar code xinnianhao[]={

"1_1_1 ,5|3_3_3 1|1_3_5 5|4_3_2-|"

"2_3_4-|3_2_3 1|1_3_2 ,5|,7_2_1-|"

};

//

uchar code xingxing[]={

"1155|665-|4433|221-|"

"5544|332-|5544|332-|"

"1155|665-|4433|221-|"

};

//

uchar code waipodephw[]={

"3_5_5_5_6_`1_6_5_|`1_`1_`1_6_5-|"

"`3_`3_`3_`3_`4_`3_`2_`1_|`2_`2_`2_`3_`2-|"

"`3_`3_`3_`3_`4_`3_`2_`1_|6_`1_`1_6_5-|"

};

}

//春天在哪里

uchar code chuntian[]={"3_3_3_1_|,5,5|3_3_3_1_|3-|5_5_3_1_|,5_,5_,5|,6_,7_1_3_|2-|"

"3_3_3_1_|,5,5|3_3_3_1_|3-|5_6_5_6_|5_4_3_1_|,53|1-|"

};

//两只老虎

uchar code laohu[]={"1231|1231|345-|345-|5_6_5_4_31|5_6_5_4_31|"

"151-|151-"

};

/*------------------------------------------------

键盘扫描程序

------------------------------------------------*/

uchar keyscan(void) //键盘扫描函数,使用行列反转扫描法

{

uchar cord_h,cord_l;//行列值中间变量

P3=0x0f; //行线输出全为0

cord_h=P3&0x0f; //读入列线值

if(cord_h!=0x0f) //先检测有无按键按下

{

delay(100); //去抖

if(cord_h!=0x0f)

{

cord_h=P3&0x0f; //读入列线值

P3=cord_h|0xf0; //输出当前列线值

cord_l=P3&0xf0; //读入行线值

return(cord_h+cord_l);//键盘最后组合码值

}

}

return(0xff); //返回该值

}

/*------------------------------------------------

延时程序

------------------------------------------------*/

void delay(uint i) //延时函数

{

while(i--);

}

//乐谱方式输入的音乐播放,

void main(void) // 主程序

{

uchar code jie8[8]={12,14,16,17,19,21,23,24};//1234567`1八个音符在频率表中的位置

uchar i = 0;

uchar n = 0;

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

TR0 = 0;

ET0 = 1;

EA = 1;

while(1)

{

key = keyscan();

switch(key)

{

case 0x7e:

while(key == 0x7e)

{

key = keyscan();

}

play(molihua);

break;//0

case 0x7d:

while(key == 0x7d)

{

key = keyscan();

}

play(yifenqian);

break;//1

case 0x7b: while(key == 0x7b)

{

key = keyscan();

}

play(chuntian);

break;//2

case 0x77: while(key == 0x77)

{

key = keyscan();

}

play(waipodephw);

break;//3

case 0xbe: while(key == 0xbe)

{

key = keyscan();

}

play(xingxing);

break;//4

case 0xbd: while(key == 0xbd)

{

key = keyscan();

}

play(xinnianhao);

break;//5

case 0xbb: while(key == 0xbb)

{

key = keyscan();

}

play(mamahao);

break;//6

case 0xb7: while(key == 0xb7)

{

key = keyscan();

}

play(zhaopengyou);

break;//7

case 0xde: while(!(key ^ 0xde))

{

tl0_f=freq[jie8[0]*2]; //置一个音符的值

th0_f=freq[jie8[0]*2+1];

TR0 = 1;

key = keyscan();

//for(n=0;n<10000;n++); //延时

}

break;//8

case 0xdd: while(!(key ^ 0xdd))

{

tl0_f=freq[jie8[1]*2]; //置一个音符的值

th0_f=freq[jie8[1]*2+1];

TR0 = 1;

key = keyscan();

//for(n=0;n<10000;n++); //延时

}

break;//9

case 0xdb: while(!(key ^ 0xdb))

{

tl0_f=freq[jie8[2]*2]; //置一个音符的值

th0_f=freq[jie8[2]*2+1];

TR0 = 1;

key = keyscan();

//for(n=0;n<10000;n++); //延时

}

break;//a

case 0xd7: while(!(key ^ 0xd7))

{

tl0_f=freq[jie8[3]*2]; //置一个音符的值

th0_f=freq[jie8[3]*2+1];

TR0 = 1;

key = keyscan();

//for(n=0;n<10000;n++); //延时

}

break;//b

case 0xee: while(!(key ^ 0xee))

{

tl0_f=freq[jie8[4]*2]; //置一个音符的值

th0_f=freq[jie8[4]*2+1];

TR0 = 1;

key = keyscan();

//for(n=0;n<10000;n++); //延时

}break;//c

case 0xed: while(!(key ^ 0xed))

{

tl0_f=freq[jie8[5]*2]; //置一个音符的值

th0_f=freq[jie8[5]*2+1];

TR0 = 1;

key = keyscan();

//for(n=0;n<10000;n++); //延时

}break;//d

case 0xeb: while(!(key ^ 0xeb))

{

tl0_f=freq[jie8[6]*2]; //置一个音符的值

th0_f=freq[jie8[6]*2+1];

TR0 = 1;

key = keyscan();

//for(n=0;n<10000;n++); //延时

}break;//e

case 0xe7: while(!(key ^ 0xe7))

{

tl0_f=freq[jie8[7]*2]; //置一个音符的值

th0_f=freq[jie8[7]*2+1];

TR0 = 1;

key = keyscan();

//for(n=0;n<10000;n++); //延时

}break;//f

default: break;

}

TR0 = 0;

/*if(!K1)

{

tl0_f=freq[jie8[0]*2]; //置一个音符的值

th0_f=freq[jie8[0]*2+1];

TR0 = 1;

for(n=0;n<10000;n++); //延时

}

if(!K2)

{

tl0_f=freq[jie8[1]*2]; //置一个音符的值

th0_f=freq[jie8[1]*2+1];

TR0 = 1;

for(n=0;n<10000;n++); //延时

}

if(!K3)

{

tl0_f=freq[jie8[2]*2]; //置一个音符的值

th0_f=freq[jie8[2]*2+1];

TR0 = 1;

for(n=0;n<10000;n++); //延时

}

if(!K4)

{

tl0_f=freq[jie8[3]*2]; //置一个音符的值

th0_f=freq[jie8[3]*2+1];

TR0 = 1;

for(n=0;n<10000;n++); //延时

}

TR0 = 0;

if(!K1)

{

while(!K1);

play(molihua); //播放音乐

}

if(!K2)

{

while(!K2);

play(dami); //播放音乐

}

if(!K3)

{

while(!K3);

play(mamahao); //播放音乐

}

if (!K4)

{

switch(i)

{

case 0:

play(xianjian); //播放音乐

break;

case 1:

play(song3); //播放音乐

break;

case 2:

play(mamahao); //播放音乐

break;

case 3:

play(boluo); //播放音乐

break;

case 4:

play(xingxing); //播放音乐

break;

case 5:

play(dami); //播放音乐

break;

}

i++;if(i==6)i=0;

}*/

}

责任编辑:

  • 1
    点赞
  • 1
    收藏
    觉得还不错? 一键收藏
  • 0
    评论
单片机唱歌内附歌曲请环伺,爱情买卖等等 #include <REG51.H> #include <INTRINS.H> //本例采用89C51, 晶振为11.0592MHZ //关于如何编制音乐代码, 其实十分简单,各位可以看以下代码. //频率常数即音乐术语中的音调,而节拍常数即音乐术语中的多少拍; //所以拿出谱子, 试探编吧! sbit Beep = P1^5 ; unsigned char n=0; unsigned char code music_tab[] ={ 0x18, 0x30, 0x1C , 0x10, 0x20, 0x40, 0x1C , 0x10, 0x18, 0x10, 0x20 , 0x10, 0x1C, 0x10, 0x18 , 0x40, 0x1C, 0x20, 0x20 , 0x20, 0x1C, 0x20, 0x18 , 0x20, 0x20, 0x80, 0xFF , 0x20, 0x30, 0x1C, 0x10 , 0x18, 0x20, 0x15, 0x20 , 0x1C, 0x20, 0x20, 0x20 , 0x26, 0x40, 0x20, 0x20 , 0x2B, 0x20, 0x26, 0x20 , 0x20, 0x20, 0x30, 0x80 , 0xFF, 0x20, 0x20, 0x1C , 0x10, 0x18, 0x10, 0x20 , 0x20, 0x26, 0x20, 0x2B , 0x20, 0x30, 0x20, 0x2B , 0x40, 0x20, 0x20, 0x1C , 0x10, 0x18, 0x10, 0x20 , 0x20, 0x26, 0x20, 0x2B , 0x20, 0x30, 0x20, 0x2B , 0x40, 0x20, 0x30, 0x1C , 0x10, 0x18, 0x20, 0x15 , 0x20, 0x1C, 0x20, 0x20 , 0x20, 0x26, 0x40, 0x20 , 0x20, 0x2B, 0x20, 0x26 , 0x20, 0x20, 0x20, 0x30 , 0x80, 0x20, 0x30, 0x1C , 0x10, 0x20, 0x10, 0x1C , 0x10, 0x20, 0x20, 0x26 , 0x20, 0x2B, 0x20, 0x30 , 0x20, 0x2B, 0x40, 0x20 , 0x15, 0x1F, 0x05, 0x20 , 0x10, 0x1C, 0x10, 0x20 , 0x20, 0x26, 0x20, 0x2B , 0x20, 0x30, 0x20, 0x2B , 0x40, 0x20, 0x30, 0x1C , 0x10, 0x18, 0x20, 0x15 , 0x20, 0x1C, 0x20, 0x20 , 0x20, 0x26, 0x40, 0x20 , 0x20, 0x2B, 0x20, 0x26 , 0x20, 0x20, 0x20, 0x30 , 0x30, 0x20, 0x30, 0x1C , 0x10, 0x18, 0x40, 0x1C , 0x20, 0x20, 0x20, 0x26 , 0x40, 0x13, 0x60, 0x18 , 0x20, 0x15, 0x40, 0x13 , 0x40, 0x18, 0x80, 0x00 }; void int0() interrupt 1 { TH0=0xd8; TL0=0xef; n--; } void delay (unsigned char m) { unsigned i=3*m; while(--i); } void delayms(unsigned char a) { while(--a); } void main() { unsigned char p,m; unsigned char i=0; TMOD&=0x0f; TMOD|=0x01; TH0=0xd8;TL0=0xef; IE=0x82; play: while(1) { a: p=music_tab[i]; if(p==0x00) { i=0, delayms(1000); goto play;} else if(p==0xff) { i=i+1;delayms(100),TR0=0; goto a;} else {m=music_tab[i++], n=music_tab[i++];} TR0=1; //开定时器1 while(n!=0) Beep=~Beep,delay(m); TR0=0; //关定时器1 } }

“相关推荐”对你有帮助么?

  • 非常没帮助
  • 没帮助
  • 一般
  • 有帮助
  • 非常有帮助
提交
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值