summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/fonts/source/public/fetamont/ffmchar_eight.mf
blob: ec7f85c07a2eb95f5a84b657228081e9ee5f8c2b (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
ffmchar("eight",11,ht#,0);
italcorr .7ht#*slant;
x1=.5w+noise;
x3=.5w+noise;
x6=.5w+noise;
x2=good.x(1.5u+s+noise);
w-x4=good.x(1.5u+s+noise);
x7=.2[x2,x1]+noise;
w-x5=.2[x2,x1]+noise;
y1=barheight+noise; 
bot y3=noise-o;
top y6=h+o+noise;
y2=.5[y1,y3]+noise; 
y4=.5[y1,y3]+noise; 
y7=.5[y1,y6]+noise;
z5=z7+whatever*(z4-z2);
pair randir;
randir:=randrt;
draw full(z1,-randir,z2,-randup,z3,randrt,z4,randup);
draw full(z1,randir,z5,randup,z6,-randrt,z7,-randup);
labels(1,2,3,4,5,6,7); 
endchar;