]> matita.cs.unibo.it Git - helm.git/blobdiff - share/texmf/unicode/contrib/c42enc.def
the Matita manual is now convertible to a decent .tex that is processable both
[helm.git] / share / texmf / unicode / contrib / c42enc.def
diff --git a/share/texmf/unicode/contrib/c42enc.def b/share/texmf/unicode/contrib/c42enc.def
new file mode 100644 (file)
index 0000000..b4338d7
--- /dev/null
@@ -0,0 +1,126 @@
+%%
+%% This is file `c42enc.def',
+%% generated with the docstrip utility.
+%%
+%% The original source files were:
+%%
+%% ucs.dtx  (with options: `c42enc.def')
+%% 
+%% Copyright 2001 Dominique Unruh <dominique@unruh.de>
+%% 
+%% This program is provided under the terms of the LaTeX Project Public
+%% License with some modifications.
+%% See the file LICENSE (http://www.unruh.de/DniQ/latex/unicode/content/LICENSE)
+%% for information.
+%% 
+\ProvidesFile{c42enc.def}[2002/11/25 Fontencoding C42 (JISdnp)]%
+\DeclareFontEncoding{C42}{}{}%
+\DeclareFontSubstitution{C42}{song}{m}{n}%
+\input{cenccmn.tex}%
+\expandafter\let\csname C42/song/m/n\endcsname\undefined
+\def\cjk@Cfrttw@#1#2#3{%
+  \advance\count1 by#3
+  \ifnum\count1>256\advance\count1by-256\def\temp@a{#2}\else\def\temp@a{#1}\fi
+  %\typeout{#1/#2/#3, \meaning\temp@a, \number\count1}%
+}
+\def\cjk@Cfrttw#1#2#3#4{% Takes JIS0208 codepos in hex
+  %\typeout{JIS: #1#2#3#4}%
+  {%
+    \count0="#1#2 \count1="#3#4
+    \advance\count0by-33
+    \expandafter\cjk@Cfrttw@
+    \ifcase\count0
+    {sy}{err}{-32}\or % 0
+    {sy}{err}{68}\or % 1
+    {roma}{err}{0}\or % 2
+    {hira}{err}{-32}\or % 3
+    {kata}{err}{-32}\or % 4
+    {greek}{err}{-32}\or % 5
+    {russian}{err}{-32}\or % 6
+    {keisen}{err}{-32}\or % 7
+    {err}{err}{128}\or % 8
+    {err}{err}{128}\or % 9
+    {err}{err}{128}\or % 10
+    {err}{err}{128}\or % 11
+    {err}{err}{128}\or % 12
+    {err}{err}{128}\or % 13
+    {err}{err}{128}\or % 14
+    {ka}{err}{-33}\or % 15
+    {ka}{err}{61}\or % 16
+    {ka}{kb}{155}\or % 17
+    {kb}{err}{-7}\or % 18
+    {kb}{err}{87}\or % 19
+    {kb}{kc}{181}\or % 20
+    {kc}{err}{19}\or % 21
+    {kc}{err}{113}\or % 22
+    {kc}{kd}{207}\or % 23
+    {kd}{err}{45}\or % 24
+    {kd}{ke}{139}\or % 25
+    {ke}{err}{-23}\or % 26
+    {ke}{err}{71}\or % 27
+    {ke}{kf}{165}\or % 28
+    {kf}{err}{3}\or % 29
+    {kf}{err}{97}\or % 30
+    {kf}{kg}{191}\or % 31
+    {kg}{err}{29}\or % 32
+    {kg}{err}{123}\or % 33
+    {kg}{kh}{217}\or % 34
+    {kh}{err}{55}\or % 35
+    {kh}{ki}{149}\or % 36
+    {ki}{err}{-13}\or % 37
+    {ki}{err}{81}\or % 38
+    {ki}{kj}{175}\or % 39
+    {kj}{err}{13}\or % 40
+    {kj}{err}{107}\or % 41
+    {kj}{kk}{201}\or % 42
+    {kk}{err}{39}\or % 43
+    {kk}{kl}{133}\or % 44
+    {kl}{err}{-29}\or % 45
+    {kl}{err}{65}\or % 46
+    {km}{err}{-33}\or % 47
+    {km}{err}{61}\or % 48
+    {km}{kn}{155}\or % 49
+    {kn}{err}{-7}\or % 50
+    {kn}{err}{87}\or % 51
+    {kn}{ko}{181}\or % 52
+    {ko}{err}{19}\or % 53
+    {ko}{err}{113}\or % 54
+    {ko}{kp}{207}\or % 55
+    {kp}{err}{45}\or % 56
+    {kp}{kq}{139}\or % 57
+    {kq}{err}{-23}\or % 58
+    {kq}{err}{71}\or % 59
+    {kq}{kr}{165}\or % 60
+    {kr}{err}{3}\or % 61
+    {kr}{err}{97}\or % 62
+    {kr}{ks}{191}\or % 63
+    {ks}{err}{29}\or % 64
+    {ks}{err}{123}\or % 65
+    {ks}{kt}{217}\or % 66
+    {kt}{err}{55}\or % 67
+    {kt}{ku}{149}\or % 68
+    {ku}{err}{-13}\or % 69
+    {ku}{err}{81}\or % 70
+    {ku}{kv}{175}\or % 71
+    {kv}{err}{13}\or % 72
+    {kv}{err}{107}\or % 73
+    {kv}{kw}{201}\or % 74
+    {kw}{err}{39}\or % 75
+    {kw}{kx}{133}\or % 76
+    {kx}{err}{-29}\or % 77
+    {kx}{err}{65}\or % 78
+    {kx}{ky}{159}\or % 79
+    {ky}{err}{-3}\or % 80
+    {ky}{err}{91}\or % 81
+    {ky}{kz}{185}\or % 82
+    {kz}{err}{23}\else % 83
+    {err}{err}0\fi
+    \edef\temp@b{\ifx\temp@a\CJK@plane\else
+      \def\noexpand\CJK@plane{\temp@a}\noexpand\selectfont\fi
+      \char\number\count\@ne\space}%
+    %\typeout{C42: \meaning\temp@b}%
+    \expandafter}\temp@b%
+  }%
+\DeclareTextCommand\jischar{C42}[1]{\cjk@Cfrttw#1}
+\DeclareTextCommandDefault\jischar[1]{{\fontencoding{C42}%
+    \let\CJK@plane\undefined\cjk@Cfrttw#1}}