type-imp-punk.mkxl /size: 2213 b    last modification: 2021-10-28 13:51
1%D \module
2%D   [       file=type-imp-punk,
3%D        version=2020.01.17,
4%D          title=\CONTEXT\ Typescript Macros,
5%D       subtitle=Punk Again,
6%D         author=Hans Hagen,
7%D           date=\currentdate,
8%D      copyright={PRAGMA ADE \& \CONTEXT\ Development Team}]
9%C
10%C This module is part of the \CONTEXT\ macro||package and is
11%C therefore copyrighted by \PRAGMA. See mreadme.pdf for
12%C details.
13
14%D Yet another look at punk.
15
16\ifdefined\enablerandomvariants\else
17    \useMPlibrary[punk]
18\fi
19
20\doifelse {\truefontname{Serif}} {unknown} {
21    \writestatus{fonts}{you need to load a base bodyfont first}
22    \endinput
23} {
24    % we're ok
25}
26
27\starttypescriptcollection[punk]
28
29    \definefontfeature [punk]            [metapost={category=punk,preroll=punkpreroll}]
30    \definefontfeature [punkrandom]      [metapost={category=punk,preroll=punkpreroll,variants=5}]
31    \definefontfeature [punkbold]        [metapost={category=punk,preroll=punkpreroll,weight=2}]
32    \definefontfeature [punkslanted]     [metapost={category=punk,preroll=punkpreroll,slant=.15}]
33    \definefontfeature [punkboldslanted] [metapost={category=punk,preroll=punkpreroll,slant=.15,weight=2}]
34    \definefontfeature [punkveryslanted] [metapost={category=punk,preroll=punkpreroll,slant=-.15}]
35    \definefontfeature [punksqueezed]    [metapost={category=punk,preroll=punkpreroll,squeeze=.5}]
36    \definefontfeature [punkextended]    [metapost={category=punk,preroll=punkpreroll,extend=1.3}]
37
38    \definefontsynonym [punkbase]        [\truefontname{Serif}]
39
40    \starttypescript [\s!serif] [punk]
41        \definefontsynonym [\s!Serif]           [punkbase] [\s!features=punk]
42        \definefontsynonym [\s!SerifSlanted]    [punkbase] [\s!features=punkslanted]
43        \definefontsynonym [\s!SerifBold]       [punkbase] [\s!features=punkbold]
44        \definefontsynonym [\s!SerifBoldSlanted][punkbase] [\s!features=punkboldslanted]
45        \definefontsynonym [\s!SerifItalic]     [\s!SerifSlanted]
46        \definefontsynonym [\s!SerifBoldItalic] [\s!SerifBoldSlanted]
47    \stoptypescript
48
49    \starttypescript [punk]
50        \definetypeface [punk] [\s!rm] [\s!serif] [punk] [\s!default]
51    \stoptypescript
52
53\stoptypescriptcollection
54
55