the atonic key function works well in cadenza context but repeated altered
notes over a arbitrary barline (see ex. below) do not reproduce accidentals.
Can it be fixed?
it works if I repeat the statement \atonicKey after each barline
---------------------------------
atonicKey =
#(def-music-function (parser location) ()
#{ #(ly:export (make-music 'EventChord
'origin $location
'elements (list (make-music 'KeyChangeEvent
'tonic (ly:make-pitch -1 4 0)
'pitch-alist '((4 . 5)
(5 . 5)
(6 . 5)
(0 . 5)
(1 . 5)
(2 . 5)
(3 . 5))))))
\set Score . extraNatural = ##f #})
\cadenzaOn
{
\atonicKey
\cadenzaOn{
c'8 c' c'' c'' d' d' d'' d''
\bar "|"
cis'8 cis' cis'' cis'' des' des' des'' des''
\bar "|"
des'' % this one does not get a flat.. unless I put another \atonicKey
before
des'' c'8 c' c'' c'' d' d' d'' d'' cis' cis'
\bar ":"
cis'8 % this one no sharp
cis' cis'' cis''
des' des' des'' des''}
\cadenzaOff
}
------------------------------------------------------
Best Regards,
Mehmet Okonsar, pianist-composer
www.okonsar.com
_______________________________________________
lilypond-user mailing list
lilypond-user@gnu.org
http://lists.gnu.org/mailman/listinfo/lilypond-user
