%D \module
%D   [       file=type-gyr,
%D        version=2006.06.28,
%D          title=\CONTEXT\ Typescript Macros,
%D       subtitle=TeXGyre Collection,
%D         author=Hans Hagen,
%D           date=\currentdate,
%D      copyright=PRAGMA]
%C
%C This module is part of the \CONTEXT\ macro||package and is
%C therefore copyrighted by \PRAGMA. See mreadme.pdf for
%C details.

% \usetypescriptfile[type-gyr]
% \definetypeface[pagella][rm][serif][pagella][default][encoding=t5]
% \setupbodyfont[pagella]
% \starttext
% \startlines
% hello world 123
% {hello \Var[sc] world 123}
% {\it hello \Var[sc]world \Var[reset] 123}
% {\bf hello \Var[osf] {\Var[reset] world} 123}
% {\bi hello world \Var[osf]123}
% {\sc hello \Var[sc] world \Var[reset] 123}
% \stoplines
% \showfont[SerifItalicCaps]
% \stoptext

\starttypescriptcollection[gyre]

%D First we define the new ones. Watch how we use the systematic name composition.

\definetypescriptprefix [n:pagella] [TeXGyrePagella]
\definetypescriptprefix [n:termes]  [TeXGyreTermes]
\definetypescriptprefix [n:bonum]   [TeXGyreBonum]
\definetypescriptprefix [n:schola]  [TeXGyreSchola]

\definetypescriptprefix [f:pagella] [pl]
\definetypescriptprefix [f:termes]  [tm]
\definetypescriptprefix [f:bonum]   [bk]
\definetypescriptprefix [f:schola]  [cs]

\starttypescript [serif] [pagella,termes,bonum,schola] [ec,texnansi,cs,el,qx,rm,t5,t2a,t2b,t2c,l7x]
  \loadmapfile[\typescriptthree-q\typescriptprefix{f:\typescripttwo}.map]

  \definefontsynonym [\typescriptprefix{n:\typescripttwo}-Regular]        [\typescriptthree-q\typescriptprefix{f:\typescripttwo}r]     [encoding=\typescriptthree]
  \definefontsynonym [\typescriptprefix{n:\typescripttwo}-Italic]         [\typescriptthree-q\typescriptprefix{f:\typescripttwo}ri]    [encoding=\typescriptthree]
  \definefontsynonym [\typescriptprefix{n:\typescripttwo}-Bold]           [\typescriptthree-q\typescriptprefix{f:\typescripttwo}b]     [encoding=\typescriptthree]
  \definefontsynonym [\typescriptprefix{n:\typescripttwo}-BoldItalic]     [\typescriptthree-q\typescriptprefix{f:\typescripttwo}bi]    [encoding=\typescriptthree]
  \definefontsynonym [\typescriptprefix{n:\typescripttwo}-Caps]           [\typescriptthree-q\typescriptprefix{f:\typescripttwo}r-sc]  [encoding=\typescriptthree]
  \definefontsynonym [\typescriptprefix{n:\typescripttwo}-ItalicCaps]     [\typescriptthree-q\typescriptprefix{f:\typescripttwo}ri-sc] [encoding=\typescriptthree]
  \definefontsynonym [\typescriptprefix{n:\typescripttwo}-BoldCaps]       [\typescriptthree-q\typescriptprefix{f:\typescripttwo}b-sc]  [encoding=\typescriptthree]
  \definefontsynonym [\typescriptprefix{n:\typescripttwo}-BoldItalicCaps] [\typescriptthree-q\typescriptprefix{f:\typescripttwo}bi-sc] [encoding=\typescriptthree]

  \definefontsynonym [\typescriptprefix{n:\typescripttwo}-Slanted]        [\typescriptprefix{n:\typescripttwo}-Italic]
  \definefontsynonym [\typescriptprefix{n:\typescripttwo}-BoldSlanted]    [\typescriptprefix{n:\typescripttwo}-BoldItalic]
\stoptypescript

\starttypescript [serif] [pagella,termes,bonum,schola] [name]
  \definefontsynonym [Serif]                [\typescriptprefix{n:\typescripttwo}-Regular]
  \definefontsynonym [SerifItalic]          [\typescriptprefix{n:\typescripttwo}-Italic]
  \definefontsynonym [SerifBold]            [\typescriptprefix{n:\typescripttwo}-Bold]
  \definefontsynonym [SerifBoldItalic]      [\typescriptprefix{n:\typescripttwo}-BoldItalic]
  \definefontsynonym [SerifCaps]            [\typescriptprefix{n:\typescripttwo}-Caps]
  \definefontsynonym [SerifSlanted]         [\typescriptprefix{n:\typescripttwo}-Slanted]
  \definefontsynonym [SerifBoldSlanted]     [\typescriptprefix{n:\typescripttwo}-BoldSlanted]

  \definefontvariant [Serif][osf][Caps]
  \definefontvariant [Serif][sc] [Caps]

  \definefontsynonym [SerifRegular]         [\typescriptprefix{n:\typescripttwo}-Regular]
  \definefontsynonym [SerifRegularCaps]     [\typescriptprefix{n:\typescripttwo}-Caps]
  \definefontsynonym [SerifItalicCaps]      [\typescriptprefix{n:\typescripttwo}-ItalicCaps]
  \definefontsynonym [SerifBoldCaps]        [\typescriptprefix{n:\typescripttwo}-BoldCaps]
  \definefontsynonym [SerifBoldItalicCaps]  [\typescriptprefix{n:\typescripttwo}-BoldItalicCaps]
  \definefontsynonym [SerifCapsCaps]        [\typescriptprefix{n:\typescripttwo}-Caps]
  \definefontsynonym [SerifSlantedCaps]     [\typescriptprefix{n:\typescripttwo}-ItalicCaps]
  \definefontsynonym [SerifBoldSlantedCaps] [\typescriptprefix{n:\typescripttwo}-BoldItalicCaps]

