Re: Moving notes in a chord to the opposite side of the stem?

[Nick Payne]

On 10/04/12 06:56, Paul Morris wrote:

Thomas Morley wrote:

Am 9. April 2012 03:25 schrieb Paul Morris <address@hidden>:

Hello,  Is there a way to manually move some of the notes in a chord to the
opposite side of the stem, overriding the default placement?

I have looked through the docs and did not find a simple way to do this (the
NoteColumn #'force-hshift property only works with notes in different
voices, and trying to \override NoteHead #'X-offset  within a chord just
returned an error).  The best thing I came up with was this snippet:
http://lsr.dsi.unimi.it/LSR/Item?id=505

Following its example I was able to get the results I needed by doing this:


shiftR = {
  \once \override Stem #'X-offset = #.6
  \once \override NoteHead #'X-offset = #.6
}

<c' e' g' >4
<< { <c' e'> } \\ { \voiceThree \shiftR g' } >>

<d' f' a'>
<< { d' } \\ { \voiceThree  \shiftR < f' a'> } >>


See attached screenshot.  But it seems like there should be a way to do this
without having to introduce another voice?

Use a tweak.

Perhaps:

\version "2.14.2"

horOff =
#(define-music-function (parser location x-off music) (number? ly:music?)
         (set! (ly:music-property music 'tweaks)
	(acons 'extra-offset (cons x-off 0)
         (ly:music-property music 'tweaks)))
   music)

%shiftR = {
%  \once \override Stem #'X-offset = #.6
%  \once \override NoteHead #'X-offset = #.6
%}

{
<c' e' \horOff #1.2 g' >4
%<< { <c' e'> } \\ { \voiceThree \shiftR g' } >>

<d' \horOff #1.2 f' \horOff #1.2 a'>
%<< { d' } \\ { \voiceThree  \shiftR < f' a'> } >>
}

HTH,
  Harm

Thank you!  This works, but unfortunately (like the Hydra's heads) it introduces two other problems, one with horizontal spacing collisions and one with ledger lines.

1. Because the spacing engine does not take into account this low-level tweak, the tweaked notes sometimes collide with bar/measure lines and sometimes with other adjacent notes.  Is there a way to use Scheme to also increase the horizontal space given to the chord?  (I am still a beginner at Scheme.)

Can't help with the second problem, but for the first you could add additional horizontal space to either the barline or stem to increase their separation:

\version "2.15.36"

barspace = #(define-music-function (parser location extent) (pair?) #{
    \once \override Staff.BarLine #'extra-spacing-width = #extent
#})

stemspace = #(define-music-function (parser location extent) (pair?) #{
    \once \override Staff.Stem #'X-extent = #extent
#})

\relative c'' {
    c2 c c c \barspace #'(0 . 2)
    c c
    \stemspace #'(-2 . 0) c c
}

test.png
Description: PNG image