boisik 0.5 (21aug09)

git-svn-id: svn://tug.org/texlive/trunk@14833 c570f23f-e606-0410-a88d-b1316a301751

13 files changed, 287 insertions, 61 deletions

diff --git a/Master/texmf-dist/doc/fonts/boisik/README b/Master/texmf-dist/doc/fonts/boisik/README
index 148d007916e..7dfb79366cf 100644
--- a/Master/texmf-dist/doc/fonts/boisik/README
+++ b/Master/texmf-dist/doc/fonts/boisik/README
@@ -12,6 +12,7 @@ For more info see homepage http://mitek.webpark.cz/boisik.
 Usage
 ============
 LaTeX: \usepackage{boisik}
+(add option `czech' for IL2 encoding and/or `arrows' for additional arrows)
 TeX: use font directly, e.g. \font\rm bskr10
 
 Installation
@@ -31,7 +32,12 @@ Basic fonts
 ============
 Roman:  bskr10, bskrb10
 Italic: bski10, bskib10 
-Math:   bskmi10, bsksy10, bskex10
+Math:   bskmi10, bsksy10, bskex10, bskms10, bskma10
+
+Warning
+============
+When you encounter "strange path" or "paths don't intersect" errors, try
+higher resolution (e.g. dvips -mode supre -D 2400 test.dvi). 
 
 Examples
 ============
diff --git a/Master/texmf-dist/doc/fonts/boisik/boisik-idiot.pdf b/Master/texmf-dist/doc/fonts/boisik/boisik-idiot.pdf
deleted file mode 100644
index f849e5cd844..00000000000
--- a/Master/texmf-dist/doc/fonts/boisik/boisik-idiot.pdf
+++ /dev/null
diff --git a/Master/texmf-dist/doc/fonts/boisik/boisik.pdf b/Master/texmf-dist/doc/fonts/boisik/boisik.pdf
deleted file mode 100644
index a6b861078b4..00000000000
--- a/Master/texmf-dist/doc/fonts/boisik/boisik.pdf
+++ /dev/null
diff --git a/Master/texmf-dist/doc/fonts/boisik/boisik.tex b/Master/texmf-dist/doc/fonts/boisik/boisik.tex
deleted file mode 100644
index 191f1d45fa6..00000000000
--- a/Master/texmf-dist/doc/fonts/boisik/boisik.tex
+++ /dev/null
@@ -1,54 +0,0 @@
-\documentclass{article}
-\usepackage{color,graphicx}
-\pagestyle{empty}
-\pdfpkresolution 1200
-\pagecolor{black}
-\definecolor{modra}{rgb}{.372,.486,1}
-\definecolor{cervena}{rgb}{1,.219,.556}
-\font\logo bskrlogo10 at 30pt
-\font\bskt bskr10
-\font\bsk bskr10 at 8pt
-\font\bskbf bskrb10 at 8pt
-\font \bski bski10 at 8pt
-\font \bskmi bskmi10 at 8pt
-\font \bsksy bsksy10 at 8pt
-\font \bskex bskex10 at 8pt
-\font \bsksyb bsksy10 at 12pt
-\font\f bskmi10 at 30pt
-\pdfvorigin 1sp \pdfhorigin 1sp
-\pdfpagewidth 11cm \pdfpageheight 6cm
-\topmargin -.45in
-\oddsidemargin -.15in
-\def\para{\leavevmode\llap{\setbox0=\hbox{{\color{modra}\bsksyb\char123}\ }\ht0=0pt\dp0=0pt\lower.8ex\box0}}
-\def\Boisik{{\color{modra}Boisik}}
-\begin{document}
-\mbox{}\unitlength1pt
-\put(5,0){\color{modra}\logo Bo\kern-2pt\reflectbox{\char131}\kern-2.5pt\raisebox{-3pt}[0pt]{s}\kern-2.5pt\char131\kern-1ptk}
-\put(0,-10){\color{cervena}\vrule width 10.7cm height .8pt depth 0pt}
-\put(0,-6){\color{modra}\hbox to 10.7cm{\hfill \bskt MET\kern-.6exAF\kern-.2exONT TYP\kern-.2exEF\kern-.5exA\kern-.35exCE F\kern-.2exOR \TeX}}
-\color{white}
-\put(65,-40){\hbox to 8.2cm{\bsk A B C D E F G H I J K L M N O P Q R S T U V W X Y Z}}
-\put(65,-50){\hbox to 8.2cm{\bskbf A B C D E F G H I J K L M N O P Q R S T U V W X Y Z}}
-\put(65,-60){\hbox to 8.2cm{\bski A B C D E F G H I J K L M N O P Q R S T U V W X Y Z}}
-\put(65,-70){\hbox to 8.2cm{\bsk a b c d e f g h i j k l m n o p q r s t u v w x y z}}
-\put(65,-80){\hbox to 8.2cm{\bskbf a b c d e f g h i j k l m n o p q r s t u v w x y z}}
-\put(65,-90){\hbox to 8.2cm{\bski a b c d e f g h i j k l m n o p q r s t u v w x y z}}
-\put(65,-100){\hbox to 8.2cm{\bsk 0 1 2 3 4 5 6 7 8 9 ( [ +  - -- --- * / : ; = \char35\  \% \char141\ ] )}}
-\put(65,-112){\hbox to 8.2cm{\bsk fi \char130\ ff fl ffi ffl \char128\ \char129\ \char16\ \char17\ \char25\ \char26\ \char27\ \char28\ \char29\ \char30\ \char31\ \char36\ . , \char23\ \char22\ \char32\ \char21\ \char24\ \char18\ \char254\ \char255\  ` ' "}}
-\put(65,-122){\hbox to 8.2cm{\bsk \char0\ \char1\ \char2\ \char3\ \char4\ \char5\ \char6\ \char7\ \char8\ \char9\ \char10\ \char126\bskmi\ \char11\ \char12\ \char13\ \char14\ \char15\ \char16\ \char17\ \char18\ \char19\ \char20\ \char21\ \char22\ \char23\ \char25\ \char37\ \char27\ \char28\ \char29\ \char30\ \char 31\ \char32}}
-\put(65,-132){\hbox to 8.2cm{\bskmi \char96\ \char125\ \char64\ \char63\ \char92\ \char91\ \char93\ \char60\ \char62\ \char47\ \char94\ \char46\ \char40\ \char41\ \bsksy \char32\ \char33\ \char34\ \char35\ \char49\ \char50\ \char12\ \char97\ \color{modra}\bskex \char112\ \char84\ \char85}}
-\put(5,-80){\color{cervena}\font\bskex bskex10 at 30pt \bskex \put(0,0){\rotatebox{90}{\reflectbox{\char82}}}
-\put(0,-10){\bsksy \char35}\put(30,18){\bsksy \char34}\put(11,-13.5){\rotatebox{90}{\f\reflectbox{\char60}}}
-\color{modra}\put(5,7.5){\bskbf *}\put(9,8){\bskbf *}
-\put(23,10){\bskbf *}
-}
-\newpage\hsize 8.2cm\oddsidemargin 2.4cm\parindent 0pt
-\color{white}\bsk
-\para The `\Boisik\kern-.25ex' font is a Metafont typeface greatly inspired by Baskerville design. It is proposed as an alternative of Computer Modern fonts for mathematical typesetting: \Boisik{} will support all characters described in the book `\kern-.15ex{\bski Computer Modern Typefaces}' by D. E. Knuth. In addition, there is a character support for the Czech language. \hfill {\color{cervena}Á\,á\,È\,è\,Ï\,ï\,\kern.2exÉ\,é\,Ì\,ì\,Í\,í\,Ò\,ò\,Ø\,ø\,©\,¹\,«\kern.1ex»\,Ù\,ù\,Ú\,ú\,Ý\kern.1exý\,®\,¾}
-
-\para Current status of \Boisik{} is an alpha version: many features are missing, many don't work. I hope ({\bskbf not guarantee}) in the improvement in the future. Especially, next releases may extend symbols coverage to support following fonts: {\bski msam} and {\bski msbm} math fonts and text companion.\vskip 1mm
-
-\mbox{}\put(-63,10){\color{cervena}\vrule width 10.7cm height .8pt depth 0pt}
-\para Please, don't use \Boisik{} if you need excellent stability, precision, and quality of typesetting.
-
-\end{document}
diff --git a/Master/texmf-dist/doc/fonts/boisik/example/boisik-idiot.pdf b/Master/texmf-dist/doc/fonts/boisik/example/boisik-idiot.pdf
new file mode 100644
index 00000000000..729f4b06e6b
--- /dev/null
+++ b/Master/texmf-dist/doc/fonts/boisik/example/boisik-idiot.pdf
diff --git a/Master/texmf-dist/doc/fonts/boisik/boisik-idiot.tex b/Master/texmf-dist/doc/fonts/boisik/example/boisik-idiot.tex
index 9c39d4aed32..4a95fadff9b 100644
--- a/Master/texmf-dist/doc/fonts/boisik/boisik-idiot.tex
+++ b/Master/texmf-dist/doc/fonts/boisik/example/boisik-idiot.tex
@@ -1,4 +1,4 @@
-\input czech.sty
+%\input czech.sty
 \def\uv#1{\char254 #1\char255\relax}
 \footline{}
 \overfullrule 0pt
diff --git a/Master/texmf-dist/doc/fonts/boisik/example/boisik.pdf b/Master/texmf-dist/doc/fonts/boisik/example/boisik.pdf
new file mode 100644
index 00000000000..91d41555250
--- /dev/null
+++ b/Master/texmf-dist/doc/fonts/boisik/example/boisik.pdf
diff --git a/Master/texmf-dist/doc/fonts/boisik/example/boisik.tex b/Master/texmf-dist/doc/fonts/boisik/example/boisik.tex
new file mode 100644
index 00000000000..9d3fe23dc7c
--- /dev/null
+++ b/Master/texmf-dist/doc/fonts/boisik/example/boisik.tex
@@ -0,0 +1,49 @@
+\documentclass{article}
+\usepackage{color,graphicx,boisik,textcomp}
+\pagestyle{empty}
+\pdfpkresolution 1200
+\pagecolor{black}
+\definecolor{modra}{rgb}{.372,.486,1}
+\definecolor{cervena}{rgb}{1,.219,.556}
+\font\logo bskrlogo10 at 30pt
+\font\bskex bskex10 at 8pt
+\font\f bskmi10 at 30pt
+\pdfvorigin 1sp \pdfhorigin 1sp
+\pdfpagewidth 11cm \pdfpageheight 6cm
+\topmargin -.45in
+\oddsidemargin -.15in
+\def\para{\leavevmode\llap{\setbox0=\hbox{{\color{modra}$\P$}\ }\ht0=0pt\dp0=0pt\lower.8ex\box0}}
+\def\Boisik{{\color{modra}Boisik}}
+\def\BOISIK{\logo Bo\kern-2pt\reflectbox{\char131}\kern-2.5pt\raisebox{-3pt}[0pt]{s}\kern-2.5pt\char131\kern-1ptk}
+\begin{document}
+\mbox{}\unitlength1pt
+\put(5,0){\color{modra}\BOISIK}
+\put(0,-10){\color{cervena}\vrule width 10.7cm height .8pt depth 0pt}
+\put(0,-6){\color{modra}\hbox to 10.7cm{\hfill \normalfont METAFONT TYPEFACE FOR \TeX}}
+\color{white}\fontsize{8}{10}\selectfont
+\put(65,-40){\hbox to 8.2cm{A B C D E F G H I J K L M N O P Q R S T U V W X Y Z}}
+\put(65,-50){\hbox to 8.2cm{\textbf{A B C D E F G H I J K L M N O P Q R S T U V W X Y Z}}}
+\put(65,-60){\hbox to 8.2cm{\textit{A B C D E F G H I J K L M N O P Q R S T U V W X Y Z}}}
+\put(65,-70){\hbox to 8.2cm{a b c d e f g h i j k l m n o p q r s t u v w x y z}}
+\put(65,-80){\hbox to 8.2cm{\textbf{a b c d e f g h i j k l m n o p q r s t u v w x y z}}}
+\put(65,-90){\hbox to 8.2cm{\textit{a b c d e \ae{} f g $\varg$ h i j k l m n o \oe{} p q r s \ss{} t u v w x y z}}}
+\put(65,-100){\hbox to 8.2cm{0 1 2 3 4 5 6 7 8 9 ( $\{$ [ +  --  * / : ; = \#  \% \& @ \char141\ ] $\}$ )}}
+\put(65,-112){\hbox to 8.2cm{fi \char130\ ff fl ffi ffl \char128\ \char129\ \i{} \j{} \ss{} \ae{} \oe{} \o{} \AE{} \OE{} \O{} \$ . , \char23\ \char22\ \char32\ \char21\ \char24\ \char18\ \char254\ \char255\ \~\  ` ' "}}
+\put(65,-122){\hbox to 8.2cm{$\Gamma\Delta~\Theta\Lambda~\Xi~\Pi~\Sigma~\Upsilon~\Phi~\Psi~\Omega~
+\alpha~\beta~\varbeta~\gamma~\delta~\epsilon~\zeta~\eta~\theta~\iota~\kappa~\varkappa~\lambda~\mu~\nu~\pi~\sampi~\varrho~\sigma~\varsigma~\tau~
+\upsilon~\phi~\varphi~\chi~\psi$}}
+\put(65,-132){\hbox to 8.2cm{$\ell~\wp~\partial~{\star}~\Re~\Im~\natural~\flat~\sharp~{<}~{>}~{\triangleleft}~{\smile}~{\triangleright}~{\leftharpoonup}~
+{\leftarrow}~{\rightarrow}~{\uparrow}{\downarrow}~{\Lleftarrow}~{\infty}~{\in}~{\boxtimes}~{\gnapprox}~{\odot}~{\dashv}$\color{modra}\bskex \char112\ \char84\ \char85}}
+\put(5,-80){\color{cervena}\font\bskex bskex10 at 30pt \bskex \put(0,0){\rotatebox{90}{\reflectbox{\char82}}}
+\put(0,-14){$\downarrow$}\put(30,14){$\uparrow$}\put(11,-13.5){\rotatebox{90}{\f\reflectbox{\char60}}}
+\color{modra}\put(5,7.5){\textbf*}\put(9,8){\textbf*}\put(23,10){\textbf*}
+}
+\newpage\hsize 8.2cm\oddsidemargin 2.4cm\parindent 0pt\everypar{\para}
+\color{white}\fontsize{8}{12}\selectfont
+The `\Boisik\kern-.25ex' font is a Metafont typeface greatly inspired by Baskerville design. It is intended for mathematical typesetting: \Boisik{} supports all characters and math symbols described in the book `\kern-.15ex{\textit{Computer Modern Typefaces}}' by \textsc{D. E. Knuth}. Symbols from $\mathbb{AMS}$ font set (\textit{msam} and \textit{msbm}) and few others are supported too. Also letters for the Czech language and text companion symbols are available.\hfill {\def\,{\kern.2ex}\color{cervena}Á\,á\,È\,è\,Ï\,ï\kern.3exÉ\,é\,Ì\,ì\,Í\,í\,Ò\,ò\,Ø\,ø\,©\,¹\,«\,»\,Ù\,ù\,Ú\,ú\,Ý\,ý\,®\,¾\,\textmho\,\textmusicalnote\,\textonehalf\,\textmu}
+
+Current status of \Boisik{} is an alpha version: many features are missing, many don't work. I hope (\textbf{not guarantee}) in the improvement in the future. Note that the $\mathsf{Sans}$-$\mathsf{serif}$ math alphabet is faked one---\Boisik{} will never have sans-serif variant.\vskip 1mm
+
+\mbox{}\put(-63,10){\color{cervena}\vrule width 10.7cm height .8pt depth 0pt}
+Please, don't use \Boisik{} if you need excellent stability, precision, and quality of typesetting.
+\end{document}
diff --git a/Master/texmf-dist/doc/fonts/boisik/bskrlogo10.mf b/Master/texmf-dist/doc/fonts/boisik/example/bskrlogo10.mf
index 169612b9371..169612b9371 100644
--- a/Master/texmf-dist/doc/fonts/boisik/bskrlogo10.mf
+++ b/Master/texmf-dist/doc/fonts/boisik/example/bskrlogo10.mf
diff --git a/Master/texmf-dist/doc/fonts/boisik/table.pdf b/Master/texmf-dist/doc/fonts/boisik/example/table.pdf
index 83b91edacad..57b58c5be72 100644
--- a/Master/texmf-dist/doc/fonts/boisik/table.pdf
+++ b/Master/texmf-dist/doc/fonts/boisik/example/table.pdf
diff --git a/Master/texmf-dist/doc/fonts/boisik/table.tex b/Master/texmf-dist/doc/fonts/boisik/example/table.tex
index 2741c41db1b..5d767bd1280 100644
--- a/Master/texmf-dist/doc/fonts/boisik/table.tex
+++ b/Master/texmf-dist/doc/fonts/boisik/example/table.tex
@@ -128,8 +128,8 @@ fi&ff&fl&\char254\cr
 \sy\char'032&\sy\char'036&\sy\char'166&\sy\char'157\cr
 \sy\char'070&\sy\char'071&\sy\char'072&\sy\char'073\cr
 \sy\char'061&\sy\char'062&\sy\char'063&\sy\char'162\cr
-\sy\char2&\sy\char3&\sy\char4&\sy\char5\cr
-\sy\char6&\sy\char7&\sy\char14&\sy\char'057\cr
+\sy\char'314&\sy\char'315&\sy\char'324&\sy\char'325\cr
+\sy\char'303&\sy\char'371&\sy\char14&\sy\char'057\cr
 \sy\char'022&\sy\char'024&\sy\char'026&\sy\char'034\cr
 \sy\char'030&\sy\char'031&\sy\char'047&\sy\char'066\cr
 \sy\char'015&\sy\char'064&\sy\char'020&\sy\char'077\cr
@@ -137,13 +137,13 @@ fi&ff&fl&\char254\cr
 \break\leavevmode\vskip-1in
 \halign{&\vrule width 0pt height 3cm\hbox to 4cm{\hfill # \hfill}\cr
 \sy\char'170&\sy\char'172&\sy\char'173&\sy\char'060\cr
-\sy\char'174&\sy\char'175&\sy\char'176&\sy\char'177\cr
+\sy\char'174&\sy\char'175&\sy\char'176&\sy\char'267\cr
 \sy\char'040&\sy\char'044&\sy\char'050&\sy\char'054\cr
 \sy\char'045&\sy\char'046&\sy\char'055&\sy\char'056\cr
-\sy\char'010&\sy\char'011&\sy\char'012&\sy\char'013\cr
+\sy\char'200&\sy\char'201&\sy\char'202&\sy\char'013\cr
 \sy\char'074&\sy\char'075&\sy\char'100&\sy\char'155\cr
+\sy\char'374&\sy\char'375&\sy\char'376&\sy\char'373\cr
 }
-\end
 \break\leavevmode\vskip-1in
 \halign{&\vrule width 0pt height 3cm\hbox to 4cm{\hfill # \hfill}\cr
 \sy A&\sy B&\sy C&\sy D\cr
diff --git a/Master/texmf-dist/doc/fonts/boisik/example/testfont.pdf b/Master/texmf-dist/doc/fonts/boisik/example/testfont.pdf
new file mode 100644
index 00000000000..d4125cb14a7
--- /dev/null
+++ b/Master/texmf-dist/doc/fonts/boisik/example/testfont.pdf
diff --git a/Master/texmf-dist/doc/fonts/boisik/example/testfont.tex b/Master/texmf-dist/doc/fonts/boisik/example/testfont.tex
new file mode 100644
index 00000000000..8fde757eaf5
--- /dev/null
+++ b/Master/texmf-dist/doc/fonts/boisik/example/testfont.tex
@@ -0,0 +1,225 @@
+% A testbed for font evaluation (see The METAFONTbook, Appendix H)
+%  -- modified for Boisik
+
+\tracinglostchars=0
+\tolerance=1000
+\raggedbottom
+\nopagenumbers
+\parindent=0pt
+\newlinechar=`@
+\hyphenpenalty=200
+\doublehyphendemerits=30000
+\hyphenation{prom-i-nent}
+\vsize 26.5cm
+\newcount\m \newcount\n \newcount\p \newdimen\dim
+\chardef\other=12
+
+\def\today{\ifcase\month\or
+  January\or February\or March\or April\or May\or June\or
+  July\or August\or September\or October\or November\or December\fi
+  \space\number\day, \number\year}
+\def\hours{\n=\time \divide\n 60
+  \m=-\n \multiply\m 60 \advance\m \time
+  \twodigits\n\twodigits\m}
+\def\twodigits#1{\ifnum #1<10 0\fi \number#1}
+
+\def\init{\message{@Name of the font to test = }
+  \read-1 to\fontname \startfont
+  \message{Now type a test command (\string\help\space for help):}}
+\def\startfont{\font\testfont=\fontname \spaceskip=0pt
+  \leftline{\sevenrm Test of \fontname\unskip}
+  \medskip
+  \testfont \setbaselineskip
+  \ifdim\fontdimen6\testfont<10pt \rightskip=0pt plus 20pt
+  \else\rightskip=0pt plus 2em \fi
+  \spaceskip=\fontdimen2\testfont % space between words (\raggedright)
+  \xspaceskip=\fontdimen2\testfont \advance\xspaceskip by\fontdimen7\testfont}
+
+{\catcode`\|=0 \catcode`\\=\other
+|gdef|help{|message{%
+\init switches to another font;@%
+\end or \bye finishes the run;@%
+\table prints the font layout in tabular format;@%
+\text prints a sample text, assuming TeX text font conventions;@%
+\sample combines \table and \text;@%
+\mixture mixes a background character with a series of others;@%
+\alternation interleaves a background character with a series;@%
+\alphabet prints all lowercase letters within a given background;@%
+\ALPHABET prints all uppercase letters within a given background;@%
+\series prints a series of letters within a given background;@%
+\lowers prints a comprehensive test of lowercase;@%
+\uppers prints a comprehensive test of uppercase;@%
+\digits prints a comprehensive test of numerals;@%
+\math prints a comprehensive test of TeX math italic;@%
+\names prints a text that mixes upper and lower case;@%
+\punct prints a punctuation test;@%
+\bigtest combines many of the above routines;@%
+\help repeats this message;@%
+and you can use ordinary TeX commands (e.g., to \input a file).}}}
+
+\def\setbaselineskip{\setbox0=\hbox{\n=0
+\loop\char\n \ifnum \n<255 \advance\n 1 \repeat}
+\baselineskip=6pt \advance\baselineskip\ht0 \advance\baselineskip\dp0 }
+
+\def\setchar#1{{\escapechar-1\message{\string#1 character = }%
+  \def\do##1{\catcode`##1=\other}\dospecials
+  \read-1 to\next
+  \expandafter\finsetchar\next\next#1}}
+\def\finsetchar#1#2\next#3{\global\chardef#3=`#1
+  \ifnum #3=`\# \global\chardef#3=#2 \fi}
+\def\promptthree{\setchar\background
+  \setchar\starting \setchar\ending}
+
+\def\mixture{\promptthree \domix\mixpattern}
+\def\alternation{\promptthree \domix\altpattern}
+\def\mixpattern{\0\1\0\0\1\1\0\0\0\1\1\1\0\1}
+\def\altpattern{\0\1\0\1\0\1\0\1\0\1\0\1\0\1\0\1\0}
+\def\domix#1{\par\chardef\0=\background \n=\starting
+  \loop \chardef\1=\n %
+%moje zmena
+\setbox0=\hbox{\1}\def\delej{#1\endgraf}\ifdim\wd0=0pt \ifdim\ht0=0pt \ifdim\dp0=0pt \let\delej\relax \fi \fi \fi
+  \delej\ifnum \n<\ending \advance\n 1 \repeat \ifnum\n=90\0'\endgraf\fi}
+
+\def\!{\discretionary{\background}{\background}{\background}}
+\def\series{\promptthree \!\doseries\starting\ending\par}
+\def\doseries#1#2{\n=#1\loop\char\n\!\ifnum\n<#2\advance\n 1 \repeat}
+\def\complower{\!\doseries{`a}{`z}\doseries{'31}{'34}\par}
+\def\compupper{\!\doseries{`A}{`Z}\doseries{'35}{'37}\par}
+\def\compdigs{\!\doseries{`0}{`9}\par}
+\def\alphabet{\setchar\background\complower}
+\def\ALPHABET{\setchar\background\compupper}
+
+\def\lowers{\docomprehensive\complower{`a}{`z}{'31}{'34}}
+\def\uppers{\docomprehensive\compupper{`A}{`Z}{'35}{'37}}
+\def\digits{\docomprehensive\compdigs{`0}{`4}{`5}{`9}}
+\def\docomprehensive#1#2#3#4#5{\par\chardef\background=#2
+  \loop{#1} \ifnum\background<#3\m=\background\advance\m 1
+  \chardef\background=\m \repeat \chardef\background=#4
+  \loop{#1} \ifnum\background<#5\m=\background\advance\m 1
+  \chardef\background=\m \repeat}
+
+\def\names{ {\AA}ngel\aa\ Beatrice Claire
+  Diana \'Erica Fran\c{c}oise Ginette H\'el\`ene Iris
+  Jackie K\=aren {\L}au\.ra Mar{\'\i}a N\H{a}ta{\l}{\u\i}e {\O}ctave
+  Pauline Qu\^eneau Roxanne Sabine T\~a{\'\j}a Ur\v{s}ula
+  Vivian Wendy Xanthippe Yv{\o}nne Z\"azilie\par}
+\def\punct{\par\dopunct{min}\dopunct{pig}\dopunct{hid}
+  \dopunct{HIE}\dopunct{TIP}\dopunct{fluff}
+  \$1,234.56 + 7/8 = 9\% @ \#0\par}
+\def\dopunct#1{#1,\ #1:\ #1;\ `#1'\ ?`#1?\ !`#1!\ (#1)\ [#1]\ #1*\ #1.\par}
+
+\def\bigtest{\sample
+  hamburgefonstiv HAMBURGEFONSTIV\par
+  \names \punct \lowers \uppers \digits}
+
+\def\math{\textfont1=\testfont \skewchar\testfont=\skewtrial
+ \mathchardef\Gamma="100 \mathchardef\Delta="101
+ \mathchardef\Theta="102 \mathchardef\Lambda="103 \mathchardef\Xi="104
+ \mathchardef\Pi="105 \mathchardef\Sigma="106 \mathchardef\Upsilon="107
+ \mathchardef\Phi="108 \mathchardef\Psi="109 \mathchardef\Omega="10A
+ \def\ii{i} \def\jj{j}
+ \def\\##1{|##1|+}\mathtrial
+ \def\\##1{##1_2+}\mathtrial
+ \def\\##1{##1^2+}\mathtrial
+ \def\\##1{##1/2+}\mathtrial
+ \def\\##1{2/##1+}\mathtrial
+ \def\\##1{##1,{}+}\mathtrial
+ \def\\##1{d##1+}\mathtrial
+ \let\ii=\imath \let\jj=\jmath \def\\##1{\hat##1+}\mathtrial}
+\newcount\skewtrial \skewtrial='177
+\def\mathtrial{$\\A \\B \\C \\D \\E \\F \\G \\H \\I \\J \\K \\L \\M \\N \\O
+ \\P \\Q \\R \\S \\T \\U \\V \\W \\X \\Y \\Z \\a \\b \\c \\d \\e \\f \\g
+ \\h \\\ii \\\jj \\k \\l \\m \\n \\o \\p \\q \\r \\s \\t \\u \\v \\w \\x \\y
+ \\z \\\alpha \\\beta \\\gamma \\\delta \\\epsilon \\\zeta \\\eta \\\theta
+ \\\iota \\\kappa \\\lambda \\\mu \\\nu \\\xi \\\pi \\\rho \\\sigma \\\tau
+ \\\upsilon \\\phi \\\chi \\\psi \\\omega \\\vartheta \\\varpi \\\varphi
+ \\\Gamma \\\Delta \\\Theta \\\Lambda \\\Xi \\\Pi \\\Sigma \\\Upsilon
+ \\\Phi \\\Psi \\\Omega \\\partial \\\ell \\\wp$\par}
+\def\mathsy{\begingroup\skewtrial='060 % for math symbol font tests
+ \def\mathtrial{$\\A \\B \\C \\D \\E \\F \\G \\H \\I \\J \\K \\L
+  \\M \\N \\O \\P \\Q \\R \\S \\T \\U \\V \\W \\X \\Y \\Z$\par}
+ \math\endgroup}
+
+\def\oct#1{\hbox{\rm\'{}\kern-.2em\it#1\/\kern.05em}} % octal constant
+\def\hex#1{\hbox{\rm\H{}\tt#1}} % hexadecimal constant
+\def\setdigs#1"#2{\gdef\h{#2}% \h=hex prefix; \0\1=corresponding octal
+ \m=\n \divide\m by 64 \xdef\0{\the\m}%
+ \multiply\m by-64 \advance\m by\n \divide\m by 8 \xdef\1{\the\m}}
+\def\testrow{\setbox0=\hbox{\penalty 1\def\\{\char"\h}%
+ \\0\\1\\2\\3\\4\\5\\6\\7\\8\\9\\A\\B\\C\\D\\E\\F%
+ \global\p=\lastpenalty}} % \p=1 if none of the characters exist
+\def\oddline{\cr
+  \noalign{\nointerlineskip}
+  \multispan{19}\hrulefill&
+  \setbox0=\hbox{\lower 2.3pt\hbox{\hex{\h x}}}\smash{\box0}\cr
+  \noalign{\nointerlineskip}}
+\newif\ifskipping
+\def\evenline{\loop\skippingfalse
+ \ifnum\n<256 \m=\n \divide\m 16 \chardef\next=\m
+ \expandafter\setdigs\meaning\next \testrow
+ \ifnum\p=1 \skippingtrue \fi\fi
+ \ifskipping \global\advance\n 16 \repeat
+ \ifnum\n=256 \let\next=\endchart\else\let\next=\morechart\fi
+ \next}
+\def\morechart{\cr\noalign{\hrule\penalty5000}
+ \chartline \oddline \m=\1 \advance\m 1 \xdef\1{\the\m}
+ \chartline \evenline}
+\def\chartline{&\oct{\0\1x}&&\:&&\:&&\:&&\:&&\:&&\:&&\:&&\:&&}
+\def\chartstrut{\lower4.5pt\vbox to14pt{}}
+\def\table{$$\global\n=0
+  \halign to.8\hsize\bgroup
+    \chartstrut##\tabskip0pt plus10pt&
+    &\hfil##\hfil&\vrule##\cr
+    \lower6.5pt\null
+    &&&\oct0&&\oct1&&\oct2&&\oct3&&\oct4&&\oct5&&\oct6&&\oct7&\evenline}
+\def\endchart{\cr\noalign{\hrule}
+  \raise11.5pt\null&&&\hex 8&&\hex 9&&\hex A&&\hex B&
+  &\hex C&&\hex D&&\hex E&&\hex F&\cr\egroup$$\par}
+\def\:{\setbox0=\hbox{\noboundary\char\n\noboundary}%
+  \ifdim\ht0>7.5pt\reposition
+  \else\ifdim\dp0>2.5pt\reposition\fi\fi
+  \box0\global\advance\n 1 }
+\def\reposition{\setbox0=\vbox{\kern2pt\box0}\dim=\dp0
+  \advance\dim 2pt \dp0=\dim}
+\def\centerlargechars{
+  \def\reposition{\setbox0=\hbox{$\vcenter{\kern2pt\box0\kern2pt}$}}}
+
+\def\text{{\advance\baselineskip-4pt
+On November 14, 1885, Senator \& Mrs.~Leland Stanford called
+together at their San Francisco mansion the 24~prominent men who had
+been chosen as the first trustees of The Leland Stanford Junior University.
+They handed to the board the Founding Grant of the University, which they
+had executed three days before. This document---with various amendments,
+legislative acts, and court decrees---remains as the University's charter.
+In bold, sweeping language it stipulates that the objectives of the University
+are ``to qualify students for personal success and direct usefulness in life;
+and to promote the publick welfare by exercising an influence in behalf of
+humanity and civilization, teaching the blessings of liberty regulated by
+law, and inculcating love and reverence for the great principles of
+government as derived from the inalienable rights of man to life, liberty,
+and the pursuit of happiness.'' \moretext
+(!`THE DAZED BROWN FOX QUICKLY GAVE 12345--67890 JUMPS!)\par}}
+\def\moretext{?`But aren't Kafka's Schlo{\ss} and {\AE}sop's {\OE}uvres
+often na{\"\i}ve  vis-\`a-vis the d{\ae}monic ph{\oe}nix's official r\^ole
+in fluffy souffl\'es? }
+\def\omitaccents{\let\moretext=\relax}
+
+\def\sample{\table\text}
+
+%\ifx\noinit!\else\init\fi
+\def\bskfont#1{\def\fontname{#1}\startfont\table}
+\def\ep{\vfill\eject}
+\bskfont{bskr10}\ep
+\bskfont{bski10}\ep
+\bskfont{bskiu10}\ep
+\bskfont{bskrw10}\ep
+\bskfont{bskr10-T1}\ep
+\bskfont{bskr10-TS1}\ep
+\bskfont{bsksc10}\ep
+\bskfont{bskmi10}\ep
+\bskfont{bsksy10}\ep
+\bskfont{bskms10}\ep
+\bskfont{bskex10}\ep
+\bskfont{bskma10}
+\bskfont{bskhc10}
+\end