This is a hackish solution (it involves a hshift that will need tweaking
once the score is filled up) but it seems to do what you want.
\version "2.18.2"
\language "english"
upperStaffTop = \relative c' {
<cs \tweak transparent ##t d>4 <cs' cs'> <cs' cs'> |
}
upperStaffBottom = \relative c' {
\once \override NoteHead.transparent = ##t
\once \override NoteColumn.force-hshift = #1.3
d16
d fs gs cs d fs gs cs gs fs d |
}
lowerStaffTop = \relative c {
<<
\new Voice {
\voiceThree \crossStaff { cs4 } s2 |
}
\new Voice {
\voiceFour cs16 d fs gs \stemUp cs \clef treble d fs gs cs gs fs d |
}
>>
}
lowerStaffBottom = \relative c,, {
<cs cs'>4 <cs'' cs'> \clef treble <cs' cs'> |
}
% --- Biolerplate
global = {
\key a \major
\time 3/4
}
upperStaff = {
\clef treble
\global
<<
\new Voice { \voiceOne \upperStaffTop }
\new Voice { \voiceTwo \upperStaffBottom }
>>
}
lowerStaff = {
\clef bass
\global
<<
\new Voice { \voiceThree \lowerStaffTop }
\new Voice { \voiceFour \lowerStaffBottom }
>>
}
\score {
\new PianoStaff {
<<
\new Staff \upperStaff
\new Staff \lowerStaff
>>
}
\layout {
\context {
\PianoStaff
\consists #Span_stem_engraver
}
}
}
_______________________________________________
lilypond-user mailing list
[email protected]
https://lists.gnu.org/mailman/listinfo/lilypond-user
