summaryrefslogtreecommitdiff
path: root/macros/generic/cptex/cp437.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/cp437.sty
Initial commit
Diffstat (limited to 'macros/generic/cptex/cp437.sty')
-rw-r--r--macros/generic/cptex/cp437.sty252
1 files changed, 252 insertions, 0 deletions
diff --git a/macros/generic/cptex/cp437.sty b/macros/generic/cptex/cp437.sty
new file mode 100644
index 0000000000..e76ddf6929
--- /dev/null
+++ b/macros/generic/cptex/cp437.sty
@@ -0,0 +1,252 @@
+%
+% TeX-Definitionen fr die Code Page 437, U.S. PC encoding
+%
+% (C) 1994 FuturaSoft (Martin Krmer, D-49179 Ostercappeln)
+%
+\typeout{Document Style Option `cp437' Version 1.0 <18 Feb 1994>.}
+%
+%
+\@ifundefined{selectcodepage}{\input cp.sty}{}
+
+\activatefullcharset
+
+\newcodepage{437}{
+
+ \selectcodepage[original]{texascii}
+ \activatefullcharset
+
+% Font: F = aktueller, MI = Mathe-Italic, MS = Mathe-Symbol, MA/B = msa/bm
+ \mapchar{^^00}{\nbspace} % F
+ \mapchar{^^01}{\smiley} % MS+MI
+ \mapchar{^^02}{\blacksmiley} % MS+MI
+ \mapchar{^^03}{\mathsymbol{\heartsuit}} % MS
+ \mapchar{^^04}{\mathsymbol{\diamondsuit}} % MS
+ \mapchar{^^05}{\mathsymbol{\clubsuit}} % MS
+ \mapchar{^^06}{\mathsymbol{\spadesuit}} % MS
+ \mapchar{^^07}{\mathsymbol{\bullet}} % MS
+ \mapchar{^^08}{\invbullet} % MS
+ %\mapchar{^^09}{\mathsymbol{\circ}} % MS
+ \mapchar{^^0a}{\invcirc} % MS
+ \mapchar{^^0b}{\male} % circle(ex)+MS
+ %\mapchar{^^0c}{\female} % circle+line(ex)
+ %\mapchar{^^0d}{\musicalnote} % circle+line(ex)
+ \mapchar{^^0e}{\Musicalnote} % circle+line(ex)
+ \mapchar{^^0f}{\sun} % MA
+ \mapchar{^^10}{\mathsymbol{\blacktriangleright}} % MA
+ \mapchar{^^11}{\mathsymbol{\blacktriangleleft}} % MA
+ \mapchar{^^12}{\mathsymbol{\updownarrow}} % MS
+ \mapchar{^^13}{\Exclam} % F
+ \mapchar{^^14}{\P} % MS
+ \mapchar{^^15}{\S} % MS
+ \mapchar{^^16}{\Bar} % F (no italic)
+ \mapchar{^^17}{\mathsymbol{\underline{\updownarrow}}} % MS
+ \mapchar{^^18}{\mathsymbol{\uparrow}} % MS
+ \mapchar{^^19}{\mathsymbol{\downarrow}} % MS
+ \mapchar{^^1a}{\mathsymbol{\rightarrow}} % MS
+ \mapchar{^^1b}{\mathsymbol{\leftarrow}} % MS
+ \mapchar{^^1c}{\hookmark} % line(ex)+MS
+ \mapchar{^^1d}{\mathsymbol{\leftrightarrow}} % MS
+ \mapchar{^^1e}{\mathsymbol{\blacktriangle}} % MA
+ \mapchar{^^1f}{\mathsymbol{\blacktriangledown}} % MA
+%
+ \mapchar{^^7f}{\hatmark} % MA
+%
+ \mapchar{^^80}{\c C}\lcchar{^^87}
+ \mapchar{^^81}{\"u}\ucchar{^^9a}
+ \mapchar{^^82}{\'e}\ucchar{^^90}
+ \mapchar{^^83}{\^a}\uctext{\^A}
+ \mapchar{^^84}{\"a}\ucchar{^^8e}
+ \mapchar{^^85}{\`a}\uctext{\`A}
+ \mapchar{^^86}{\aa}\ucchar{^^8f}
+ \mapchar{^^87}{\c c}\ucchar{^^80}
+ \mapchar{^^88}{\^e}\uctext{\^E}
+ \mapchar{^^89}{\"e}\uctext{\"E}
+ \mapchar{^^8a}{\`e}\uctext{\`E}
+ \mapchar{^^8b}{\"\i}\uctext{\"{\I}}
+ \mapchar{^^8c}{\^\i}\uctext{\^{\I}}
+ \mapchar{^^8d}{\`\i}\uctext{\`{\I}}
+ \mapchar{^^8e}{\"A}\lcchar{^^84}
+ \mapchar{^^8f}{\AA}\lcchar{^^86}
+ \mapchar{^^90}{\'E}\lcchar{^^82}
+ \mapchar{^^91}{\ae}\ucchar{^^92}
+ \mapchar{^^92}{\AE}\lcchar{^^91}
+ \mapchar{^^93}{\^o}\uctext{\^O}
+ \mapchar{^^94}{\"o}\ucchar{^^99}
+ \mapchar{^^95}{\`o}\uctext{\`O}
+ \mapchar{^^96}{\^u}\uctext{\^U}
+ \mapchar{^^97}{\`u}\uctext{\`U}
+ \mapchar{^^98}{\"y}\uctext{\"Y}
+ \mapchar{^^99}{\"O}\lcchar{^^94}
+ \mapchar{^^9a}{\"U}\lcchar{^^81}
+ \mapchar{^^9b}{\cent}
+ \mapchar{^^9c}{\pounds} % italic
+ \mapchar{^^9d}{\yen}
+ \mapchar{^^9e}{\Pt} % MS
+ \mapchar{^^9f}{\florin} % MI
+ \mapchar{^^a0}{\'a}\uctext{\'A}
+ \mapchar{^^a1}{\'\i}\uctext{\'{\I}}
+ \mapchar{^^a2}{\'o}\uctext{\'O}
+ \mapchar{^^a3}{\'u}\uctext{\'U}
+ \mapchar{^^a4}{\~n}\ucchar{^^a5}
+ \mapchar{^^a5}{\~N}\lcchar{^^a4}
+ \mapchar{^^a6}{\ordfeminine} % F(ex)
+ \mapchar{^^a7}{\ordmasculine} % F(ex)
+ \mapchar{^^a8}{\questiondown}
+ \mapchar{^^a9}{\ulangle}
+ \mapchar{^^aa}{\urangle}
+ \mapchar{^^ab}{\mathsymbol{\slashfrac12}} % F+MS
+ \mapchar{^^ac}{\mathsymbol{\slashfrac14}} % F+MS
+ \mapchar{^^ad}{\exclamdown}
+ \mapchar{^^ae}{\flqq} % MS(ex)
+ \mapchar{^^af}{\frqq} % MS(ex)
+ \mapchar{^^b0}{\graygraphbox} % rules(ex)
+ \mapchar{^^b1}{\Graygraphbox} % rules(ex)
+ \mapchar{^^b2}{\GRAYGRAPHBOX} % rules(ex)
+ \mapchar{^^b3}{\graphsymbol{\hfill\vline\hfill}} % rules(ex)
+ \mapchar{^^b4}{\graphsymbol{\hlinefill\vline\hfill}} % rules(ex)
+ \mapchar{^^b5}{\graphsymbol{\Hlinefill{0pt}{0pt}\vline\hfill}}
+ \mapchar{^^b6}{\graphsymbol{\hlinefill\Vline \hfill}}
+ \mapchar{^^b7}{\graphsymbol{\hlinefill\kern-\graphlinedist
+ \Vline[b]{0.5\graphlinewidth}[b]{0.5\graphlinewidth}%
+ \kern-\graphlinedist\hfill}}
+ \mapchar{^^b8}{\graphsymbol{\Hlinefill{0pt}{0pt}\vline[b]\graphlineoutside
+ \hfill}}
+ \mapchar{^^b9}{\graphsymbol{\Hlinefill{0pt}{0pt}\Vline[p]\graphlineinside
+ \hfill}}
+ \mapchar{^^ba}{\graphsymbol{\hfill\Vline\hfill}}
+ \mapchar{^^bb}{\graphsymbol{\Hlinefill{0pt}{\graphlinedist}%
+ \Vline[b]\graphlineinside[b]\graphlineoutside \hfill}}
+ \mapchar{^^bc}{\graphsymbol{\Hlinefill{0pt}{-\graphlinedist}%
+ \Vline[t]\graphlineinside[t]\graphlineoutside \hfill}}
+ \mapchar{^^bd}{\graphsymbol{\hlinefill\kern-\graphlinedist
+ \Vline[t]{0.5\graphlinewidth}[t]{0.5\graphlinewidth}%
+ \kern-\graphlinedist\hfill}}
+ \mapchar{^^be}{\graphsymbol{\Hlinefill{0pt}{0pt}\vline[t]\graphlineoutside
+ \hfill}}
+ \mapchar{^^bf}{\graphsymbol{\hlinefill\vline[b]{0.5\graphlinewidth}\hfill}}
+ \mapchar{^^c0}{\graphsymbol{\hfill\vline[t]{0.5\graphlinewidth}\hlinefill}}
+ \mapchar{^^c1}{\graphsymbol{\hlinefill\vline[t]{0.5\graphlinewidth}%
+ \hlinefill}}
+ \mapchar{^^c2}{\graphsymbol{\hlinefill\vline[b]{0.5\graphlinewidth}%
+ \hlinefill}}
+ \mapchar{^^c3}{\graphsymbol{\hfill\vline\hlinefill}}
+ \mapchar{^^c4}{\graphsymbol{\hlinefill}}
+ \mapchar{^^c5}{\graphsymbol{\hlinefill\vline\hlinefill}}
+ \mapchar{^^c6}{\graphsymbol{\hfill\vline\Hlinefill{0pt}{0pt}}}
+ \mapchar{^^c7}{\graphsymbol{\hfill\Vline \hlinefill}}
+ \mapchar{^^c8}{\graphsymbol{\hfill
+ \Vline[t]\graphlineoutside[t]\graphlineinside
+ \Hlinefill{-\graphlinedist}{0pt}}}
+ \mapchar{^^c9}{\graphsymbol{\hfill
+ \Vline[b]\graphlineoutside[b]\graphlineinside
+ \Hlinefill{\graphlinedist}{0pt}}}
+ \mapchar{^^ca}{\graphsymbol{\Hlinefill{0pt}{-\graphlinedist}%
+ \Vline[t]\graphlineinside[t]\graphlineinside
+ \Hlinefill{-2\graphlinewidth}{0pt}}}
+ \mapchar{^^cb}{\graphsymbol{\Hlinefill{0pt}{\graphlinedist}%
+ \Vline[b]\graphlineinside[b]\graphlineinside
+ \Hlinefill{2\graphlinewidth}{0pt}}}
+ \mapchar{^^cc}{\graphsymbol{\hfill\Vline[c][p]\graphlineinside
+ \Hlinefill{0pt}{0pt}}}
+ \mapchar{^^cd}{\graphsymbol{\Hlinefill{0pt}{0pt}}}
+ \mapchar{^^ce}{\graphsymbol{\Hlinefill{0pt}{0pt}%
+ \Vline[p]\graphlineinside[p]\graphlineinside \Hlinefill{0pt}{0pt}}}
+ \mapchar{^^cf}{\graphsymbol{\Hlinefill{0pt}{0pt}\vline[t]\graphlineinside
+ \Hlinefill{-2\graphlinewidth}{0pt}}}
+ \mapchar{^^d0}{\graphsymbol{\hlinefill\kern-\graphlinedist
+ \Vline[t]{0.5\graphlinewidth}[t]{0.5\graphlinewidth}%
+ \kern-\graphlinedist\hlinefill}}
+ \mapchar{^^d1}{\graphsymbol{\Hlinefill{0pt}{0pt}\vline[b]\graphlineinside
+ \Hlinefill{2\graphlinewidth}{0pt}}}
+ \mapchar{^^d2}{\graphsymbol{\hlinefill\kern-\graphlinedist
+ \Vline[b]{0.5\graphlinewidth}[b]{0.5\graphlinewidth}%
+ \kern-\graphlinedist\hlinefill}}
+ \mapchar{^^d3}{\graphsymbol{\hfill\kern-\graphlinedist
+ \Vline[t]{0.5\graphlinewidth}[t]{0.5\graphlinewidth}%
+ \kern-\graphlinedist\hlinefill}}
+ \mapchar{^^d4}{\graphsymbol{\hfill\vline[t]\graphlineoutside
+ \Hlinefill{0pt}{0pt}}}
+ \mapchar{^^d5}{\graphsymbol{\hfill\vline[b]\graphlineoutside
+ \Hlinefill{0pt}{0pt}}}
+ \mapchar{^^d6}{\graphsymbol{\hfill\kern-\graphlinedist
+ \Vline[b]{0.5\graphlinewidth}[b]{0.5\graphlinewidth}%
+ \kern-\graphlinedist\hlinefill}}
+ \mapchar{^^d7}{\graphsymbol{\hlinefill\kern-\graphlinedist\Vline
+ \kern-\graphlinedist\hlinefill}}
+ \mapchar{^^d8}{\graphsymbol{\Hlinefill{0pt}{0pt}\vline
+ \Hlinefill{0pt}{0pt}}}
+ \mapchar{^^d9}{\graphsymbol{\hlinefill\vline[t]{0.5\graphlinewidth}\hfill}}
+ \mapchar{^^da}{\graphsymbol{\hfill\vline[b]{0.5\graphlinewidth}\hlinefill}}
+ \mapchar{^^db}{\graphsymbol{\leaders\vrule\hfill}}
+ \mapchar{^^dc}{\graphsymbol{\leaders\vrule height0pt\hfill}}
+ \mapchar{^^dd}{\graphsymbol{\leaders\vrule\hfill\hfill}}
+ \mapchar{^^de}{\graphsymbol{\hfill\leaders\vrule\hfill}}
+ \mapchar{^^df}{\graphsymbol{\leaders\vrule depth0pt\hfill}}
+ \mapchar{^^e0}{\mathsymbol{\alpha}}
+ \mapchar{^^e1}{\mathsymbol{\beta}}
+ \mapchar{^^e2}{\mathsymbol{\Gamma}}
+ \mapchar{^^e3}{\mathsymbol{\pi}}
+ \mapchar{^^e4}{\mathsymbol{\Sigma}}
+ \mapchar{^^e5}{\mathsymbol{\sigma}}
+ \mapchar{^^e6}{\mathsymbol{\mu}} % MI
+ \mapchar{^^e7}{\mathsymbol{\tau}}
+ \mapchar{^^e8}{\mathsymbol{\Phi}}
+ \mapchar{^^e9}{\mathsymbol{\Theta}}
+ \mapchar{^^ea}{\mathsymbol{\Omega}}
+ \mapchar{^^eb}{\mathsymbol{\delta}}
+ \mapchar{^^ec}{\mathsymbol{\infty}}
+ \mapchar{^^ed}{\mathsymbol{\varnothing}}
+ \mapchar{^^ee}{\mathsymbol{\in}}
+ \mapchar{^^ef}{\mathsymbol{\cap}}
+ \mapchar{^^f0}{\mathsymbol{\equiv}}
+ \mapchar{^^f1}{\mathsymbol{\pm}} % MS
+ \mapchar{^^f2}{\mathsymbol{\ge}}
+ \mapchar{^^f3}{\mathsymbol{\le}}
+ \mapchar{^^f4}{\inttop}
+ \mapchar{^^f5}{\intbot}
+ \mapchar{^^f6}{\mathsymbol{\div}} % MS
+ \mapchar{^^f7}{\mathsymbol{\approx}}
+ \mapchar{^^f8}{\degree} % MS
+ \mapchar{^^f9}{\bigcdot}
+ \mapchar{^^fa}{\smallcdot} % MS
+ \mapchar{^^fb}{\mathsymbol{\surd}}
+ \mapchar{^^fc}{\mathsymbol{\xnolimits^n}} % F
+ \mapchar{^^fd}{\mathsymbol{\xnolimits^2}} % F
+ \mapchar{^^fe}{\sqbullet} % rules(ex)
+ \mapchar{^^ff}{\nbspace} % F
+
+%
+% Zuruecksetzen der Original-Definitionen
+%
+\def\cporiginal{%
+ \mapchar{^^aa}{\urangle}%
+ \mapchar{^^b3}{\graphsymbol{\hfill\vline\hfill}}%
+ \mapchar{^^ba}{\graphsymbol{\hfill\Vline\hfill}}%
+ \mapchar{^^c4}{\graphsymbol{\hlinefill}}%
+ \mapchar{^^e1}{\mathsymbol{\beta}}}
+
+%
+% Modifizierte Definition fuer die Benutzung von `es-zet' statt `beta'
+%
+\def\cpgerman{\mapchar{^^e1}{\ss}\uctext{\SS{}}}
+
+%
+% Modifizierte Definition fuer manche Textverarbeitungen (z. B. Microsoft Word)
+%
+\def\cpemdash{\mapchar{^^c4}{\emdash}}
+
+%
+% Weitere moegliche Modifikationen
+%
+\def\cpneg{\mapchar{^^aa}{\mathsymbol{\neg}}}
+
+\def\cpVert{%
+ \mapchar{^^b3}{\mathsymbol{\vert}}%
+ \mapchar{^^ba}{\mathsymbol{\Vert}}}
+
+}%\end{newcodepage}
+
+%
+% Einstellen der Code Page 437
+%
+\selectcodepage{437}