CLY 发表于 2016-4-5 12:04:46

【自己写的小软件】CLY单片机音乐代码超级生成器

    最近想在单片机上播单音的音乐,想自己选歌来播,现成的音乐代码都是比较耳熟能详的歌,稍微偏门一点的歌就没用51的代码可以直接烧录。我是最近才开始学单片机的,之前在网上下了一个叫51Music单片机音乐代码生成器的软件,试着用了一下,发现就里面的案例用比较常用的11.0592MHz的晶振播放感觉好像是快了几倍,用差不多4MHz的晶振才能正常速度播放。我试着改了一下里面的代码,就是没办法调节速度,这个我忍了。试着打了一首歌,上面的音符节拍按下之后就会显示代码在右边,但是这不方便对照检查,打错了也不知道,想更改其中一个位置的数据又不方便。打完之后编译烧录试了一下,和原版相差太多了,就好像不是那首曲子一样,还有写地方都不知道是我打错了还是程序的问题。最后面我实在是忍无可忍了。
    自己就花了半个月多的时间写了一款代码生成器。这个代码生成器真的是非常好用啊,可以对照简谱,可以设置每个音的停顿时间设定使用的晶振频率、时钟周期、歌曲的拍数。编写音乐的效率大大提高,终于不用自己一个一个去算定时器的赋值了,除了代码可能不是写的很规范。如果大家有需要的话就用吧,刚开始的时候是为了自己用的,把功能设置的很简单。但是本着你好我好大家好的共享精神,就把界面,功能,用户体验,做的比较用心了。如果有什么错误疏漏不规范的地方请大家指正。最后的话,欢迎大家转载哦!:lol

视频使用教程:
土豆网http://www.tudou.com/programs/view/mMaAzXC70EY/
搜狐:http://my.tv.sohu.com/us/254121856/83405690.shtml
哔哩哔哩:http://www.bilibili.com/video/av4281298/





///////////////////////////////////////////////////////////////////////////////////////////////////////////
提示:下载完成后请重命名把最后面的.zip去掉再解压,这三个是这个软件的压缩分卷
///////////////////////////////////////////////////////////////////////////////////////////////////////////













///////////////////////////////////////////////////////////////////////////////////////////////////////////
提示:下载完成后请重命名把最后面的.zip去掉再解压,这三个是这个软件的压缩分卷
///////////////////////////////////////////////////////////////////////////////////////////////////////////

备用下载地址:百度网盘:http://pan.baidu.com/s/1eS0hXLK

CLY 发表于 2018-11-5 14:19:51

lxa000 发表于 2018-11-5 13:08
很可惜:
我这里上不了baidu盘~~~~~~~~

(v1.5版本)必须去掉最后.zip后缀,旧版本的也一样都是分卷必须都下载然后打开其中一个解压就行

lxa000 发表于 2016-4-5 20:09:56

好东西
收藏
谢谢

amo 发表于 2016-4-6 16:25:28

不错。
不过楼主最好直接做一个“mid转MCU”的工具。这样midi文件都是现成的,也有大量成熟软件可以试听、编辑、修改。

CLY 发表于 2016-4-6 18:15:15

amo 发表于 2016-4-6 16:25 static/image/common/back.gif
不错。
不过楼主最好直接做一个“mid转MCU”的工具。这样midi文件都是现成的,也有大量成熟软件可以试听、 ...

没这么厉害,弄这么好一般单片机播放音乐应用本来比较少就,能用就好了,哈哈。

idegz042620 发表于 2016-4-7 08:48:39

不错,学习了。:lol:lol:lol

lxm970219 发表于 2016-4-11 15:13:05

CLY 发表于 2016-4-11 17:27:03

我比较喜欢动漫歌曲,最近用它打了《东京泰迪熊》到单片机里面,用P0.0做蜂鸣器输出口,挺好听的,分享一下源代码应该没什么问题吧?

