Hi
I could write in french, but this might be usefull for someone else, it was
a pain in the but for me to find this out.
I'm a guitarrist, so I adapted the code for the four fingers, as the thumb
is not used in the Left Hand.
In the code bellow, you find code for fingering for the left end (Ln - none,
Li - index, LM - long, La - ring, Lm - little), and underlines (Lui), double
underline (Luui). I trust in your cleverness to continue the job! ;)
You'll have to tweak the "-1.4 -0.2 moveto" to align the postscripts.
I didn't need anything else than lilypond to obtain an output whith the
following code. I'm running linux.
\version " 2.10.25"
Ln = \markup{\override #'(font-size . -5) \override #'(font-encoding .
fetaNumber) "0" }
Li = \markup{\override #'(font-size . -5) \override #'(font-encoding .
fetaNumber) "1" }
LM = \markup{\override #'(font-size . -5) \override #'(font-encoding .
fetaNumber) "2" }
La = \markup{\override #'(font-size . -5) \override #'(font-encoding .
fetaNumber) "3" }
Lm = \markup{\override #'(font-size . -5) \override #'(font-encoding .
fetaNumber) "4" }
Lun = \markup{\override #'(font-size . -5) \override #'(font-encoding .
fetaNumber) "0" \postscript #" 0.08 setlinewidth -1.46 -0.2 moveto 0.88 0
rlineto stroke"}
Lui = \markup{\override #'(font-size . -5) \override #'(font-encoding .
fetaNumber) "1" \postscript #"0.08 setlinewidth -1.4 -0.2 moveto 0.85 0
rlineto stroke"}
LuM = \markup{\override #'(font-size . -5) \override #'(font-encoding .
fetaNumber) "2" \postscript #"0.08 setlinewidth -1.5 -0.2 moveto 0.95 0
rlineto stroke"}
Lua = \markup{\override #'(font-size . -5) \override #'(font-encoding .
fetaNumber) "3" \postscript #"0.08 setlinewidth -1.4 -0.2 moveto 0.8 0
rlineto stroke"}
Lum = \markup{\override #'(font-size . -5) \override #'(font-encoding .
fetaNumber) "4" \postscript #" 0.08 setlinewidth -1.55 -0.2 moveto 1 0
rlineto stroke"}
Luui = \markup{\override #'(font-size . -5) \override #'(font-encoding .
fetaNumber) "1" \postscript #"0.08 setlinewidth -1.4 -0.2 moveto 0.85 0
rlineto stroke" \postscript #"0.08 setlinewidth -2 -0.4 moveto 0.85 0
rlineto stroke"}
\new Staff {
c^\Li
d^\Lui
d^Luui
\once \override TextScript #'extra-offset = #'(0 . 1) d^\Luui
}
Tiago
_______________________________________________
lilypond-user mailing list
lilypond-user@gnu.org
http://lists.gnu.org/mailman/listinfo/lilypond-user
