基于51单片机的音乐程序

-.z.基于51单片机的按键切换播放音乐原理图：引脚说明：共5个按键，分别接51单片机的P0~P4引脚，前4个按键控制播放设置好的四首音乐，第5个按键用来关闭音乐。按键采用中断方式，任意时刻按下任意按键则立即进入所按按键的功能；蜂鸣器接单片机的P3.6口。仿真说明：使用proteus仿真，晶振：12MHZ。程序代码如下：/*12Mhz晶振工作*/*include<reg52.h>*defineuintunsignedint*defineucharunsignedcharsbitvoice=P3^6;ucharcodesound1[]={0*ff,0*40,0*80,0*30,0*40,0*2b,0*40,0*26,0*80,0*24,0*10,0*26,0*40,0*30,0*40,0*2b,0*80,0*30,0*40,0*39,0*40,0*30,0*c0,0*40,0*80,0*30,0*40,0*2b,0*40,0*26,0*40,0*26,0*20,0*24,0*20,0*20,0*40,0*30,0*40,0*24,0*80,0*26,0*10,0*20,0*40,0*2b,0*20,0*26,0*20,0*26,0*20,0*2b,0*20,0*2b,0*c0,0*26,0*80,0*20,0*40,0*19,0*40,0*19,0*80,0*1c,0*10,0*1c,0*80,0*20,0*40,0*20,0*20,0*1c,0*20,0*19,0*40,0*1c,0*20,0*20,0*20,0*26,0*c0,0*24,0*80,0*24,0*10,0*20,0*40,0*1c,0*40,0*20,0*40,0*24,0*20,0*26,0*20,0*2b,0*80,0*33,0*40,0*33,0*20,0*39,0*20,0*40,0*40,0*39,0*40,0*30,0*c0,0*18,0*80,0*1c,0*80,0*24,0*80,0*20,0*10,0*1c,0*80,0*19,0*40,0*19,0*20,0*19,0*20,0*19,0*40,0*1c,0*20,0*20,0*20,0*26,0*c0,0*18,0*80,0*1c,0*80,0*24,0*80,0*20,0*10,0*1c,0*80,0*1c,0*40,0*1c,0*20,0*1c,0*20,0*1c,0*40,0*24,0*20,0*26,0*20,0*ff,0*20,0*00};//同一首歌*/ ucharcodesound2[]={0*ff,0*18,0*40,0*1c,0*20,0*18,0*20,0*13,0*40,0*13,0*20,0*15,0*20,0*13,0*20,0*15,0*20,0*13,0*20,0*15,0*20,0*18,0*20,0*19,0*20,0*1c,0*20,0*20,0*20,0*1c,0*40,0*19,0*20,0*18,0*20,0*15,0*40,0*10,0*80,0*13,0*10,0*10,0*40,0*15,0*10,0*13,0*10,0*18,0*10,0*1c,0*10,0*26,0*10,0*13,0*10,0*18,0*10,0*1c,0*10,0*26,0*10,0*13,0*10,0*18,0*10,0*1c,0*10,0*26,0*10,0*13,0*10,0*18,0*10,0*1c,0*10,0*26,0*10,0*15,0*10,0*19,0*10,0*20,0*10,0*2b,0*10,0*15,0*10,0*19,0*10,0*20,0*10,0*2b,0*10,0*15,0*10,0*19,0*10,0*20,0*10,0*2b,0*10,0*15,0*10,0*19,0*10,0*20,0*10,0*2b,0*10,0*18,0*10,0*1c,0*10,0*24,0*10,0*30,0*10,0*18,0*10,0*1c,0*10,0*24,0*10,0*30,0*10,0*19,0*10,0*20,0*10,0*2b,0*10,0*19,0*10,0*19,0*10,0*20,0*10,0*2b,0*10,0*19,0*10,0*18,0*c0,0*ff,0*40,0*40,0*10,0*39,0*20,0*30,0*20,0*2b,0*20,0*30,0*20,0*2b,0*20,0*26,0*20,0*26,0*20,0*26,0*20,0*26,0*20,0*26,0*20,0*2b,0*20,0*30,0*20,0*2b,0*20,0*26,0*20,0*26,0*20,0*26,0*20,0*26,0*20,0*26,0*20,0*2b,0*20,0*30,0*20,0*2b,0*40,0*30,0*10,0*30,0*20,0*39,0*20,0*30,0*40,0*2b,0*10,0*2b,0*20,0*26,0*20,0*26,0*80,0*40,0*10,0*39,0*20,0*30,0*20,0*2b,0*20,0*30,0*20,0*2b,0*20,0*30,0*20,0*30,0*20,0*20,0*20,0*20,0*20,0*26,0*20,0*2b,0*20,0*26,0*20,0*2b,0*20,0*30,0*20,0*30,0*20,0*26,0*20,0*26,0*20,0*26,0*20,0*2b,0*20,0*30,0*20,0*2b,0*40,0*2b,0*10,0*2b,0*20,0*2b,0*20,0*2b,0*40,0*30,0*10,0*30,0*20,0*39,0*20,0*2b,0*80,0*40,0*10,0*39,0*20,0*30,0*20,0*2b,0*20,0*30,0*20,0*2b,0*20,0*26,0*20,0*26,0*20,0*20,0*20,0*20,0*20,0*26,0*20,0*2b,0*20,0*30,0*20,0*2b,0*20,0*26,0*20,0*26,0*20,0*1c,0*20,0*1c,0*20,0*26,0*20,0*2b,0*20,0*30,0*20,0*2b,0*40,0*30,0*10,0*30,0*20,0*39,0*20,0*30,0*40,0*2b,0*10,0*2b,0*20,0*26,0*20,0*20,0*80,0*40,0*10,0*39,0*20,0*30,0*20,0*2b,0*20,0*30,0*20,0*2b,0*20,0*30,0*20,0*30,0*20,0*1c,0*20,0*1c,0*20,0*20,0*20,0*26,0*20,0*26,0*20,0*2b,0*20,0*30,0*20,0*30,0*20,0*26,0*20,0*26,0*20,0*26,0*20,0*2b,0*20,0*30,0*20,0*2b,0*40,0*2b,0*10,0*2b,0*20,0*2b,0*20,0*2b,0*40,0*30,0*10,0*30,0*20,0*39,0*20,0*30,0*80,0*30,0*10,0*18,0*20,0*19,0*20,0*18,0*20,0*1c,0*20,0*18,0*40,0*1c,0*10,0*1c,0*20,0*20,0*20,0*1c,0*20,0*20,0*20,0*26,0*20,0*2b,0*20,0*26,0*20,0*20,0*20,0*1c,0*20,0*20,0*20,0*20,0*20,0*20,0*20,0*1c,0*20,0*20,0*20,0*1c,0*40,0*1c,0*10,0*1c,0*20,0*1c,0*20,0*1c,0*40,0*20,0*10,0*20,0*20,0*1c,0*20,0*20,0*20,0*26,0*20,0*26,0*40,0*ff,0*20,0*30,0*20,0*2b,0*20,0*26,0*20,0*20,0*20,0*26,0*20,0*2b,0*20,0*30,0*20,0*30,0*20,0*30,0*20,0*2b,0*20,0*26,0*20,0*1c,0*20,0*26,0*20,0*2b,0*20,0*30,0*20,0*30,0*20,0*30,0*20,0*30,0*20,0*30,0*20,0*18,0*40,0*18,0*10,0*18,0*20,0*18,0*20,0*18,0*40,0*1c,0*10,0*1c,0*20,0*18,0*20,0*1c,0*80,0*20,0*10,0*20,0*20,0*30,0*20,0*18,0*20,0*19,0*20,0*18,0*20,0*19,0*20,0*1c,0*20,0*20,0*20,0*1c,0*20,0*20,0*20,0*26,0*20,0*2b,0*20,0*26,0*20,0*20,0*20,0*1c,0*20,0*20,0*20,0*20,0*20,0*20,0*20,0*1c,0*20,0*20,0*20,0*1c,0*40,0*1c,0*10,0*1c,0*20,0*1c,0*20,0*1c,0*40,0*20,0*10,0*20,0*20,0*1c,0*20,0*20,0*20,0*26,0*20,0*26,0*40,0*ff,0*20,0*30,0*20,0*2b,0*20,0*26,0*20,0*20,0*20,0*26,0*20,0*2b,0*20,0*30,0*20,0*30,0*20,0*30,0*20,0*2b,0*20,0*26,0*20,0*1c,0*20,0*26,0*20,0*2b,0*20,0*30,0*20,0*18,0*80,0*ff,0*40,0*ff,0*40,0*ff,0*20,0*18,0*20,0*1c,0*20,0*18,0*20,0*1c,0*20,0*20,0*20,0*20,0*20,0*20,0*20,0*1c,0*20,0*20,0*20,0*26,0*20,0*2b,0*20,0*26,0*20,0*2b,0*20,0*2b,0*20,0*30,0*20,0*39,0*20,0*30,0*20,0*30,0*20,0*2b,0*20,0*30,0*c0,0*30,0*80,0*30,0*20,0*18,0*20,0*1c,0*20,0*18,0*20,0*15,0*20,0*18,0*20,0*18,0*20,0*18,0*20,0*15,0*20,0*18,0*20,0*18,0*20,0*18,0*20,0*15,0*20,0*18,0*20,0*1c,0*20,0*18,0*20,0*13,0*20,0*15,0*20,0*15,0*20,0*18,0*20,0*1c,0*20,0*18,0*20,0*15,0*40,0*30,0*c0,0*ff,0*40,0*00};//爱情转移*/ucharcodesound3[]={0*ff,0*40,0*10,0*39,0*10,0*30,0*10,0*2b,0*10,0*26,0*20,0*20,0*10,0*20,0*10,0*20,0*30,0*18,0*10,0*19,0*20,0*1c,0*20,0*20,0*20,0*20,0*40,0*1c,0*20,0*30,0*20,0*30,0*20,0*30,0*20,0*1c,0*20,0*20,0*20,0*24,0*10,0*26,0*10,0*26,0*10,0*2b,0*20,0*30,0*10,0*39,0*20,0*30,0*10,0*30,0*10,0*30,0*20,0*20,0*20,0*24,0*10,0*26,0*10,0*2b,0*10,0*30,0*10,0*33,0*10,0*40,0*10,0*39,0*20,0*39,0*c0,0*ff,0*20,0*26,0*10,0*20,0*10,0*1c,0*10,0*20,0*10,0*1c,0*10,0*20,0*10,0*1c,0*10,0*18,0*30,0*19,0*10,0*1c,0*10,0*1c,0*10,0*20,0*10,0*1c,0*20,0*20,0*20,0*1c,0*20,0*1c,0*10,0*18,0*10,0*19,0*20,0*1c,0*10,0*20,0*10,0*1c,0*60,0*26,0*20,0*20,0*20,0*1c,0*10,0*20,0*10,0*1c,0*10,0*20,0*10,0*1c,0*10,0*18,0*30,0*15,0*10,0*18,0*10,0*15,0*10,0*18,0*10,0*18,0*10,0*15,0*30,0*13,0*20,0*13,0*10,0*15,0*10,0*18,0*10,0*15,0*20,0*13,0*10,0*13,0*60,0*15,0*20,0*13,0*20,0*15,0*10,0*18,0*10,0*15,0*10,0*18,0*10,0*15,0*20,0*18,0*10,0*15,0*10,0*15,0*60,0*15,0*20,0*13,0*20,0*15,0*10,0*18,0*10,0*18,0*10,0*18,0*10,0*18,0*20,0*19,0*10,0*1c,0*10,0*1c,0*60,0*ff,0*20,0*13,0*20,0*15,0*10,0*18,0*10,0*15,0*10,0*18,0*10,0*15,0*20,0*18,0*10,0*15,0*10,0*15,0*20,0*18,0*20,0*18,0*10,0*10,0*30,0*10,0*c0,0*18,0*20,0*15,0*20,0*13,0*10,0*15,0*10,0*13,0*10,0*15,0*10,0*13,0*10,0*15,0*10,0*13,0*10,0*15,0*10,0*15,0*10,0*10,0*30,0*10,0*20,0*13,0*10,0*10,0*10,0*0e,0*10,0*0e,0*10,0*0e,0*10,0*0e,0*10,0*10,0*20,0*13,0*10,0*15,0*10,0*13,0*60,0*15,0*20,0*13,0*20,0*15,0*20,0*18,0*10,0*1c,0*10,0*1c,0*40,0*18,0*20,0*19,0*10,0*1c,0*10,0*1c,0*40,0*ff,0*20,0*0e,0*20,0*10,0*20,0*13,0*20,0*15,0*40,0*18,0*20,0*15,0*20,0*ff,0*20,0*26,0*20,0*20,0*20,0*26,0*20,0*15,0*20,0*13,0*40,0*15,0*20,0*18,0*20,0*1c,0*c0,0*30,0*40,0*2b,0*30,0*26,0*10,0*39,0*40,0*ff,0*20,0*30,0*10,0*39,0*10,0*33,0*10,0*30,0*10,0*2b,0*20,0*2b,0*20,0*30,0*10,0*2b,0*10,0*26,0*10,0*2b,0*10,0*2b,0*20,0*1c,0*10,0*20,0*10,0*2b,0*10,0*26,0*10,0*26,0*80,0*18,0*10,0*19,0*10,0*1c,0*10,0*1c,0*10,0*19,0*20,0*26,0*20,0*ff,0*20,0*26,0*20,0*20,0*20,0*26,0*20,0*15,0*20,0*13,0*40,0*15,0*20,0*18,0*20,0*1c,0*c0,0*ff,0*20,0*26,0*20,0*20,0*20,0*26,0*20,0*15,0*20,0*13,0*40,0*15,0*20,0*18,0*20,0*1c,0*40,0*1c,0*c0,0*00};//最后一次的温柔*/ucharcodesound4[]={0*ff,0*40,0*30,0*30,0*80,0*30,0*30,0*30,0*80,0*26,0*40,0*2b,0*80,0*30,0*30,0*2b,0*80,0*26,0*30,0*30,0*80,0*30,0*30,0*26,0*80,0*20,0*30,0*1c,0*c0,0*1c,0*80,0*1c,0*30,0*20,0*80,0*26,0*30,0*26,0*80,0*30,0*30,0*2b,0*80,0*30,0*30,0*2b,0*80,0*26,0*30,0*30,0*80,0*39,0*30,0*39,0*80,0*40,0*30,0*30,0*c0,0*30,0*80,0*1c,0*30,0*20,0*80,0*26,0*30,0*26,0*80,0*30,0*30,0*2b,0*80,0*30,0*30,0*2b,0*80,0*1c,0*30,0*20,0*80,0*26,0*30,0*26,0*80,0*20,0*30,0*1c,0*c0,0*1c,0*80,0*18,0*30,0*20,0*80,0*26,0*30,0*26,0*80,0*30,0*30,0*2b,0*80,0*30,0*30,0*2b,0*80,0*26,0*30,0*30,0*80,0*39,0*30,0*39,0*80,0*40,0*30,0*30,0*c0,0*30,0*c0,0*00};//友谊地久天长*//*ucharcodesound[]={0*ff,0*20,0*60,0*26,0*20,0*20,0*40,0*20,0*20,0*1c,0*20,0*18,0*40,0*18,0*20,0*1c,0*20,0*20,0*80,0*20,0*60,0*1c,0*20,0*20,0*20,0*1c,0*10,0*20,0*10,0*26,0*20,0*2b,0*20,0*20,0*30,0*1c,0*10,0*20,0*20,0*26,0*20,0*2b,0*80,0*ff,0*20,0*20,0*20,0*ff,0*20,0*20,0*20,0*1c,0*40,0*20,0*40,0*18,0*30,0*1c,0*10,0*20,0*20,0*26,0*20,0*2b,0*80,0*ff,0*20,0*20,0*20,0*ff,0*20,0*20,0*20,0*26,0*40,0*2b,0*20,0*30,0*20,0*30,0*c0,0*ff,0*40,0*00};//中华民谣*/ucharzdjs=0,jp,p,a;uintdpjs;voiddel(ucharyj){ucharyj2=2;while(yj!=0){while(yj2!=0){yj2--;}yj2=2;yj--;}}voiddelay0(){ucharu=20;while(u--);}voidplay(){ucharyj;dpjs=0;while(a){zdjs=0;dpjs++;if(p==1){ yj=sound1[dpjs];dpjs++;jp=sound1[dpjs];}if(p==2){ yj=sound2[dpjs];dpjs++;jp=sound2[dpjs];}if(p==3){ yj=sound3[dpjs];dpjs++;jp=sound3[