% musixcls.tex : Classico (URW Optima clone) font definitions for MusiXTeX
%
% usage: 
%
%    \input musixtex
%    \input musixcls
%    ...
%
%   MusiXcls.tex is free software; you can redistribute it and/or modify
%   it under the terms of the GNU General Public License as published by
%   the Free Software Foundation; either version 2, or (at your option)
%   any later version.
%
%   MusiXcls.tex is distributed in the hope that it will be useful,
%   but WITHOUT ANY WARRANTY; without even the implied warranty of
%   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
%   GNU General Public License for more details.
%
%   You should have received a copy of the GNU General Public License
%   along with MusiXTeX; see the file COPYING.  If not, write to
%   the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
%   Boston, MA 02111-1307, USA.
%
%   Copyright 2025  Bob Tennent rdt@cs.queensu.ca
%
\immediate\write16{MusiXcls\space<2025/05/24>}
\ifx\undefined\startpiece\errmessage{Input musixtex.tex before musixcls.tex}\fi
%
% roman, bold, italic, bold italic, and (fake) small capitals 
%
% 7pt 
\font\sevenrm=URWClassico-Regular-tlf-t1.tfm at 7pt
\font\sevenbf=URWClassico-Bold-tlf-t1.tfm at 7pt
\font\sevenit=URWClassico-Italic-tlf-t1 at 7pt
\font\sevenbi=URWClassico-BoldItalic-tlf-t1 at 7pt
\font\sevensc=uoprc8t at 7pt
%
% 8pt 
\font\eightrm=URWClassico-Regular-tlf-t1.tfm at 8pt
\font\eightbf=URWClassico-Bold-tlf-t1.tfm at 8pt
\font\eightit=URWClassico-Italic-tlf-t1 at 8pt
\font\eightbi=URWClassico-BoldItalic-tlf-t1 at 8pt
\font\eightsc=uoprc8t at 8pt
%
% 9pt
\font\ninerm=URWClassico-Regular-tlf-t1.tfm at 9pt
\font\ninebf=URWClassico-Bold-tlf-t1.tfm at 9pt
\font\nineit=URWClassico-Italic-tlf-t1 at 9pt
\font\ninebi=URWClassico-BoldItalic-tlf-t1 at 9pt
\font\ninesc=uoprc8t at 9pt
%
% 10pt
\font\tenrm=URWClassico-Regular-tlf-t1.tfm at 10pt
\font\tenbf=URWClassico-Bold-tlf-t1.tfm at 10pt
\font\tenit=URWClassico-Italic-tlf-t1 at 10pt
\font\tenbi=URWClassico-BoldItalic-tlf-t1 at 10pt
\font\tensc=uoprc8t at 10pt
%
% 11pt
\font\elevenrm=URWClassico-Regular-tlf-t1.tfm scaled \magstephalf
\font\elevenbf=URWClassico-Bold-tlf-t1.tfm scaled \magstephalf
\font\elevenit=URWClassico-Italic-tlf-t1 scaled \magstephalf
\font\elevenbi=OptimaNovaLTPro-DemiItalic-lf-sc-t1 scaled \magstephalf
\font\elevensc=uoprc8t at 11pt
%
% 12pt
\font\twelverm=URWClassico-Regular-tlf-t1.tfm scaled \magstep1
\font\twelvebf=URWClassico-Bold-tlf-t1.tfm scaled \magstep1
\font\twelveit=URWClassico-Italic-tlf-t1 scaled \magstep1
\font\twelvebi=URWClassico-BoldItalic-tlf-t1 scaled \magstep1
\font\twelvesc=uoprc8t at 12pt
%
% 14pt
\font\frtrm=URWClassico-Regular-tlf-t1.tfm scaled \magstep2
\font\frtbf=URWClassico-Bold-tlf-t1.tfm scaled \magstep2
\font\frtit=URWClassico-Italic-tlf-t1 scaled \magstep2
\font\frtbi=URWClassico-BoldItalic-tlf-t1 scaled \magstep2
\font\frtsc=uoprc8t at 14pt
%
% 17pt
\font\svtrm=URWClassico-Regular-tlf-t1.tfm scaled \magstep3
\font\svtbf=URWClassico-Bold-tlf-t1.tfm scaled \magstep3
\font\svtit=URWClassico-Italic-tlf-t1 scaled \magstep3
\font\svtbi=URWClassico-BoldItalic-tlf-t1 scaled \magstep3
\font\svtsc=uoprc8t scaled \magstep3
%
% 20pt
\font\twtyrm=URWClassico-Regular-tlf-t1.tfm scaled \magstep4
\font\twtybf=URWClassico-Bold-tlf-t1.tfm scaled \magstep4
\font\twtyit=URWClassico-Italic-tlf-t1 scaled \magstep4
\font\twtybi=URWClassico-BoldItalic-tlf-t1 scaled \magstep4
\font\twtysc=uoprc8t scaled \magstep4
%
% 25pt
\font\twfvrm=URWClassico-Regular-tlf-t1.tfm scaled \magstep5
\font\twfvbf=URWClassico-Bold-tlf-t1.tfm scaled \magstep5
\font\twfvit=URWClassico-Italic-tlf-t1 scaled \magstep5
\font\twfvbi=URWClassico-BoldItalic-tlf-t1 scaled \magstep5
\font\twfvsc=uoprc8t scaled \magstep5
%
%
% large bold small-cap fonts for titles
% (If you prefer bold, use \bf)
% (If you prefer roman, use \rm)
%
\font\frtbsc=uopbc8t at 14pt
\font\svtbsc=uopbc8t scaled \magstep3
\font\twtybsc=uopbc8t scaled \magstep4
\font\twfvbsc=uopbc8t scaled \magstep5

