430G2553电子音乐,两只老虎,荷塘月色

huo_hu

430G2553电子音乐,两只老虎,荷塘月色 [复制链接]

 

程序特点:
1:程序使用430launchpad+ccs5,不需要附加任何电路,不需要外晶振一片2553就好,只要一个喇叭或耳机接P2.4和P2.1即可(太简单所以图就不上了).
2:使用TA1两通道互补输出模拟双极性,单通道也可以.TA0未使用,还可以做别的.
3:每个音符一个字节,所以16K应该可以存储很多的曲,按键后开始下一曲
4:Led随音调明暗变化
5:宏函数生成音符,简谱到数据轻松搞定

附件:
第一个程序循环播放四个八度的 1,2,3,4,5,6,7
两个录音文件
完整程序包
看不懂的同学回复后我可以做解释.

[ 本帖最后由 huo_hu 于 2013-7-26 12:36 编辑 ]

maylove

谢谢分享

huo_hu

完工自己顶一下

woshikange

耳机不就一条线吗，怎么连两个口啊

huo_hu

两个耳塞共三条线,一条公共的.

huo_hu

感觉这个效果好像更好些:               
if ((Sound_Volume!=0))// && (TimeBase & 4))
      Sound_Volume--;        //渐弱

wstt

精华，顶一个。

hjl240

很有趣，赞一个！！

经世致用

好东西，多谢楼主分享！                                                                        
                                                   
                                                
                                                                                                         
学习了

chenjian2110

好东西，准备试试

dontium

这个不仅懂编程，还要懂音乐。

帖子很好

hjl240

请问怎么将音乐简谱转换为CMS(1,2,1),CMS(3,2,1),CMS(4,1,6),CMS(6,1,5),CMS(0,1,6),        //13468这种？

huo_hu

简谱两个|之间的时间称为节每个节都是固定的时间,每个音符所占的时间都是半拍的整数倍.我们把每个节的时间分成8份,然后用123~8(8就是0)之间的数字表示每个节中本音符的结束位置.
程序中一个音符占用8位(一个字节),高三位表示音符开始时间,中间两位指定音阶,最低三位指定音符.
//宏函数转换成音符，第一参数0~7时长，第二参数0~3音调,第三参数0~7音符,宏函数中有这段
#define CMS(time,level,symbol) ((unsigned char)((time<<5) | (level<<3) | symbol))

举个例子,荷塘月色第一节http://www.sooopu.com/html/?id=110312
{1下划,1,6下划点,5点,6点}
我们先计算时长,下划线表示这个音符占用半拍,没有下划线表示一拍,一个横道表示这个音符延长一拍,两个横道表示这个音符占三拍...
先不看音符这一节是{1/8,2/8,1/8,2/8,2/8},所以各音符的时间单位表示成1,3,4,6,8因此每个音符第一参数依次为1,3,4,6,0
中间一个宏参数是音阶,假设用2做中音,有下点是1,没有是2,有上点是3,所以第二参数依次2,2,1,1,1
第三个就是音符了1234567对应,依次为1,1,6,5,6
三个和在一起就是
        CMS(1,2,1),CMS(3,2,1),CMS(4,1,6),CMS(6,1,5),CMS(0,1,6),        //13468

[ 本帖最后由 huo_hu 于 2013-8-13 11:53 编辑 ]

hjl240

讲的很详细，学习了！！

YQL198427

太贵了，买不起啊啊啊啊

雨落沉轩

挺好的，不过要好多新币呀，能不能便宜一点

[ 本帖最后由 雨落沉轩 于 2013-8-15 09:30 编辑 ]

huo_hu

主体就是那个免费的刀2咪,你可以自己写的.
多加两部分内容:
1加上控制每个音符的持续时间
2音符播放时的渐弱效果
其实就这些,如果不是为了想空出TA0定时器就更简单了.

以后再加个警报器的声音...

huo_hu

已经这样了再免费不公平了哈

在路上的旁观者

在路上的旁观者

您已成功购买本附件，现在将转入附件下载。
如果您的浏览器没有自动跳转，请点击这里