Re: custom right-hand fingering

[Thomas Morley]

2015-12-08 21:05 GMT+01:00 Thomas Morley <address@hidden>:
> 2015-12-08 19:36 GMT+01:00 Federico Bruni <address@hidden>:
>> Hi all
>>
>> I'd like to create a custom right-hand fingering. Where should I look at?
>> I've tried looking at the definitions of finger and rightHandFinger in
>> music-functions-init.ly, but I don't know how to create a new one.
>>
>> I'm transcribing a piece from a book which uses this notation to specify
>> tapping and the right-hand finger used to produce it:
>>
>> Tm = tapping with middle finger
>> Ti = tapping with index finger
>>
>> Thanks in advance
>> Federico
>
>
>
> {
>   \set strokeFingerOrientations = #'(up)
>   \override StrokeFinger.digit-names = ##("Tp" "Ti" "Tm" "Ta" "Tx")
>
>   c'\rightHandFinger #1
>   e'\rightHandFinger #2
>   g'\rightHandFinger #3
>   c''\rightHandFinger #4
> }
>
> Ofcourse there are shortcuts available for \rightHandFinger...
>
> HTH,
>   Harm

Also possible:

#(define (my-stroke-finger::calc-text grob)
  (let ((event (event-cause grob)))
    (or (ly:event-property event 'text #f)
        (vector-ref (ly:grob-property grob 'digit-names)
                    (1- (max 1
                             (min 10 (ly:event-property event 'digit))))))))
{
  \set strokeFingerOrientations = #'(up)
  \override StrokeFinger.text = #my-stroke-finger::calc-text
  \override StrokeFinger.digit-names =
    ##("p" "i" "m" "a" "x" "Tp" "Ti" "Tm" "Ta" "Tx")

  c'\rightHandFinger #1
  e'\rightHandFinger #2
  g'\rightHandFinger #3
  c''\rightHandFinger #4
  e''\rightHandFinger #5
  c'\rightHandFinger #6
  e'\rightHandFinger #7
  g'\rightHandFinger #8
  c''\rightHandFinger #9
  e''\rightHandFinger #10
}


Cheers,
  Harm