diff options
Diffstat (limited to 'Master/texmf-dist/tex/context/base/ppchtex.mkiv')
-rw-r--r-- | Master/texmf-dist/tex/context/base/ppchtex.mkiv | 25 |
1 files changed, 13 insertions, 12 deletions
diff --git a/Master/texmf-dist/tex/context/base/ppchtex.mkiv b/Master/texmf-dist/tex/context/base/ppchtex.mkiv index 1162c1fcf6a..a14578cebdb 100644 --- a/Master/texmf-dist/tex/context/base/ppchtex.mkiv +++ b/Master/texmf-dist/tex/context/base/ppchtex.mkiv @@ -1,17 +1,19 @@ %D \module -%D [ file=ppchtex (m-chemie), +%D [ file=ppchtex, %D version=1997.03.19, %D title=\CONTEXT\ Extra Modules, %D subtitle=\PPCHTEX\ (Plain Pictex Context cHemie \TEX), %D author=Hans Hagen, %D date=\currentdate, -%D copyright={PRAGMA / Hans Hagen \& Ton Otten}, -%D suggestions={Tobias Burnus, Dirk Kuypers \& Ton Otten}] +%D suggestions={Tobias Burnus, Dirk Kuypers \& Ton Otten}, +%D copyright={PRAGMA ADE \& \CONTEXT\ Development Team}] %C %C This module is part of the \CONTEXT\ macro||package and is %C therefore copyrighted by \PRAGMA. See mreadme.pdf for %C details. +\endinput + % option=test => boxes % dummy => file % final => file / local run @@ -75,7 +77,6 @@ % gebruiken. De eerste module laad of efficiente wijze PiCTeX % en de tweede module koppelt het PSTRICKS kleurmechanisme % aan dat van \CONTEXT. -% % PSTricks: {-\chemicalangle} instead of {*0}, which produces % faulty ps code when \chemicalangle=0 @@ -472,7 +473,7 @@ \endpspicture \or \resetchemicalcoordinates - \setbox2\hbox{\MPshiftdrawingtrue\MPstaticgraphictrue\getMPdrawing}% + \setbox2\hbox{\ignoreMPboxdepth\getMPdrawing}% \wd2=\!!zeropoint \ht2=\!!zeropoint \dp2=\!!zeropoint @@ -513,7 +514,7 @@ \put {\box\chemicalsymbols} at 0 0 % elders \ifMPdrawingdone \resetchemicalcoordinates - \setbox2\hbox{\MPshiftdrawingtrue\MPstaticgraphictrue\getMPdrawing}% + \setbox2\hbox{\ignoreMPboxdepth\getMPdrawing}% \wd2=\!!zeropoint \ht2=\!!zeropoint \dp2=\!!zeropoint @@ -1721,7 +1722,7 @@ \let\chemicaltwintiparrow = \chemicaltwintipouterarrow \fi \disablechemicalspecials - \unexpandedprocessallactionsinset + \processallactionsinset [#1] [ HIGH=>\sethighsubscripts, LOW=>\setlowsubscripts, @@ -2072,7 +2073,7 @@ \@@chemicalpostponed} {\getpredefinedchemical{#1}}]} -\newcount\chemicalstack % tzt \newwounter +\newcount\chemicalstack \setvalue{\s!chemical\c!x1}{0} \setvalue{\s!chemical\c!y1}{0} @@ -3397,11 +3398,11 @@ RT##3##4##5=>\processchemicaltextelement{RN}{##3##4##5}{#1}{0}{}, drawoptions (\chemicalattributes) ; \stopMPdrawing} -\def\@@dochemicalcolor - {\doifsomething\@@chemicalcolor{\color[\@@chemicalcolor]}} +\unexpanded\def\@@dochemicalcolor + {\dousecolorparameter\@@chemicalcolor} -\def\@@dochemicalstyle - {\doconvertfont\@@chemicalstyle} +\unexpanded\def\@@dochemicalstyle + {\dousestyleparameter\@@chemicalstyle} \setupchemical [\c!rulethickness=\linewidth, |