]> git.donarmstrong.com Git - lilypond.git/blobdiff - input/test/staff-size.ly
* scripts/convert-ly.py (FatalConversionError.conv): conversion
[lilypond.git] / input / test / staff-size.ly
index adf8d50c266deb1a94ccb65aa726820720c49603..650d6d49e70ca264bdcc69754ada59f5e1a18892 100644 (file)
@@ -1,17 +1,34 @@
+\version "1.7.18"
+
+\header { texidoc = "@cindex Staff Size
+Setting staff sizes is a little clumsy.  There
+are two options: using StaffContainer and override/revert, or
+\outputproperty. Both methods are shown in this example. "
+}
+
 \score {
-  \notes \relative c' < \context Voice {
-       \property Staff.staffLineLeading = "4"
-       \property Staff.fontSize = "-1"
-       \property Voice.fontSize = "-1" 
+  \notes \relative c' < \context StaffContainer = SA{
+     \property StaffContainer.StaffSymbol \set #'staff-space = #(/ 16 20)
+
+       \property Staff.fontSize = #-1
+       \property Voice.fontSize = #-1
        
-       \property Voice . dynamicDir = \up \stemdown
-%\key gis;
-       c8 d [e f g a] b c \ff
-  }
+       \dynamicUp\stemDown
 
-\context Staff = VB {  \property Voice . dynamicDir = \down c,,4 \ff c c c  }
+       %\key gis \major
+       c8 d  e-[ f g a] b c -\ff
+  }
 
+\context Staff = SB { \dynamicDown c,,4 -\ff c c c  }
+\context Staff = SC {
+  \context Staff \outputproperty #(make-type-checker 'staff-symbol-interface)
+    #'staff-space =  #0.8
+  \property Staff.fontSize = #-1
+  \clef bass
+  c8 c c c  c c c c
+}
 >
-\paper { linewidth = -1.; }
+\paper { raggedright = ##t}
 }
-\version "1.0.21"; 
+
+%% new-chords-done %%