summaryrefslogtreecommitdiff
path: root/tex/context/modules/mkiv/m-pictex.mkiv
blob: 8843ac4ce9f60dc28a6e027555f20e1236789437 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
%D \module
%D   [       file=m-pictex,
%D        version=1997.01.15,
%D          title=\CONTEXT\ Extra Modules,
%D       subtitle=\PICTEX\ Loading Macros,
%D         author=Hans 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.

%D Just in case someone still uses \PICTEX\ we provide a loader. However, because it
%D expect some plain helpers to be present (like \type {\newhelp} and because it
%D defined some already used dimensions, we'd either need to adapt or add some
%D push|/|pop here. Because \CONTEXT\ users have \METAPOST\ support we no longer
%D support \PICTEX\ in \LMTX.

\ifcase\contextlmtxmode \else
    \writestatus{modules}{the PicTeX graphic system is not supported in LMTX}
    \expandafter \endinput
\fi

\ifdefined\beginpicture \else

    \ifdefined\grid \else
        \let\normalgrid\grid
    \fi

    \ifdefined\axis \else
        \let\normalaxis\axis
    \fi

    \ifdefined\fiverm \else
        \font\fiverm=cmr5
    \fi

    \input prepictex.tex  \relax
    \input pictex.tex     \relax
    \input postpictex.tex \relax

    \ifdefined\normalgrid
        \let\pictexgrid\grid
        \let\grid\normalgrid
    \fi

    \ifdefined\normalaxis
        \let\pictexaxis\axis
        \let\axis\normalaxis
    \fi

\fi

\protect \endinput