diff options
Diffstat (limited to 'obsolete/macros/ec-plain/acmacros.sty')
-rw-r--r-- | obsolete/macros/ec-plain/acmacros.sty | 594 |
1 files changed, 594 insertions, 0 deletions
diff --git a/obsolete/macros/ec-plain/acmacros.sty b/obsolete/macros/ec-plain/acmacros.sty new file mode 100644 index 0000000000..e161d7efd6 --- /dev/null +++ b/obsolete/macros/ec-plain/acmacros.sty @@ -0,0 +1,594 @@ +% special distinction EURO-TeX/tm.fonts/dm.fonts +\ifx\rm\undefined\relax +\else\rm +\def\wordsplita#1#2#3.{#1}% +\def\wordsplitb#1#2#3.{#2}% +% +\ifx\fonthdg\undefined + \edef\fonthdg{\expandafter\wordsplita\fontname\the\font.}\fi +\ifx\fonthdge\undefined + \edef\fonthdge{\expandafter\wordsplitb\fontname\the\font.}\fi +\fi + +\newif\ifeurotex +\immediate\write16{ Font heading:\fonthdg\fonthdge}\relax +\if\fonthdg d\relax + \if\fonthdge c\relax + \immediate\write16{ DC fonts active}% + \eurotextrue + \fi +\fi +% +\if\fonthdg e\relax + \if\fonthdge c\relax + \immediate\write16{ EC fonts active}% + \eurotextrue + \fi +\fi +% +\ifx\protect\undefined\let\protect\relax\fi +% +% ================== Special accent macro codes ============================ +% taken from dc-plain.ch +\ifeurotex + \def\acute{\mathaccent"7001 } + \def\grave{\mathaccent"7000 } + \def\ddot{\mathaccent"7004 } + \def\tilde{\mathaccent"7003 } + \def\bar{\mathaccent"7009 } + \def\breve{\mathaccent"7008 } + \def\check{\mathaccent"7007 } + \def\hat{\mathaccent"7002 } + \def\vec{\mathaccent"017E } + \def\dot{\mathaccent"700A } + \def\ss{^^ff} + \def\ae{^^e6} + \def\oe{^^f7} + \def\o{^^f8} + \def\AE{^^c6} + \def\OE{^^d7} + \def\O{^^d8} + \def\i{^^19}\def\j{^^1a} % dotless letters + \def\aa{^^e5} + \def\AA{^^c5} + \def\l{^^aa} %backslash-lowercase L for Polish waw} + \def\L{^^8a} + \def\th{^^fe} + \def\TH{^^de} + \def\dh{^^f0} + \def\DH{^^d0} + \def\dj{^^9e} + \def\DJ{^^d0} + \def\ng{^^ad} + \def\NG{^^8d} + \def\SS{^^df} +\else + \def\ae{^^1a} + \def\oe{^^1b} + \def\o{^^1c} + \def\AE{^^1d} + \def\OE{^^1e} + \def\O{^^1f} + \def\i{^^10} + \def\j{^^11} % dotless letters +\fi + +\ifeurotex + \def\b#1{\oalign{#1\crcr\hidewidth + \vbox to.2ex{\hbox{\char"09}\vss}\hidewidth}} +\fi + +\ifeurotex +\def\@gr@#1{{\accent"00 #1}} +\else +\def\@gr@#1{{\accent18 #1}} +\fi + +\def\`#1{\ifx#1a^^e0% {} + \else\ifx#1e^^e8% {} + \else\ifx#1\i ^^ec% {} + \else\ifx#1i^^ec% {} + \else\ifx#1o^^f2% {} + \else\ifx#1u^^f9% {} + \else\ifx#1A^^c0% {} + \else\ifx#1E^^c8% {} + \else\ifx#1I^^cc% {} + \else\ifx#1O^^d2% {} + \else\ifx#1U^^d9% {} + \else\protect\@gr@{#1}% + \fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi} + +\def\c@{\@c@} +\ifeurotex +\def\@c@#1{\setbox\z@\hbox{#1}\ifdim\ht\z@=1ex\accent"0B #1% + \else{\ooalign{\hidewidth\char"0B\hidewidth\crcr\unhbox\z@}}\fi}% +\else +\def\@c@#1{\setbox\z@\hbox{#1}\ifdim\ht\z@=1ex\accent 24 #1% + \else{\ooalign{\hidewidth\char 24\hidewidth\crcr\unhbox\z@}}\fi}% +\fi + + +\ifeurotex +\def\c#1{\ifx#1c^^e7% {} + \else\ifx#1a^^a1% {} + \else\ifx#1e^^a6% {} + \else\ifx#1s^^b3% {} + \else\ifx#1t^^b5% {} + \else\ifx#1C^^c7% {} + \else\ifx#1A^^81% {} + \else\ifx#1E^^86% {} + \else\ifx#1S^^93% {} + \else\ifx#1T^^95% {} + \else\protect\@c@{#1}% + \fi\fi\fi\fi\fi\fi\fi\fi\fi\fi} +\else +\def\c#1{\ifx#1c^^e7% {} + \else\ifx#1C^^c7% {} + \else\protect\@c@{#1}% + \fi\fi} +\fi + +\ifeurotex +\def\@r@#1{{\accent"06 #1}} +\else +\def\@r@#1{{\accent"17 #1}} +\fi + +\ifeurotex +\def\r#1{\ifx#1a^^e5% {} + \else\ifx#1A^^c5% {} + \else\ifx#1u^^b7% {} + \else\ifx#1U^^97% {} + \else\protect\@r@{#1}% + \fi\fi\fi\fi} +\else +\def\r#1{\ifx#1a^^e5% {} + \else\ifx#1A^^c5% {} + \else\protect\@r@{#1}% + \fi\fi} +\fi + +\ifeurotex +\def\@ac@#1{{\accent"01 #1}} +\else +\def\@ac@#1{{\accent19 #1}} +\fi + +\ifeurotex +\def\'#1{\ifx#1a^^e1% {} + \else\ifx#1e^^e9% {} + \else\ifx#1\i ^^ed% {} + \else\ifx#1i^^ed% {} + \else\ifx#1o^^f3% {} + \else\ifx#1u^^fa% {} + \else\ifx#1y^^fd% {} + \else\ifx#1c^^a2% {} + \else\ifx#1l^^a8% {} + \else\ifx#1n^^ab% {} + \else\ifx#1r^^af% {} + \else\ifx#1s^^b1% {} + \else\ifx#1z^^b9% {} + \else\ifx#1A^^c1% {} + \else\ifx#1E^^c9% {} + \else\ifx#1I^^cd% {} + \else\ifx#1O^^d3% {} + \else\ifx#1U^^da% {} + \else\ifx#1Y^^dd% {} + \else\ifx#1C^^82% {} + \else\ifx#1L^^88% {} + \else\ifx#1N^^8b% {} + \else\ifx#1R^^8f% {} + \else\ifx#1S^^91% {} + \else\ifx#1Z^^99% {} + \else\protect\@ac@{#1}% + \fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi} +\else +\def\'#1{\ifx#1a^^e1% {} + \else\ifx#1e^^e9% {} + \else\ifx#1\i ^^ed% {} + \else\ifx#1i^^ed% {} + \else\ifx#1o^^f3% {} + \else\ifx#1u^^fa% {} + \else\ifx#1y^^fd% {} + \else\ifx#1A^^c1% {} + \else\ifx#1E^^c9% {} + \else\ifx#1I^^cd% {} + \else\ifx#1O^^d3% {} + \else\ifx#1U^^da% {} + \else\ifx#1Y^^dd% {} + \else\protect\@ac@{#1}% + \fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi} +\fi + +\ifeurotex +\def\@v@#1{{\accent"07 #1}} +\else +\def\@v@#1{{\accent 20 #1}} +\fi + +\ifeurotex +\def\v#1{\ifx#1c^^a3% {} + \else\ifx#1d^^a4% {} + \else\ifx#1e^^a5% {} + \else\ifx#1n^^ac% {} + \else\ifx#1r^^b0% {} + \else\ifx#1s^^b2% {} + \else\ifx#1t^^b4% {} + \else\ifx#1l^^a9% {} + \else\ifx#1C^^83% {} + \else\ifx#1D^^84% {} + \else\ifx#1E^^85% {} + \else\ifx#1N^^8c% {} + \else\ifx#1R^^90% {} + \else\ifx#1S^^92% {} + \else\ifx#1T^^94% {} + \else\ifx#1L^^89% {} + \else\protect\@v@{#1}% + \fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi} +\else +\def\v#1{\protect\@v@{#1}}% +\fi + +\ifeurotex +\def\@u@#1{{\accent"08 #1}} +\else +\def\@u@#1{{\accent 21 #1}} +\fi + +%\check + +\ifeurotex +\def\u#1{\ifx#1a^^a0% {} + \else\ifx#1g^^a7% {} + \else\ifx#1A^^80% {} + \else\ifx#1G^^87% {} + \else\protect\@u@{#1}% + \fi\fi\fi\fi} +\else +\def\u#1{\protect\@u@{#1}}% +\fi + +\ifeurotex +\def\@dot@#1{{\accent"0A #1}} +\else +\def\@dot@#1{{\accent 95 #1}} +\fi + +%\check + +\ifeurotex +\def\.#1{\ifx#1z^^bb% {} + \else\ifx#1Z^^9b% {} + \else\ifx#1I^^9d% {} + \else\protect\@dot@{#1}% + \fi\fi\fi} +\else +\def\.#1{\protect\@dot@{#1}}% +\fi + +%\check + +\ifeurotex +\def\@H@#1{{\accent"05 #1}} +\else +\def\@H@#1{{\accent"7D #1}} +\fi + +\ifeurotex +\def\H#1{\ifx#1o^^ae% {} + \else\ifx#1u^^b6% {} + \else\ifx#1O^^8e% {} + \else\ifx#1U^^96% {} + \else\protect\@H@{#1}% + \fi\fi\fi\fi} +\else +\def\H#1{\protect\@H@{#1}}% +\fi + +%\check + +\ifeurotex +\def\@um@#1{{\accent"04 #1}} +\else +\def\@um@#1{{\accent"7F #1}} +\fi + +\ifeurotex +\def\"#1{\ifx#1a^^e4% {} + \else\ifx#1e^^eb% {} + \else\ifx#1\i ^^ef% {} + \else\ifx#1i^^ef% {} + \else\ifx#1o^^f6% {} + \else\ifx#1u^^fc% {} + \else\ifx#1y^^b8% {} + \else\ifx#1A^^c4% {} + \else\ifx#1E^^cb% {} + \else\ifx#1I^^cf% {} + \else\ifx#1O^^d6% {} + \else\ifx#1U^^dc% {} + \else\ifx#1Y^^98% {} + \else\protect\@um@{#1}% + \fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi} +\else +\def\"#1{\ifx#1a^^e4% {} + \else\ifx#1e^^eb% {} + \else\ifx#1\i ^^ef% {} + \else\ifx#1i^^ef% {} + \else\ifx#1o^^f6% {} + \else\ifx#1u^^fc% {} + \else\ifx#1A^^c4% {} + \else\ifx#1E^^cb% {} + \else\ifx#1I^^cf% {} + \else\ifx#1O^^d6% {} + \else\ifx#1U^^dc% {} + \else\protect\@um@{#1}% + \fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi} +\fi + + +\ifeurotex +\def\@eq@#1{{\accent"09 #1}} +\else +\def\@eq@#1{{\accent22 #1}} +\fi + +\def\=#1{\protect\@eq@{#1}} + +\ifeurotex +\def\@hat@#1{{\accent"02 #1}} +\else +\def\@hat@#1{{\accent94 #1}} +\fi + +\def\^#1{\ifx#1a^^e2% {} + \else\ifx#1e^^ea% {} + \else\ifx#1\i ^^ee% {} + \else\ifx#1i^^ee% {} + \else\ifx#1o^^f4% {} + \else\ifx#1u^^fb% {} + \else\ifx#1A^^c2% {} + \else\ifx#1E^^ca% {} + \else\ifx#1I^^ce% {} + \else\ifx#1O^^d4% {} + \else\ifx#1U^^db% {} + \else\protect\@hat@{#1}% + \fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi} + +%\check + + +\ifeurotex +\def\@til@#1{{\accent"03 #1}} +\else +\def\@til@#1{{\accent"7E #1}} +\fi + +\def\~#1{\ifx#1a^^e3% {} + \else\ifx#1n^^f1% {} + \else\ifx#1o^^f5% {} + \else\ifx#1A^^c3% {} + \else\ifx#1N^^d1% {} + \else\ifx#1O^^d5% {} + \else\protect\@til@{#1}% + \fi\fi\fi\fi\fi\fi} + +\ifeurotex +% normal greek symbols : lower case slanted, uppercase upright +\mathchardef\Gamma="0180 +\mathchardef\Delta="0181 +\mathchardef\Theta="0182 +\mathchardef\Lambda="0183 +\mathchardef\Xi="0184 +\mathchardef\Pi="0185 +\mathchardef\Sigma="0186 +\mathchardef\Upsilon="0187 +\mathchardef\Phi="0188 +\mathchardef\Psi="0189 +\mathchardef\Omega="018A +\mathchardef\alpha="010B +\mathchardef\beta="010C +\mathchardef\gamma="010D +\mathchardef\delta="010E +\mathchardef\epsilon="010F +\mathchardef\zeta="0110 +\mathchardef\eta="0111 +\mathchardef\theta="0112 +\mathchardef\iota="0113 +\mathchardef\kappa="0114 +\mathchardef\lambda="0115 +\mathchardef\mu="0116 +\mathchardef\nu="0117 +\mathchardef\xi="0118 +\mathchardef\pi="0119 +\mathchardef\rho="011A +\mathchardef\sigma="011B +\mathchardef\tau="011C +\mathchardef\upsilon="011D +\mathchardef\phi="011E +\mathchardef\chi="011F +\mathchardef\psi="0120 +\mathchardef\omega="0121 +\mathchardef\varepsilon="0122 +\mathchardef\vartheta="0123 +\mathchardef\varpi="0124 +\mathchardef\varrho="0125 +\mathchardef\varsigma="0126 +\mathchardef\varphi="0127 + % +% slanted greek symbols : +\mathchardef\slGamma="0100 +\mathchardef\slDelta="0101 +\mathchardef\slTheta="0102 +\mathchardef\slLambda="0103 +\mathchardef\slXi="0104 +\mathchardef\slPi="0105 +\mathchardef\slSigma="0106 +\mathchardef\slUpsilon="0107 +\mathchardef\slPhi="0108 +\mathchardef\slPsi="0109 +\mathchardef\slOmega="010A +\mathchardef\slalpha="010B +\mathchardef\slbeta="010C +\mathchardef\slgamma="010D +\mathchardef\sldelta="010E +\mathchardef\slepsilon="010F +\mathchardef\slzeta="0110 +\mathchardef\sleta="0111 +\mathchardef\sltheta="0112 +\mathchardef\sliota="0113 +\mathchardef\slkappa="0114 +\mathchardef\sllambda="0115 +\mathchardef\slmu="0116 +\mathchardef\slnu="0117 +\mathchardef\slxi="0118 +\mathchardef\slpi="0119 +\mathchardef\slrho="011A +\mathchardef\slsigma="011B +\mathchardef\sltau="011C +\mathchardef\slupsilon="011D +\mathchardef\slphi="011E +\mathchardef\slchi="011F +\mathchardef\slpsi="0120 +\mathchardef\slomega="0121 +\mathchardef\slvarepsilon="0122 +\mathchardef\slvartheta="0123 +\mathchardef\slvarpi="0124 +\mathchardef\slvarrho="0125 +\mathchardef\slvarsigma="0126 +\mathchardef\slvarphi="0127 + % +% upright (roman) greek symbols : +\mathchardef\rmGamma="0180 +\mathchardef\rmDelta="0181 +\mathchardef\rmTheta="0182 +\mathchardef\rmLambda="0183 +\mathchardef\rmXi="0184 +\mathchardef\rmPi="0185 +\mathchardef\rmSigma="0186 +\mathchardef\rmUpsilon="0187 +\mathchardef\rmPhi="0188 +\mathchardef\rmPsi="0189 +\mathchardef\rmOmega="018A +\mathchardef\rmalpha="018B +\mathchardef\rmbeta="018C +\mathchardef\rmgamma="018D +\mathchardef\rmdelta="018E +\mathchardef\rmepsilon="018F +\mathchardef\rmzeta="0190 +\mathchardef\rmeta="0191 +\mathchardef\rmtheta="0192 +\mathchardef\rmiota="0193 +\mathchardef\rmkappa="0194 +\mathchardef\rmlambda="0195 +\mathchardef\rmmu="0196 +\mathchardef\rmnu="0197 +\mathchardef\rmxi="0198 +\mathchardef\rmpi="0199 +\mathchardef\rmrho="019A +\mathchardef\rmsigma="019B +\mathchardef\rmtau="019C +\mathchardef\rmupsilon="019D +\mathchardef\rmphi="019E +\mathchardef\rmchi="019F +\mathchardef\rmpsi="0120 +\mathchardef\rmomega="01A1 +\mathchardef\rmvarepsilon="01A2 +\mathchardef\rmvartheta="01A3 +\mathchardef\rmvarpi="01A4 +\mathchardef\rmvarrho="01A5 +\mathchardef\rmvarsigma="01A6 +\mathchardef\rmvarphi="01A7 + % + % +% bold greek symbols : +\mathchardef\bfGamma="01A8 +\mathchardef\bfDelta="01A9 +\mathchardef\bfTheta="01AA +\mathchardef\bfLambda="01AB +\mathchardef\bfXi="01AC +\mathchardef\bfPi="01AD +\mathchardef\bfSigma="01AE +\mathchardef\bfUpsilon="01AF +\mathchardef\bfPhi="01B0 +\mathchardef\bfPsi="01B1 +\mathchardef\bfOmega="01B2 +\mathchardef\bfalpha="01B3 +\mathchardef\bfbeta="01B4 +\mathchardef\bfgamma="01B5 +\mathchardef\bfdelta="01B6 +\mathchardef\bfepsilon="01B7 +\mathchardef\bfzeta="01B8 +\mathchardef\bfeta="01B9 +\mathchardef\bftheta="01BA +\mathchardef\bfiota="01BB +\mathchardef\bfkappa="01BC +\mathchardef\bflambda="01BD +\mathchardef\bfmu="01BE +\mathchardef\bfnu="01BF +\mathchardef\bfxi="01C0 +\mathchardef\bfpi="01C1 +\mathchardef\bfrho="01C2 +\mathchardef\bfsigma="01C3 +\mathchardef\bftau="01C4 +\mathchardef\bfupsilon="01C5 +\mathchardef\bfphi="01C6 +\mathchardef\bfchi="01C7 +\mathchardef\bfpsi="01C8 +\mathchardef\bfomega="01C9 +\mathchardef\bfvarepsilon="01CA +\mathchardef\bfvartheta="01CB +\mathchardef\bfvarpi="01CC +\mathchardef\bfvarrho="01CD +\mathchardef\bfvarsigma="01CE +\mathchardef\bfvarphi="01CF + % + % +% bold slanted greek symbols : +\mathchardef\bfslGamma="01D0 +\mathchardef\bfslDelta="01D1 +\mathchardef\bfslTheta="01D2 +\mathchardef\bfslLambda="01D3 +\mathchardef\bfslXi="01D4 +\mathchardef\bfslPi="01D5 +\mathchardef\bfslSigma="01D6 +\mathchardef\bfslUpsilon="01D7 +\mathchardef\bfslPhi="01D8 +\mathchardef\bfslPsi="01D9 +\mathchardef\bfslOmega="01DA +\mathchardef\bfslalpha="01DB +\mathchardef\bfslbeta="01DC +\mathchardef\bfslgamma="01DD +\mathchardef\bfsldelta="01DE +\mathchardef\bfslepsilon="01DF +\mathchardef\bfslzeta="01E0 +\mathchardef\bfsleta="01E1 +\mathchardef\bfsltheta="01E2 +\mathchardef\bfsliota="01E3 +\mathchardef\bfslkappa="01E4 +\mathchardef\bfsllambda="01E5 +\mathchardef\bfslmu="01E6 +\mathchardef\bfslnu="01E7 +\mathchardef\bfslxi="01E8 +\mathchardef\bfslpi="01E9 +\mathchardef\bfslrho="01EA +\mathchardef\bfslsigma="01EB +\mathchardef\bfsltau="01EC +\mathchardef\bfslupsilon="01ED +\mathchardef\bfslphi="01EE +\mathchardef\bfslchi="01EF +\mathchardef\bfslpsi="01F0 +\mathchardef\bfslomega="01F1 +\mathchardef\bfslvarepsilon="01F2 +\mathchardef\bfslvartheta="01F3 +\mathchardef\bfslvarpi="01F4 +\mathchardef\bfslvarrho="01F5 +\mathchardef\bfslvarsigma="01F6 +\mathchardef\bfslvarphi="01F7 + % +\def\c@{\@c@} +\fi + + +\gdef\accenthyphcodes{} + +\endinput |