type-imp-unfonts.mkiv /size: 8070 b    last modification: 2023-12-21 09:44
1%D \module
2%D   [       file=type-imp-unfonts,
3%D        version=2012.03.11,
4%D          title=\CONTEXT\ Typescript Macros,
5%D       subtitle=UnFonts,
6%D         author=Dalyoung \& Hans,
7%D           date=\currentdate,
8%D      copyright=Dalyoung \& Hans]
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% usage: \setupbodyfont[unfonts]
15
16\loadtypescriptfile[texgyre]
17%\loadtypescriptfile[xits]
18
19\definefontfeature
20  [kr-default]
21  [mode=node,script=hang,lang=kor]
22
23\definefontfeature
24  [kr-slanted]
25  [mode=node,script=hang,lang=kor,slant=.2]
26
27\definefontfeature
28  [kr-latin-default]
29  [default]
30
31\definefontfeature
32  [kr-latin-slanted]
33  [krlatindefault]
34  [slant=.2]
35
36\definefontfeature
37  [kr-latin-slanted-mono]
38  [slant=.2]
39
40\definefontfeature
41  [kr-latin-smallcaps]
42  [krlatindefault]
43  [smcp=yes]
44
45\definefontfeature
46  [kr-latin-smallcaps-mono]
47  [cmcp=yes]
48
49\definefontfallback[kr-serif]           [texgyrepagella-regular*kr-latin-default]      [0x0000-0x0400][force=yes]
50\definefontfallback[kr-serifbold]       [texgyrepagella-bold*kr-latin-default]         [0x0000-0x0400][force=yes]
51\definefontfallback[kr-serifitalic]     [texgyrepagella-italic*kr-latin-default]       [0x0000-0x0400][force=yes]
52\definefontfallback[kr-serifbolditalic] [texgyrepagella-bolditalic*kr-latin-default]   [0x0000-0x0400][force=yes]
53\definefontfallback[kr-serifslanted]    [texgyrepagella-regular*kr-latin-slanted]      [0x0000-0x0400][force=yes]
54\definefontfallback[kr-serifboldslanted][texgyrepagella-bold*kr-latin-slanted]         [0x0000-0x0400][force=yes]
55\definefontfallback[kr-serifcaps]       [texgyrepagella-regular*kr-latin-smallcaps]    [0x0000-0x0400][force=yes]
56\definefontfallback[kr-sans]            [texgyreheros-regular*kr-latin-default]        [0x0000-0x0400][force=yes]
57\definefontfallback[kr-sansbold]        [texgyreheros-bold*kr-latin-default]           [0x0000-0x0400][force=yes]
58\definefontfallback[kr-sansitalic]      [texgyreheros-italic*kr-latin-default]         [0x0000-0x0400][force=yes]
59\definefontfallback[kr-sansbolditalic]  [texgyreheros-bolditalic*kr-latin-default]     [0x0000-0x0400][force=yes]
60\definefontfallback[kr-sansslanted]     [texgyreheros-regular*kr-latin-slanted]        [0x0000-0x0400][force=yes]
61\definefontfallback[kr-sansboldslanted] [texgyreheros-bold*kr-latin-slanted]           [0x0000-0x0400][force=yes]
62\definefontfallback[kr-sanscaps]        [texgyreheros-regular*kr-latin-smallcaps]      [0x0000-0x0400][force=yes]
63\definefontfallback[kr-mono]            [texgyrecursor-regular]                        [0x0000-0x0400][force=yes]
64\definefontfallback[kr-monobold]        [texgyrecursor-bold]                           [0x0000-0x0400][force=yes]
65\definefontfallback[kr-monoitalic]      [texgyrecursor-italic]                         [0x0000-0x0400][force=yes]
66\definefontfallback[kr-monobolditalic]  [texgyrecursor-bolditalic]                     [0x0000-0x0400][force=yes]
67\definefontfallback[kr-monoslanted]     [texgyrecursor-regular*kr-latin-slanted-mono]  [0x0000-0x0400][force=yes]
68\definefontfallback[kr-monoboldslanted] [texgyrecursor-bold*kr-latin-slanted-mono]     [0x0000-0x0400][force=yes]
69\definefontfallback[kr-monocaps]        [texgyrecursor-regular*kr-latin-smallcaps-mono][0x0000-0x0400][force=yes]
70
71\starttypescriptcollection[unfonts]
72
73    \starttypescript [\s!serif] [unbatang]
74        \definefontsynonym [unbatang]           [\s!file:unbatang]    [\s!features=kr-default,\s!fallbacks=kr-serif]
75        \definefontsynonym [unbatangbold]       [\s!file:unbatangbold][\s!features=kr-default,\s!fallbacks=kr-serifbold]
76        \definefontsynonym [unbatangitalic]     [\s!file:unbatang]    [\s!features=kr-slanted,\s!fallbacks=kr-serifitalic]
77        \definefontsynonym [unbatangbolditalic] [\s!file:unbatangbold][\s!features=kr-slanted,\s!fallbacks=kr-serifbolditalic]
78        \definefontsynonym [unbatangslanted]    [\s!file:unbatang]    [\s!features=kr-slanted,\s!fallbacks=kr-serifslanted]
79        \definefontsynonym [unbatangboldslanted][\s!file:unbatangbold][\s!features=kr-slanted,\s!fallbacks=kr-serifboldslanted]
80        \definefontsynonym [unbatangcaps]       [\s!file:unbatang]    [\s!features=kr-default,\s!fallbacks=kr-serifcaps]
81    \stoptypescript
82
83    \starttypescript [\s!sans] [undotum]
84        \definefontsynonym[undotum]             [\s!file:undotum]     [\s!features=kr-default,\s!fallbacks=kr-sans]
85        \definefontsynonym[undotumbold]         [\s!file:undotumbold] [\s!features=kr-default,\s!fallbacks=kr-sansbold]
86        \definefontsynonym[undotumitalic]       [\s!file:undotum]     [\s!features=kr-slanted,\s!fallbacks=kr-sansitalic]
87        \definefontsynonym[undotumbolditalic]   [\s!file:undotumbold] [\s!features=kr-slanted,\s!fallbacks=kr-sansbolditalic]
88        \definefontsynonym[undotumslanted]      [\s!file:undotum]     [\s!features=kr-slanted,\s!fallbacks=kr-sansslanted]
89        \definefontsynonym[undotumboldslanted]  [\s!file:undotumbold] [\s!features=kr-slanted,\s!fallbacks=kr-sansboldslanted]
90        \definefontsynonym[undotumcaps]         [\s!file:undotum]     [\s!features=kr-default,\s!fallbacks=kr-sanscaps]
91    \stoptypescript
92
93    \starttypescript [\s!mono] [untype]
94        \definefontsynonym[untype]              [\s!file:untaza]      [\s!features=kr-default,\s!fallbacks=kr-mono]
95        \definefontsynonym[untypebold]          [\s!file:untaza]      [\s!features=kr-default,\s!fallbacks=kr-monobold]
96        \definefontsynonym[untypeitalic]        [\s!file:untaza]      [\s!features=kr-slanted,\s!fallbacks=kr-monoitalic]
97        \definefontsynonym[untypebolditalic]    [\s!file:untaza]      [\s!features=kr-slanted,\s!fallbacks=kr-monobolditalic]
98        \definefontsynonym[untypeslanted]       [\s!file:untaza]      [\s!features=kr-slanted,\s!fallbacks=kr-monoslanted]
99        \definefontsynonym[untypeboldslanted]   [\s!file:untaza]      [\s!features=kr-slanted,\s!fallbacks=kr-monoboldslanted]
100        \definefontsynonym[untypecaps]          [\s!file:untaza]      [\s!features=kr-default,\s!fallbacks=kr-monocaps]
101    \stoptypescript
102
103    \starttypescript [\s!serif] [unbatang] [\s!name]
104        \definefontsynonym[\s!Serif]           [unbatang]
105        \definefontsynonym[\s!SerifBold]       [unbatangbold]
106        \definefontsynonym[\s!SerifItalic]     [unbatangitalic]
107        \definefontsynonym[\s!SerifBoldItalic] [unbatangbolditalic]
108        \definefontsynonym[\s!SerifSlanted]    [unbatangslanted]
109        \definefontsynonym[\s!SerifBoldSlanted][unbatangboldslanted]
110        \definefontsynonym[\s!SerifCaps]       [unbatangcaps]
111    \stoptypescript
112
113    \starttypescript [\s!sans] [undotum] [\s!name]
114        \definefontsynonym[\s!Sans]            [undotum]
115        \definefontsynonym[\s!SansBold]        [undotumbold]
116        \definefontsynonym[\s!SansItalic]      [undotumitalic]
117        \definefontsynonym[\s!SansBoldItalic]  [undotumbolditalic]
118        \definefontsynonym[\s!SansSlanted]     [undotumslanted]
119        \definefontsynonym[\s!SansBoldSlanted] [undotumboldslanted]
120        \definefontsynonym[\s!SansCaps]        [undotumcaps]
121    \stoptypescript
122
123    \starttypescript [\s!mono] [untype] [\s!name]
124        \definefontsynonym[\s!Mono]            [untype]
125        \definefontsynonym[\s!MonoBold]        [untypebold]
126        \definefontsynonym[\s!MonoItalic]      [untypeitalic]
127        \definefontsynonym[\s!MonoBoldItalic]  [untypebolditalic]
128        \definefontsynonym[\s!MonoSlanted]     [untypeslanted]
129        \definefontsynonym[\s!MonoBoldSlanted] [untypeboldslanted]
130        \definefontsynonym[\s!MonoCaps]        [untypecaps]
131    \stoptypescript
132
133    % xits might get replaced with a pagella once we have it
134
135    \starttypescript[unfonts]
136        \definetypeface [unfonts] [\s!rm] [\s!serif] [unbatang]
137        \definetypeface [unfonts] [\s!ss] [\s!sans]  [undotum]
138        \definetypeface [unfonts] [\s!tt] [\s!mono]  [untype]
139        \definetypeface [unfonts] [\s!mm] [\s!math]  [pagella]
140    \stoptypescript
141
142\stoptypescriptcollection
143