Am 14.08.2015 um 16:30 schrieb Orm Finnendahl:
Hi,

  I often need to notate harmonics for strings and like to indicate the
resulting pitch as a small parenthesized notehead above the fingered
pitch.


Here are some solutions, see attachments.

\harmonicChord doesn’t set an explicit duration (uses the duration from the previous note/chord)
\harmonicChordWithDuration lets you set a duration
\harmonicChordWithBase allows to add another fingered base note or dynamics, articulations, etc.

This is not a very clean solution but you might find something helpful in it ;)

Malte
\version "2.19.25"

harmonicChord =
#(define-music-function (finger sound) (ly:pitch? ly:pitch?)
   #{
     \once \omit Stem
     <
     \tweak style #'harmonic
     $finger
     \tweak font-size -3
     \tweak Accidental.font-size -3
     \tweak ParenthesesItem.font-size -3
     \tweak duration-log 2
     \parenthesize
     $sound
     >
   #})

harmonicChordWithDuration =
#(define-music-function (duration finger sound) (ly:duration? ly:pitch? ly:pitch?)
   #{
     \once \omit Stem
     <
     \tweak style #'harmonic
     $finger
     \tweak font-size -3
     \tweak Accidental.font-size -3
     \tweak ParenthesesItem.font-size -3
     \tweak duration-log 2
     \parenthesize
     $sound
     >
     $duration
   #})

harmonicChordWithBase =
#(define-music-function (base finger sound) (ly:music? ly:pitch? ly:pitch?)
   #{
     <<
       {
         \once \stemDown
         $base
       }
       \new Voice {
         \once \override NoteColumn.ignore-collision = ##t
         \once \omit Stem
         <
         \tweak style #'harmonic
         $finger
         \tweak font-size -3
         \tweak Accidental.font-size -3
         \tweak ParenthesesItem.font-size -3
         \tweak duration-log 2
         \parenthesize
         $sound
         >
       }
     >>
   #})

<<
  \new Staff \relative {
    d'2
    \harmonicChord fis fis''
    \harmonicChordWithDuration 4 g d''
    \harmonicChordWithDuration 2 a a'
    \harmonicChordWithBase g4 c g''
    \harmonicChordWithBase s2\f fis, fis''
    \harmonicChordWithBase s_> g d''
  }
  \new Staff \relative {
    \clef bass \repeat unfold 12 d4
  }
>>
_______________________________________________
lilypond-user mailing list
lilypond-user@gnu.org
https://lists.gnu.org/mailman/listinfo/lilypond-user

Reply via email to