第25课乐谱方式输入的音乐播放.pdf

第第 25 课，乐谱方式输入的音乐播放课，乐谱方式输入的音乐播放,仙剑奇侠传仙剑奇侠传 这一课开始，我们就要听到美妙的音乐了，这一课，我们可以听到演奏仙剑奇侠传的 乐谱。 这一课的程序，增加了 2 个比较复杂的函数，一个乐谱解释函数，一个音乐播放函数。 我们音乐仙剑奇侠传的乐谱以一个我们自己定义的乐谱形式写好，作为一个预定义的字符 串。再通过乐谱解释函数解释为“音符频率的序号”和“音符播放的时间”两个数组，在音 乐播放函数中， 就将音符频率的序号数组对应的频率送入定时器预置数中， 再延时对应音符 播放的时间。这样音乐就播放出来了。 仙剑奇侠传的乐谱 “|3_3_3_2_3-|2_3_2_2_,6,6_,7_|12_1_,7,6_,5_|,6---|“ “3_3_3_2_3.6_|5_6_5_5_22_3_|45_4_32_1_|3.--3_|“ “67_6_55_3_|5--3_5_|26_5_32_3_|3---|“ “26_6_6-|16_6_66_7_|17_6_76_7_|3.--3_|“ “67_6_55_3_|5--3_5_|67_6_76_7_|3---|“ “26_6_6-|16_6_66_7_|17_6_7.5_|6---|“ 乐谱书写规则 1 2 3 4 5 6 7 为 7 个基本音阶 前面加逗号,表示这是低音 前面加上点号表示这是高音 后面加,表示这个音符升半个音阶 后面加.,表示这个音符要再加长自身一半的延时 后面加一个或多个-,每个表示延时一拍 后面加一个或多个_,表示这个音符要缩短自身一半的时长，最多支持 2 个_。 这些规则对一般的乐谱都可以应付得来了。 下面看程序 define uchar unsigned char //定义一下方便使用 define uint unsigned int define ulong unsigned long include //包括一个 52 标准内核的头文件 char code dx516[3] _at_ 0 x003b;//这是为了仿真设置的 sbit BEEPP17; //喇叭输出脚 sbit K1 P32; sbit K2 P35; sbit K3 P24; sbit K4 P25; uchar th0_f; //在中断中装载的 T0 的值高 8 位 uchar tl0_f; //在中断中装载的 T0 的值低 8 位 //T0 的值,及输出频率对照表 uchar code freq[36*2]{ 0 xA9,0 xEF,//00220HZ ,1 //0 0 x93,0 xF0,//00233HZ ,1 0 x73,0 xF1,//00247HZ ,2 0 x49,0 xF2,//00262HZ ,2 0 x07,0 xF3,//00277HZ ,3 0 xC8,0 xF3,//00294HZ ,4 0 x73,0 xF4,//00311HZ ,4 0 x1E,0 xF5,//00330HZ ,5 0 xB6,0 xF5,//00349HZ ,5 0 x4C,0 xF6,//00370HZ ,6 0 xD7,0 xF6,//00392HZ ,6 0 x5A,0 xF7,//00415HZ ,7 0 xD8,0 xF7,//00440HZ 1 //12 0 x4D,0 xF8,//00466HZ 1 //13 0 xBD,0 xF8,//00494HZ 2 //14 0 x24,0 xF9,//00523HZ 2 //15 0 x87,0 xF9,//00554HZ 3 //16 0 xE4,0 xF9,//00587HZ 4 //17 0 x3D,0 xFA,//00622HZ 4 //18 0 x90,0 xFA,//00659HZ 5 //19 0 xDE,0 xFA,//00698HZ 5 //20 0 x29,0 xFB,//00740HZ 6 //21 0 x6F,0 xFB,//00784HZ 6 //22 0 xB1,0 xFB,//00831HZ 7 //23 0 xEF,0 xFB,//00880HZ 1 0 x2A,0 xFC,//00932HZ 1 0 x62,0 xFC,//00988HZ 2 0 x95,0 xFC,//01046HZ 2 0 xC7,0 xFC,//01109HZ 3 0 xF6,0 xFC,//01175HZ 4 0 x22,0 xFD,//01244HZ 4 0 x4B,0 xFD,//01318HZ 5 0 x73,0 xFD,//01397HZ 5 0 x98,0 xFD,//01480HZ 6 0 xBB,0 xFD,//01568HZ 6 0 xDC,0 xFD,//01661HZ 7 //35 }; //定时中断 0,用于产生唱歌频率 timer0 interrupt 1 { TL0tl0_f;TH0th0_f; //调入预定时值 BEEPBEEP; //取反音乐输出 IO } //****************************** //音乐符号串解释函数 //入口要解释的音乐符号串,输出的音调串,输出的时长串 changedatauchar *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; fori0,i10;; { gaodi0; //高低0 banyin0;//半音0 yinchang4;//音长 1 拍 if*songi| || *songi i; //拍子间隔和一个空格过滤 switch*songi { case , gaodi-12;i;//低音 break; case gaodi12;i; //高音 break; } if*songi0 //遇到 0 结束 { *diaoi10; //加入结束标志 0 *jiei10; return; } j*songi-0 x30; i; //取出基准音 jjie7[j]gaodi; //加上高低音 yinc switch*songi { case //有半音 j 加一个音阶 i;j; goto yinc; case - //有一个音节加长 yinchang4; i; goto yinc; case _ //有一个音节缩短 yinchang/2; i; goto yinc; case . //有一个加半拍 yinchangyinchangyinchang/2; i; goto yinc; } *diaoi1j; //记录音符 *jiei1yinchang; //记录音长 i1; } } //****************************************** //奏乐函数 //入口要演奏的音乐符号串 void playuchar *songdata { uchar i,c,j0; uint n; uchar xdata diaodata[112]; //音调缓冲 uchar xdata jiedata[112]; //音长缓冲 changedatasongdata,diaodata,jiedata; //解释音乐符号串 TR01; fori0;diaodata[i]0;i //逐个符号演奏 { tl0_ffreq[diaodata[i]*2]; //取出对应的定时值送给 T0 th0_ffreq[diaodata[i]*21]; forc0;cjiedata[i];c //按照音长延时 forn0;n32000;n; TR00; forn0;n500;n; //音符间延时 TR01; } TR00; } //仙剑 uchar code xianjian[]{ “|3_3_3_2_3-|2_3_2_2_,6,6_,7_|12_1_,7,6_,5_|,6---|“ “3_3_3_2_3.6_|5_6_5_5_22_3_|45_4_32_1_|3.--3_|“ “67_6_55_3_|5--3_5_|26_5_32_3_|3---|“ “26_6_6-|16_6_66_7_|17_6_76_7_|3.--3_|“ “67_6_55_3_|5--3_5_|67_6_76_7_|3---|“ “26_6_6-|16_6_66_7_|17_6_7.5_|6---|“ }; //乐谱方式输入的音乐播放,仙剑奇侠传 void mainvoid // 主程序 { TMOD 0 x01; //使用定时器 0 的 16 位工作模式 TR0 0; ET0 1; EA 1; while1 { playxianjian; } } 这里最复杂是乐谱解释函数，是逐个字符解释的。基本上是以下过程遇到拍子分隔符 和空格跳过，判断是否高低音，读音符，调整为高低音音符，读音符后的升半个音符的“” ， 读延长音“-” “.” ，读缩短一半音长的“_” ，字符串结束符“0 x00” 。请仔细领会这个函数。 奏乐函数就比较简单，基本上就是从数组中取出音符和时长，送入定时器预置数，再延 时即可。在每个音符播放前后，用 TR0 控制是否输出音乐，每个音符之间也有短暂静音， 以使音乐更为清晰。 在本程序中，播放音乐函数中，我们使用了 xdata 的空间的 RAM，这是因为乐谱的数 据需要比较多的内存，data 和 idata 空间已经放不下了的原因。由于 DX516 内部是有 768 个 字 XRAM 可以直接仿真使用的。所以我们仿真不会有任何问题。但是如果你把这个程序烧 写到一片没有 XRAM 的芯片中，比如 at89c52 之类，就会出现无法运行的现象。在使用没 有 XRAM 的 51 芯片时，如果使用了 XRAM，则要在总线上外加一个内存芯片，比如 62256 之类。 完全看懂了程序之后，请编译运行，观察结果。按全速，可以听到美妙的仙剑音乐从蜂 鸣器中传出，真是太奇妙了 作业 编写一个其他的你熟悉的比较简单的乐谱，替换掉仙剑音乐，做本试验。由于在播放 函数里只定义 112 个音符符的空间，注意您的乐谱不要超过这个数目。如果需要调大，注意 编译后不要超过仿真器内部的 768 个 XRAM 空间。