]> git.donarmstrong.com Git - lilypond.git/blobdiff - input/test/partial-blank.ly
Imported sources
[lilypond.git] / input / test / partial-blank.ly
index d84b3499267556776528ad4e3cd326f16d97ecbb..256a328436164d3fb9cd381cad865d09a5da1cb3 100644 (file)
@@ -1,4 +1,5 @@
-\version "1.7.18"
+
+\version "2.1.7"
 % check with invisible-notes or blank-notes.  possible rename. -gp
 \header{ texidoc = "@cindex Partial Blank
 When entering half music (i.e. for students to complete by hand)
@@ -7,23 +8,26 @@ same length, etc.  This thing implements it by adding invisible
 staff with lots of fast notes. "
 }
 
-quickmeasure = \notes {[\repeat unfold 16 c''16]}
+quickmeasure = \notes {
+    \repeat unfold 16 c''16
+}
+
 mel = \notes \relative c' {c16 d16 e8 a4 g2 e8 d c2. g'1 e4 d c2}
 
 \score {
-\context PianoStaff \notes <
-  \context Staff = v <
+\context PianoStaff \notes <<
+  \new Staff <<
     \clef G
-    \context Voice=melo {\mel}
-    \context Voice=invisible {
+    \new Voice {\mel}
+    \new Voice {
        \property Voice.NoteHead \override #'transparent = ##t
        \property Voice.Stem \override #'transparent = ##t
        \property Voice.Beam \override #'transparent = ##t
         \repeat unfold 4 \quickmeasure
     }
-  >
-  \context Staff = empty \notes {\clef F s1*4}
->
+  >>
+  \new Staff \notes {\clef F s1*4}
+>>
 \paper {}
 }