% fetdefs.tex
% encapsulating tex backend for auto-generated feta definitions
-\def\fetsixteendefs{%
- \font\feta = feta16
- \font\fetanummer = feta-nummer8
- \font\dynfont = feta-din10 scaled \magstep 1
- \font\bracefont = feta-braces16
- \font\bracketfont = feta-brackets16
- \font\fingerfont = feta-nummer4
-}
-
-\def\fettwentydefs{%
- \font\feta = feta20
- \font\fetanummer = feta-nummer10
- \font\dynfont = feta-din10 scaled \magstep 2
- \font\bracefont = feta-braces20
- \font\bracketfont = feta-brackets20
- \font\fingerfont = feta-nummer5
-}
-
-\def\fettwentysixdefs{%
- \font\feta = feta26
- \font\fetanummer = feta-nummer12
- \font\dynfont = feta-din10 scaled \magstep 3
- \font\bracefont = feta-braces16
- \font\bracketfont = feta-brackets20
- \font\fingerfont = feta-nummer7
-}
-
-\def\fetthirteendefs{%
- \font\feta = feta13
- \font\fetanummer = feta-nummer5
- \font\dynfont = feta-din10 scaled \magstep 0
- \font\bracefont = feta-braces16
- \font\bracketfont = feta-brackets16
- \font\fingerfont = feta-nummer3
-}
-
-\def\fetelevendefs{%
- \font\feta = feta11
- \font\fetanummer = feta-nummer5
- \font\dynfont = feta-din10 % scaled \magstep-1
- \font\bracefont = feta-braces16
- \font\bracketfont = feta-brackets16
- \font\fingerfont = feta-nummer3
-}
-
-
-\def\sixteenfonts{\fetsixteendefs\cmrsixteen}
-\def\twentyfonts{\fettwentydefs\cmrtwenty}
-\def\twentysixfonts{\fettwentysixdefs\cmrtwenty}
-\def\elevenfonts{\fetelevendefs\cmreleven}
-\def\thirteenfonts{\fetthirteendefs\cmrthirteen}
+% fix chord.cc::banter_str before removing these
\def\fetdef#1#2{%
- \def#1{\hbox{\fetchar{#2}}}}
-\def\fetchar#1{\feta\char#1}
-
-%\input feta16
-\input feta20
-
-% stacked numbers; overrules def in lilyponddefs
-% widest num should be .40 balkheight
-% oeps: \meter 12/8;
-%
-% \allabreve, \threetwometer etc. have zero as the second parameter.
-
-\def\generalmeter#1#2{%
- \ifnum #2 = 0\relax
- \ifcase #1
- \or\or
- % 2
- \allabreve
- \or
- % 3
- \threetwometer % tempus perfectum cum prolatione imperfecta
- \or
- % 4
- \fourfourmeter % tempus imperfectum cum prolatione imperfecta
- \or\or
- % 6
- \sixfourmeter % tempus imperfectum cum prolatione perfecta
- \or\or\or
- % 9
- \ninefourmeter % tempus perfectum cum prolatione perfecta
- \fi
- \else
- \vbox to 0pt{%
- \vss
- \hbox to 0.45\staffheight{\hss\fetanummer #1\hss}%
- \nointerlineskip
- \hbox to 0.45\staffheight{\hss\fetanummer #2\hss}%
- \vss}%
- \fi}
-
-\def\pianobrace#1{{\bracefont\char #1}}
-\def\staffbracket#1{{\centeralign{\bracketfont\char #1}}}
+ \def#1{\hbox{\char#2}}}
-\def\embeddedtex#1{}
-\def\embeddedps#1{}
-\def\embeddedmf#1#2{}
-\def\embedclose{}
+\fetdef\fetasharp{16}
+\fetdef\fetanatural{17}
+\fetdef\fetaflat{18}
-\input lily-ps-defs
+% \font\fetasixteenfont=feta16
-% uncomment to use runtime MF
-%
-% \input lily-mf-defs
+\def\fetasixteenfont{\message{TeX strings are deprecated. Please use
+Scheme markup expressions. See the reference manual for more information}}
-\def\EndLilyPondOutput{%
- \embedclose
- \csname bye\endcsname
-}
+\def\fetafont{\fetasixteenfont}
+\def\textflat{{\fetafont\raise 1ex\hbox{\fetaflat}}}
+\def\textnatural{{\fetafont\raise 1ex\hbox{\fetanatural}}}
+\def\textsharp{{\fetafont\raise1ex\hbox{\fetasharp}}}
\endinput