Re: pitched note annotation

[Orm Finnendahl]

Hi,

Am Sonntag, den 14. September 2014 um 09:21:28 Uhr (+0200) schrieb
Pierre Perol-Schneider:

> Try :
> ...
>

 thanks a lot, that worked! I wrapped that in the definition below.

Two issues remain:

1. If the note is at the end of a bar, the annotation gets printed in
the following bar. The definition below is a workaround by multiplying
the durational argument of main and annotated note.

2. I'd rather omit the durational argument for the annotated note
altogether (I'd like to write " g'4 \pitchAnnotation f' " to get the
same result.

If there is a straightforwad way to realize that it'd be nice to hear
about it. But don't bother if there isn't, as I found a way to get the
desired result!

I could imagine, the definition qualifies for the snippet
repository. In case someone agrees, I could wrap that up with some
explanatory notes. It would be nice if someone on the list could
provide me with a hint on how to accomplish the submission.

Yours,
Orm

%<---------------------------------------------------------------------------

\version "2.19.5"

pitchAnnotation =
#(define-music-function
  (parser location note)
  (ly:music?)
  #{
     \new CueVoice\with {
        \override InstrumentSwitch.direction = #DOWN
        instrumentCueName = \markup { \fontsize #-4 "(Klang)" }
     } {
        \once\omit Stem
        \tweak ParenthesesItem.font-size #0
        \tweak ParenthesesItem.padding #0
        \parenthesize #note 
     } 
  #})


{ r2. g'4*1/2 \pitchAnnotation f'4*1/2 r2.}

%<---------------------------------------------------------------------------