Thanks, this is exactly what I was trying to do. Sorry I slipped in a
bagpipe lexicon. A part is just a subdivision of the whole tune.
Generally one or two lines of music and for students printing this type
of bar line helps them see the structure of the tune. Also this is
pretty much the standard way of printing bagpipe music.
Thanks again,
--Sam
On 2010-10-01 09:45, Robin Bannister wrote:
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
#(define (my-calc-glyph-name grob)
(let* ((glyph (ly:grob-property grob 'glyph))
(dir (ly:item-break-dir grob)))
(if (and (string? glyph) (string=? glyph ".|") (= dir LEFT))
"|." ; as if bar-glyph-alist had (".|" . ("|." . ".|"))
(bar-line::calc-glyph-name grob))))
\new Staff \with { \override BarLine #'glyph-name = #my-calc-glyph-name }
{
\bar ".|" b1 b1 b1 b1 b1 b1 b1 b1^"\bar \".|\"" \bar ".|" \break
b1 b1 b1 b1 b1 b1 b1 b1^"\bar \"|.\"" \bar "|." \break
b1 b1 b1 b1^"\bar \".|\"" \bar ".|" b1 b1 \repeat volta 2 { b1 b1 }
\break
b1 b1 b1 b1 b1 b1 b1 b1 \bar ".|" \break
}
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
_______________________________________________
lilypond-user mailing list
[email protected]
http://lists.gnu.org/mailman/listinfo/lilypond-user
