input/test/staff-size.ly

   1 #(ly:set-option 'old-relative)
   2 \version "1.9.4"
   3
   4 \header { texidoc = "@cindex Staff Size
   5
   6 Setting staff sizes is a little clumsy.  There are two options: using
   7 @code{StaffContainer} and override/revert, or
   8 @code{\applyoutput}. Both methods are shown in this example. "
   9
  10 }
  11
  12 \score {
  13   \notes \relative c' << \new StaffContainer {
  14      \property StaffContainer.StaffSymbol \set #'staff-space = #(/ 16 20)
  15
  16         \property Staff.fontSize = #-1
  17         \property Voice.fontSize = #-1
  18
  19         \dynamicUp\stemDown
  20
  21         %\key gis \major
  22         c8 d  e[ f g a] b c \ff
  23   }
  24
  25 \new Staff \relative c'' { \dynamicDown c,,4 \ff c c c  }
  26 \new Staff {
  27   \context Staff \applyoutput #(outputproperty-compatibility (make-type-checker 'staff-symbol-interface) 'staff-space 0.8)
  28   \property Staff.fontSize = #-1
  29   \clef bass
  30   c8 c c c  c c c c
  31 }
  32 >>
  33 \paper { raggedright = ##t}
  34 }
  35
  36