(going back on list)
Ben Fagin skrev:
I've revised my implementation to set up
variables using the make-pitch function instead of variables and it
works now. Thank you!
Now that I think about it, you do not have to use make-pitch. You can
extract the pitch information from a note, like this:
%%% BEGIN %%%
\version "2.10.0"
#(define (getpitch mus)
(ly:music-property
(car (ly:music-property
(car (ly:music-property mus 'elements))
'elements))
'pitch))
myPitchnames = #`(
(myowndeepceses . ,(getpitch #{ ceses, #} ))
(myownf . ,(getpitch #{ f' #}))
)
pitchnames = #(append pitchnames myPitchnames)
#(ly:parser-set-note-names parser pitchnames)
{
c' d' e' f' myowndeepceses2 g'4 a' myownf1
}
%%% END %%%
-Rune
_______________________________________________
lilypond-user mailing list
[email protected]
http://lists.gnu.org/mailman/listinfo/lilypond-user
