Re: Ancient tablature: repeat barline.

[Thomas Morley]

2014-03-01 11:13 GMT+01:00 Marc Hohl <address@hidden>:
> Hi Harm,
>
> would you mind to share your solution with us? ;-)
>
> Marc

Hi Marc,

I could verify that I've sent my reply to Pierre, Shane _and_ the list!
Though, I can't find it in any archive.
Strange!

Anyway, here again. Hope it works now.

\version "2.18.0"

#(define (make-single-dot-bar-line grob extent)
   (ly:font-get-glyph (ly:grob-default-font grob) "dots.dot"))

#(add-bar-glyph-print-procedure "0" make-single-dot-bar-line)

\defineBarLine "0" #'("0" "" "")
\defineBarLine ":|" #'(":|" #f " |")
\defineBarLine "|:" #'("|" "|:" "|")
\defineBarLine ":|0|:" #'(":|" "|:" " | | ")

gittern = \stringTuning <d g b e'>

m =
\new TabStaff
  \with {
    \remove "Clef_engraver"
    stringTunings = #gittern
  }
  {
     \repeat volta 2 { s1 s }
     \bar ":|0|:"
     \break
     \repeat volta 2 { s1 s }
     \bar ":|0|:"
     s8
  }

\paper {
    indent = 0
    line-width = 60
}

\markup \bold "Single TabStaff"
\m

\markup \bold "StaffGroup"
\new StaffGroup << \m \m >>


Cheers,
  Harm