Hi Bart,
Not sure if there is a super-simple way to do what you're looking for
(but I'm no lilypond pro).
I did, however, recently use the postscript drawing ability of lilypond
to circle specific notes on the fretboard (this could be useful for
highlighting root notes (example was meant for a B&W printer, but I
started off using the fill ability of postscript to make a red dot).
If you could figure out how to draw an "x" using post script , you could
position it anywhere you want to.
Here's a place I found some help with postscript drawing:
http://paulbourke.net/dataformats/postscript/
%%%%%%%%%%%%% Open String Names %%%%%%%%%%%%%
\markup
\fontsize #2 { \hspace #4.5 E \hspace #2.45 A \hspace #2.45 D \hspace
#2.45 G \hspace #2.45 B \hspace #2.45 E } \markup \override #'(size . 5)
\override #'(align-dir . -1) \override #'(fret-diagram-details . (
(finger-code . in-dot) (fret-count . 2 ) (number-type . arabic)
(string-thickness-factor . .25 ) (label-dir . -1) (mute-string . "x")
(open-string . "o" ) (orientation . portrait) (barre-type . none)
(xo-font-magnification . 0.4) (xo-padding . 0.3) (dot-label-font-mag .
0.5 ) (fret-label-font-mag . 5 ) (string-label-font-mag . 5 ) ) )
\markup {
\combine
%%%%%%%%%% Circle Open String Equivalents %%%%%%%%%%%%%
\postscript #"
newpath
5.25 -22.6 2.75 0 360 arc closepath
0.2 setlinewidth
stroke"
\postscript #"
newpath
10.25 -22.6 2.75 0 360 arc closepath
0.2 setlinewidth
stroke"
\postscript #"
newpath 14.65 -22.6 2.75 0 360 arc closepath
0.2 setlinewidth
stroke"
\postscript #"
newpath 19.05 -17.6 2.75 0 360 arc closepath
0.2 setlinewidth
stroke"
\postscript #"
newpath 23.45 -22.6 2.75 0 360 arc closepath
0.2 setlinewidth
stroke"
\postscript #"
newpath 27.85 -22.6 2.75 0 360 arc closepath
0.2 setlinewidth
stroke"
%%%%%%%%%%% Diagram Settings %%%%%%%%%%%%
\override #'(size . 5)
\override #'(align-dir . -1)
\override #'(fret-diagram-details .
(
(finger-code . in-dot)
(fret-count . 6 )
(number-type . arabic)
(string-thickness-factor . .25 )
(label-dir . -1)
(mute-string . "x")
(open-string . "o" )
(orientation . portrait)
(barre-type . none)
(xo-font-magnification . 0.4)
(xo-padding . 0.3)
(dot-label-font-mag . 0.5 )
(fret-label-font-mag . 5 )
(string-label-font-mag . 5 )
)
)
%%%%%%%%%%%% Fretted String Names, First Position %%%%%%%%%%%55
\fret-diagram-verbose #'(
(place-fret 6 1 "F" )
(place-fret 6 2 "F#" )
(place-fret 6 3 "G" )
(place-fret 6 4 "G#" )
(place-fret 6 5 "A" )
(place-fret 5 1 "A#" )
(place-fret 5 2 "B" )
(place-fret 5 3 "C" )
(place-fret 5 4 "C#" )
(place-fret 5 5 "D" )
(place-fret 4 1 "D#" )
(place-fret 4 2 "E" )
(place-fret 4 3 "F" )
(place-fret 4 4 "G" )
(place-fret 4 5 "F#" )
(place-fret 3 1 "G#" )
(place-fret 3 2 "A" )
(place-fret 3 3 "A#" )
(place-fret 3 4 "B" )
(place-fret 2 1 "C" )
(place-fret 2 2 "C#" )
(place-fret 2 3 "D" )
(place-fret 2 4 "D#" )
(place-fret 2 5 "E" )
(place-fret 1 1 "F" )
(place-fret 1 2 "F#" )
(place-fret 1 3 "G" )
(place-fret 1 4 "G#" )
(place-fret 1 5 "A" )
)
}
_______________________________________________
lilypond-user mailing list
[email protected]
https://lists.gnu.org/mailman/listinfo/lilypond-user
