1 files changed, 135 insertions, 0 deletions
diff --git a/tex/context/fonts/mkiv/type-imp-buy.mkiv b/tex/context/fonts/mkiv/type-imp-buy.mkiv
new file mode 100644
index 000000000..dbfffe57c
--- /dev/null
+++ b/tex/context/fonts/mkiv/type-imp-buy.mkiv
@@ -0,0 +1,135 @@
+%D \module
+%D   [       file=type-buy,
+%D        version=2003.07.08, % 2001.04.12,
+%D          title=\CONTEXT\ Typescript Macros,
+%D       subtitle=A Few Commercial Fonts,
+%D         author=Hans Hagen,
+%D           date=\currentdate,
+%D      copyright={PRAGMA ADE \& \CONTEXT\ Development Team}]
+%C
+%C This module is part of the \CONTEXT\ macro||package and is
+%C therefore copyrighted by \PRAGMA. See mreadme.pdf for
+%C details.
+
+% monotype sabon
+
+\starttypescriptcollection[sabon]
+
+    \starttypescript [serif] [sabon] [name]
+        %
+        \definefontsynonym [Serif]           [SabonMT]
+        \definefontsynonym [SerifItalic]     [SabonMT-Italic]
+        \definefontsynonym [SerifSlanted]    [SabonMT-Italic]
+        \definefontsynonym [SerifBold]       [SabonMT-SemiBold]
+        \definefontsynonym [SerifBoldItalic] [SabonMT-SemiBoldItalic]
+        \definefontsynonym [SerifBoldSlanted][SabonMT-SemiBoldItalic]
+        \definefontsynonym [SerifCaps]       [SabonMT-RegularSC]
+        %
+        \definefontsynonym[SabonMT]                  [sab_____]
+        \definefontsynonym[SabonMT-Italic]           [sabi____]
+        \definefontsynonym[SabonMT-ItalicOsF]        [saboi___]
+        \definefontsynonym[SabonMT-SemiBoldOsF]      [sabos___]
+        \definefontsynonym[SabonMT-SemiBold]         [sabs____]
+        \definefontsynonym[SabonMT-RegularSC]        [sabsc___]
+        \definefontsynonym[SabonMT-SemiBoldItalic]   [sabsi___]
+        \definefontsynonym[SabonMT-SemiBoldItalicOsF][sasio___]
+        %
+    \stoptypescript
+
+\stoptypescriptcollection
+
+% itc stone
+
+\starttypescriptcollection[stone]
+
+    \starttypescript [sans] [stone] [name]
+        %
+        \definefontsynonym [Sans]           [StoneSansITC-Medium]
+        \definefontsynonym [SansItalic]     [StoneSansITC-MediumItalic]
+        \definefontsynonym [SansSlanted]    [StoneSansITC-MediumItalic]
+        \definefontsynonym [SansBold]       [StoneSansITC-Bold]
+        \definefontsynonym [SansBoldItalic] [StoneSansITC-BoldItalic]
+        \definefontsynonym [SansBoldSlanted][StoneSansITC-BoldItalic]
+        \definefontsynonym [SansCaps]       [StoneSansSCITC-Medium]
+        %
+        \definefontsynonym[StoneSansITC-Bold]        [stosnb]
+        \definefontsynonym[StoneSansITC-BoldItalic]  [stosnbi]
+        \definefontsynonym[StoneSansITC-Medium]      [stosnm]
+        \definefontsynonym[StoneSansITC-MediumItalic][stosnmi]
+        \definefontsynonym[StoneSansSemITC-Semi]     [stosns]
+        \definefontsynonym[StoneSansSemITC-SemiIta]  [stosnsi]
+        \definefontsynonym[StoneSansSCITC-Medium]    [stosnscm]
+        \definefontsynonym[StoneSansSemSCITC-Semi]   [stosnscs]
+        %
+    \stoptypescript
+
+    \starttypescript [serif] [stone] [name]
+        %
+        \definefontsynonym [Serif]           [StoneSerifITC-Medium]
+        \definefontsynonym [SerifItalic]     [StoneSerifITC-MediumItalic]
+        \definefontsynonym [SerifSlanted]    [StoneSerifITC-MediumItalic]
+        \definefontsynonym [SerifBold]       [StoneSerifITC-Bold]
+        \definefontsynonym [SerifBoldItalic] [StoneSerifITC-BoldItalic]
+        \definefontsynonym [SerifBoldSlanted][StoneSerifITC-BoldItalic]
+        \definefontsynonym [SerifCaps]       [StoneSerifSCITC-Medium]
+        %
+        \definefontsynonym[StoneSerifITC-Bold]        [stosfb]
+        \definefontsynonym[StoneSerifITC-BoldItalic]  [stosfbi]
+        \definefontsynonym[StoneSerifITC-Medium]      [stosfm]
+        \definefontsynonym[StoneSerifITC-MediumItalic][stosfmi]
+        \definefontsynonym[StoneSerifSemITC-Semi]     [stosfs]
+        \definefontsynonym[StoneSerifSemITC-SemiIta]  [stosfsi]
+        \definefontsynonym[StoneSerifSCITC-Medium]    [stosfscm]
+        \definefontsynonym[StoneSerifSemSCITC-Semi]   [stosfscs]
+        %
+    \stoptypescript
+
+    \starttypescript [sans] [stone-oldstyle] [name]
+        %
+        \definefontsynonym [Sans]           [StoneSansOSITC-Medium]
+        \definefontsynonym [SansItalic]     [StoneSansOSITC-MediumItalic]
+        \definefontsynonym [SansSlanted]    [StoneSansOSITC-MediumItalic]
+        \definefontsynonym [SansBold]       [StoneSansOSITC-Bold]
+        \definefontsynonym [SansBoldItalic] [StoneSansOSITC-BoldItalic]
+        \definefontsynonym [SansBoldSlanted][StoneSansOSITC-BoldItalic]
+        \definefontsynonym [SansCaps]       [StoneSansSCITC-Medium]
+        %
+        \definefontsynonym[StoneSansOSITC-Bold]        [stosnob]
+        \definefontsynonym[StoneSansOSITC-BoldItalic]  [stosnobi]
+        \definefontsynonym[StoneSansOSITC-Medium]      [stosnom]
+        \definefontsynonym[StoneSansOSITC-MediumItalic][stosnomi]
+        \definefontsynonym[StoneSansSemOSITC-Semi]     [stosnos]
+        \definefontsynonym[StoneSansSemOSITC-SemiIta]  [stosnosi]
+        %
+    \stoptypescript
+
+    \starttypescript [serif] [stone-oldstyle] [name]
+        %
+        \definefontsynonym [Serif]            [StoneSerifOSITC-Medium]
+        \definefontsynonym [SerifItalic]      [StoneSerifOSITC-MediumItalic]
+        \definefontsynonym [SerifSlanted]     [StoneSerifOSITC-MediumItalic]
+        \definefontsynonym [SerifBold]        [StoneSerifOSITC-Bold]
+        \definefontsynonym [SerifBoldItalic]  [StoneSerifOSITC-BoldItalic]
+        \definefontsynonym [SerifBoldSlanted] [StoneSerifOSITC-BoldItalic]
+        \definefontsynonym [SerifCaps]        [StoneSerifSCITC-Medium]
+        %
+        \definefontsynonym[StoneSerifOSITC-Bold]        [stosfob]
+        \definefontsynonym[StoneSerifOSITC-BoldItalic]  [stosfobi]
+        \definefontsynonym[StoneSerifOSITC-Medium]      [stosfom]
+        \definefontsynonym[StoneSerifOSITC-MediumItalic][stosfomi]
+        \definefontsynonym[StoneSerifSemOSITC-Semi]     [stosfos]
+        \definefontsynonym[StoneSerifSemOSITC-SemiIta]  [stosfosi]
+        %
+    \stoptypescript
+
+\stoptypescriptcollection
+
+% linotype industria
+
+\starttypescriptcollection[industria]
+
+    \starttypescript [sans] [industria] [name]
+        \definefontsynonym[Industria-Solid][lt_50545]
+    \stoptypescript
+
+\stoptypescriptcollection