(write-preamble): new function.

[lilypond.git] / input / screech-boink.ly

diff --git a/input/screech-boink.ly b/input/screech-boink.ly
index 2472caeb0b1c5af809ce7c6dcec94f6976d80fe1..7528ce7e51720ad5a4f65cacbeb954e41c77c779 100644 (file)
--- a/input/screech-boink.ly
+++ b/input/screech-boink.ly
@@ -1,4 +1,4 @@
-\version "2.3.16"
+\version "2.7.39"
 \header {
     title = "Screech and boink"
     subtitle = "Random complex notation"
@@ -7,7 +7,7 @@
 
 \score {
      \context PianoStaff <<
-       \context Staff = up {
+       \new Staff =  "up" {
            \time 4/8
            \key c \minor
 
@@ -23,7 +23,7 @@
                    c'''32      \change Staff = down
                    g16]
                \change Staff = up
-               \override Stem  #'direction = #1
+               \stemUp
                \set followVoice = ##t
                c'''32([ b''16 a''16 gis''16 g''32)]  } \\
               { s4 \times 2/3 { d'16[ f' g'] } as'32[ b''32 e'' d''] } \\
@@ -32,7 +32,7 @@
           >>
        }
 
-       \context Staff = down {
+       \new Staff =  "down" {
            \clef bass
            \key c \minor
            \set subdivideBeams = ##f
@@ -46,15 +46,15 @@
                <g cis>
            } \\
               {
-                  \override Staff.Arpeggio  #'arpeggio-direction =#-1
+                  \override Staff.Arpeggio  #'arpeggio-direction =#down
                   <cis, e, gis, b, cis>4\arpeggio  }
           >>
        }
     >>
     \midi { \tempo 8 = 60 }
 
-    \paper {
-       raggedright = ##t 
+    \layout {
+       ragged-right = ##t 
 
        \context {
            \Staff