/*-----------------------------------------------
---------8051单片机音乐代码生成器---------
本软件作者:CLY
作者QQ:2315959474
本音乐编写日期:2016年4月10日19:46
曲名:东京泰迪熊
使用的晶振频率:11.059200MHz
时钟周期:12个
曲调:G
速度:240
感谢您对本音乐代码生成器作者的支持!
------------------------------------------------*/

#include<reg51.h>//包含头文件
sbit fmq = P0^0;//定义蜂鸣器端口
static unsigned int bf;//定义全局变量播放位置变量
static unsigned char jp0;//定义全局变量播放时间单位化到0.015s
static unsigned char jp1;//定义全局变量控制播放时间即节拍

unsigned char code th[] = {//定时器0高八位频率设定
0x93,0xF6,0xF6,0xF7,0xF7,0xF8,0xF8,0xF9,0xF9,0xF9,0xFA,0xFA,0xFA,0xFB,
//低八度0,b1,1,#1,2,#2,3,4,#4,5,#5,6,#6,7
0xFB,0xFB,0xFB,0xFC,0xFC,0xFC,0xFC,0xFC,0xFD,0xFD,0xFD,0xFD,
//中音1,#1,2,#2,3,4,#4,5,#5,6,#6,7
0xFD,0xFD,0xFD,0xFE,0xFE,0xFE,0xFE,0xFE,0xFE,0xFE,0xFE,0xFE,0xFE
//高八度1,#1,2,#2,3,4,#4,5,#5,6,#6,7,#7
};
unsigned char code tl[] = {//定时器0低八位频率设定
0xFF,0x44,0xD6,0x5D,0xD5,0x4A,0xB5,0x1D,0x85,0xDD,0x38,0x89,0xDA,0x22,
//低八度0,b1,1,#1,2,#2,3,4,#4,5,#5,6,#6,7
0x67,0xAB,0xE8,0x23,0x59,0x8E,0xC1,0xEF,0x1C,0x44,0x6C,0x90,
//中音1,#1,2,#2,3,4,#4,5,#5,6,#6,7
0xB4,0xD5,0xF4,0x12,0x2D,0x47,0x60,0x77,0x8D,0xA2,0xB5,0xC6,0xD8
//高八度1,#1,2,#2,3,4,#4,5,#5,6,#6,7,#7
};
unsigned char code ysjs[] = {//延时计算一个单位时间为0.015s
1,7,7,8,8,8,9,9,10,11,11,12,13,13,
//低八度0,b1,1,#1,2,#2,3,4,#4,5,#5,6,#6,7
14,15,16,17,18,19,20,21,22,24,25,27,
//中音1,#1,2,#2,3,4,#4,5,#5,6,#6,7
28,30,32,34,36,38,40,42,45,47,50,53,56
//高八度1,#1,2,#2,3,4,#4,5,#5,6,#6,7,#7
};
unsigned char code jpsz[] = {2,4,5,7,11,13,15,24,28,32,49,66};//对应节拍数组

