%
% Has to be fixed. Exercise for the reader.
%
\input fetdefs

\def\musixtwentyfonts{
        \font\normaltextfont=cmr10
        \font\meterfont=cmbx15
        \font\slurufont=oslu20
        \font\smalltextfont=cmr8
        \font\slurdfont=osld20
        \font\slurhfont=oslz20
        \font\hslurufont=oslhu20
        \font\hslurdfont=oslhd20
        \font\hslurhfont=oslhz20
        \font\musicfnt=opus20
        \font\musicdraw=opussps
        \font\italicfont=cmti10
        \font\dynfont=cmbxti10 scaled \magstep1
        \font\musicmathfont=cmsy10
        \fettwentydefs
}


\def\musixsixteenfonts{
        \font\smalltextfont=cmr6
        \font\normaltextfont=cmr8
        \font\meterfont=cmbx12
        \font\italicfont=cmti8
        \font\slurufont=oslu16
        \font\slurdfont=osld16
        \font\slurhfont=oslz20 % sigh
        \font\hslurufont=oslhu16
        \font\hslurdfont=oslhd16
        \font\hslurhfont=oslhz20
        \font\musicfnt=opus16
        \font\dynfont=cmbxti12
        \font\musicdraw=opussps
        \font\musicmathfont=cmsy8
        \fetsixteendefs
}

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% provide interface to musixtex fonts 
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\musicdef\halfrest{10}
\musicdef\outsidehalfrest{11}
\musicdef\wholerest{13}
\musicdef\outsidewholerest{12}
\musicdef\quartrest{14}
\musicdef\eighthrest{15}
\musicdef\sixteenthrest{16}
\musicdef\thirtysecondrest{17}
\musicdef\sixtyfourthrest{18}
\musicdef\sharp{93}
\musicdef\flat{91}
\musicdef\natural{95}
\musicdef\sharpsharp{94}
\musicdef\flatflat{92}


\musicdef\singledot{'00}
\musicdef\doubledot{'01}
\musicdef\tripledot{'02}
\musicdef\mussepline{155}

\musicdef\violinclef{65}
\musicdef\bassclef{67}
\musicdef\altoclef{69}
\musicdef\cviolinclef{66}
\musicdef\cbassclef{68}
\musicdef\caltoclef{70}

\musicdef\deighthflag{37}
\musicdef\dsixteenthflag{38}
\musicdef\dthirtysecondflag{39}
\musicdef\dsixtyfourthflag{40}
\musicdef\dhundredtwentyeighthflag{41}

% pointing up
\musicdef\ueighthflag{32}
\musicdef\usixteenthflag{33}
\musicdef\uthirtysecondflag{34}
\musicdef\usixtyfourthflag{35}
\musicdef\uhundredtwentyeighthflag{36}

\maccentdef\repeatcolon{55}{2/1}
\def\eighthflag{\topalign{\ueighthflag}}
\def\sixteenthflag{\topalign{\usixteenthflag}}
\def\thirtysecondflag{\topalign{\uthirtysecondflag}}
\def\sixtyfourthflag{\topalign{\usixtyfourthflag}}
\def\hundredtwentyeighthflag{\topalign{\uhundredtwentyeighthflag}}

\def\cquartrest{\vertcenter\quartrest}
\def\ceighthrest{\vertcenter\eighthrest}
\def\csixteenthrest{\vertcenter\sixteenthrest}
\def\cthirtysecondrest{\vertcenter\thirtysecondrest}
\def\csixtyfourthrest{\vertcenter\sixtyfourthrest}
\def\chundredtwentyeighthrest{\vertcenter\hundredtwentyeighthrest}

\def\lsingledot{\kern-\notewidth\singledot}
\def\ldoubledot{\kern-\notewidth\doubledot}
\def\ltripledot{\kern-\notewidth\tripledot}

\maccentdef\sforzato{30}{-3/2}
\maccentdef\marcato{20}{-1/1}
\maccentdef\imarcato{21}{1/1}
\maccentdef\staccato{24}{-1/3}
\maccentdef\istaccato{25}{1/3}
\maccentdef\staccatissimo{28}{-5/5}
\maccentdef\istaccatissimo{29}{2/5}
\maccentdef\portato{18}{-6/5}
\maccentdef\iportato{19}{3/5}
\maccentdef\tenuto{26}{-1/1}
\maccentdef\itenuto{27}{1/1}
\maccentdef\fermata{80}{-1/1}
\maccentdef\ifermata{81}{1/1}

\musicdef\spicato{28}
\musicdef\ispicato{29}
\musicdef\upbow{23}
\musicdef\downbow{22}

\def\beamuslope#1#2{{\count0=#2\advance\count0 by#1
        \advance\count0 by 132
        \musicfnt\char\count0}}
\def\beamdslope#1#2{{\count0=#2\advance\count0 by#1
        \advance\count0 by 186
        \musicfnt\char\count0}}

