]> git.donarmstrong.com Git - lilypond.git/blobdiff - input/test/hshift.ly
* scripts/convert-ly.py (conv): remove \notes.
[lilypond.git] / input / test / hshift.ly
index 44fc9806983ac485c3e91e0cbe4c417ef5e5bed0..b2d1b1df410735cfe23c920aa2d8979c56176974 100644 (file)
@@ -1,17 +1,24 @@
+\version "2.3.4"
+\header { texidoc = "@cindex Horizontal Shift
+Notes may be manually horizontally shifted. " }
+
+shiftI = \override NoteColumn  #'horizontal-shift = #0
+shiftII = \override NoteColumn  #'horizontal-shift = #1
+shiftIII = \override NoteColumn  #'horizontal-shift = #2
+shiftIV = \override NoteColumn  #'horizontal-shift = #3
+shiftV = \override NoteColumn  #'horizontal-shift = #4
+
 \score { 
-  \context Voice \notes\relative c {
+  \context Voice \relative c {
     
-       \context Staff <
-               \context Voice =VA  {\property Voice.verticalDirection=1 \property Voice.horizontalNoteShift = 0 g'' }
-               \context Voice =VB  {\property Voice.verticalDirection=1 \property Voice.horizontalNoteShift = 1 e }
-               \context Voice =VC  {\property Voice.verticalDirection=1 \property Voice.horizontalNoteShift = 2 c }
-               \context Voice =VD  {\property Voice.verticalDirection=1 \property Voice.horizontalNoteShift = 3 a }
-               \context Voice =VE  {\property Voice.verticalDirection=1 \property Voice.horizontalNoteShift = 4 f }
-       >
-       
-       
-       
+       \context Staff <<
+               \new Voice  {\stemUp \shiftI g'' }
+               \new Voice  {\stemUp \shiftII e }
+               \new Voice  {\stemUp \shiftIII c }
+               \new Voice  {\stemUp \shiftIV a }
+               \new Voice  {\stemUp \shiftV f }
+       >>      
   }
-  \paper { }  
-  \midi { }
-}
\ No newline at end of file
+  \paper { raggedright = ##t }  
+}
+