unsigned int code yb1[] = {//歌曲音符节拍调用数组
{0,6},{18,6},{26,6},{26,3},{25,6},{23,3},{22,6},{0,6},{21,6},{23,6},{23,3},{21,6},{16,3},
{19,3},{18,11},{0,6},{16,6},{19,6},{19,3},{18,6},{23,3},{23,6},{0,6},{23,6},{23,6},{23,3},
{25,6},{23,3},{23,3},{22,11},{0,6},{18,6},{26,6},{26,3},{25,6},{23,3},{22,6},{0,6},{21,6},
{23,6},{23,3},{21,6},{16,3},{19,3},{18,11},{0,6},{16,6},{19,6},{19,3},{18,6},{23,3},{23,6},
{0,6},{23,6},{23,6},{23,3},{25,6},{23,3},{23,3},{22,11},{0,6},{18,6},{26,6},{26,3},{25,6},{23,3},{22,6},{0,6},{21,6},{23,6},{23,3},{21,6},{16,3},
{19,3},{18,11},{0,6},{16,3},{16,3},{19,6},{19,3},{18,6},{23,3},{23,6},{0,6},{23,6},{23,6},
{26,3},{25,6},{22,3},{22,3},{23,3},{0,3},{11,3},{11,3},{11,3},{11,3},{0,3},{0,6},{23,6},
{18,6},{18,3},{23,6},{22,7},{18,6},{18,6},{22,6},{23,6},{23,6},{21,3},{19,6},{18,6},{18,3},
{18,3},{18,3},{18,3},{18,3},{18,3},{18,3},{19,6},{19,6},{19,3},{18,3},{16,3},{18,10},
{23,6},{26,6},{25,9},{23,7},{22,11},{0,6},{18,6},{26,6},{26,3},{25,6},{23,3},{22,6},{0,6},{21,6},{23,6},
{23,3},{21,6},{16,3},{19,3},{18,11},{0,6},{16,3},{16,3},{19,6},{19,3},{18,6},{23,3},{23,6},
{0,6},{23,6},{23,6},{26,3},{25,6},{22,3},{22,3},{23,10},{23,3},{30,10},{30,3},{28,7},
{26,6},{25,6},{21,3},{21,10},{28,3},{28,6},{26,7},{23,6},{25,3},{26,6},{25,3},{26,9},
{26,3},{28,6},{26,3},{28,9},{26,3},{28,7},{28,3},{28,3},{30,3},{26,3},{26,3},{25,3},{0,6},{21,6},{26,3},{24,6},{26,7},{33,6},{26,3},{24,6},{26,7},{33,6},{26,3},{24,6},{28,7},
{29,6},{28,3},{24,6},{21,7},{21,6},{26,3},{24,6},{26,7},{33,6},{26,3},{24,6},{26,7},{33,6},
{26,3},{24,6},{0,3},{24,9},{28,7},{29,3},{0,6},{21,6},{26,3},{24,6},{26,7},{33,6},{26,3},
{24,6},{26,7},{33,6},{26,3},{24,6},{28,7},{29,6},{28,3},{24,6},{21,3},{0,6},{21,6},{26,3},
{28,3},{0,3},{29,7},{21,6},{21,3},{29,3},{0,3},{28,7},{19,6},{19,3},{28,3},{0,3},{28,6},{26,3},{26,10},{0,6},{0,6},{0,6},{0,6},{0,6},{18,6},{26,6},{26,3},{25,6},{23,3},{22,6},
{0,6},{21,6},{23,6},{23,3},{21,6},{16,3},{19,3},{18,11},{0,6},{16,6},{19,6},{19,3},{18,6},
{23,3},{23,6},{0,6},{23,6},{23,6},{23,3},{25,6},{23,3},{23,3},{22,10},{0,3},{18,7},{26,3},
{26,3},{25,6},{23,3},{22,3},{0,3},{22,3},{20,3},{22,3},{23,6},{0,3},{18,7},{26,3},{26,3},
{25,6},{23,3},{22,3},{0,3},{22,3},{20,3},{22,3},{23,6},{0,3},{18,7},{26,3},{26,3},{25,6},
{23,3},{22,3},{0,3},{22,3},{20,3},{22,3},{23,6},{0,3},{18,7},{26,3},{26,3},{25,6},{23,3},{22,3},{0,3},
{22,3},{20,3},{22,3},{23,6},{0,3},{28,10},{30,3},{28,7},{26,6},{25,6},{21,3},{21,10},
{28,3},{28,6},{26,7},{23,6},{25,3},{26,6},{25,3},{26,9},{26,3},{28,6},{26,3},{28,9},{26,3},
{28,7},{28,3},{28,3},{30,3},{26,3},{25,3},{0,6},{21,6},{26,3},{24,6},{26,7},{33,6},{26,3},{24,6},{26,7},{33,6},{26,3},{24,6},{28,7},
{29,6},{28,3},{24,6},{21,7},{21,6},{26,3},{24,6},{26,7},{33,6},{26,3},{24,6},{26,7},{33,6},
{26,3},{24,6},{0,3},{24,9},{28,7},{29,3},{0,6},{33,3},{33,3},{36,3},{36,3},{0,3},{26,7},
{33,3},{33,3},{36,3},{36,3},{0,3},{26,7},{33,3},{33,3},{36,3},{36,3},{0,3},{31,7},{29,3},{29,3},{28,3},{24,3},{24,3},{26,7},{21,6},{26,3},{28,6},{29,7},{21,6},{21,3},{29,6},
{28,7},{19,6},{19,3},{28,3},{0,3},{28,6},{26,11},{23,6},{18,6},{18,3},{23,6},{22,7},{18,6},
{18,6},{22,6},{23,6},{23,6},{21,3},{19,6},{18,6},{23,3},{26,3},{30,3},{35,3},{30,3},{26,3},
{30,2},{31,6},{31,6},{31,3},{30,3},{28,3},{30,10},{35,6},{38,6},{37,9},{35,7},{34,6},
{35,3},{34,3},{30,3},{25,3},{23,3},{22,3},{18,3},{23,10},{22,3},{23,3},{25,3},{23,3},
{22,3},{18,10},{23,9},{22,3},{23,6},{30,11},{31,3},{35,3},{31,3},{28,3},{23,3},{19,3},{16,3},{19,3},
{23,3},{28,3},{31,3},{35,3},{30,3},{34,3},{30,3},{25,3},{22,3},{18,3},{14,3},{18,3},{22,3},
{25,3},{30,3},{34,3},{38,9},{37,7},{33,11}
};