\def\bigtype{\frtbsc}
\def\Bigtype{\svtbsc}
\def\BIgtype{\twtybsc}
\def\BIGtype{\twfvbsc}
%
\font\ppfftwelve=URWClassico-BoldItalic-tlf-t1 at 8pt
\font\ppffsixteen=URWClassico-BoldItalic-tlf-t1 at 10pt
\font\ppfftwenty=URWClassico-BoldItalic-tlf-t1 at 12pt
\font\ppfftwentyfour=URWClassico-BoldItalic-tlf-t1 at 14pt
\font\ppfftwentynine=URWClassico-BoldItalic-tlf-t1 at 17pt
%
\def\f{{\ppff f}}
\def\ff{{\ppff ff}}
\def\fp{{\ppff fp}}
\def\fff{{\ppff fff}}
\def\ffff{{\ppff ffff}}
\def\mf{{\ppff mf}}
\def\p{{\ppff p}}
\def\pp{{\ppff pp}}
\def\ppp{{\ppff ppp}}
\def\pppp{{\ppff pppp}}
%
%
% sl fonts needed by musixsty
%
\font\eightsl=URWClassico-Italic-tlf-t1 at 8pt
\font\ninesl=URWClassico-Italic-tlf-t1 at 9pt
\font\tensl=URWClassico-Italic-tlf-t1 at 10pt
\font\twelvesl=URWClassico-Italic-tlf-t1 scaled \magstep1
\font\frtsl=URWClassico-Italic-tlf-t1 scaled \magstep2
\font\svtsl=URWClassico-Italic-tlf-t1 scaled \magstep3
\font\twtysl=URWClassico-Italic-tlf-t1 scaled \magstep4
\font\twfvsl=URWClassico-Italic-tlf-t1 scaled \magstep5
%
%
\edef\catcodeat{\the\catcode`\@}\catcode`\@=11
%
\def\sF{{\ppff s\p@kern f}}
\def\sfz{{\ppff s\p@kern f\f@kern z}}
\def\sfzp{{\ppff s\p@kern f\f@kern z\p@kern p}}

\def\mp@{{\ppff mp}}
\let\mezzopiano\mp@

\catcode`\@=\catcodeat

%
% Redefine accented characters for 8-bit font, suggested by David Carlisle:
%
\ifx\documentclass\undefined
\catcode`\@=11
\def\ProvidesFile#1[#2]{}
\def\DeclareFontEncoding#1#2#3{}
\def\DeclareTextAccent#1#2#3{%
  \def#1##1{%
\expandafter\ifx\csname T1\string#1-\string##1\endcsname\relax
{\accent#3 ##1}%  #3 not #1!!!!!!!!!
\else
\csname T1\string#1-\string##1\expandafter\endcsname
\fi}}
\def\DeclareTextCommand#1#2{\xdtcmd}%not today
\def\xdtcmd#1#{\xxdtcmd}%not today
\def\xxdtcmd#1{}%not today
\def\DeclareTextCompositeCommand#1#2#3#4{}%not today
\def\DeclareTextSymbol#1#2#3{%
\def#1{\char#3\relax}}
\def\DeclareTextComposite#1#2#3#4{%
\expandafter\def\csname T1\string#1-\string#3\endcsname{\char#4\relax}}

\input t1enc.def

% \c needs special treatment
\def\c#1{\leavevmode\ifx c#1\char231 \else\setbox\z@\hbox{#1}\ifdim\ht\z@=1ex\accent11 #1%
     \else{\ooalign{\unhbox\z@\crcr
        \hidewidth\char11\hidewidth}}\fi\fi}
\catcode`\@=\catcodeat
\fi

\normtype
\endinput
