diff options
Diffstat (limited to 'tex/context/base/cont-log.mkiv')
| -rw-r--r-- | tex/context/base/cont-log.mkiv | 299 |
1 files changed, 0 insertions, 299 deletions
diff --git a/tex/context/base/cont-log.mkiv b/tex/context/base/cont-log.mkiv deleted file mode 100644 index 598140d32..000000000 --- a/tex/context/base/cont-log.mkiv +++ /dev/null @@ -1,299 +0,0 @@ -%D \module -%D [ file=cont-log, -%D version=1995.10.10, -%D title=\CONTEXT\ Miscellaneous Macros, -%D subtitle=\TEX\ Logos, -%D author=J. Hagen, -%D date=\currentdate, -%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. - -\writestatus{loading}{ConTeXt TeX Logos} - -%D The system that is used to typeset this text is called \TEX, typeset with an -%D lowered~E. From te beginning of \TEX, authors of macro packages adapted this -%D raising and lowering style. In this module we define some of those logos. - -\unprotect - -\unexpanded\def\TeX - {\dontleavehmode - \begingroup - \setbox\scratchbox\hbox{M}% - T% - \kern-.1667\wd\scratchbox - \lower.5\exheight\hbox{E}% - \kern-.125\wd\scratchbox - X% - \endgroup} - -\unexpanded\def\ConTeXt{Con\TeX t} -\unexpanded\def\PPCHTeX{ppch\TeX} -\unexpanded\def\PRAGMA {Pragma ADE} - -\unexpanded\def\LaTeX % requested by erik frambach - {\dontleavehmode - \begingroup - \setbox\scratchbox\hbox{L}% - \scratchdimen\ht\scratchbox - \setbox\scratchbox\hbox{\txx A}% - L\kern-.55\wd\scratchbox - \raise\scratchdimen\hbox{\lower\ht\scratchbox\copy\scratchbox}% - \kern-.2\wd\scratchbox\TeX - \endgroup} - -\unexpanded\def\TaBlE - {T% - \kern-.27\emwidth\lower.5\exheight\hbox{A}% - \kern-.18\emwidth B% - \kern-.1\emwidth\lower.5\exheight\hbox{L}% - \kern-.075\emwidth E} - -\unexpanded\def\PiCTeX - {P% - \kern-.12\emwidth\lower.5\exheight\hbox{I}% - \kern-.075\emwidth C% - \kern-.11\emwidth\TeX} - -\def\syst_logos_ams_script#1% - {$\cal\ifdim\bodyfontsize>1.1\emwidth\scriptstyle\fi#1$} - -\unexpanded\def\AmSTeX - {\dontleavehmode - \syst_logos_ams_script A% - \kern-.1667\emwidth\lower.5\exheight\hbox{\syst_logos_ams_script M}% - \kern-.125\emwidth\syst_logos_ams_script S% - -\TeX} - -\unexpanded\def\LamSTeX - {L% - \kern-.4\emwidth\raise.3\exheight\hbox{\syst_logos_ams_script A}% - \kern-.25\emwidth\lower.4\exheight\hbox{\syst_logos_ams_script M}% - \kern-.1\emwidth{\syst_logos_ams_script S}% - -\TeX} - -% \unexpanded\def\AmSLaTeX -% {\dontleavehmode -% \syst_logos_ams_script A% -% \kern-.1667\emwidth\lower.5\exheight\hbox{\syst_logos_ams_script M}% -% \kern-.125\emwidth{\syst_logos_ams_script S}% -% -\LaTeX} - -%D Alternative \CONTEXT\ logo, first Idris S.~Hamid's version: -%D -%D \def\Context -%D {{\sc C\kern -.0667emo\kern -.0667emn\kern -.0549emt\kern -%D -.1667em\lower.5ex\hbox {e}\kern -.125emx\kern -.0549emt}} -%D -%D I changed this into one that adapts itself: - -\unexpanded\def\Context % wrong usage of \getscaledglyph - {\dontleavehmode - \begingroup - C\kern -.0667\emwidth\getscaledglyph{.8}\empty{O\kern -.0667\emwidth N\kern - -.0549\emwidth T\doifelseitalic{\kern-.1\emwidth}{\kern-.1667\emwidth}\lower.5\exheight\hbox - {E}\doifelseitalic\empty{\kern-.11em}X\kern-.055\emwidth T}% - \endgroup} - -%D The \METAFONT\ and \METAPOST\ logos adapt themselves to the current fontsize, an -%D ugly but usefull hack. - -\let\logofont\nullfont - -\loadmapfile[original-base.map] % stil needed? not if we assume afm - -\unexpanded\def\setMFPfont% more sensitive for low level changes - {\font\logofont=logo% - \ifx\fontalternative\s!bf\s!bf\else - \ifx\fontalternative\s!it\s!sl\else - \ifx\fontalternative\s!sl\s!sl\else - \ifx\fontalternative\s!bi\s!bf\else - \ifx\fontalternative\s!bs\s!bf\else - \fi\fi\fi\fi\fi - 10 at \currentfontscale\bodyfontsize % there is no afm in the minimals yet - \logofont} - -\def\syst_logos_meta_hyphen % there is no hyphenchar in this font - {\discretionary{\vrule\s!height.33\emwidth\s!depth-.27\emwidth\s!width.33\emwidth}{}{}} - -\unexpanded\def\MetaFont - {\dontleavehmode - \begingroup - \setMFPfont META\syst_logos_meta_hyphen FONT% - \endgroup} - -% \unexpanded\def\MetaPost -% {\dontleavehmode -% \begingroup -% \setMFPfont META\syst_logos_meta_hyphen POST% -% \endgroup} -% -% As decided on the ConText Meeting 2013 the logo has been simplified: - -\unexpanded\def\MetaPost - {MetaPost} - -\unexpanded\def\MetaFun - {MetaFun} - -%D \macros -%D {TEX, METAFONT, METAPOST, METAFUN, -%D PICTEX, TABLE, -%D CONTEXT, PPCHTEX, -%D AMSTEX, LATEX, LAMSTEX} -%D -%D We define the funny written ones as well as the less error prone upper case names -%D (in \CONTEXT\ we tend to write all user defined commands, like abbreviations, in -%D uppercase.) - -\unexpanded\def\METAFONT {\MetaFont} -\unexpanded\def\METAPOST {\MetaPost} -\unexpanded\def\PPCHTEX {\PPCHTeX} -\unexpanded\def\CONTEXT {\ConTeXt} -\unexpanded\def\METAFUN {\MetaFun} - -\unexpanded\def\TEX {\TeX} -\unexpanded\def\LATEX {\LaTeX} -\unexpanded\def\PICTEX {\PiCTeX} -\unexpanded\def\TABLE {\TaBlE} -\unexpanded\def\AMSTEX {\AmSTeX} -\unexpanded\def\LAMSTEX {\LamSTeX} -\unexpanded\def\INRSTEX {inrs\TeX} - -%D And this is how they show up: \TeX, \MetaFont, \MetaPost, \PiCTeX, \TaBlE, \ConTeXt, -%D \PPCHTeX, \AmSTeX, \LaTeX, \LamSTeX. - -%D Some placeholders: - -\unexpanded\def\eTeX {\mathematics{\varepsilon}-\TeX} -\unexpanded\def\pdfTeX {pdf\TeX} -\unexpanded\def\pdfeTeX {pdfe-\TeX} -\unexpanded\def\luaTeX {lua\TeX} -\unexpanded\def\luajitTeX{luajit\TeX} -\unexpanded\def\metaTeX {meta\TeX} -\unexpanded\def\XeTeX {X\lower.5\exheight\hbox{\kern-.15\emwidth\mirror{E}}\kern-.1667\emwidth\TeX} - -% Adapted from a patch by Mojca: - -\def\syst_logos_xetex_e - {\setbox\scratchbox\hbox{E}% - \raise\dimexpr\ht\scratchbox+\dp\scratchbox\relax\hbox{\rotate[\c!rotation=180]{\box\scratchbox}}} - -\unexpanded\def\XeTeX - {X\lower.5\exheight - \hbox - {\kern-.15\emwidth - \iffontchar\font"018E\relax - \char"018E% - \else - \ifx\fontalternative\s!bf \mirror{E}\else - \ifx\fontalternative\s!it\syst_logos_xetex_e\else - \ifx\fontalternative\s!sl\syst_logos_xetex_e\else - \ifx\fontalternative\s!bi\syst_logos_xetex_e\else - \ifx\fontalternative\s!bs\syst_logos_xetex_e\else - \mirror{E}\fi\fi\fi\fi\fi - \fi}% - \kern-.1667\emwidth\TeX} - -\let\ETEX \eTeX -\let\PDFTEX \pdfTeX -\let\PDFETEX \pdfeTeX -\let\LUATEX \luaTeX -\let\LUAJITTEX\luajitTeX -\let\LuaTeX \luaTeX -\let\XETEX \XeTeX - -% \unexpanded\def\MkApproved % joke, not used so it might move -% {\dontleavehmode\rotate -% [\c!rotation={\ifnum\texengine=\luatexengine\cldcontext{45-45*\the\luatexversion/100}\else0\fi}, -% \c!align=\v!middle, -% \c!foregroundstyle=\v!type, -% \c!foregroundcolor=darkred, -% \c!frame=\v!on, -% \c!offset=1ex, -% \c!background=\v!color, -% \c!backgroundcolor=lightgray, -% \c!framecolor=darkred, -% \c!rulethickness=2pt] -% {Mk\ifnum\texengine=\luatexengine IV\else II\fi\\approved}} - -% \unexpanded\def\luaTeX -% {\dontleavehmode\begingroup -% Lua% -% \setbox0\hbox{oT}% -% \setbox2\hbox{o\kern0ptT}% -% \ifdim\wd0=\wd2 -% \setbox0\hbox dir TRT{To}% -% \setbox2\hbox{T\kern0pto}% -% \hskip\dimexpr\wd0-\wd2\relax -% \fi -% \TeX -% \endgroup} -% -% a further iteration from the list, patched again - -% \ifx\fontalternative\s!it -\else -% \ifx\fontalternative\s!sl -\else -% \ifx\fontalternative\s!bi -\else -% \ifx\fontalternative\s!bs -\fi\fi\fi\fi - -\unexpanded\def\LuaTeX - {\dontleavehmode - \begingroup - Lua% - % hope for kerning, try aT - \setbox0\hbox{aT}% - \setbox2\hbox{a\kern\zeropoint T}% - \ifdim\wd0=\wd2 % kerns can go two ways - % no aT kerning, try oT as a is not symmetrical - \setbox0\hbox{oT}% - \setbox2\hbox{o\kern\zeropoint T}% - \ifdim\wd0=\wd2 % kerns can go two ways - % no aT and oT kerning, try To - \setbox0\hbox{To}% - \setbox2\hbox{T\kern\zeropoint o}% - % maybe we need to compensate for the angle (sl/it/bs/bi) - \fi - \ifdim\wd0=\wd2\else - \kern\dimexpr\wd0-\wd2\relax - \fi - \fi - \TeX - \endgroup} - -\unexpanded\def\LuajitTeX - {\dontleavehmode - \begingroup - % at this moment there is no real need for kerning tT - Luajit\kern\zeropoint\TeX - \endgroup} - -\let\luaTeX \LuaTeX -\let\luajitTeX\LuajitTeX -\let\LUATEX \LuaTeX -\let\LUAJITTEX\LuajitTeX - -\unexpanded\def\MKII{MkII} -\unexpanded\def\MKIV{MkIV} -\unexpanded\def\MKVI{MkVI} -\unexpanded\def\MKIX{MkIX} -\unexpanded\def\MKXI{MkXI} - -\unexpanded\def\MPII{MpII} -\unexpanded\def\MPIV{MpIV} -\unexpanded\def\MPVI{MpVI} - -\appendtoks - \def\ConTeXt {ConTeXt}% - \def\MetaPost {MetaPost}% - \def\MetaFont {MetaFont}% - \def\MetaFun {MetaFun}% - \def\TeX {TeX}% - \def\LuaTeX {LuaTeX}% - \def\LuajitTeX{LuajitTeX}% -\to \everysimplifycommands - -\protect \endinput |