竟然是搜索……囧还以为是什么神题…… 1 uses math; 2 var x,y:extended; 3 n:longint; 4 function find(x,y:extended;z:longint):extended; 5 var i:longint; 6 r1,r...
分类：
其他好文 时间：
2014-06-21 17:49:05
阅读次数：
198
clear all
A4=440;%标准音A4 不同的曲调音调不同scale的取值范围不同
pt=44100;p0=pt/2;%频率
scale=A4/2^(9/12)*2.^((-12:11)/12);%这里可以调节音调高低，eg：改变式子中的-12：11为0：23
map=[1 3 5 6 8 10 12 13 15 17 18 20 22 24 25];%音符，这个需要看曲谱编码...
分类：
其他好文 时间：
2014-05-25 07:27:55
阅读次数：
1212
//生日快乐歌#include "stdafx.h"#include void
main(void) { unsigned FREQUENCY[] = {392,392,440,392,523,494,
392,392,440,392,587,523, 392,392,784,659,52...
分类：
其他好文 时间：
2014-05-09 23:23:22
阅读次数：
423
