Dirk Laurie wrote:
>
> I find 10-point too small and 12-point too large, /rm too light
> and /bf too dark, to have readable lyrics. I've therefore
> made myself an include file (included below) that provides:
> 1. 11-point in /rm, /bf and /it. I have tentatively called
> this size \Normtype.
> 2. Sans-serif in 8, 9, 10, 11, 12 point
> I can only check the old standard encoding, so the DC and EC options
> may contain mistakes.
>
> Although the file serves my needs, this sort of thing belongs in
> musixtex.tex. My file is 87 lines long, but much of it duplicates what
> is already in musixtex.tex. So if such an enhancement were made to
> musixtex.tex, that would be a more economical way of doing it.
No. I shall never change existing (and working) features, for compatibility with all
work
already invested bu people. The best things one can do is to define ad different macro
name
which calls the lyrics insertion procedures with (inside) a change in font size or -
why not -
uses Times or fraktur fonts if available.
>
> Just a suggestion ...
>
> Dirk
>
> ------------------------- 8< -------- 8< -----------------------
> % Additional fonts for MusiXTeX.
> % 1. Adds 11-point size as \elevenrm etc and \Normtype.
> % 2. Supplies sans-serif in sizes 8-point to 11-point as \eightsf etc.
>
> \ifx\undefined\elevenrm
> \iflongDCfontnames
> \font\eightrm=\fontid r1000 scaled \magstephalf
> \font\eightbf=\fontid bx1000 scaled \magstephalf
> \font\eightit=\fontid ti1000 scaled \magstephalf
> \else\iflongECfontnames
> \font\eightrm=\fontid rm1000 scaled \magstephalf
> \font\eightbf=\fontid bx1000 scaled \magstephalf
> \font\eightit=\fontid ti1000 scaled \magstephalf
> \else
> \font\eightrm=\fontid r10 scaled \magstephalf
> \font\eightbf=\fontid bx10 scaled \magstephalf
> \font\eightit=\fontid ti10 scaled \magstephalf
> \fi
> \fi
> \fi
>
> \ifx\undefined\tensf
> \iflongDCfontnames
> \font\eightsf=\fontid ss800
> \font\ninesf=\fontid ss900
> \font\tensf=\fontid ss1000
> \font\elevensf=\fontid ss1000 scaled \magstephalf
> \font\twelvesf=\fontid ss1200
> \else\iflongECfontnames
> \font\eightsf=\fontid ss800
> \font\ninesf=\fontid ss900
> \font\tensf=\fontid ss1000
> \font\elevensf=\fontid ss1000 scaled \magstephalf
> \font\twelvef=\fontid ss1200
> \else
> \font\eightsf=\fontid ss8
> \font\ninesf=\fontid ss9
> \font\tensf=\fontid ss10
> \font\elevensf=\fontid ss10 scaled \magstephalf
> \font\twelvesf=\fontid ss12
> \fi
> \fi
> \fi
>
> \def\tinytype{%
> \let\rm\eightrm
> \let\bf\eightbf
> \let\it\eightit
> \let\sf\eightsf
> \rm}
>
> \def\smalltype{%
> \let\rm\ninerm
> \let\bf\ninebf
> \let\it\nineit
> \let\sf\ninesf
> \rm}
>
> \def\normtype{%
> \let\rm\tenrm
> \let\bf\tenbf
> \let\it\tenit
> \let\sf\tensf
> \rm}
>
> \def\Normtype{%
> \let\rm\elevenrm
> \let\bf\elevenbf
> \let\it\elevenit
> \let\sf\elevensf
> \rm}
>
> \def\medtype{%
> \let\rm\twelverm
> \let\bf\twelvebf
> \let\it\twelveit
> \let\sf\twelvesf
> \rm}
>
> \endinput
--
-------------------------------------------------------------------------
Daniel Taupin, Physique des Solides, Univ. Paris-Sud, 91405 ORSAY
E-mail : mailto:[EMAIL PROTECTED]
T�l: (33) 1.69.15.60.79, Fax: (33) 1.69.15.60.86
-------------------------------------------------------------------------
