求c51单片机蜂鸣器演奏《青花瓷》c语言程序

求c51单片机蜂鸣器演奏《青花瓷》c语言程序,第1张

哈哈,网上找的,什么歌都可以,你去百度一下《青花瓷》的简谱就好了

#include <reg52h>

sbit speaker = P1^0;

unsigned char timer0h, timer0l, time;

//--------------------------------------

//单片机晶振采用110592MHz

// 频率-半周期数据表 高八位 本软件共保存了四个八度的28个频率数据

code unsigned char FREQH[] = {

0xF2, 0xF3, 0xF5, 0xF5, 0xF6, 0xF7, 0xF8, //低音1234567

0xF9, 0xF9, 0xFA, 0xFA, 0xFB, 0xFB, 0xFC, 0xFC,//1,2,3,4,5,6,7,i

0xFC, 0xFD, 0xFD, 0xFD, 0xFD, 0xFE, //高音 234567

0xFE, 0xFE, 0xFE, 0xFE, 0xFE, 0xFE, 0xFF}; //超高音 1234567

// 频率-半周期数据表 低八位

code unsigned char FREQL[] = {

0x42, 0xC1, 0x17, 0xB6, 0xD0, 0xD1, 0xB6, //低音1234567

0x21, 0xE1, 0x8C, 0xD8, 0x68, 0xE9, 0x5B, 0x8F, //1,2,3,4,5,6,7,i

0xEE, 0x44, 0x6B, 0xB4, 0xF4, 0x2D, //高音 234567

0x47, 0x77, 0xA2, 0xB6, 0xDA, 0xFA, 0x16}; //超高音 1234567

//--------------------------------------

/code unsigned char sszymmh[] = {

3,2,3,5,2,1,6,2,2,5,2,1,6,2,

1,1,3,4,6,2,3,1,3,1,3,2,2,2,2,1,3,

2,1,5,2,4,5,2,3,3,2,1,6,2,2,3,2,1,2,

2,1,1,2,4,5,2,3,3,2,1,2,2,3,6,1,1,1,

2,4,1,2,4,1,3,3,6,2,1,5,2,2,6,2,1,6,

2,1,5,2,1,5,2,4,5,2,3,6,2,1,1,2,1,2,

2,1,5,2,1,3,2,4,2,2,3,3,2,1,5,2,2,1,

3,2,6,2,1,5,2,1,3,2,1,2,2,1,1,2,4,6,

2,3,1,3,1,5,2,1,3,2,1,2,2,2,6,1,1,1,

2,1,1,2,4,6,2,3,1,3,1,5,2,1,3,2,1,2,

2,2,1,2,4,6,2,3,1,3,1,5,2,1,3,2,1,2,

2,2,6,1,1,1,2,1,1,2,4,6,2,3,1,3,1,5,

2,1,3,2,1,2,2,2,6,1,1,1,2,1,1,2,4,

0, 0, 0};/

//code unsigned char sszymmh[] = {1,2,3,2,2,1,6,1,1,1,2,1,5,1,2,5,2,3,1,3,1,6,2,1,5,2,1,3,2,1,5,2,1,2,2,4,2,2,3,3,2,1,7,1,2,6,1,2,5,1,3,6,1,1,1,2,2,2,2,2,3,1,2,1,2,2,6,1,1,5,1,1,6,1,1,1,2,1,5,1,4,3,2,3,5,2,1,7,1,2,2,2,2,6,1,1,1,2,1,5,1,4,3,1,1,5,1,2,3,1,2,5,1,1,6,1,1,7,1,1,2,2,1,6,1,4,5,1,1,6,1,1,1,2,3,2,2,1,5,2,2,3,2,2,2,2,2,3,2,1,2,2,1,1,2,2,6,1,1,5,1,1,3,1,2,3,1,4,1,2,4,6,1,3,1,2,1,6,1,1,5,1,1,3,1,1,5,1,1,6,1,1,1,2,1,5,1,4,

//0, 0, 0};//梁祝

