input/tutorial/os-score.ly

   1 \version "1.7.6"
   2
   3 \include "os-music.ly"
   4 \include "paper13.ly"
   5
   6 #(ly:set-point-and-click 'line-column)
   7 textFlat = \markup {\smaller \musicglyph #"accidentals--1"}
   8 \score {
   9   <
  10     \global
  11     \property Score.BarNumber \override #'padding = #3
  12     \context StaffGroup = woodwind <
  13       \context Staff = flauti <
  14         \property Staff.midiInstrument = #"flute"
  15         \property Staff.instrument = "2 Flauti"
  16         \property Staff.instr = "Fl."
  17         \Key
  18         \context Voice=one { \voiceOne \flautoI }
  19         \context Voice=two { \voiceTwo \flautoII }
  20       >
  21     >
  22     \context StaffGroup = timpani <
  23       \context Staff = timpani <
  24         \property Staff.midiInstrument = #"timpani"
  25         \property Staff.instrument = \markup { \column <<  "Timpani" "(C-G)" >> }
  26         \property Staff.instr = #"Timp."
  27         \clef bass
  28         \Key
  29         \timpani
  30       >
  31     >
  32     \context StaffGroup = brass <
  33       \context Staff = trombe <
  34         \property Staff.midiInstrument = #"trumpet"
  35         \property Staff.instrument = \markup { \column << "2 Trombe" "(C)" >> }
  36         \property Staff.instr = \markup{ \column << "Tbe." "(C)">> }
  37         \Key
  38         \context Voice=one \partcombine Voice
  39           \context Thread=one \tromboI
  40           \context Thread=two \tromboII
  41       >
  42       \context Staff = corni <
  43         \property Staff.midiInstrument = #"french horn"
  44         \property Staff.instrument
  45         = \markup { \column << "Corno" { "(E"  \textFlat ")" } >> }
  46         \property Staff.instr =
  47         \markup { \column << "Cor." { "(E"  \textFlat ")" } >> }
  48         \property Staff.transposing = #3
  49         \notes \key bes \major
  50         \context Voice=one \corno
  51       >
  52     >
  53   >
  54   \paper {
  55     indent = 15 * \staffspace
  56     linewidth = 60 * \staffspace
  57     textheight = 90 * \staffspace
  58     \translator{
  59       \VoiceContext
  60       \consists "Multi_measure_rest_engraver"
  61     }
  62     \translator{
  63       \HaraKiriStaffContext
  64       \remove "Multi_measure_rest_engraver"
  65     }
  66   }
  67   \midi {
  68     \tempo 4 = 75
  69   }
  70 }
  71
  72