input/tutorial/os-score.ly

   1
   2 \version "1.3.138"
   3
   4 \include "os-music.ly"
   5 \include "paper13.ly"
   6
   7 #(set! point-and-click line-column-location)
   8 #(define text-flat '((font-relative-size . -2) (music "accidentals--1")))
   9
  10 \score {
  11   <
  12     \global
  13     \property Score.BarNumber \override #'padding = #3
  14     \context StaffGroup = woodwind <
  15       \context Staff = flauti <
  16         \property Staff.midiInstrument = #"flute"
  17         \property Staff.instrument = "2 Flauti"
  18         \property Staff.instr = "Fl."
  19         \Key
  20         \context Voice=one { \voiceOne \flautoI }
  21         \context Voice=two { \voiceTwo \flautoII }
  22       >
  23     >
  24     \context StaffGroup = timpani <
  25       \context Staff = timpani <
  26         \property Staff.midiInstrument = #"timpani"
  27         \property Staff.instrument = #'(lines "Timpani" "(C-G)")
  28         \property Staff.instr = #"Timp."
  29         \clef bass
  30         \Key
  31         \timpani
  32       >
  33     >
  34     \context StaffGroup = brass <
  35       \context Staff = trombe <
  36         \property Staff.midiInstrument = #"trumpet"
  37         \property Staff.instrument = #`(lines "2 Trombe" "(C)")
  38         \property Staff.instr = #`(lines "Tbe." "(C)")
  39         \Key
  40         \context Voice=one \partcombine Voice
  41           \context Thread=one \tromboI
  42           \context Thread=two \tromboII
  43       >
  44       \context Staff = corni <
  45         \property Staff.midiInstrument = #"french horn"
  46         \property Staff.instrument = #`(lines "Corno" (columns "(E" ,text-flat ")"))
  47         \property Staff.instr = #`(lines "Cor."  (columns "(E" ,text-flat ")"))
  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