code unsigned char sszymmh[] = {5,1,1, 1,2,3, 1,2,1, 1,2,1, 1,2,1, 5,1,1, 6,1,1, 7,1,1, 1,2,2, 1,2,2,

3,2,1, 1,2,1, 2,2,1, 3,2,1, 5,2,2, 5,2,1, 5,2,2,

3,2,2, 3,2,1, 1,2,2, 3,2,1, 5,2,2, 3,2,1, 2,2,2, 2,2,4,

6,2,2,5,2,2,2,2,2,3,2,2,5,2,1,3,2,2,5,2,1,3,2,1,2,2,1,3,2,1,1,2,1,2,2,1,3,2,2,

5,2,2,6,1,1,1,2,1,1,2,1,3,2,2,3,2,1,5,2,2,5,2,1,2,2,1,2,2,1,2,2,1,6,1,1,6,1,1,2,2,4,

5,1,1,1,2,3,1,2,1,3,2,3,3,2,1,5,2,4,5,2,4,

1,2,2,3,2,1,5,2,1,5,1,1,6,2,2,5,2,2,

3,2,2,1,2,1,5,2,1,5,2,1,5,2,1,3,2,1,1,2,1,5,1,2,1,2,2,

3,1,1,1,1,1,5,2,1,5,2,1,5,2,1,3,2,1,1,2,1,5,1,2,1,2,2,5,1,2,1,2,2,5,1,2,1,2,2,1,2,2,

0, 0, 0};//国歌

/code unsigned char sszymmh[] = {6,2,3,5,2,1,3,2,2,5,2,2,6,2,1,6,2,2,5,2,1,3,2,4,6,1,3,1,2,1,2,2,2,5,2,1,3,2,1,2,2,4,

6,2,3,2,3,1,2,3,2,1,3,1,7,2,1,6,2,3,5,2,1,3,2,4,2,2,1,5,2,1,5,2,1,3,2,1,2,2,1,3,2,1,1,2,1,7,1,1,6,1,4,

1,2,3,6,1,1,6,2,1,1,2,2,2,2,2,5,

2,1,3,2,1,2,2,4,5,2,3,3,2,1,3,2,

2,5,2,2,6,2,4,2,3,3,2,3,1,1,3,2,

2,3,2,6,2,1,1,3,1,5,2,1,6,2,1,3,

2,4,2,2,1,5,2,1,5,2,1,3,2,1,2,2,

1,3,2,1,1,2,1,7,1,1,6,1,4,

0, 0, 0};//虞美人 /

//结束标记

//世上只有妈妈好数据表 要想演奏不同的乐曲, 只需要修改这个数据表

//code unsigned char sszymmh[] = {

//6, 2, 3, 5, 2, 1, 3, 2, 2, 5, 2, 2, 1, 3, 2, 6, 2, 1, 5, 2, 1,

//一个音符有三个数字。前为第几个音、中为第几个八度、后为时长(以半拍为单位)。

//6, 2, 3代表:6, 中音, 3个半拍;

//5, 2, 1代表:5, 中音, 1个半拍;

//3, 2, 2代表:3, 中音, 2个半拍;

//5, 2, 2代表:5, 中音, 2个半拍;

//1, 3, 2代表:1, 高音, 2个半拍;

//

//6, 2, 4, 3, 2, 2, 5, 2, 1, 6, 2, 1, 5, 2, 2, 3, 2, 2, 1, 2, 1,

//6, 1, 1, 5, 2, 1, 3, 2, 1, 2, 2, 4, 2, 2, 3, 3, 2, 1, 5, 2, 2,

//5, 2, 1, 6, 2, 1, 3, 2, 2, 2, 2, 2, 1, 2, 4, 5, 2, 3, 3, 2, 1,

//2, 2, 1, 1, 2, 1, 6, 1, 1, 1, 2, 1, 5, 1, 6, 0, 0, 0,,,,,,,,,,,,,,,,,,,,,6,2,3, 6,2,1, 1,3,2, 7,2,1, 6,2,1, 5,2,2, 3,2,1, 5,2,1, 6,2,4, 3,2,3,};

//--------------------------------------

void t0int() interrupt 1 //T0中断程序,控制发音的音调

{

TR0 = 0; //先关闭T0

speaker = !speaker; //输出方波, 发音

TH0 = timer0h; //下次的中断时间, 这个时间, 控制音调高低

TL0 = timer0l;

TR0 = 1; //启动T0

}

//--------------------------------------

void delay(unsigned char t) //延时程序,控制发音的时间长度

{

unsigned char t1;

unsigned long t2;

for(t1 = 0; t1 < t; t1++) //双重循环, 共延时t个半拍

for(t2 = 0; t2 < 8000; t2++); //延时期间, 可进入T0中断去发音

TR0 = 0; //关闭T0, 停止发音

}

