1
0
Fork 0
mirror of https://github.com/kastdeur/bagpipe.ly.git synced 2024-10-31 17:43:33 +01:00

Fixed showKeySignature to actually work.

Added Mist Covered Sleeves.
This commit is contained in:
Sven Axelsson 2010-04-13 19:20:53 +02:00
parent 94fb0af2bb
commit c51248feff

View file

@ -42,17 +42,26 @@ bagpipeKey = {
% Show the key signature e.g. for BMW compatibility.
showKeySignature = {
\override Staff.KeySignature #'stencil = #'ly:key-signature-interface::print
\override StaffGroup.KeySignature #'stencil = #'ly:key-signature-interface::print
\override Score.KeySignature #'stencil = #'ly:key-signature-interface::print
}
% Show the true key signature (E-flat major). Use together with
% \transpose f a to print scores for other instruments.
showTrueKeySignature = {
\override Staff.KeySignature #'stencil = #'ly:key-signature-interface::print
\override StaffGroup.KeySignature #'stencil = #'ly:key-signature-interface::print
\override Score.KeySignature #'stencil = #'ly:key-signature-interface::print
\override Stem #'direction = #0
\override Slur #'direction = #0
\override Tie #'direction = #0
}
disgrace = #(define-music-function (parser location music) (ly:music?) (make-music 'SequentialMusic 'void #t))
removeGracenotes = {
% grace = \disgrace
}
% Various tweaks to get good defaults for bagpipe music.
\paper {
top-margin = 4\mm