summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/doc/latex/ucs/unsupported/tables.inc
diff options
context:
space:
mode:
Diffstat (limited to 'Master/texmf-dist/doc/latex/ucs/unsupported/tables.inc')
-rw-r--r--Master/texmf-dist/doc/latex/ucs/unsupported/tables.inc216
1 files changed, 216 insertions, 0 deletions
diff --git a/Master/texmf-dist/doc/latex/ucs/unsupported/tables.inc b/Master/texmf-dist/doc/latex/ucs/unsupported/tables.inc
new file mode 100644
index 00000000000..77d4eccc2ce
--- /dev/null
+++ b/Master/texmf-dist/doc/latex/ucs/unsupported/tables.inc
@@ -0,0 +1,216 @@
+\ProvidesFile{tables.inc}[2002/11/23 Common LaTeX code for character charts]
+
+\documentclass{article}
+\usepackage{geometry}
+\usepackage{ucs}
+\usepackage{colortbl}
+
+\nofiles
+
+\makeatletter
+
+\ifx\TeXXeTstate\undefined\else\TeXXeTstate=1\fi
+
+\def\format@table{table}
+\def\@thirdoffour#1#2#3#4{#3}
+
+\newcommand\combineglyph{o}
+\def\ONE{1}
+
+\newcommand\callcombineglyph[1]{\acombineglyph}
+
+\newcommand\init@table{
+ \count255=\gstart\divide\count255by16\multiply\count255by16\relax
+ \ifnum\gstart=\count255\relax\else
+ \PackageError{ucs::tables}{I need a multiple of 16 as beginning of
+ the range, when format table is used (I got \gstart!=\number\count255)}\fi
+ %
+ \definecolor{notfound}{rgb}{.7,.7,.7}
+ \definecolor{withoption}{rgb}{.9,.9,.9}
+ \definecolor{combining}{rgb}{0.9,1,1}
+ \definecolor{control}{rgb}{1,1,.9}
+ \definecolor{outside}{rgb}{1,0,0}
+ \definecolor{notassigned}{rgb}{.5,.5,.5}
+ %
+ \ifx\blackwhite\undefined
+ \newcolumntype{A}{>{\columncolor{notfound}}D}
+ \newcolumntype{B}{>{\columncolor{withoption}}D}
+ \newcolumntype{C}{>{\columncolor{outside}}D}
+ \newcolumntype{D}{>{\hfill}m{1.6em}<{\hfill\null}}
+ \newcolumntype{E}{>{\mystrut}c}
+ \newcolumntype{F}{>{\columncolor{combining}}D}
+ \newcolumntype{G}{>{\columncolor{notassigned}}D}
+ \newcolumntype{H}{>{\columncolor{control}}D}
+ \else
+ \newcolumntype{A}{>{\columncolor{notfound}}D}
+ \newcolumntype{B}{D}
+ \newcolumntype{C}{>{\columncolor{outside}}D}
+ \newcolumntype{D}{>{\hfill}m{1.6em}<{\hfill\null}}
+ \newcolumntype{E}{>{\mystrut}c}
+ \newcolumntype{F}{D}
+ \newcolumntype{G}{>{\columncolor{notassigned}}D}
+ \newcolumntype{H}{D}
+ \fi
+ %
+ \def\amper{&}
+ \newcommand\mystrut{\rule{0pt}{12pt}}
+ \newcommand\tend{%
+ \\\hline%
+ \end{tabular}%
+ \end{document}}
+ \newcommand\table@field[1]{%
+% \typeout{<\ahexcode>}%
+ \count255=\acode\divide\count255by16\multiply\count255by16\relax
+ \advance\count255by-\acode\relax
+ \ifnum\count255=0\relax
+ \expandafter\\\ahexcodebeforelast0\fi%
+ &##1%
+ }%
+ \newcommand\noglyph{\table@field{\multicolumn{1}{A|}{}}}
+ \newcommand\unassigned{\table@field{\multicolumn{1}{G|}{}}}
+ \newcommand\withoption{\table@field{\multicolumn{1}{B|}{}}}
+ \newcommand\glyph{%
+ \edef\muco{\noexpand\multicolumn{1}{%
+ \ifx\actrlglyph\undefined
+ \ifx\acombining\ONE F\else D\fi
+ \else
+ H%
+ \fi|}}%
+ \expandafter\table@field\expandafter{\muco{\dirt%
+ \ifx\arightleft\ONE\beginR\fi
+ \ifx\afontenc\undefined\else
+ \fontencoding{\afontenc}\selectfont\fi
+ \ifx\afontfamily\undefined\else
+ \fontfamily{\afontfamily}\selectfont\fi
+ \ifx\aoption\undefined\else
+ \SetUnicodeOption{no\goption}\SetUnicodeOption{\aoption}\fi
+ \ifx\atableglyph\undefined
+ \atableenvelope{%
+ \ifx\acombining\ONE
+ \SetUnicodeOption{combine}%
+ \ifx\acombinechar\undefined
+ \uc@output{\csname callcombineglyph\endcsname}{-1}%
+ \else
+ \SetUnicodeOption[1000]{\acombineoption}%
+ \unichar{\acombinechar}%
+ \fi
+ \unichar{\acode}%
+ \SetUnicodeOption{nocombine}%
+ \else
+ \unichar{\acode}\fi%
+ }%
+ \else
+ \atableglyph\fi
+ \ifx\arightleft\ONE\endR\fi
+% /\SetUnicodeOption{nodefault}\SetUnicodeOption{warnunknown}%
+% \SetUnicodeOption{fasterrors}\SetUnicodeOption{graphics}\unichar{\acode}
+ \clearargs
+ }}}
+ \let\start\table@start
+ \clearargs
+}
+
+\newcommand\clearargs{%
+ \global\let\afontenc\undefined
+ \global\let\afontfamily\undefined
+ \global\let\adirty\undefined
+ \global\let\acombining\undefined
+ \global\let\acode\undefined
+ \global\let\aoption\undefined
+ \global\let\ahexcode\undefined
+ \global\let\acombineglyph\combineglyph
+ \global\let\acombinechar\undefined
+ \global\def\acombineoption{default}%
+ \global\let\atableglyph\undefined
+ \global\let\atableenvelope\@iden
+}
+
+\newcommand\dirt{\expandafter\ifx\adirty1%
+ \typeout{Dirt!}%
+ \SetUnicodeOption[0]{default}%
+ \SetUnicodeOption[-20]{mathletters}%
+ \SetUnicodeOption[-10]{cjkjis}%
+ \fi}
+
+\newcommand\old@glyph{%
+ \expandafter\ifx\adirty1
+ \typeout{Dirty \acode\space = 0x\ahexcode}%
+ \noglyph%
+ \else
+ \@glyph
+ \fi}
+
+\newcommand\table@start{%
+ \begin{tabular}{|E||D|D|D|D|D|D|D|D|D|D|D|D|D|D|D|D|}
+ \hline
+ \multicolumn{17}{|l|}{Range: U+\ghstart--U+\ghend, option: \goption}\\
+ \hline\hline
+ & 0 & 1 & 2 & 3 & 4 & 5 & 6 & 7 & 8 & 9 & A & B & C & D & E & F\\
+ \hline
+ \let\\\relax
+}
+
+\newcommand\clearoptions{%
+ \let\uc@tempa\\
+ \def\\##1{\SetUnicodeOption{no##1}}
+ \unicode@knownoptions
+ \let\\\uc@tempa}
+
+\newcommand\loadpackages{%
+ \ifx\gfontencs\undefined\else
+ \expandafter\usepackage\expandafter[\gfontencs]{fontenc}\fi
+ \ifx\brailleunit\undefined\else
+ \divide\brailleunit2\fi
+}
+
+\newcommand\tstart{
+ \loadpackages
+ \begin{document}
+ \thispagestyle{empty}
+ \clearoptions
+ \SetUnicodeOption{\goption}
+ \ifx\gformat\format@table
+ \init@table
+ \else
+ \PackageError{ucs::tables}{Unknown format \gformat}
+ \fi
+ \typeout{Generating table, format: \gformat}
+ \table@start
+}
+
+%%% These are for my local definitions...
+\newcommand\coleq{%
+ \mathrel{%
+ \raise 3.0pt\hbox to0pt{.\hss}%
+ \raise 0.85pt\hbox to 0pt{.\hss}%
+ \hskip2.8pt\hbox{$=$}}}%
+\newcommand{\qed}{\ensuremath{\rule{.6em}{.6em}}}
+%
+\iffalse
+\newcommand\mathbfit[1]{\hbox{\bf\it #1}}
+\newcommand\mathsfbf[1]{\hbox{\bf\sf #1}}
+\newcommand\mathsfit[1]{\hbox{\it\sf #1}}
+\newcommand\mathsfbfit[1]{\hbox{\bf\sf\it #1}}
+\newcommand\mathbfxxx[3]{\rlap{\m@th$#1{#3}$}\hskip#2%
+\rlap{\m@th$#1{#3}$}\hskip#2%
+\rlap{\m@th$#1{#3}$}\hskip#2%
+#1{#3}}
+\newcommand\mathbfcal[1]{\mathbfxxx\mathcal{.2pt}{#1}}
+\newcommand\mathbfcalsmall[1]{\mathbfxxx\mathcalsmall{.2pt}{#1}}
+\newcommand\mathbffrak[1]{\mathbfxxx\mathfrak{.2pt}{#1}}
+\newcommand\mathcalsmall[1]{{\scriptscriptstyle\expandafter\mathcal\expandafter
+ {\uppercase{#1}}}}
+\fi
+% m4_emacs(
+%%% Local Variables:
+%%% mode: latex
+%%% time-stamp-start: "\\\\Provides\\(Package\\|File\\){[^}]*}\\["
+%%% time-stamp-end: "\\( \\|\\]\\)"
+%%% time-stamp-format: (time-stamp-yyyy/mm/dd)
+%%% time-stamp-active: t
+%%% time-stamp-line-limit: 200
+%%% TeX-master: "~/prg/latexuni/tables/table-default-2000-20FF.tex"
+%%% End:
+%%% Local IspellDict: british
+% LocalWords: british noexpand
+% )