//--------------------------------------

void song() //演奏一个音符

{

TH0 = timer0h; //控制音调

TL0 = timer0l;

TR0 = 1; //启动T0, 由T0输出方波去发音

delay(time); //控制时间长度

}

//--------------------------------------

void main(void)

{

unsigned char k, i;

TMOD = 1; //置T0定时工作方式1

ET0 = 1; //开T0中断

EA = 1; //开CPU中断

while(1) {

i = 0;

time = 1;

while(time) {

k = sszymmh[i] + 7 sszymmh[i + 1] - 1;

//第i个是音符, 第i+1个是第几个八度

timer0h = FREQH[k]; //从数据表中读出频率数值

timer0l = FREQL[k]; //实际上, 是定时的时间长度

time = sszymmh[i + 2]; //读出时间长度数值

i += 3;

song(); //发出一个音符

}

}

}

/======================================

应网友要求,下面再详细写一下乐谱和数据的转换关系。

以李叔同大师的《送别》的前二小节来说明转换的方法。

这部分的歌词是:"长 亭 外, 古 道 边,";

这部分的乐谱是:| 5 35 1 - | 6 16 5 - |。

(注意:乐谱中的1是高音,上边是带点的;还有些音符,应该有下划线,在这里都无法标出。感兴趣的网友应该去查看正规的乐谱。)

那么,据此就可以写出《送别》前二小节的数据表:

//--------------------------------------/

//code unsigned char sszymmh[] = {

//5, 2, 2, 3, 2, 1, 5, 2, 1, 1, 3, 4,

//嗦,中音,2个半拍; 咪,中音,1个半拍; 嗦,中音,1个半拍; 哆,高音,4个半拍

//6, 2, 2, 1, 3, 1, 6, 2, 1, 5, 2, 4,

//啦,中音,2个半拍; 哆,高音,1个半拍; 啦,中音,1个半拍; 嗦,中音,4个半拍

//0, 0, 0};

//结束标记

/--------------------------------------

记住:三个数字一组,代表一个音符。

第一个数字是1234567之一,代表音符哆来咪发;

第二个数字是0123之一,代表低音、中音、高音、超高音;

第三个数字是半拍的个数,代表时间长度。

当三个数字都是0,就代表乐曲数据表的结尾。

用这个数据表,替换掉程序中《世上只有妈妈好》的数据表,本程序就可以播放《送别》的前两小节。

/

这是我学校电子设计时做的,可以d琴,也有几首歌在里面。。你应该看得懂#include <reg52h> #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[362]={

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() 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 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<jiedata[i];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_|13__|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[]={

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

"23_55_6_|321-|53_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_23_|56_`1_5-|23_5_2_3_1_,6_|,5-,61|"

//"23_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-|"

};

}

一.在程序中直接播放声音文件

在VC++ 中的多媒体动态连接库中提供了一组与音频设备有关的函数。利用这些函数可以方便地播放声音。最简单的播放声音方法就是直接调用VC++中提供的声音播放函数BOOL sndPlaySound ( LPCSTR lpszSound,UINT fuSound ); 或BOOL PlaySound( LPCSTR lpszSound, HMODULE hmod, DWORD fuSound );其中参数lpszSound是需要播放声音的W文件的路径和文件名, hmod在这里为NULL,fuSound是播放声音的标志,详细说明请参考VC++中的帮助。 例如播放C:soundmusicwav可以用sndPlaySound ("c:\sound\musicwav",SND_ASYNC);或PlaySound("c:\sound\musicwav",NULL, SND_ASYNC|SND_NODEFAULT );如果没有找到musicwav文件,第一种格式将播放系统默认的声音,第二种格式不会播放系统默认的声音。

二.将声音文件加入到程序中

在VC++的程序设计中,可以利用各种标准的资源,如位图,菜单,对话框等。同时VC++也允许用户自定义资源,因此我们可以将声音文件作为用户自定义资源加入程序资源文件中,经过编译连接生成EXE文件,实现无W文件的声音播放。要实现作为资源的声音文件的播放,首先要在资源管理器中加入待播放的声音文件。

具体步骤入下:

1.获得包含资源的模块句柄:

HMODULE hmod=AfxGetResourceHandle();

2.检索资源块信息:

