%D \module
%D   [       file=type-otf,
%D        version=2007.07.30,
%D          title=\CONTEXT\ Typescript Macros,
%D       subtitle=Opentype Definitions,
%D         author=Hans Hagen,
%D           date=\currentdate,
%D      copyright={PRAGMA / Hans Hagen \& Ton Otten}]
%C
%C This module is part of the \CONTEXT\ macro||package and is
%C therefore copyrighted by \PRAGMA. See mreadme.pdf for
%C details.

%D Actually, \LUATEX\ does not need all these definitions since it can
%D consult its database. However, here we use the names that we used
%D in good old \TEX, and these may differ a bit. Here we also see
%D some oldstyle definitions which normally are done with features.

\starttypescriptcollection[examples]

\starttypescript [fallback]
    \definetypeface [] [rm] [serif] [modern] [computer-modern]
    \definetypeface [] [ss] [sans]  [modern] [computer-modern]
    \definetypeface [] [tt] [mono]  [modern] [computer-modern]
    \definetypeface [] [mm] [math]  [modern] [computer-modern]
    \quittypescriptscanning
\stoptypescript

% faster
%
% \starttypescript [fallback]
%     \definetypeface [] [rm] [serif] [modern] [default]
%     \definetypeface [] [ss] [sans]  [modern] [default]
%     \definetypeface [] [tt] [mono]  [modern] [default]
%     \definetypeface [] [mm] [math]  [modern] [default]
%     \quittypescriptscanning
% \stoptypescript

\starttypescript [modern]
    \definetypeface [modern] [rm] [serif] [modern] [computer-modern]
    \definetypeface [modern] [ss] [sans]  [modern] [computer-modern]
    \definetypeface [modern] [tt] [mono]  [modern] [computer-modern]
    \definetypeface [modern] [mm] [math]  [modern] [computer-modern]
    \quittypescriptscanning
\stoptypescript

\starttypescript [modern-base]
    \definetypeface [modern] [rm] [serif] [modern] [default]
    \definetypeface [modern] [ss] [sans]  [modern] [default]
    \definetypeface [modern] [tt] [mono]  [modern] [default]
    \definetypeface [modern] [mm] [math]  [modern] [default]
    \quittypescriptscanning
\stoptypescript

\starttypescript [postscript]
    \definetypeface [postscript] [rm] [serif] [times]     [default]
    \definetypeface [postscript] [ss] [sans]  [helvetica] [default] [rscale=0.9]
    \definetypeface [postscript] [tt] [mono]  [courier]   [default] [rscale=1.1]
    \definetypeface [postscript] [mm] [math]  [times]     [default]
    \quittypescriptscanning
\stoptypescript

\starttypescript [times,termes]
    \definetypeface [\typescriptone] [rm] [serif] [\typescriptone] [default]
    \definetypeface [\typescriptone] [ss] [sans]  [helvetica]      [default] [rscale=0.9]
    \definetypeface [\typescriptone] [tt] [mono]  [modern]         [default] [rscale=1.05]
    \definetypeface [\typescriptone] [mm] [math]  [times]          [default]
    \quittypescriptscanning
\stoptypescript

\starttypescript [palatino,pagella]
    \definetypeface [\typescriptone] [rm] [serif] [\typescriptone] [default]
    \definetypeface [\typescriptone] [ss] [sans]  [modern]         [default] [rscale=1.075]
    \definetypeface [\typescriptone] [tt] [mono]  [modern]         [default] [rscale=1.075]
    \definetypeface [\typescriptone] [mm] [math]  [palatino]       [default]
    \quittypescriptscanning
\stoptypescript

\starttypescript [modernvariable]
    \definetypeface [modernvariable] [rm] [serif] [simple] [default]
    \definetypeface [modernvariable] [ss] [sans]  [modern] [default]
    \definetypeface [modernvariable] [tt] [mono]  [modern] [default]
    \definetypeface [modernvariable] [mm] [math]  [modern] [default]
    \quittypescriptscanning
\stoptypescript

\starttypescript [antykwa-torunska]
    \definetypeface[antykwa][rm][serif][antykwa-torunska]   [default]
    \definetypeface[antykwa][ss][sans] [modern]             [default] [rscale=1.05]
    \definetypeface[antykwa][tt][mono] [modern]             [default] [rscale=1.1]
    \definetypeface[antykwa][mm][math] [antykwa-torunska]   [default]
    \quittypescriptscanning
\stoptypescript

\starttypescript [schoolbook,schola]
    \definetypeface [\typescriptone] [rm] [serif] [\typescriptone] [default]
    \definetypeface [\typescriptone] [ss] [sans]  [modern]         [default]
    \definetypeface [\typescriptone] [tt] [mono]  [modern]         [default]
    \definetypeface [\typescriptone] [mm] [math]  [modern]         [default]
    \quittypescriptscanning
\stoptypescript

\starttypescript [bookman,bonum]
    \definetypeface [\typescriptone] [rm] [serif] [\typescriptone] [default]
    \definetypeface [\typescriptone] [ss] [sans]  [modern]         [default]
    \definetypeface [\typescriptone] [tt] [mono]  [modern]         [default]
    \definetypeface [\typescriptone] [mm] [math]  [modern]         [default]
    \quittypescriptscanning
\stoptypescript

\starttypescript [chancery,chorus]
    \definetypeface [\typescriptone] [rm] [serif] [\typescriptone] [default]
    \definetypeface [\typescriptone] [ss] [sans]  [modern]         [default]
    \definetypeface [\typescriptone] [tt] [mono]  [modern]         [default]
    \definetypeface [\typescriptone] [mm] [math]  [modern]         [default]
    \quittypescriptscanning
\stoptypescript

\starttypescript [iwona,iwona-light,iwona-heavy,iwona-medium]
    \definetypeface[\typescriptone][ss][sans] [\typescriptone] [default]
    \definetypeface[\typescriptone][rm][serif][modern]         [default]
    \definetypeface[\typescriptone][tt][mono] [modern]         [default]
    \definetypeface[\typescriptone][mm][math] [\typescriptone] [default][text=ss]
    \quittypescriptscanning
\stoptypescript

\starttypescript [helvetica,heros]
    \definetypeface [\typescriptone] [ss] [sans]  [\typescriptone] [default]
    \definetypeface [\typescriptone] [rm] [serif] [modern]         [default] [rscale=1.15]
    \definetypeface [\typescriptone] [tt] [mono]  [modern]         [default] [rscale=1.15]
    \definetypeface [\typescriptone] [mm] [math]  [modern]         [default] [rscale=1.15]
    \quittypescriptscanning
\stoptypescript

\starttypescript [avantgarde,adventor]
    \definetypeface [\typescriptone] [ss] [sans]  [adventor] [default]
    \definetypeface [\typescriptone] [rm] [serif] [modern]   [default] [rscale=1.15]
    \definetypeface [\typescriptone] [tt] [mono]  [modern]   [default] [rscale=1.15]
    \definetypeface [\typescriptone] [mm] [math]  [modern]   [default]
    \quittypescriptscanning
\stoptypescript

\starttypescript [courier,cursor]
    \definetypeface [\typescriptone] [tt] [mono]  [\typescriptone] [default]
    \definetypeface [\typescriptone] [rm] [serif] [modern]         [default]
    \definetypeface [\typescriptone] [ss] [sans]  [modern]         [default]
    \definetypeface [\typescriptone] [mm] [math]  [modern]         [default]
    \quittypescriptscanning
\stoptypescript

\stoptypescriptcollection

\loadmarkfile{type-otf}

\endinput
