想做自己喜欢的音乐的,直接在网络上搜索 歌曲名字+简谱,然后按照下面的方法自己编写代码。
高低音的区分:看数字的那行,数字下面有"·",即为低音;上面有"·",即为高音。没有点就是标准。
音符的区分:数字为几,音符就是第几个。1,2,3,4,5,6,7个数字,分别对应哆,瑞,咪,发,嗦,啦,西。数字0,是休止符,表示停顿,在代码中加入延时(Delay)即可。
节拍的区分:数字下面没有下划线"_",即为一拍,有一条下划线为两拍,依次类推。
附上自己弄的"世末歌者"这首歌的部分蜂鸣器源码。(看注释)
Call Plugin.Media.Beep(578, 400)'标准2 2
Call Plugin.Media.Beep(523, 400)'标准1 2
Call Plugin.Media.Beep(578, 200)'标准2
Call Plugin.Media.Beep(578, 400)'标准2 2
Call Plugin.Media.Beep(523, 400)'标准1 2
Call Plugin.Media.Beep(578, 200)'标准2
Call Plugin.Media.Beep(578, 400)'标准2 2
Call Plugin.Media.Beep(523, 400)'标准1 2
Call Plugin.Media.Beep(578, 400)'标准2 2
Call Plugin.Media.Beep(659, 400)'标准3 2
Call Plugin.Media.Beep(578, 400)'标准2 2
Call Plugin.Media.Beep(523, 400)'标准1 2
Call Plugin.Media.Beep(440, 200)'低音6
Call Plugin.Media.Beep(578, 400)'标准2 2
Call Plugin.Media.Beep(523, 400)'标准1 2
Call Plugin.Media.Beep(578, 200)'标准2
Call Plugin.Media.Beep(578, 400)'标准2 2
Call Plugin.Media.Beep(523, 400)'标准1 2
Call Plugin.Media.Beep(578, 200)'标准2
Call Plugin.Media.Beep(659, 400)'标准3 2
Call Plugin.Media.Beep(1046, 400)'高音1 2
Call Plugin.Media.Beep(988, 400)'标准7 2
Call Plugin.Media.Beep(784, 400)'标准5 2
Call Plugin.Media.Beep(659, 400)'标准3 2
Call Plugin.Media.Beep(578, 400)'标准2 2
Call Plugin.Media.Beep(659, 200)'标准3
Call Plugin.Media.Beep(578, 400)'标准2 2
Call Plugin.Media.Beep(523, 400)'标准1 2
Call Plugin.Media.Beep(578, 200)'标准2
Call Plugin.Media.Beep(578, 400)'标准2 2
Call Plugin.Media.Beep(523, 400)'标准1 2
Call Plugin.Media.Beep(578, 200)'标准2
Call Plugin.Media.Beep(578, 400)'标准2 2
Call Plugin.Media.Beep(523, 400)'标准1 2
Call Plugin.Media.Beep(578, 400)'标准2 2
Call Plugin.Media.Beep(659, 400)'标准3 2
Call Plugin.Media.Beep(578, 400)'标准2 2
Call Plugin.Media.Beep(523, 400)'标准1 2
Call Plugin.Media.Beep(440, 200)'低音6
Call Plugin.Media.Beep(578, 400)'标准2 2
Call Plugin.Media.Beep(523, 400)'标准1 2
Call Plugin.Media.Beep(578, 200)'标准2
Call Plugin.Media.Beep(578, 400)'标准2 2
Call Plugin.Media.Beep(523, 400)'标准1 2
Call Plugin.Media.Beep(659, 200)'标准3
Delay 100'休止符
Call Plugin.Media.Beep(784, 400)'标准5 2
Delay 400
Call Plugin.Media.Beep(784, 400)'标准5 2
Call Plugin.Media.Beep(1568, 400)'高音5 2
Call Plugin.Media.Beep(1318, 400)'高音3 2
Call Plugin.Media.Beep(1175, 200)'高音2
Call Plugin.Media.Beep(1175, 400)'高音2 2
Call Plugin.Media.Beep(1046, 600)'高音1 3
Call Plugin.Media.Beep(1175, 600)'高音2 3
Call Plugin.Media.Beep(1175, 400)'高音2 2
Call Plugin.Media.Beep(1318, 400)'高音3 2
Call Plugin.Media.Beep(880, 400)'标准6 2
Call Plugin.Media.Beep(1046, 400)'高音1 2
Call Plugin.Media.Beep(1175, 400)'高音2 2
Call Plugin.Media.Beep(1046, 400)'高音1 2
Call Plugin.Media.Beep(1175, 400)'高音2 2
Call Plugin.Media.Beep(1318, 600)'高音3 3
Call Plugin.Media.Beep(1318, 600)'高音3 3
Delay 200'休止符
Call Plugin.Media.Beep(784, 400)'标准5 2
Call Plugin.Media.Beep(1568, 400)'高音5 2
Call Plugin.Media.Beep(1318, 400)'高音3 2
Call Plugin.Media.Beep(1175, 200)'高音2
Call Plugin.Media.Beep(1175, 400)'高音2 2
Call Plugin.Media.Beep(1046, 600)'高音1 3
Call Plugin.Media.Beep(1175, 300)'高音2
Call Plugin.Media.Beep(1175, 200)'高音2
Call Plugin.Media.Beep(1046, 400)'高音1 2
Call Plugin.Media.Beep(1175, 400)'高音2 2
Call Plugin.Media.Beep(1318, 400)'高音3 2
Call Plugin.Media.Beep(1175, 400)'高音2 2
Call Plugin.Media.Beep(1046, 600)'高音1 3
Call Plugin.Media.Beep(1046, 300)'高音1
Call Plugin.Media.Beep(1046, 100)'高音1 0.5
Delay 400
Call Plugin.Media.Beep(784, 400)'标准5 2
Call Plugin.Media.Beep(1568, 400)'高音5 2
Call Plugin.Media.Beep(1318, 400)'高音3 2
Call Plugin.Media.Beep(1175, 200)'高音2
Call Plugin.Media.Beep(1175, 400)'高音2 2
Call Plugin.Media.Beep(1046, 600)'高音1 3
Call Plugin.Media.Beep(1175, 600)'高音2 3
Call Plugin.Media.Beep(1175, 400)'高音2 2
Call Plugin.Media.Beep(1318, 400)'高音3 2
Call Plugin.Media.Beep(880, 400)'标准6 2
Call Plugin.Media.Beep(1046, 400)'高音1 2
Call Plugin.Media.Beep(1175, 400)'高音2 2
Call Plugin.Media.Beep(1046, 400)'高音1 2
Call Plugin.Media.Beep(1175, 400)'高音2 2
Call Plugin.Media.Beep(1318, 600)'高音3 3
Call Plugin.Media.Beep(1318, 300)'高音3 3
Call Plugin.Media.Beep(1318, 100)'高音3 0.5
Delay 400
Call Plugin.Media.Beep(784, 400)'标准5 2
Call Plugin.Media.Beep(880, 600)'标准6
Call Plugin.Media.Beep(1318, 300)'高音3
Call Plugin.Media.Beep(1318, 200)'高音3
Call Plugin.Media.Beep(784, 400)'标准5 2
Call Plugin.Media.Beep(880, 600)'标准6 2
Call Plugin.Media.Beep(1175, 300)'高音2
Call Plugin.Media.Beep(1175, 200)'高音2
Call Plugin.Media.Beep(1175, 400)'高音2
Call Plugin.Media.Beep(880, 400)'标准6 2
End Sub
Sub 美丽的神话
Call Plugin.Media.Beep(440, 200)'低音6
Call Plugin.Media.Beep(659, 200)'标准 3
Call Plugin.Media.Beep(494, 400)'低音 7 2
Call Plugin.Media.Beep(440, 400)'低音6 2
Call Plugin.Media.Beep(523, 400)'标准1 2
Call Plugin.Media.Beep(578, 600)'标准2 3
Call Plugin.Media.Beep(523, 600)'标准1 3
Call Plugin.Media.Beep(659, 400)'标准3 2
Delay 200'休止符
Call Plugin.Media.Beep(440, 200)'低音6
Call Plugin.Media.Beep(880, 200)'标准6
Call Plugin.Media.Beep(784, 400)'标准5 2
Call Plugin.Media.Beep(880, 400)'标准6 2
Call Plugin.Media.Beep(784, 400)'标准5 2
Call Plugin.Media.Beep(578, 400)'标准2 2
Call Plugin.Media.Beep(698, 400)'标准4 2
Call Plugin.Media.Beep(659, 200)'标准3
Call Plugin.Media.Beep(659, 200)'标准3
Delay 200'休止符
Call Plugin.Media.Beep(440, 200)'低音6
Call Plugin.Media.Beep(880, 200)'标准6
Call Plugin.Media.Beep(784, 400)'标准5 2
Call Plugin.Media.Beep(578, 400)'标准2 2
Call Plugin.Media.Beep(659, 400)'标准3 2
Call Plugin.Media.Beep(698, 400)'标准4 2
Call Plugin.Media.Beep(659, 400)'标准3 2
Call Plugin.Media.Beep(523, 400)'标准1 2
Call Plugin.Media.Beep(440, 200)'低音6
Call Plugin.Media.Beep(659, 200)'标准3
Call Plugin.Media.Beep(578, 400)'标准2 2
Call Plugin.Media.Beep(440, 300)'低音6
Call Plugin.Media.Beep(494, 300)'低音7
Call Plugin.Media.Beep(440, 400)'低音2
Delay 200'休止符
Call Plugin.Media.Beep(440, 400)'低音6 2
Call Plugin.Media.Beep(494, 400)'低音7 2
Call Plugin.Media.Beep(523, 400)'标准1 2
Call Plugin.Media.Beep(578, 400)'标准2 2
Call Plugin.Media.Beep(659, 400)'标准3 2
Call Plugin.Media.Beep(523, 400)'标准1 2
Call Plugin.Media.Beep(494, 200)'低音7
Call Plugin.Media.Beep(392, 200)'低音5
Call Plugin.Media.Beep(440, 400)'低音6 2
Call Plugin.Media.Beep(523, 400)'标准1 2
Call Plugin.Media.Beep(578, 400)'标准2 2
Call Plugin.Media.Beep(659, 400)'标准3 2
Call Plugin.Media.Beep(659, 200)'标准3
Delay 200'休止符
Call Plugin.Media.Beep(440, 400)'低音6 2
Call Plugin.Media.Beep(494, 400)'低音7 2
Call Plugin.Media.Beep(523, 400)'标准1 2
Call Plugin.Media.Beep(578, 400)'标准2 2
Call Plugin.Media.Beep(659, 400)'标准3 2
Call Plugin.Media.Beep(523, 400)'标准1 2
Call Plugin.Media.Beep(494, 200)'低音7
Call Plugin.Media.Beep(392, 200)'低音5
Delay 200'休止符
Call Plugin.Media.Beep(523, 400)'标准1 2
Call Plugin.Media.Beep(523, 600)'标准1 3
Call Plugin.Media.Beep(578, 600)'标准2 3
Call Plugin.Media.Beep(659, 400)'标准3 2
Call Plugin.Media.Beep(523, 400)'标准1 2
Call Plugin.Media.Beep(494, 200)'低音7
Call Plugin.Media.Beep(392, 400)'低音5 2
Call Plugin.Media.Beep(523, 200)'标准1
Call Plugin.Media.Beep(494, 200)'低音7
Call Plugin.Media.Beep(392, 400)'低音5 2
Call Plugin.Media.Beep(494, 400)'低音7 2
Call Plugin.Media.Beep(440, 200)'低音6
Call Plugin.Media.Beep(440, 300)'低音6