input/test/hshift.ly

   1 #(ly:set-option 'old-relative)
   2 \version "1.9.1"
   3 \header { texidoc = "@cindex Horizontal Shift
   4 You can manually shift notes horizontally. " }
   5
   6 shiftI = \property Voice.NoteColumn \override #'horizontal-shift = #0
   7 shiftII = \property Voice.NoteColumn \override #'horizontal-shift = #1
   8 shiftIII = \property Voice.NoteColumn \override #'horizontal-shift = #2
   9 shiftIV = \property Voice.NoteColumn \override #'horizontal-shift = #3
  10 shiftV = \property Voice.NoteColumn \override #'horizontal-shift = #4
  11
  12 \score {
  13   \context Voice \notes\relative c {
  14
  15         \context Staff <
  16                 \context Voice =VA  {\stemUp \shiftI g'' }
  17                 \context Voice =VB  {\stemUp \shiftII e }
  18                 \context Voice =VC  {\stemUp \shiftIII c }
  19                 \context Voice =VD  {\stemUp \shiftIV a }
  20                 \context Voice =VE  {\stemUp \shiftV f }
  21         >
  22   }
  23   \paper { raggedright = ##t }
  24 }
  25