1
0
Fork 0
mirror of https://github.com/kastdeur/bagpipe.ly.git synced 2024-11-01 01:53:32 +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. % Show the key signature e.g. for BMW compatibility.
showKeySignature = { showKeySignature = {
\override Staff.KeySignature #'stencil = #'ly:key-signature-interface::print \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 % Show the true key signature (E-flat major). Use together with
% \transpose f a to print scores for other instruments. % \transpose f a to print scores for other instruments.
showTrueKeySignature = { showTrueKeySignature = {
\override Staff.KeySignature #'stencil = #'ly:key-signature-interface::print \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 Stem #'direction = #0
\override Slur #'direction = #0 \override Slur #'direction = #0
\override Tie #'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. % Various tweaks to get good defaults for bagpipe music.
\paper { \paper {
top-margin = 4\mm top-margin = 4\mm