利用蜂鸣器和单片机演奏简单的音乐..docVIP

利用蜂鸣器和单片机演奏简单的音乐 实验原理图 ? 实验程序 /* =========================================================== */ /* ----------------------------------------------------------- */ /* 曲谱存贮格式 uchar code 数组名{音高，音长，音高，音长....} */ /* 音高由三位数字组成： */ /* 个位是表示 1~7 这七个音符. */ /* 十位是表示音符所在的音区，1-低音，2-中音，3-高音； */ /* 百位表示这个音符是否要升半音 0(不写)-不升，1-升半音。 */ /* 音长最多由三位数字组成： */ /* 个位表示音符的时值，其对应关系是： */ /* 数值(n) 0 1 2 3 4 5 6 */ /* --------------------------------------------- */ /* 几分音符 1 2 4 8 16 32 64 */ /* 即：音符=2^n ,这样做的目的是为了节省曲谱的存贮空间。 */ /* 十位表示音符的演奏效果(0-2)，0-普通，1-连音，2-顿音。 */ /* 百位是符点位，0(不写)-无符点，1-有符点。 */ /* ----------------------------------------------------------- */ /* 调用演奏子程序的方法为： */ /* play(乐曲数组名,调号,升降八度,演奏速度,开始指针,结束指针) */ /* 调号(0-11)是指乐曲升多少个半音演奏;升降八度(1-3)是指在演奏 */ /* 在哪个八度演奏: 1-降八度,2-不升不降,3-升八度.开始指针(0- ) */ /* 是从哪个音符开始演奏,结束指针是演奏到哪个音符为止. */ /* ----------------------------------------------------------- */ //本程序用T0 来产生音调，用T1 产生音长 #include reg51.h #define uchar unsigned char #define yx 4/5 /* 定义普通音符演奏的长度分率 */ #define plen 2 /* 定义晶振的时钟周期(us) */ #define uchar unsigned char #define uint unsigned int sbit speaker=P3^5; /* ------------------下面是曲谱 ------------------------------ */ uchar code sound[100]= {25,2,23,3,25,3,31,1,26,2,31,3,26,3,25,1,25,2,21,3,22,3,23,2,22,3,21,3,22,0, 25,2,23,3,25,3,31,102,27,3,26,2,31,2,25,1,25,2,22,3,23,3,24,102,17,3, 21,0}; uchar tc0,tc1,sc0,sc1; /* 音长和音符两个计数器初值暂存 */ void play(sound,dh,sj,speed,point1,point2) uchar code sound[]; /* 接受乐曲数组的地址 */ uchar speed,sj,dh; /* 速度、八度、调号 */ uint point1,point2; /* 乐曲开始、结束指针 */ { uint code fftab[12]={262,277,294,311,330,349,369,392,415,440,466,494}; /* 频率表*/ uchar code stab[7]={0,2,4,5,7,9,11}; /* 1~7 在频率表中的位置 */ uchar code ltab[7]={1,2,4,8,16,32,64}; uchar tl,ts,sl,sm,sh,slen,xg,ii,fd; uint point,hz,tc,sc,len,len0,len1,len2,len4,i,ftab[12]; speaker=1; for(i=0;i12;i++) /* 根据调号及升降八度来计算音符频率 */ { ii=i+dh; if(ii11) { ii=ii-12; ftab[i]=fftab[ii]*2; } else ftab[i]=fftab[ii]; if(sj==1) ftab[i]=2; if(sj==3) ftab[i]=2; } point=point1; ts=sound[point