lilypond-user
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: Guitar stroke fingering and multiple voices


From: David Stocker
Subject: Re: Guitar stroke fingering and multiple voices
Date: Tue, 09 Feb 2010 09:01:16 -0500
User-agent: Thunderbird 2.0.0.23 (X11/20090817)

Very nice!

Nick Payne wrote:
Don't know if this has been thought of before (I couldn't find it in the lilypond-user archives), but while having to do some tweaking to get stroke fingering in one voice to avoid notes in another voice, I realised that multiple stroke fingering indications can be attached to a single note. So in the attached example, by moving the stroke fingering indications for notes in the middle voice to the simultaneous notes in the upper voice, no tweaking is required:

%========================
\version "2.13.12"

P = #(define-music-function (parser location) ()
    (apply make-music
        (append
            (list
                'StrokeFingerEvent
                'origin location)
            (list 'digit 1))))

I = #(define-music-function (parser location) ()
    (apply make-music
        (append
            (list
                'StrokeFingerEvent
                'origin location)
            (list 'digit 2))))

M = #(define-music-function (parser location) ()
    (apply make-music
        (append
            (list
                'StrokeFingerEvent
                'origin location)
            (list 'digit 3))))

A = #(define-music-function (parser location) ()
    (apply make-music
        (append
            (list
                'StrokeFingerEvent
                'origin location)
            (list 'digit 4))))

\new Staff \relative c'' {
  \key c \major
  \time 3/4
<<
    {
         \set strokeFingerOrientations = #'(up)
         \override StrokeFinger #'add-stem-support = ##t
<e c g>4 r16 <d-\A > <c-\I -\A > <b-\A > <a-\I -\M > <g-\M > <fis-\I >32 <g-\M > <e-\I >16 |
    }
  \\
  \\
    { s4. \autoBeamOff e8 e s | }
  \\
    {
         \set strokeFingerOrientations = #'(down)
         \override StrokeFinger #'add-stem-support = ##t
<c-\P >8[ <c-\P >] <c-\P >[ <c-\P >] <c-\P > <c-\P > |
    }
>>
}
%========================

Nick

------------------------------------------------------------------------

------------------------------------------------------------------------

_______________________________________________
lilypond-user mailing list
address@hidden
http://lists.gnu.org/mailman/listinfo/lilypond-user




reply via email to

[Prev in Thread] Current Thread [Next in Thread]