1
2
3
4
5
6
7
8
9
10
11
12
13
14\writestatus{loading}{ConTeXt Font Macros Glyph Scaling}
15
16\unprotect
17
18
19
20\installcorenamespace{tweakedfont}
21
22\installcommandhandler \??tweakedfont {tweakedfont} \??tweakedfont
23
24\appendtoks
25
26 \overloaded\frozen\protected\edefcsname\currenttweakedfont\endcsname
27 {\begincsname\tweakedfontparameter\c!style\endcsname
28 \glyphxscale \numexpr\numericscale\tweakedfontparameter\c!xscale*\glyphxscale\plusthousand\relax
29 \glyphyscale \numexpr\numericscale\tweakedfontparameter\c!yscale*\glyphyscale\plusthousand\relax
30 \glyphxoffset\dimexpr\glyphxoffset\tweakedfontparameter\c!xoffset\relax
31 \glyphyoffset\dimexpr\glyphyoffset\tweakedfontparameter\c!yoffset\relax}
32\to \everydefinetweakedfont
33
34\setuptweakedfont
35 [\c!scale=\plusthousand,
36 \c!xscale=\tweakedfontparameter\c!scale,
37 \c!yscale=\tweakedfontparameter\c!scale,
38 \c!xoffset=\zeropoint,
39 \c!yoffset=\zeropoint]
40
41\protect \endinput
42 |