[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: Ancient tablature: repeat barline.
From: |
Thomas Morley |
Subject: |
Re: Ancient tablature: repeat barline. |
Date: |
Sat, 1 Mar 2014 14:01:21 +0100 |
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