Source Browser ?

1%D \module
2%D   [       file=type-lucida-opentype,
3%D        version=2011.05.18,
4%D          title=\CONTEXT\ Typescript Macros,
5%D       subtitle=Lucida Nova Opentype,
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% NOTA BENE: class features and goodies get expanded!
15
16\definefontfeature[mathlucida][copymathscripts=yes] % see lfg file
17
18% \definefontfeature[mathlucida][mathlucida][ss04=yes] % now we swap
19
20% \definefontfeature[mathlucida][ss03=yes]
21
22\starttypescriptcollection[lucida-opentype]
23
24    \doifunknownfontfeature {lucida-math-bold} {\definefontfeature[lucida-math-bold][boldened][boldmath=yes]}
25
26    \starttypescript [lucida,lucidaot,lucidadk,lucidaot-nt,lucida-nt]
27        \loadfontgoodies[lucida-opentype-math]
28        \definetypeface [\typescriptone] [\s!rm] [\s!serif]       [\typescriptone] [\s!default] [\s!features=\s!default]
29        \definetypeface [\typescriptone] [\s!ss] [\s!sans]        [\typescriptone] [\s!default] [\s!features=\s!default]
30        \definetypeface [\typescriptone] [\s!tt] [\s!mono]        [\typescriptone] [\s!default] [\s!features=\s!none]
31        \definetypeface [\typescriptone] [\s!hw] [\s!handwriting] [\typescriptone] [\s!default] [\s!features=\s!default]
32        \definetypeface [\typescriptone] [\s!cg] [\s!calligraphy] [\typescriptone] [\s!default] [\s!features=\s!default]
33        \definetypeface [\typescriptone] [\s!mm] [\s!math]        [\typescriptone] [\s!default]
34        \quittypescriptscanning
35    \stoptypescript
36
37    \starttypescript [\s!serif] [lucida,lucidaot,lucidadk,lucidaot-nt,lucida-nt]
38        \definefontsynonym [\s!Serif]            [\s!file:LucidaBrightOT.otf]           [\s!goodies=lucida-text]
39        \definefontsynonym [\s!SerifBold]        [\s!file:LucidaBrightOT-Demi.otf]      [\s!goodies=lucida-text]
40        \definefontsynonym [\s!SerifItalic]      [\s!file:LucidaBrightOT-Italic.otf]    [\s!goodies=lucida-text]
41        \definefontsynonym [\s!SerifBoldItalic]  [\s!file:LucidaBrightOT-DemiItalic.otf][\s!goodies=lucida-text]
42        \definefontsynonym [\s!SerifSlanted]     [\s!SerifItalic]
43        \definefontsynonym [\s!SerifBoldSlanted] [\s!SerifBoldItalic]
44    \stoptypescript
45
46    \starttypescript [\s!sans] [lucida,lucidaot,lucidadk,lucidaot-nt,lucida-nt]
47        \definefontsynonym [\s!Sans]            [\s!file:LucidaSansOT.otf]
48        \definefontsynonym [\s!SansBold]        [\s!file:LucidaSansOT-Demi.otf]
49        \definefontsynonym [\s!SansItalic]      [\s!file:LucidaSansOT-Italic.otf]
50        \definefontsynonym [\s!SansBoldItalic]  [\s!file:LucidaSansOT-DemiItalic.otf]
51        \definefontsynonym [\s!SansSlanted]     [\s!SansItalic]
52        \definefontsynonym [\s!SansBoldSlanted] [\s!SansBoldItalic]
53    \stoptypescript
54
55    \starttypescript [\s!mono] [lucida,lucidaot,lucidaot-nt,lucida-nt]
56        \definefontsynonym [\s!Mono]            [\s!file:LucidaSansTypewriterOT.otf]
57        \definefontsynonym [\s!MonoBold]        [\s!file:LucidaSansTypewriterOT-Bold.otf]
58        \definefontsynonym [\s!MonoItalic]      [\s!file:LucidaSansTypewriterOT-Oblique.otf]
59        \definefontsynonym [\s!MonoBoldItalic]  [\s!file:LucidaSansTypewriterOT-BoldOblique.otf]
60        \definefontsynonym [\s!MonoSlanted]     [\s!MonoItalic]
61        \definefontsynonym [\s!MonoBoldSlanted] [\s!MonoBoldItalic]
62    \stoptypescript
63
64    \starttypescript [\s!mono] [lucidadk,lucidaot-nt,lucida-nt]
65        \definefontsynonym [\s!Mono]            [\s!file:LucidaGrandeMonoDK.otf]
66        \definefontsynonym [\s!MonoBold]        [\s!file:LucidaGrandeMonoDK-Bold.otf]
67        \definefontsynonym [\s!MonoItalic]      [\s!file:LucidaGrandeMonoDK-Oblique.otf]
68        \definefontsynonym [\s!MonoBoldItalic]  [\s!file:LucidaGrandeMonoDK-BoldOblique.otf]
69        \definefontsynonym [\s!MonoSlanted]     [\s!MonoItalic]
70        \definefontsynonym [\s!MonoBoldSlanted] [\s!MonoBoldItalic]
71    \stoptypescript
72
73    \starttypescript [\s!math] [lucida,lucida-nt,lucidaot,lucidaot-nt,lucidadk]
74        \checkedmapfontsize[\typescripttwo][\s!script]      [.70]
75        \checkedmapfontsize[\typescripttwo][\s!scriptscript][.50]
76    \stoptypescript
77
78    \starttypescript [\s!math] [lucida,lucidaot,lucidadk]
79        \definefontsynonym [\s!MathRoman]     [\s!file:LucidaBrightMathOT.otf]      [\s!features={\s!math\mathsizesuffix,mathlucida,lucida:mathextra,mathextra},\s!goodies=lucida-math]
80      % \definefontsynonym [\s!MathRomanBold] [\s!file:LucidaBrightMathOT-Demi.otf] [\s!features={\s!math\mathsizesuffix,mathlucida,mathextra},\s!goodies=lucida-math]
81        \definefontsynonym [\s!MathRomanBold] [\s!file:LucidaBrightMathOT.otf]      [\s!features={\s!math\mathsizesuffix,lucida-math-bold,mathlucida,lucida:mathextra,mathextra},\s!goodies=lucida-math]
82    \stoptypescript
83
84    \starttypescript [\s!math] [lucidaot-nt,lucida-nt]
85        \definefontsynonym [\s!MathRoman]     [\s!file:LucidaBrightMathOT.otf]      [\s!features={\s!math\mathsizesuffix,mathlucida,lucida:mathextra,mathextra}]
86      % \definefontsynonym [\s!MathRomanBold] [\s!file:LucidaBrightMathOT-Demi.otf] [\s!features={\s!math\mathsizesuffix,mathlucida,mathextra}]
87        \definefontsynonym [\s!MathRomanBold] [\s!file:LucidaBrightMathOT.otf]      [\s!features={\s!math\mathsizesuffix,lucida-math-bold,mathlucida,lucida:mathextra,mathextra}]
88    \stoptypescript
89
90    \starttypescript [\s!handwriting] [lucida,lucidaot,lucidadk,lucidaot-nt,lucida-nt]
91        \definefontsynonym [\s!Handwriting] [\s!file:LucidaHandwritingOT.otf]
92    \stoptypescript
93
94    \starttypescript [\s!calligraphy] [lucida,lucidaot,lucidadk,lucidaot-nt,lucida-nt]
95        \definefontsynonym [\s!Calligraphy] [\s!file:LucidaCalligraphyOT.otf]
96    \stoptypescript
97
98\stoptypescriptcollection
99
100\endinput
101