Re: barr? fret diagram guitar

[Kale Good]

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" )

)

}