\stoptypescript

\starttypescript [map] [pagella,termes,bonum,schola] [ec,texnansi,cs,el,qx,rm,t5,t2a,t2b,t2c,l7x]
  \loadmapfile[\typescriptthree-q\typescriptprefix{f:\typescripttwo}.map]
\stoptypescript

%D Here we overload the older (URW) fonts.

% TeXGyrePagella
%
% qplr  TeXGyrePagella-Regular
% qplri TeXGyrePagella-Italic
% qplb  TeXGyrePagella-Bold
% qplbi TeXGyrePagella-BoldItalic

\starttypescript [serif] [palatino] [ec,texnansi,cs,el,qx,rm,t5,t2a,t2b,t2c,l7x]
  \loadmapfile[\typescriptthree-qpl.map]

  \definefontsynonym [Palatino]             [\typescriptthree-qplr]    [encoding=\typescriptthree]
  \definefontsynonym [Palatino-Italic]      [\typescriptthree-qplri]   [encoding=\typescriptthree]
  \definefontsynonym [Palatino-Bold]        [\typescriptthree-qplb]    [encoding=\typescriptthree]
  \definefontsynonym [Palatino-BoldItalic]  [\typescriptthree-qplbi]   [encoding=\typescriptthree]
  \definefontsynonym [Palatino-Caps]        [\typescriptthree-qplr-sc] [encoding=\typescriptthree]

  \definefontsynonym [Palatino-Slanted]     [Palatino-Italic]
  \definefontsynonym [Palatino-BoldSlanted] [Palatino-BoldItalic]
\stoptypescript

% TeXGyreTermes
%
% qtmr  TeXGyreTermes-Regular
% qtmri TeXGyreTermes-Italic
% qtmb  TeXGyreTermes-Bold
% qtmbi TeXGyreTermes-BoldItalic

\starttypescript [serif] [times] [ec,texnansi,cs,el,qx,rm,t5,t2a,t2b,t2c,l7x]
  \loadmapfile[\typescriptthree-qtm.map]

  \definefontsynonym [Times-Roman]       [\typescriptthree-qtmr]    [encoding=\typescriptthree]
  \definefontsynonym [Times-Italic]      [\typescriptthree-qtmri]   [encoding=\typescriptthree]
  \definefontsynonym [Times-Bold]        [\typescriptthree-qtmb]    [encoding=\typescriptthree]
  \definefontsynonym [Times-BoldItalic]  [\typescriptthree-qtmbi]   [encoding=\typescriptthree]
  \definefontsynonym [Times-Caps]        [\typescriptthree-qtmr-sc] [encoding=\typescriptthree]

  \definefontsynonym [Times-Slanted]     [Times-Italic]
  \definefontsynonym [Times-BoldSlanted] [Times-BoldItalic]
\stoptypescript

% TeXGyreBonum
%
% qtmr  TeXGyreBonum-Regular
% qtmri TeXGyreBonum-Italic
% qtmb  TeXGyreBonum-Bold
% qtmbi TeXGyreBonum-BoldItalic

\starttypescript [serif] [bookman] [ec,texnansi,cs,el,qx,rm,t5,t2a,t2b,t2c,l7x]
  \loadmapfile[\typescriptthree-qbk.map]

  \definefontsynonym [Bookman-Light]           [\typescriptthree-qbkr]    [encoding=\typescriptthree]
  \definefontsynonym [Bookman-LightItalic]     [\typescriptthree-qbkri]   [encoding=\typescriptthree]
  \definefontsynonym [Bookman-DemiBold]        [\typescriptthree-qbkb]    [encoding=\typescriptthree]
  \definefontsynonym [Bookman-DemiBoldItalic]  [\typescriptthree-qbkbi]   [encoding=\typescriptthree]
  \definefontsynonym [Bookman-Light-Caps]      [\typescriptthree-qbkr-sc] [encoding=\typescriptthree]

  \definefontsynonym [Bookman-LightSlanted]    [Bookman-LightItalic]
  \definefontsynonym [Bookman-DemiBoldSlanted] [Bookman-DemiBoldItalic]
\stoptypescript

% TeXGyreScola
%
% qcsr  TeXGyreSchola-Regular
% qcsri TeXGyreSchola-Italic
% qcsb  TeXGyreSchola-Bold
% qcsbi TeXGyreSchola-BoldItalic

\starttypescript [serif] [schoolbook] [ec,texnansi,cs,el,qx,rm,t5,t2a,t2b,t2c,l7x]
  \loadmapfile[\typescriptthree-qcs.map]

  \definefontsynonym [Schoolbook-Roman]       [\typescriptthree-qcsr]    [encoding=\typescriptthree]
  \definefontsynonym [Schoolbook-Italic]      [\typescriptthree-qcsri]   [encoding=\typescriptthree]
  \definefontsynonym [Schoolbook-Bold]        [\typescriptthree-qcsb]    [encoding=\typescriptthree]
  \definefontsynonym [Schoolbook-BoldItalic]  [\typescriptthree-qcsbi]   [encoding=\typescriptthree]
  \definefontsynonym [Schoolbook-Roman-Caps]  [\typescriptthree-qcsr-sc] [encoding=\typescriptthree]

  \definefontsynonym [Schoolbook-Slanted]     [Schoolbook-Italic]
  \definefontsynonym [Schoolbook-BoldSlanted] [Schoolbook-BoldItalic]
\stoptypescript

\stoptypescriptcollection