void ds1()
{//定时器使用函数
    TMOD |= 0x01;//打开定时器0,工作模式为1
    TR0=1;//定时器0开关打开
    EA=1;//总中断打开
    ET0=1;//定时器0中断打开
}
main()
{//主循环
    bf=0;//全局变量播放位置变量初始
    jp0=0;//全局变量播放时间单位化初始
    jp1=0;//全局变量控制播放时间即节拍初始
    ds1();//调用定时器使用函数开始播放
while(1);//这里可以添加要同时执行的其他命令
}
void ds1_dl()interrupt 1//当定时器0溢出中断
{
    TH0 = th];//定时器0高8位给定时值
    TL0 = tl];//定时器0低8位给定时值
    if (th] != 0x93 && tl] != 0xFF && jp1<jpsz]-1)
{//当没有播放到休止符0且没有到达停顿时间
    fmq = ~fmq;//蜂鸣器振动发声
}
    jp0++;//计数器加一计数
if (jp0 == ysjs])
{//如果当前音符播放了0.03s
    jp1++;//节拍,播放个数加1
    jp0 = 0;//计数器归零
}
if (jp1 == jpsz])
{//如果当前音符播放完成一个指定的节拍
    bf++;//播放位置跳到下一个音符节拍
    jp1 = 0;//计数器归零
if(bf == 511)
{//如果播放到最后一位,即播放完成
    bf = 0;//从头播放
}
}
}

agx77 发表于 2016-4-14 12:43:03

:)做记号,谢谢楼主费心费神。

4758866 发表于 2016-4-15 10:36:13

这个一定要收藏了

lxa000 发表于 2017-8-1 21:30:44

先前下的找不到了
刚才又下了一回
这次怎么解压不了?

CLY 发表于 2018-11-5 12:46:59

lxa000 发表于 2017-8-1 21:30
先前下的找不到了
刚才又下了一回
这次怎么解压不了?

这是V1.5最新版哦,修了些bug加了个能随时从任意位置播放和随时暂停的“提示音式”播放功能,存网盘上了
https://pan.baidu.com/s/15oxMc441kD8JyzpsgaGqqA

lxa000 发表于 2018-11-5 13:08:04

CLY 发表于 2018-11-5 12:46
这是V1.5最新版哦,修了些bug加了个能随时从任意位置播放和随时暂停的“提示音式”播放功能,存网盘上了
...

很可惜:
我这里上不了baidu盘~~~~~~~~

ka2209 发表于 2018-11-5 15:02:16

做个记号,过后需要再来

仙鹤 发表于 2018-11-5 20:30:56

收藏下,感谢分享。
页: [1]
查看完整版本: 【自己写的小软件】CLY单片机音乐代码超级生成器