单片机音乐实例文档格式.docx
- 文档编号:3629529
- 上传时间:2023-05-02
- 格式:DOCX
- 页数:13
- 大小:16.94KB
单片机音乐实例文档格式.docx
《单片机音乐实例文档格式.docx》由会员分享,可在线阅读,更多相关《单片机音乐实例文档格式.docx(13页珍藏版)》请在冰点文库上搜索。
1805
0x62
4
294
1701
0x5c
5
330
1515
0x52
6
370
1351
0x49
7
415
1205
0x41
2.中音区
440
1136
0x3d
494
1012
0x37
554
902
0x31
587
852
0x2e
659
759
0x29
740
676
0x24
831
602
0x21
3.高音区
880
568
0x1f
988
506
0x1b
1109
451
0x18
1175
425
0x17
1318
379
0x14
1480
338
0x12
1661
301
0x10
3.源程序
#include<
reg52.h>
#defineuintunsignedint
#defineucharunsignedchar
ucharnum;
uinti;
sbitbeep=P2^3;
sbitled=P1^0;
voidinit()
{
TMOD=0x10;
TH1=(65536-10000)/256;
//10ms一中断
TL1=(65536-10000)%256;
EA=1;
ET1=1;
}
ucharcodetable[]={//天空之城
0x24,0x32,0x21,0x32,0x1f,0x16,0x21,0x32,0x1f,0x32,0x18,0x32,0x21,0x94,
0x31,0x32,0x31,0x32,0x24,0x16,0x29,0x32,0x24,0x32,0x1f,0x32,0x29,0x32,0x29,0x64,0x31,0x32,
0x31,0x32,0x2e,0x16,0x31,0x32,0x2e,0x16,0x1f,0x32,0x31,0x64,0x31,0x32,0x1f,0x32,0x1f,0x32,
0x1f,0x32,0x21,0x16,0x2e,0x32,0x2e,0x16,0x21,0x32,0x21,0x32,0x21,0x64,0x24,0x16,0x21,0x32,
0x1f,0x16,0x21,0x32,0x1f,0x32,0x18,0x32,0x21,0x32,0x21,0x64,0x31,0x32,0x31,0x32,0x24,0x16,
0x29,0x32,0x24,0x32,0x1f,0x32,0x29,0x32,0x29,0x32,0x29,0x32,0x31,0x32,0x2e,0x32,0x1f,0x16,
0x21,0x16,0x21,0x32,0x1f,0x32,0x1b,0x32,0x1b,0x32,0x18,0x32,0x1f,0x32,0x1f,0x64,0x21,0x32,
0x24,0x32,0x24,0x32,0x21,0x32,0x29,0x32,0x24,0x32,0x24,0x32,0x1f,0x32,0x1b,0x32,0x18,0x16,
0x1b,0x32,0x18,0x32,0x14,0x32,0x1b,0x32,0x1b,0x64,0x29,0x32,0x29,0x32,0x1f,0x16,0x21,0x32,
0x1f,0x32,0x18,0x32,0x18,0x32,0x18,0x64,0x24,0x16,0x21,0x32,0x1f,0x32,0x21,0x32,0x1b,0x32,
0x1b,0x32,0x1f,0x16,0x29,0x16,0x29,0x32,0x17,0x32,0x18,0x32,0x1b,0x32,0x1f,0x32,0x18,0x16,
0x18,0x16,0x18,0x16,0x18,0x16,0x18,0x32,0x14,0x32,0x14,0x32,0x12,0x32,0x12,0x64,0x14,0x32,
0x14,0x32,0x18,0x32,0x1b,0x32,0x1f,0x32,0x1f,0x32,0x1b,0x32,0x1f,0x16,0x1b,0x16,0x1b,0x32,
0x14,0x32,0x18,0x32,0x18,0x32,0x18,0x32,0x14,0x64,0x1f,0x32,0x1f,0x32,0x1b,0x32,0x1f,0x32,
0x1b,0x16,0x1b,0x32,0x21,0x32,0x24,0x32,0x24,0x32,0x24,0x16,0x24,0x32,0x24,0x32,0x24,0x32,
0x00,
};
voiddelayms(uintz)//1ms
uintx,y;
for(x=z;
x>
0;
x--)
for(y=2;
y>
y--);
voidplay_song(uinti)
uchartemp1,temp2;
num=0;
while
(1)
{
TR1=1;
temp1=table[i++];
if(temp1==0xff)//休止符
TR1=0;
delayms(1000);
}
elseif(temp1==0x00)//歌曲结束符
return;
else
{
temp2=table[i++];
TR1=1;
while
(1)
beep=~beep;
led=~led;
delayms(temp1);
//频率
if(temp2==num)//持续时间
num=0;
break;
}
}
voidtimer1()interrupt3
num++;
voidmain()
init();
play_song(0);
四.附加歌曲程序
//帝女花主题曲
/*0x41,0x27,0x49,0x27,0x3d,0x27,0x3d,0x27,0x37,0x27,0x37,0x27,0x31,0x27,0x29,0x27,0x24,0x27,0x24,0x27,
0x37,0x27,0x31,0x27,0x29,0x27,0x37,0x27,0x31,0x27,0x3d,0x27,0x41,0x27,0x41,0x27,
0x49,0x27,0x3d,0x27,0x49,0x27,0x52,0x27,0x49,0x27,0x3d,0x27,0x62,0x27,0x52,0x27,0x52,0x27,
0x49,0x27,0x49,0x27,0x49,0x27,0x49,0x27,0x49,0x27,0x49,0x27,//06122356235231761656135666666
0x31,0x27,0x24,0x27,0x29,0x27,0x24,0x27,0x29,0x27,0x31,0x27,0x24,0x27,0x24,0x27,0x24,0x27,0x24,0x27,
0x29,0x27,0x24,0x27,0x1f,0x27,0x31,0x27,0x29,0x27,0x31,0x27,0x37,0x27,0x31,0x27,0x31,0x27,0x31,0x27,0x31,0x27,//365653656i35323
0x37,0x27,0x31,0x27,0x29,0x27,0x3d,0x14,0x41,0x14,0x49,0x27,0x3d,0x27,0x37,0x27,0x37,0x27,0x37,0x27,0x37,0x27,
0x31,0x27,0x29,0x27,0x24,0x27,0x37,0x27,0x31,0x27,0x29,0x27,0x3d,0x27,0x3d,0x27,0x3d,0x27,//235176123562351
0x37,0x27,0x31,0x14,0x29,0x14,0x3d,0x27,0x37,0x27,0x31,0x27,0x29,0x27,0x49,0x27,0xff,0x3d,0x27,0x3d,0x27,0x49,0x27,0x3d,0x27,0x49,0x27,0x52,0x27,
0x37,0x27,0x31,0x27,0x31,0x27,0x31,0x27,//1616123-
0x29,0x27,0x29,0x27,0x24,0x27,0x24,0x27,0x24,0x14,0x31,0x14,0x37,0x27,//556-6.32.
0x29,0x27,0x31,0x27,0x29,0x27,0x24,0x27,0x37,0x27,0x31,0x27,0x29,0x27,0x31,0x27,0x37,0x27,0x41,0x27,0x49,0x27,
0x3d,0x14,0x49,0x14,0x52,0x14,0x5c,0x14,0x52,0x27,0x62,0x14,0x52,0x14,0x49,0x27,0x49,0x27,0x49,0x27,0x49,0x27,0x49,0x27,0x49,0x27,
0x3d,0x27,0x37,0x27,0x3d,0x27,0x49,0x27,0x52,0x14,0x62,0x14,0x52,0x27,0x49,0x27,0x3d,0x27,0x3d,0x27,0x3d,0x27,//12165356
0x31,0x27,0x37,0x27,0x3d,0x27,0x37,0x27,0x31,0x27,0x49,0x27,0x49,0x27,//321236-
0x37,0x27,0x37,0x27,0x31,0x27,0x29,0x27,0x24,0x27,0x37,0x27,0xff,0x29,0x27,0x31,0x27,0x37,0x27,0x3d,0x27,0x41,0x27,0x49,0x27,0x3d,0x27,
0x29,0x14,0x24,0x14,0x21,0x27,0x31,0x14,0x29,0x27,0x24,0x27,0x24,0x27,0x24,0x27,0x24,0x27,//223556.23532176156i356-
0x31,0x27,0x31,0x27,0x31,0x27,0x31,0x27,0x31,0x14,0x24,0x14,0x29,0x14,0x31,0x27,0x37,0x27,0x3d,0x27,0x3d,0x27,0x3d,0x27,
0x37,0x27,0x31,0x27,0x49,0x27,0x49,0x27,0x49,0x27,0x3d,0x27,//36532321
0x37,0x27,0x31,0x27,0x29,0x27,0x24,0x27,0x29,0x27,0x31,0x27,0x31,0x27,0x31,0x27,0x31,0x27,//235653
0x31,0x27,0x31,0x27,0x37,0x27,0x31,0x27,0x37,0x27,0x3d,0x27,0x3d,0x27,0x3d,0x27,0x37,0x27,0x31,0x27,0x3d,0x27,0x37,0x27,0x31,0x27,0x49,0x27,0x3d,0x27,
0x37,0x27,0x31,0x27,0x29,0x27,0x3d,0x27,0x49,0x27,0x3d,0x27,0x37,0x27,0x31,0x27,0x31,0x27,0x31,0x27,0x31,0x27,
0x29,0x27,0x29,0x27,0x29,0x27,0x29,0x27,0x24,0x27,0x24,0x27,0x24,0x27,0x24,0x27,//323212312361235161235---6---
0x24,0x27,0x21,0x27,0x31,0x27,0x37,0x27,0x31,0x27,0x29,0x27,0xff,0x29,0x14,0x24,0x27,0x1f,0x14,0x21,0x27,0x24,0x27,0x1f,0x27,0x24,0x27,0x1f,0x27,0x24,0x27,
0x29,0x27,0x31,0x27,0x31,0x27,0x31,0x27,0x31,0x27,//6i3235056i76i6i653
0x3d,0x32,0x49,0x32,0x37,0x27,0x37,0x27,0x37,0x27,0x31,0x14,0x37,0x14,0x31,0x27,0x29,0x14,0xff,0x31,0x27,0x37,0x14,0x3d,0x27,0x37,0x27,0x31,0x27,0x29,0x27,
0x24,0x27,0x1f,0x27,//16232353212356i
0x31,0x27,0x29,0x27,0x24,0x27,0x29,0x27,0x2e,0x27,0x31,0x27,0x37,0x27,0x3d,0x14,0x3d,0x14,0x3d,0x14,0x41,0x27,0x49,0x27,0x37,0x27,
0x37,0x27,0x37,0x27,0x31,0x27,0x31,0x27,0x29,0x27,0x24,0x27,0x37,0x27,0x31,0x27,0x29,0x27,0x29,0x27,0x31,0x14,0x37,0x27,0x3d,0x27,
0x41,0x27,0x49,0x27,0x3d,0x27,0x49,0x27,0x52,0x27,0x5c,0x27,0x62,0x27,0x52,0x27,0x49,0x27,0x49,0x14,0xff,
0x1b,0x27,0x1f,0x27,0x1b,0x27,0x1f,0x27,0x24,0x27,0x29,0x14,0x31,0x27,0x29,0x14,0x24,0x27,0x1f,0x27,0x1f,0x27,0x1f,0x27,0x1f,0x27,
0x37,0x27,0x37,0x27,0x37,0x27,0x37,0x27,0x31,0x27,0x31,0x27,0x31,0x27,0x29,0x27,0x24,0x27,0x24,0x14,0x31,0x27,0x37,0x27,0x37,0x27,
0x31,0x27,0x31,0x14,0x29,0x27,0x24,0x27,0x1f,0x27,0x29,0x27,0x24,0x27,0x2e,0x27,0x24,0x14,0x29,0x14,0x2e,0x27,0x31,0x27,0x31,0x27,
0x31,0x27,0x31,0x27,0x49,0x27,0x49,0x27,0x49,0x27,0x3d,0x27,0x37,0x27,0x37,0x27,0x37,0x27,0x31,0x27,0x29,0x27,0x29,0x27,0x24,0x14,0x31,0x27,0x37,0x27,0xff,
0x31,0x27,0x29,0x14,0x1f,0x27,0x24,0x27,0x29,0x27,0x31,0x27,0x29,0x27,0x24,0x27,0x29,0x27,0x2e,0x27,0x31,0x14,0x29,0x27,0x3d,0x27,
0x3d,0x27,0x3d,0x27,0x49,0x27,0x3d,0x27,0x37,0x27,0x37,0x27,0x31,0x27,0x29,0x27,0x24,0x27,0x37,0x27,0x31,0x27,0x29,0x27,0x37,0x14,
0x31,0x27,0x3d,0x14,0x41,0x27,0x49,0x27,0x52,0x14,0x49,0x14,0x3d,0x27,0x62,0x14,0x52,0x27,0x49,0x27,0x49,0x27,0x49,0x27,
0x31,0x27,0x24,0x27,0x29,0x27,0x24,0x27,0x29,0x27,0x31,0x27,0x24,0x27,0x24,0x27,0x24,0x27,0x24,0x27,0x29,0x27,0x24,0x14,0x29,0x27,
0x31,0x27,0x29,0x27,0x31,0x27,0x37,0x27,0x31,0x27,0x31,0x27,0x31,0x27,0x31,0x27,
0x37,0x27,0x31,0x27,0x29,0x27,0x3d,0x14,0x41,0x27,0x49,0x27,0x3d,0x27,0x37,0x27,0x37,0x27,0x37,0x27,0x37,0x27,0x31,0x27,0x29,0x27,
0x24,0x27,0x37,0x27,0x31,0x27,0x29,0x27,0x3d,0x27,0x3d,0x27,0x3d,0x27,0x31,0x27,0x37,0x27,0x3d,0x27,0x37,0x27,0x31,0x27,0x49,0x27,
0x31,0x27,0x37,0x27,0x3d,0x27,0x49,0x27,0x3d,0x27,0x49,0x27,0x3d,0x27,0x49,0x27,0x3d,0x27,0x37,0x27,0x31,0x27,0x31,0x27,0x31,0x27,
0x31,0x27,0x29,0x27,0x1f,0x27,0x24,0x27,0x24,0x27,0x37,0x27,0x37,0x27,0x31,0x27,0x29,0x27,0x24,0x27,0x37,0x27,0x37,0x27,0x31,0x27,
0x29,0x27,0x24,0x27,0x37,0x27,0x31,0x27,0x29,0x27,0x37,0x14,0x31,0x27,0x3d,0x27,0x41,0x27,0x49,0x27,0x3d,0x27,0x29,0x14,0x24,0x14,
0x1f,0x27,0x31,0x14,0x29,0x27,0x24,0x27,0x24,0x27,0x24,0x27,0xff,0x00,*/
//祝你平安
/*
0x26,0x20,0x20,0x20,0x20,0x20,0x26,0x10,0x20,0x10,0x20,0x80,0x26,0x20,0x30,0x20,
0x30,0x20,0x39,0x10,0x30,0x10,0x30,0x80,0x26,0x20,0x20,0x20,0x20,0x20,0x1c,0x20,
0x20,0x80,0x2b,0x20,0x26,0x20,0x20,0x20,0x2b,0x10,0x26,0x10,0x2b,0x80,0x26,0x20,
0x30,0x20,0x30,0x20,0x39,0x10,0x26,0x10,0x26,0x60,0x40,0x10,0x39,0x10,0x26,0x20,
0x30,0x20,0x30,0x20,0x39,0x10,0x26,0x10,0x26,0x80,0x26,0x20,0x2b,0x10,0x2b,0x10,
0x2b,0x20,0x30,0x10,0x39,0x10,0x26,0x10,0x2b,0x10,0x2b,0x20,0x2b,0x40,0x40,0x20,
0x20,0x10,0x20,0x10,0x2b,0x10,0x26,0x30,0x30,0x80,0x18,0x20,0x18,0x20,0x26,0x20,
0x20,0x20,0x20,0x40,0x26,0x20,0x2b,0x20,0x30,0x20,0x30,0x20,0x1c,0x20,0x20,0x20,
0x20,0x80,0x1c,0x20,0x1c,0x20,0x1c,0x20,0x30,0x20,0x30,0x60,0x39,0x10,0x30,0x10,
0x20,0x20,0x2b,0x10,0x26,0x10,0x2b,0x10,0x26,0x10,0x26,0x10,0x2b,0x10,0x2b,0x80,
0x18,0x20,0x18,0x20,0x26,0x20,0x20,0x20,0x20,0x60,0x26,0x10,0x2b,0x20,0x30,0x20,
0x30,0x20,0x1c,0x20,0x20,0x20,0x20,0x80,0x26,0x20,0x30,0x10,0x30,0x10,0x30,0x20,
0x39,0x20,0x26,0x10,0x2b,0x10,0x2b,0x20,0x2b,0x40,0x40,0x10,0x40,0x10,0x20,0x10,
0x20,0x10,0x2b,0x10,0x26,0x30,0x30,0x80,0x00,
*/
//穿越时空的爱恋
0x37,0x23,0x2e,0x24,0x29,0x23,0x29,0x23,0x29,0x23,0x24,0x23,0x1f,0x23,0x1f,0x23,//24556i
0x1b,0x23,0x17,0x23,0x1b,0x23,0x1b,0x23,0x1f,0x23,0x24,0x23,0x29,0x23,0x29,0x23,//242i65
0x1b,0x23,0x1f,0x23,0x29,0x23,0x29,0x23,0x1b,0x23,0x1f,0x23,0x29,0x23,0x29,0x23,
0x2e,0x23,0x2e,0x23,0x37,0x23,0x37,0x23,0x37,0x23,0x37,0x23,//21521542
0x37,0x23,0x2e,0x23,0x29,0x23,0x29,0x23,0x29,0x23,0x24,0x23,0x1f,0x23,0x1f,0x23,//24556i
0x1b,0x23,0x1f,0x23,0x29,0x23,0x29,0x23,0x1b,0x23,0x1f,
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- 单片机 音乐 实例