diff options
Diffstat (limited to 'language/turkish/mf/tksub.mf')
-rw-r--r-- | language/turkish/mf/tksub.mf | 24 |
1 files changed, 24 insertions, 0 deletions
diff --git a/language/turkish/mf/tksub.mf b/language/turkish/mf/tksub.mf new file mode 100644 index 0000000000..bf2e58d502 --- /dev/null +++ b/language/turkish/mf/tksub.mf @@ -0,0 +1,24 @@ +% This file defines characters that go into the Turkish font when |ligs=0|. + +% Adapted from romsub.mf by P. A. MacKay, January, 1987. + +% Character codes \0042--\0043, \0055, \0134, and \0173--\0175 are generated +% when |ligs=0|; + +straight_quotes=oct"042"; minus=ASCII"-"; +backslash=ASCII"\"; +left_brace=ASCII"{"; vertical=ASCII"|"; right_brace=ASCII"}"; + +input sym; + +cmchar "Straight single quote"; +beginchar(oct"043",5u#,asc_height#,0); +italcorr asc_height#*slant+.5 if serifs: flare# else: stem# fi -2u#; +adjust_fit(0,0); +x1=x2=.5w; y2=max(.5[bar_height,x_height]+.5vair,h-x_height); +if serifs: pickup crisp.nib; pos1(flare,0); pos2(vair,0); + y1+.5stem=h; filldraw circ_stroke z1e--z2e; % stem and bulb +else: pickup fine.nib; pos1(stem,0); pos2(vair,0); + top y1=h; filldraw stroke z1e--z2e; fi % stem +penlabels(1,2); endchar; + |