summaryrefslogtreecommitdiff
path: root/tex/context/base/prop-eff.mkiv
blob: 7207b9df481615f7ee8b6d3f75602a12a153fe46 (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
%D \module
%D   [       file=prop-eff,
%D        version=2004.05.29, % some code moved from private modules
%D          title=\CONTEXT\ Property Macros,
%D       subtitle=Effects,
%D         author=Hans Hagen,
%D           date=\currentdate,
%D      copyright={PRAGMA / Hans Hagen \& Ton Otten}]
%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 Property Macros / Effects}

\unprotect

%D Special font effects.

\setupproperty
  [\s!effect]
  [\c!rulethickness=\zeropoint,
   \c!stretch=0]

\defineproperty [\v!inner]   [\s!effect] [\c!rulethickness=.25pt]
\defineproperty [\v!outer]   [\s!effect] [\c!rulethickness=.25pt]
\defineproperty [\v!both]    [\s!effect] [\c!rulethickness=.25pt]
\defineproperty [\v!normal]  [\s!effect]
\defineproperty [\v!hidden]  [\s!effect]

\defineproperty [\v!stretch] [\s!effect] [\c!stretch=1]

\def\mktriggereffect#1%
  {\dotriggereffect{#1}{\propertyparameter{#1}\c!stretch}{\propertyparameter{#1}\c!rulethickness}}

\definepropertyhandler \v!normal {\mktriggereffect\v!normal}
\definepropertyhandler \v!inner  {\mktriggereffect\v!inner }
\definepropertyhandler \v!outer  {\mktriggereffect\v!outer }
\definepropertyhandler \v!both   {\mktriggereffect\v!both  }
\definepropertyhandler \v!hidden {\mktriggereffect\v!hidden}
\definepropertyhandler \v!stretch{\mktriggereffect\v!normal}

\unexpanded\def\starteffectproperty{\mktriggereffect\currentproperty}
\unexpanded\def\stopeffectproperty {\mktriggereffect\v!normal       }

\protect \endinput