\version "2.18.2"
\include "./color.ily"

\score {
  \new PianoStaff <<
    \new Staff = "up" {
      <<
        \relative c' {
          \key d \major \changeColors \colorOne

          \override Stem.direction = #DOWN d16
          \change Staff = "down" \changeColor \colorOneThree g32
          \changeColor \colorOne fis e16 g

          \change Staff = "up" \shiftOff \once \override NoteColumn.force-hshift = #-.3 fis
          \change Staff = "down" \shiftOn  d32 e fis16 a

          \change Staff = "up" \shiftOff \once \override NoteColumn.force-hshift = #-.3 g
          \change Staff = "down" \shiftOn b32 a g16 fis

          \change Staff = "up" e
          \once \override NoteColumn.force-hshift = #.4 \changeColor \colorOneThree a32
          \changeColor \colorOne g fis16
          \once \override NoteColumn.force-hshift = #-1 e
        }
        \\
        \relative c''' {
          \key d \major \changeColors \colorTwo

          \override Stem.direction = #UP b16 b b b

          a a a a

          b b b b

          cis cis,
          \once \override NoteColumn.force-hshift =#-.6 cis
          \changeColor \colorTwoThree cis
        }
        \\
        \relative c'' {
          \key d \major \changeColors \colorThree

          \once \override NoteColumn.force-hshift = #.4 g16
          \change Staff = "down" \changeColor \colorOneThree g
          \changeColor \colorThree g
          \change Staff = "up" \override Stem.direction = #DOWN d'

          \once \override NoteColumn.force-hshift = #.6 d
          d d d

          \once \override NoteColumn.force-hshift = #.6 d
          d
          \change Staff = "down" \override Stem.direction = #UP b b

          \change Staff = "up" \autoBeamOff \shiftOff a
          \shiftOn \once \override NoteColumn.force-hshift = #.4 \changeColor \colorOneThree a
          \override Stem.direction = #DOWN \shiftOff \once \override NoteColumn.force-hshift = #.4 \changeColor \colorThree e'
          \changeColor \colorTwoThree cis
        }
      >>
    }
    \new Staff = "down" {
      \relative c {
        \clef "bass" \key d \major
        g4 d g a
      }
    }
  >>
}