>>Two things I often need are a (fake) caps font and (now) cmtt (e.g.,
>>instead of Courier). I can enable a caps font generated using fontutil by
>>redefining a few things right in my files, but I don't seem to be able to
>>make such tweaks work via a typescript file. The examples in the manuals
>>show how to add new fonts, but aren't as clear about what is needed when
>>you only want to make a small change to one of the predefined fonts. Now
>>that I have two things to tweak it makes more sense to create a new
>>typescript.

HH> in many cases you only need to remap a filename

HH> i think that it's worth looking into the caps and use cap fonts instead of 
HH> scaled ones; it's more robust to have caps in the lowercase slots than to 
HH> uppercase a string.

To use Times, Courier and Helvetica in their small caps variants I
have:

=== BEGIN SNIPPET ===

%D Let's define the Small Caps variant -- Berry names only, sorry.
%D And no variant available for 8R encoding.
%D Bold Caps is not used by ConTeXt (?)

% Times Roman (URW)

\starttypescript [serif] [times] [default]
  \definefontsynonym [Times-Roman-Caps]       [ptmrc7t]  [encoding=default]
  \definefontsynonym [Times-Bold-Caps]        [ptmbc7t]  [encoding=default]
\stoptypescript

% \starttypescript [serif] [times] [8r]
%   \definefontsynonym [Times-Roman-Caps]       [ptmrc]    [encoding=8r]
%   \definefontsynonym [Times-Bold-Caps]        [ptmbc]    [encoding=8r]
% \stoptypescript

\starttypescript [serif] [times] [ec]
  \definefontsynonym [Times-Roman-Caps]       [ptmrc8t]  [encoding=ec]
  \definefontsynonym [Times-Bold-Caps]        [ptmbc8t]  [encoding=ec]
\stoptypescript

% Courier (URW)

\starttypescript [mono] [courier] [default]
  \definefontsynonym [Courier-Caps]           [pcrrc7t]  [encoding=default]
  \definefontsynonym [Courier-Bold-Caps]      [pcrbc7t]  [encoding=default]
\stoptypescript

% \starttypescript [mono] [courier] [8r]
%   \definefontsynonym [Courier-Caps]           [pcrrc]  [encoding=8r]
%   \definefontsynonym [Courier-Bold-Caps]      [pcrbc]  [encoding=8r]
% \stoptypescript

\starttypescript [mono] [courier] [ec]
  \definefontsynonym [Courier-Caps]           [pcrrc8t]  [encoding=ec]
  \definefontsynonym [Courier-Bold-Caps]      [pcrbc8t]  [encoding=ec]
\stoptypescript

% Helvetica (URW)

\starttypescript [sans] [helvetica] [default]
  \definefontsynonym [Helvetica-Caps]         [phvrc7t]  [encoding=default]
  \definefontsynonym [Helvetica-Bold-Caps]    [phvbc7t]  [encoding=default]
\stoptypescript

% \starttypescript [sans] [helvetica] [8r]
%   \definefontsynonym [Helvetica-Caps]         [phvrc]  [encoding=8r]
%   \definefontsynonym [Helvetica-Bold-Caps]    [phvbc]  [encoding=8r]
% \stoptypescript

\starttypescript [sans] [helvetica] [ec]
  \definefontsynonym [Helvetica-Caps]         [phvrc8t]  [encoding=ec]
  \definefontsynonym [Helvetica-Bold-Caps]    [phvbc8t]  [encoding=ec]
\stoptypescript

%D Let's activate them

\starttypescript [serif] [times] [name]
  \definefontsynonym [SerifCaps]        [Times-Roman-Caps]
  \definefontsynonym [SerifBoldCaps]    [Times-Bold-Caps]
\stoptypescript

\starttypescript [sans] [helvetica] [name]
  \definefontsynonym [SansCaps]          [Helvetica-Caps]
  \definefontsynonym [SansBoldCaps]      [Helvetica-Bold-Caps]
\stoptypescript

\starttypescript [mono] [courier] [name]
  \definefontsynonym [MonoCaps]            [Courier-Caps]
  \definefontsynonym [MonoBoldCaps]        [Courier-Bold-Caps]
\stoptypescript

=== END SNIPPET ===

Reply via email to