1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
|
ffmchar("Eth",14,ht#,0);
italcorr .9ht#*slant;
x1=leftstemloc+noise;
x2=leftstemloc+noise;
x3=.5w+noise;
x5=.5w+noise;
w-x4=good.x(1.5u+s+noise);
x6=eps+noise;
x7=.5w+noise;
bot y1=noise;
bot y5=noise;
top y2=h+noise;
top y3=h+noise;
y4=barheight+noise;
y6=barheight+noise;
y7=barheight+noise;
draw z1--z2--z3
& half(z3,z3-z2,z4,-randup,z5,z1-z5)
& z5--cycle;
draw z6--z7;
charanchortops_[charcode]=(.5w,h);
labels(1,2,3,4,5,6,7);
endchar;
|