标题:五弦七声徽分图
作者:山鹰
日期:2010-01-10 06:28
内容:
初来乍到，献图一份以示诚意。我尚无条件学琴，但心向往之已久，只能耳听，心思，谈兵于纸上。期望有机会学琴时，能向各位朋友请教。
此图按宫数八十一、徵数五十四、商数七十二、羽数四十八、角数六十四之比例将各声位精确对应至徽分，或许能用于按谱查声、校准音位。希望对各位朋友有所帮助。
图见附件(pdf格式)。
[attachment=307]
以下为绘制代码片段：
beginfig(1);
u:=1cm;
% 龈岳
z1=origin;
z0=origin+(0,18u);
pair offset;
offset:=(1.8u,0);
% 五弦
pickup pencircle scaled 1pt;
for i=1 upto 5:
draw z0+i*offset--z1+i*offset;
endfor
% 定徽
pair p[];
p[1] =1/8[z0,z1];
p[2] =1/6[z0,z1];
p[3] =1/5[z0,z1];
p[4] =1/4[z0,z1];
p[5] =1/3[z0,z1];
p[6] =2/5[z0,z1];
p[7] =1/2[z0,z1];
p[8] =3/5[z0,z1];
p[9] =2/3[z0,z1];
p[10]=3/4[z0,z1];
p[11]=4/5[z0,z1];
p[12]=5/6[z0,z1];
p[13]=1/8[z1,z0];
p[14]=z1;
pair dx, dy;
dx:=.1offset;
pickup pencircle scaled .5pt;
draw z0--z1;
for h=1 upto 13:
draw p[h] withpen pencircle scaled 5pt;
draw p[h] -- p[h]-1.5dx;
dy:=(p[h+1]-p[h])/10;
for i=1 upto 9:
temp:=p[h]+i*dy;
draw temp -- temp-dx;
endfor
endfor
pair ch, dxx;
ch:=.15offset;
dx:=.05offset;
dxx:=.065offset;
%% 宫弦
dy:=(z1-z0)/81; % 宫数八十一
pickup pencircle scaled .5pt;
% 宫 81
temp:=z0+81dy;
%draw temp -- temp+offset-ch-dxx;
......
endfig;
end
#1 [雪狼 01-10 21:19]
为什么只有五条弦呢？
#2 [山鹰 01-10 21:43]
是这样的：如果定义一弦为宫弦，则六弦也为宫弦，只是其数为一弦之半而已，声位是完相同的。
还有图中五弦顺序是按相生顺序排列的，即宫、徵、商、羽、角，并没有和七弦对应。实际中一般都是宫、商、角、徵、羽这个顺序，且宫弦具体位置视调式而确定。
#3 [雪狼 01-10 22:05]
哦，这样的，明白了
#4 [yzl 01-29 01:10]
#5 [栖栖 02-02 09:16]
phpwind V8.7