\font\linus=linus \font\tfont=cmr6 The metafont code below is a brute-force coding, very ugly. It is from the first part of a (hopefully not mythical) chapter on MetaFont programming in {\it Linux – A Personal Computing Milieu, \rm by Thomas Dunbar. \vglue .3in {\linus l\kern -77pt\raise 33pt\vtop{\tfont \parindent=0pt\baselineskip=7pt \hsize=42pt \raggedright Linux News: “1.0 is in!” \rightline{says Linus \par \vglue .1in To use: cut out the code and save in linus.mf, copy it to where your metafont macros are, start metafont, respond to ** with $\backslash$mode=localfont; input linus\quad It will make a 1 character font, run gftopk on the output (linus.300pk probably) and then move the pk and tfm files to where tex, etc can find them. Then, run tex on this file and preview/print it. \par\def\setuplistinghook{\ttfont\baselineskip=7.5pt \listing{linus.mf

\bye

%linus.mf: mode_setup; beginchar("l",100pt#,100pt#,0); pickup pencircle scaled .8pt; draw (.49w,.86w)–(.555w,.89w); draw (.66w,.91w)–(.725w,.895w); pickup pencircle xscaled .035w yscaled .07w rotated 10; drawdot (.49w,.63w); drawdot (.68w,.65w); pickup pencircle scaled .4pt; draw flex((.2w,.15h),(.14w,.3h),(.1w,.45h)) & flex((.1w,.45w),(.4w,.42w),(.63w,.46w),(.68w,.45w)) & flex((.68w,.45w),(.69w,.30w),(.7w,.18w)); draw flex ((.11w,.47w), (.3w,.46w),(.55w,.48w),(.71w,.47w)) & flex ((.71w,.47w), (.72w,.31w),(.73w,.19w)); draw flex ((.13w,.49w),(.45w,.5w),(.75w,.49w)) & flex ((.75w,.49w),(.76w, .38w), (.77w,.25w)); draw (.3w,.51w)..{up(.29w,.54w)..(.36w,.66w)..(.4w,.73w){up ..(.36w,.87w){up..(.46w,.97w){dir 20..(.7w,1.1w){right ..(.83w,1.07w){dir -30..{dir 265(1.03w,.73w); draw (1.03w,.73w){right..(1.14w,.63w){down..{dir 175(1.03w,.56w); draw (1.03w,.56w){down..{left(.765w,.28w); draw (.24w,.16w)..(.4w,.12w){right..(.5w,.13w); draw (.28w,.12w)..(.4w,.08w){dir -15..(.53w,.06w); draw (.29w,.54w){dir 170..(.26w,.57w){up..{right(.36w,.66w); draw (.62w,.70w){dir 170..(.55w,.7w)..(.54w,.65w){down ..(.58w,.61w){dir 20—(.61w,.62w); draw (.43w,.59w){dir 135..(.42w,.63w){up..{dir 65(.46w,.72w); draw (.7w,.76w){dir -45..{down(.75w,.68w)..(.745w,.645w); draw (.2w,.15w)—(.18w,.21w)..(.15w,.22w){left ..(.115w,.17w){down..(.18w,.1w){right..(.21w,.12w){up..cycle; draw (.12w,.14w)..(.11w,.07w)..(.16w,.04w){right..{dir 100(.205w,.09w); draw (.11w,.07w){dir 230..(.15w,-.02w){right..(.19w,.02w); draw (.46w,.97w){left..(.31w,.9w)..(.25w,.78w); draw (.7w,1.1w){dir 150..(.46w,.97w)..{dir 285(.46w,.83w); draw (.7w,1.1w){left..{dir 285(.53w,.84w); draw (.83w,1.07w){dir -50..{dir 250(.9w,.7w); draw (.83w,1.07w){dir 135..(.7w,1.1w)..{dir 280(.57w,.8w); draw (.7w,1.1w){right..(.83w,1w)..(.9w,.75w); draw (.535w,1.02w){dir 190..(.37w,1.03w){left..{down(.15w,.77w); draw (.92w,1w){dir -55..{dir 250(.95w,.7w); draw (.92w,1w){right..(.96w,.99w)...{dir 250(.95w,.68w); draw (.92w,1w){dir 120..{left(.83w,1.07w)..(.69w,1w)..{dir 250(.59w,.87w); draw (.92w,1w){dir 135..(.69w,.9w){dir 240; draw (.92w,1w){dir 185..(.75w,.85w){dir 250; draw (.85w,.20w){dir 40..(1w,.3w)..(1.07w,.31w){right..(1.23w,.06w){dir -80; draw (.9w,.2w)..(1w,.24w){right..{dir -80(1.14w,.01w); draw (1.01w,.01w)..(.95w,.15w)..(.92w,.17w){left..(.85w,.2w){up ..{dir 200(.77w,.25w) ..{dir -45(.79w,.17w) &(.79w,.17w){dir 135..(.73w,.19w)..(.7w,.18w) ..(.72w,.1w)—(.77w,.11w)&(.77w,.11w)—(.72w,.1w)..(.76w,.02w)—(.8w,.05w) &(.8w,.05w)—(.76w,.02w)..(.81w,-.02w)—(.84w,.01w) &(.84w,.01w)—(.82w,-.02w)..(.84w,-.03w)..(.88w,-.01)..{dir 80(.89w,.02w) —(1.01w,.01w)—cycle; draw (.8w,.282w)..(.805w,.255w); fill (.85w,.2w){dir 40..(.89w,.245w)—(.88w,.25w)—(.84w,.24w) ..(.85w,.22w)—cycle; endchar; end;

This document was generated on January 18, 2023 using texi2html 5.0.