diff options
Diffstat (limited to 'Master/texmf-dist/fonts/source/public/mflogo')
12 files changed, 231 insertions, 0 deletions
diff --git a/Master/texmf-dist/fonts/source/public/mflogo/flogo.mf b/Master/texmf-dist/fonts/source/public/mflogo/flogo.mf new file mode 100644 index 00000000000..0af2a2a76a4 --- /dev/null +++ b/Master/texmf-dist/fonts/source/public/mflogo/flogo.mf @@ -0,0 +1,10 @@ +% fat version of METAFONT logo +font_size 10pt#; % the "design size" of this font +ht#:=6pt#; % height of characters +xgap#:=2pt#; % horizontal adjustment +u#:=4/3pt#; % unit width +s#:=-2/3pt#; % extra space at the left and the right +o#:=1/9pt#; % overshoot +px#:=1/3pt#; % horizontal thickness of pen +input logo % now generate the font +end % and stop. diff --git a/Master/texmf-dist/fonts/source/public/mflogo/logo.mf b/Master/texmf-dist/fonts/source/public/mflogo/logo.mf new file mode 100644 index 00000000000..2a308ab917b --- /dev/null +++ b/Master/texmf-dist/fonts/source/public/mflogo/logo.mf @@ -0,0 +1,127 @@ +% Routines for the METAFONT logo, as found in The METAFONTbook +% Extended to characters P and S for John Hobby's METAPOST +% (logo10.mf is a typical parameter file) + +mode_setup; +if unknown slant: slant:=0 else: currenttransform:= + identity slanted slant yscaled aspect_ratio fi; + +ygap#:=(ht#/13.5u#)*xgap#; % vertical adjustment +ho#:=o#; % horizontal overshoot +leftstemloc#:=2.5u#+s#; % position of left stem +barheight#:=.45ht#; % height of bar lines +py#:=.9px#; % vertical pen thickness + +define_pixels(s,u); +define_whole_pixels(xgap); +define_whole_vertical_pixels(ygap); +define_blacker_pixels(px,py); +pickup pencircle xscaled px yscaled py; +logo_pen:=savepen; +define_good_x_pixels(leftstemloc); +define_good_y_pixels(barheight); +define_corrected_pixels(o); +define_horizontal_corrected_pixels(ho); + +def beginlogochar(expr code, unit_width) = + beginchar(code,unit_width*u#+2s#,ht#,0); + pickup logo_pen enddef; + +def super_half(suffix i,j,k) = + draw z.i{0,y.j-y.i} + ... (.8[x.j,x.i],.8[y.i,y.j]){z.j-z.i} + ... z.j{x.k-x.i,0} + ... (.8[x.j,x.k],.8[y.k,y.j]){z.k-z.j} + ... z.k{0,y.k-y.j} enddef; + +def super_crescent(suffix i,j,k) = + draw z.i{x.j-x.i,0} + ... (.8[x.i,x.j],.8[y.j,y.i]){z.j-z.i} + ... z.j{0,y.k-y.i} + ... (.8[x.k,x.j],.8[y.j,y.k]){z.k-z.j} + ... z.k{x.k-x.j,0} enddef; + +beginlogochar("M",18); +x1=x2=leftstemloc; x4=x5=w-x1; x3=w-x3; +y1=y5; y2=y4; bot y1=-o; +top y2=h+o; y3=y1+ygap; +draw z1--z2--z3--z4--z5; +labels(1,2,3,4,5); endchar; + +beginlogochar("E",14); +x1=x2=x3=leftstemloc; +x4=x6=w-x1+ho; x5=x4-xgap; +y1=y6; y2=y5; y3=y4; +bot y1=0; top y3=h; y2=barheight; +draw z6--z1--z3--z4; draw z2--z5; +labels(1,2,3,4,5,6); endchar; + +beginlogochar("T",13); +italcorr ht#*slant + .5u#; +if .5w<>good.x .5w: change_width; fi +lft x1=-eps; x2=w-x1; x3=x4=.5w; +y1=y2=y3; top y1=h; bot y4=-o; +draw z1--z2; draw z3--z4; +labels(1,2,3,4); endchar; + +beginlogochar("A",15); +x1=.5w; x2=x4=leftstemloc; x3=x5=w-x2; +top y1=h+o; y2=y3=barheight; +bot y4=bot y5=-o; +draw z4--z2--z3--z5; super_half(2,1,3); +labels(1,2,3,4,5); endchar; + +beginlogochar("F",14); +x1=x2=x3=leftstemloc; +x4=w-x1+ho; x5=x4-xgap; +y2=y5; y3=y4; bot y1=-o; +top y3=h; y2=barheight; +draw z1--z3--z4; draw z2--z5; +labels(1,2,3,4,5); endchar; + +beginlogochar("P",14); +x1=x2=x3=leftstemloc; +x4=x5=.618[x1,w-x1]; +y2=y5; y3=y4; bot y1=-o; +top y3=h; y2=barheight; +draw z1--z3--z4; draw z2--z5; +x6=.5[w-x1,lft w]; y6=.5[y4,y5]; +super_crescent(4,6,5); +labels(1,2,3,4,5,6); endchar; + +beginlogochar("S",14); +x3=x8=leftstemloc; +x1=w-x3; +x2=x4=.382[x3,x1]; +x5=x7=.9[x3,x1]; +x6=.5[x1,w]; +top y1=h; y4=barheight; bot y8=0; +y1=y2; y3=.6[y2,y4]; y4=y5; y6=.3[y5,y7]; y7=y8; +draw z1--z2; draw z4--z5; draw z7--z8; +super_crescent(2,3,4); +super_crescent(5,6,7); +labels(1,2,3,4,5,6,7,8); endchar; + +beginlogochar("O",15); +x1=x4=.5w; top y1=h+o; bot y4=-o; +x2=w-x3=good.x(1.5u+s); y2=y3=barheight; +super_half(2,1,3); super_half(2,4,3); +labels(1,2,3,4); endchar; + +beginlogochar("N",15); +x1=x2=leftstemloc; x3=x4=x5=w-x1; +bot y1=bot y4=-o; +top y2=top y5=h+o; y3=y4+ygap; +draw z1--z2--z3; draw z4--z5; +labels(1,2,3,4,5); endchar; + +ligtable "T": "A" kern -.5u#; +ligtable "F": "O" kern -u#; +ligtable "P": "O" kern u#; + +font_quad:=18u#+2s#; +font_normal_space:=6u#+2s#; +font_normal_stretch:=3u#; +font_normal_shrink:=2u#; +font_identifier:="MFLOGO" if slant<>0: & "SL" fi; +font_coding_scheme:="AEFMNOPST only"; diff --git a/Master/texmf-dist/fonts/source/public/mflogo/logo10.mf b/Master/texmf-dist/fonts/source/public/mflogo/logo10.mf new file mode 100644 index 00000000000..2b89c710d10 --- /dev/null +++ b/Master/texmf-dist/fonts/source/public/mflogo/logo10.mf @@ -0,0 +1,10 @@ +% 10-point METAFONT logo +font_size 10pt#; % the "design size" of this font +ht#:=6pt#; % height of characters +xgap#:=0.6pt#; % horizontal adjustment +u#:=4/9pt#; % unit width +s#:=0; % extra space at the left and the right +o#:=1/9pt#; % overshoot +px#:=2/3pt#; % horizontal thickness of pen +input logo % now generate the font +bye % and stop. diff --git a/Master/texmf-dist/fonts/source/public/mflogo/logo8.mf b/Master/texmf-dist/fonts/source/public/mflogo/logo8.mf new file mode 100644 index 00000000000..59b37c072bc --- /dev/null +++ b/Master/texmf-dist/fonts/source/public/mflogo/logo8.mf @@ -0,0 +1,10 @@ +% 8-point METAFONT logo +font_size 8pt#; % the "design size" of this font +ht#:=.8*6pt#; % height of characters +xgap#:=.8*0.6pt#; % horizontal adjustment +u#:=.82*4/9pt#; % unit width +s#:=.2pt#; % extra space at the left and the right +o#:=1/12pt#; % overshoot +px#:=.8*2/3pt#; % horizontal thickness of pen +input logo % now generate the font +bye % and stop. diff --git a/Master/texmf-dist/fonts/source/public/mflogo/logo9.mf b/Master/texmf-dist/fonts/source/public/mflogo/logo9.mf new file mode 100644 index 00000000000..49ea7e99f75 --- /dev/null +++ b/Master/texmf-dist/fonts/source/public/mflogo/logo9.mf @@ -0,0 +1,10 @@ +% 9-point METAFONT logo +font_size 9pt#; % the "design size" of this font +ht#:=.9*6pt#; % height of characters +xgap#:=.9*0.6pt#; % horizontal adjustment +u#:=.91*4/9pt#; % unit width +s#:=.08pt#; % extra space at the left and the right +o#:=1/10pt#; % overshoot +px#:=.9*2/3pt#; % horizontal thickness of pen +input logo % now generate the font +bye % and stop. diff --git a/Master/texmf-dist/fonts/source/public/mflogo/logobf10.mf b/Master/texmf-dist/fonts/source/public/mflogo/logobf10.mf new file mode 100644 index 00000000000..f943053ff5a --- /dev/null +++ b/Master/texmf-dist/fonts/source/public/mflogo/logobf10.mf @@ -0,0 +1,10 @@ +% 10-point boldface METAFONT logo +font_size 10pt#; % the "design size" of this font +ht#:=6pt#; % height of characters +xgap#:=23/20*0.6pt#; % horizontal adjustment +u#:=23/20*4/9pt#; % unit width +s#:=.1pt#; % extra space at the left and the right +o#:=1/9pt#; % overshoot +px#:=44/36pt#; % horizontal thickness of pen +input logo % now generate the font +bye % and stop. diff --git a/Master/texmf-dist/fonts/source/public/mflogo/logod10.mf b/Master/texmf-dist/fonts/source/public/mflogo/logod10.mf new file mode 100644 index 00000000000..fc484a4b182 --- /dev/null +++ b/Master/texmf-dist/fonts/source/public/mflogo/logod10.mf @@ -0,0 +1,10 @@ +% 10-point demibold METAFONT logo +font_size 10pt#; % the "design size" of this font +ht#:=6pt#; % height of characters +xgap#:=21/20*0.6pt#; % horizontal adjustment +u#:=21/20*4/9pt#; % unit width +s#:=0; % extra space at the left and the right +o#:=1/9pt#; % overshoot +px#:=.5[2/3pt#,44/36pt#]; % horizontal thickness of pen +input logo % now generate the font +bye % and stop. diff --git a/Master/texmf-dist/fonts/source/public/mflogo/logosl10.mf b/Master/texmf-dist/fonts/source/public/mflogo/logosl10.mf new file mode 100644 index 00000000000..741fdb9fa2e --- /dev/null +++ b/Master/texmf-dist/fonts/source/public/mflogo/logosl10.mf @@ -0,0 +1,3 @@ +% 10-point slanted METAFONT logo +slant := 1/4; +input logo10 diff --git a/Master/texmf-dist/fonts/source/public/mflogo/logosl8.mf b/Master/texmf-dist/fonts/source/public/mflogo/logosl8.mf new file mode 100644 index 00000000000..5684ce948f2 --- /dev/null +++ b/Master/texmf-dist/fonts/source/public/mflogo/logosl8.mf @@ -0,0 +1,12 @@ +% 8-point slanted METAFONT logo +% [ heavily borrowed from D. E. Knuth ] + +% Copyright (C) 1995--1999 Ulrik Vieth +% +% This program is free software; you can redistribute it and/or +% modify it under the terms of the LaTeX Project Public License +% as described in lppl.txt in the base LaTeX distribution; either +% version 1 of the License, or (at your option) any later version. + +slant := 1/4; +input logo8 diff --git a/Master/texmf-dist/fonts/source/public/mflogo/logosl9.mf b/Master/texmf-dist/fonts/source/public/mflogo/logosl9.mf new file mode 100644 index 00000000000..03b3d922884 --- /dev/null +++ b/Master/texmf-dist/fonts/source/public/mflogo/logosl9.mf @@ -0,0 +1,3 @@ +% 9-point slanted METAFONT logo +slant := 1/4; +input logo9 diff --git a/Master/texmf-dist/fonts/source/public/mflogo/nlogo.mf b/Master/texmf-dist/fonts/source/public/mflogo/nlogo.mf new file mode 100644 index 00000000000..b43a3924665 --- /dev/null +++ b/Master/texmf-dist/fonts/source/public/mflogo/nlogo.mf @@ -0,0 +1,15 @@ +% Driver file for the METAFONT logo +if unknown logobase: input logobase fi + +mode_setup; font_setup; +input METAFON + +ligtable "T": "A" kern -.5u#; +ligtable "F": "O" kern -u#; + +font_quad:=18u#+2s#; +font_normal_space:=6u#+2s#; +font_normal_stretch:=3u#; +font_normal_shrink:=2u#; +font_identifier:="MFLOGO" if slant<>0: & "SL" fi; +font_coding_scheme:="AEFMNOT only"; diff --git a/Master/texmf-dist/fonts/source/public/mflogo/sklogo.mf b/Master/texmf-dist/fonts/source/public/mflogo/sklogo.mf new file mode 100644 index 00000000000..4a6f0d82b1a --- /dev/null +++ b/Master/texmf-dist/fonts/source/public/mflogo/sklogo.mf @@ -0,0 +1,11 @@ +% skinny variant of METAFONT logo +font_size 30pt#; % the "design size" of this font +ht#:=25pt#; % height of characters +xgap#:=1.5pt#; % horizontal adjustment +u#:=3/9pt#; % unit width +s#:=1/3pt#; % extra space at the left and the right +o#:=2/9pt#; % overshoot +px#:=1pt#; % horizontal thickness of pen +slant:=-1/9; % leftward bias +input nlogo % now generate the font (testing the driver approach) +bye % and stop. |