HRSRC hSndResource=FindResource(hmod,MAKEINTRESOURCE(IDR_WE1),_T("WE"));

3 装载资源数据并加锁:

HGLOBAL hGlobalMem=LoadResource(hmod,hSndResource);

LPCTSTR lpMemSound=(LPCSTR)LockResource(hGlobalMem);

4.播放声音文件:

sndPlaySound(lpMemSound,SND_MEMORY));

5.释放资源句柄:

FreeResource(hGlobalMem);

#include <reg51h>

sbit speaker=P1^2;

unsigned char timer0h,timer0l,time;

//生日歌

code unsigned char sszymmh[]={5,1,1, 5,1,1, 6,1,2, 5,1,2, 1,2,2, 7,1,4,

5,1,1, 5,1,1, 6,1,2, 5,1,2, 2,2,2, 1,2,4,

5,1,1, 5,1,1, 5,2,2, 3,2,2, 1,2,2, 7,1,2, 6,1,2,

4,2,1, 4,2,1, 3,2,2, 1,2,2, 2,2,2, 1,2,4};

// 音阶频率表 高八位

code unsigned char FREQH[]={

0xF2,0xF3,0xF5,0xF5,0xF6,0xF7,0xF8,

0xF9,0xF9,0xFA,0xFA,0xFB,0xFB,0xFC,0xFC, //1,2,3,4,5,6,7,8,i

0xFC,0xFD,0xFD,0xFD,0xFD,0xFE,

0xFE,0xFE,0xFE,0xFE,0xFE,0xFE,0xFF,

} ;

// 音阶频率表 低八位

code unsigned char FREQL[]={

0x42,0xC1,0x17,0xB6,0xD0,0xD1,0xB6,

0x21,0xE1,0x8C,0xD8,0x68,0xE9,0x5B,0x8F, //1,2,3,4,5,6,7,8,i

0xEE,0x44, 0x6B,0xB4,0xF4,0x2D,

0x47,0x77,0xA2,0xB6,0xDA,0xFA,0x16,

};

void delay(unsigned char t)

{

unsigned char t1;

unsigned long t2;

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

{

for(t2=0;t2<8000;t2++)

{

;

}

}

TR0=0;

}

void t0int() interrupt 1

{

TR0=0;

speaker=!speaker;

TH0=timer0h;

TL0=timer0l;

TR0=1;

}

void song()

{

TH0=timer0h;

TL0=timer0l;

TR0=1;

delay(time);

}

void main(void)

{

unsigned char k,i;

TMOD=1; //置CT0定时工作方式1

EA=1;

ET0=1;//IE=0x82 //CPU开中断,CT0开中断

while(1)

{

i=0;

while(i<75){ //音乐数组长度 ,唱完从头再来

k=sszymmh[i]+7sszymmh[i+1]-1;

timer0h=FREQH[k];

timer0l=FREQL[k];

time=sszymmh[i+2];

i=i+3;

song();

}

}

}

#include <windowsh>

#include <stdioh>

int main()

{

int m[]={0,320,391,399,445,466,494, 523}, i=0; //定义曲谱中的 do rui mi fa sou la ci 不准确 自己靠感觉调的

int s[]={5,3,5,3,5,2,1}; //我是一个粉刷匠 的曲谱 我就会这句。。。

int t[]={300,300,300,300,300,300,500}; //这是每个音的发生时间, 可以自己定义 半拍多少时间 四分之一拍多少时间

for (i=0; i<7; i++)

{

Beep(m[s[i]],t[i]); //Beep函数 第一个参数 是 发生频率 第二个参数 是发声时间

}

return 0;

}

c语言之家

以上就是关于求c51单片机蜂鸣器演奏《青花瓷》c语言程序全部的内容,包括:求c51单片机蜂鸣器演奏《青花瓷》c语言程序、求51单片机蜂鸣器播放音乐的教程 C语言、c语言音频播放代码没有声音等相关内容解答,如果想了解更多相关内容,可以关注我们,你们的支持是我们更新的动力!

欢迎分享,转载请注明来源:内存溢出

原文地址:https://54852.com/zz/10206351.html

(0)
打赏 微信扫一扫微信扫一扫 支付宝扫一扫支付宝扫一扫
上一篇 2023-05-06
下一篇2023-05-06

发表评论

登录后才能评论

评论列表(0条)

    保存