blob: 6afc7efc52d2044237d4ad1d8dc3846d4a748242 (
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
|
%D \module
%D [ file=meta-tex,
%D version=2006.06.07,
%D title=\CONTEXT\ Support Macros,
%D subtitle=\METAPOST\ fast text insertion,
%D author=Hans Hagen,
%D date=\currentdate,
%D copyright=\PRAGMA]
%C
%C This module is part of the \CONTEXT\ macro||package and is
%C therefore copyrighted by \PRAGMA. See mreadme.pdf for
%C details.
\unprotect
\long\def\startTeXtexts#1\stopTeXtexts{[do we need TeXtexts in MkIV]}
\long\def\doTeXtext[#1]#2{[do we need TeXtexts in MkIV]}
\long\def\TeXtext{\dosingleempty\doTeXtext}
\def\definetextext[#1]#2{\setvalue{textext@@#1}{#2}}
% \definetextext[framed]{\framed}
%
% \startMPcode
% draw \sometxt[framed]{black} rotated 45 ;
% \stopMPcode
\def\definetextext[#1]#2{\setvalue{@@st@@[#1]}{#2}}
\long\def\sometxt#1#{\dosometxt{#1}} % grab optional [args]
\long\def\dosometxt#1#2%
{textext("\ifcsname @@st@@#1\endcsname\csname @@st@@#1\endcsname{#2}\else#2\fi")}
\protect \endinput
|