1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
|
beginchar("a",.5em#,4/3cap#,0); "The letter a";
pickup pencircle xscaled 1.4thick yscaled .3thin;
x1=x3=x2=w-x4=w-x5=curve_sidebar;
y2=y4=0;
y1=h; y3=.6h;
y5=3/4y3;
draw z1--z2; draw z4--z5{up}..{left}z3;
endchar;
beginchar("d",.7em#,cap#,0); "The letter d";
pickup pencircle xscaled 1.4thick yscaled .3thin;
x1=w-x3=w-x4=curve_sidebar;
x2=x5=x6=.4[x1,x3];
y2=y3=0; y1=y6=h; y4=y5=.45h;
draw z1--z6--z2--z3--z4--z5;
endchar;
beginchar(oct"015",.6em#,cap#,0); "The letter zz";
pickup pencircle xscaled 1.4thick yscaled .3thin;
x1=w-x2=w-x3=curve_sidebar;
x4=x5=.4[x1,x2];
y5=y3=0; y1=y4=y2=h;
draw z1--z2--z3--z5--z4;
x8=.7[x5,x3]; x6=.5[x1,x4];
x6-x7=x8-x6; y6=h;
y7=y8=1.27h;
draw z6{up}..{left}z7; draw z6{up}..{right}z8;
endchar;
beginchar("l",.7em#,cap#,0); "The letter l";
pickup pencircle xscaled 1.4thick yscaled .3thin;
x1=w-x3=w-x4=curve_sidebar;
x2=x5=.45[x1,x3];
x6=.5[x5,x4];
x1-x7=x6-x2;
y1=y2=y3=h; y7=y6=4/3h; y4=y5=0;
draw z1--z3--z4--z5--z2{up}..z6--z7; draw z1{up}..z7;
endchar;
beginchar("t",.6em#,cap#,0); "The letter t";
pickup pencircle xscaled 1.4thick yscaled .3thin;
x1=w-x2=w-x3=curve_sidebar;
x4=x5=.4[x1,x2];
y5=y3=0; y1=y4=y2=h;
draw z1--z2--z3--z5--z4;
picture slovo; slovo=currentpicture;
endchar;
beginchar("v",.6em#,cap#,0); "The letter v";
transform t; t=identity reflectedabout ((0,.5h),(w,.5h))
shifted (0,.5thin);
addto currentpicture also slovo transformed t;
endchar;
beginchar("z",.6em#,cap#,0); "The letter z lazzni (za zz)";
transform t; t=identity reflectedabout ((0,.5h),(w,.5h));
addto currentpicture also slovo transformed t;
endchar;
|
