summaryrefslogtreecommitdiff
path: root/macros/generic/cptex/cp850.sty
diff options
context:
space:
mode:
authorNorbert Preining <norbert@preining.info>2019-09-02 13:46:59 +0900
committerNorbert Preining <norbert@preining.info>2019-09-02 13:46:59 +0900
commite0c6872cf40896c7be36b11dcc744620f10adf1d (patch)
tree60335e10d2f4354b0674ec22d7b53f0f8abee672 /macros/generic/cptex/cp850.sty
Initial commit
Diffstat (limited to 'macros/generic/cptex/cp850.sty')
-rw-r--r--macros/generic/cptex/cp850.sty119
1 files changed, 119 insertions, 0 deletions
diff --git a/macros/generic/cptex/cp850.sty b/macros/generic/cptex/cp850.sty
new file mode 100644
index 0000000000..4c70ee459c
--- /dev/null
+++ b/macros/generic/cptex/cp850.sty
@@ -0,0 +1,119 @@
+%
+% TeX-Definitionen fr die Code Page 850, Int'l PC encoding
+%
+% (C) 1994 FuturaSoft (Martin Krmer, D-49179 Ostercappeln)
+%
+% Changes between Version 1.1 and 1.0:
+% - character `^^fa' is now defined to be directly `\mathsymbol{\cdot}'
+% (this makes actually no difference until `\smallcdot' is redefined)
+%
+\typeout{Document Style Option `cp850' Version 1.1 <1 Mar 1994>.}
+%
+%
+\@ifundefined{selectcodepage}{\input cp.sty}{}
+
+\activateuppercharset
+
+\newcodepage{850}{
+
+ \selectcodepage[original,vert]{437}
+
+ \mapchar{^^83}{\^a}\ucchar{^^b6}
+ \mapchar{^^85}{\`a}\ucchar{^^b7}
+ \mapchar{^^88}{\^e}\ucchar{^^d2}
+ \mapchar{^^89}{\"e}\ucchar{^^d3}
+ \mapchar{^^8a}{\`e}\ucchar{^^d4}
+ \mapchar{^^8b}{\"\i}\ucchar{^^d8}
+ \mapchar{^^8c}{\^\i}\ucchar{^^d7}
+ \mapchar{^^8d}{\`\i}\ucchar{^^de}
+ \mapchar{^^93}{\^o}\ucchar{^^e2}
+ \mapchar{^^95}{\`o}\ucchar{^^e3}
+ \mapchar{^^96}{\^u}\ucchar{^^ea}
+ \mapchar{^^97}{\`u}\ucchar{^^eb}
+%
+ \mapchar{^^9b}{\o}\ucchar{^^9d}
+%
+ \mapchar{^^9d}{\O}\lcchar{^^9b}
+ \mapchar{^^9e}{\mathsymbol{\times}} % MS
+%
+ \mapchar{^^a0}{\'a}\ucchar{^^b5}
+ \mapchar{^^a1}{\'\i}\ucchar{^^d6}
+ \mapchar{^^a2}{\'o}\ucchar{^^e0}
+ \mapchar{^^a3}{\'u}\ucchar{^^e9}
+%
+ \mapchar{^^a9}{\circledR} % MA
+ \mapchar{^^aa}{\mathsymbol{\neg}} % MS
+%
+ \mapchar{^^b5}{\'A}\lcchar{^^a0}
+ \mapchar{^^b6}{\^A}\lcchar{^^83}
+ \mapchar{^^b7}{\`A}\lcchar{^^85}
+ \mapchar{^^b8}{\copyright} % roman+MS
+%
+ \mapchar{^^bd}{\cent} % F
+ \mapchar{^^be}{\yen} % MA
+%
+ \mapchar{^^c6}{\~a}\ucchar{^^c7}
+ \mapchar{^^c7}{\~A}\lcchar{^^c6}
+%
+ \mapchar{^^cf}{\currency} % MS
+ \mapchar{^^d0}{\eth}\ucchar{^^d1} % MB
+ \mapchar{^^d1}{\Eth}\lcchar{^^d0} % F
+ \mapchar{^^d2}{\^E}\lcchar{^^88}
+ \mapchar{^^d3}{\"E}\lcchar{^^89}
+ \mapchar{^^d4}{\`E}\lcchar{^^8a}
+ \mapchar{^^d5}{\i}\uctext{\I{}}
+ \mapchar{^^d6}{\'I}\lcchar{^^a1}
+ \mapchar{^^d7}{\^I}\lcchar{^^8c}
+ \mapchar{^^d8}{\"I}\lcchar{^^8b}
+%
+ \mapchar{^^dd}{\brokenvert} % rules+MS(ex)
+ \mapchar{^^de}{\`I}\lcchar{^^8d}
+%
+ \mapchar{^^e0}{\'O}\lcchar{^^a2}
+ \mapchar{^^e1}{\ss}\uctext{\SS{}}
+ \mapchar{^^e2}{\^O}\lcchar{^^93}
+ \mapchar{^^e3}{\`O}\lcchar{^^95}
+ \mapchar{^^e4}{\~o}\ucchar{^^e5}
+ \mapchar{^^e5}{\~O}\lcchar{^^e4}
+%
+ \mapchar{^^e7}{\thorn}\ucchar{^^e8} % F
+ \mapchar{^^e8}{\Thorn}\lcchar{^^e7} % roman
+ \mapchar{^^e9}{\'U}\lcchar{^^a3}
+ \mapchar{^^ea}{\^U}\lcchar{^^96}
+ \mapchar{^^eb}{\`U}\lcchar{^^97}
+ \mapchar{^^ec}{\'y}\ucchar{^^ed}
+ \mapchar{^^ed}{\'Y}\lcchar{^^ec}
+ \mapchar{^^ee}{\={}} % F
+ \mapchar{^^ef}{\'{}} % F
+ \mapchar{^^f0}{\hyphen} % F
+%
+ \mapchar{^^f2}{\Underscore} % rules(ex)
+ \mapchar{^^f3}{\mathsymbol{\slashfrac34}} % F+MS
+ \mapchar{^^f4}{\P} % MS
+ \mapchar{^^f5}{\S} % MS
+%
+ \mapchar{^^f7}{\c{}} % F
+%
+ \mapchar{^^f9}{\"{}} % F
+ \mapchar{^^fa}{\mathsymbol{\cdot}}
+ \mapchar{^^fb}{\mathsymbol{\xnolimits^1}} % F
+ \mapchar{^^fc}{\mathsymbol{\xnolimits^3}} % F
+
+%
+% Zuruecksetzen der Original-Definitionen
+%
+\def\cporiginal{%
+ \mapchar{^^b3}{\graphsymbol{\hfill\vline\hfill}}%
+ \mapchar{^^ba}{\graphsymbol{\hfill\Vline\hfill}}%
+ \mapchar{^^c4}{\graphsymbol{\hlinefill}}}
+
+\let\cpvert=\relax
+\def\cpgerman{}
+\let\cpneg=\relax
+
+}%\end{newcodepage}
+
+%
+% Einstellen der Code Page 850
+%
+\selectcodepage{850}