summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/tex/csplain/opmac/fontfam-catalog.tex
diff options
context:
space:
mode:
Diffstat (limited to 'Master/texmf-dist/tex/csplain/opmac/fontfam-catalog.tex')
-rw-r--r--Master/texmf-dist/tex/csplain/opmac/fontfam-catalog.tex55
1 files changed, 55 insertions, 0 deletions
diff --git a/Master/texmf-dist/tex/csplain/opmac/fontfam-catalog.tex b/Master/texmf-dist/tex/csplain/opmac/fontfam-catalog.tex
new file mode 100644
index 00000000000..56ac94e3c53
--- /dev/null
+++ b/Master/texmf-dist/tex/csplain/opmac/fontfam-catalog.tex
@@ -0,0 +1,55 @@
+%% fontfam-catalog.tex
+%%%%%%%%%%%%%%%%%%%%%%
+% Petr Olsak, 2016
+
+% This is module for OPmac macros, see http://petr.olsak.net/opmac.html
+% This module is automatically loaded when \fontfam[Catalog] is used.
+
+% See end of the file fontfam.tex for more details.
+
+\def\fontfamexecC#1#2#3#4#5#6#7{\testfotenc{#6}%
+ \iftrue\ifx\relax#2\relax \else
+ \par #7
+ \edef\basicfont{\fontname\the\font}%
+ \noindent {[#1]}\par\nobreak
+ \def\variants{#2}
+ \pcatA {}#3\relax
+ \medskip
+ \fi\fi
+}
+\def\pcatA#1{\ifx#1\relax\par\else
+ \def\prefix{#1}\expandafter\pcatB\variants\relax
+ \expandafter\pcatA\fi
+}
+\def\pcatB#1{\ifx#1\relax\par\else
+ \indent
+ {\currtt \ifx\prefix\empty \else \expandafter\string\prefix\fi
+ \string#1 }{\prefix#1%
+ \edef\tmp{\ifx\prefix\empty\else\fontname\the\font\fi}%
+ \ifx\tmp\basicfont {\currtt Not available}\else \fontfamsample \fi
+ \par}%
+ \expandafter\pcatB\fi
+}
+
+\nonum\sec Font Catalogue
+
+\begingroup
+
+Generated \the\day/\the\month/\the\year\space by
+{\tt \string\fontfam[Catalog]} (from OPmac).
+Encoding: \fotenc, \dimen0=\baselineskip
+size: \expandafter\ignorept\the\fontdim /\expandafter\ignorept\the\dimen0
+\bigskip
+
+\ifx\sizespec\empty \def\sizespec{at10pt}\fi
+\letfont\currtt=\tentt
+\ifx\loadmathfonts\undefined \let\loadmathfonts=\relax \fi
+\let\fontfamexec=\fontfamexecC
+\ifx\fontfamsample\undefined
+ \def\fontfamsample{ABCDabcd áéíóúů řžč ÁÉÍÓÚŮ ŘŽČ 0123456789}
+\fi
+\fontfamL
+\endgroup
+
+\endinput
+