input/midi/midi-volume-equaliser.ly

   1 \version "2.10.0"
   2 \header {
   3   texidoc = "@cindex Midi Volume Equaliser
   4 The full orchestra plays a notes, where groups stop one after
   5 another. Use this to tune equalizer settings. "
   6 }
   7
   8 #(set-global-staff-size 16)
   9
  10 %{
  11
  12 Override, see scm/midi.scm:
  13
  14 #(set! instrument-equalizer-alist
  15   (append
  16    '(
  17      ("flute" . (0 . 0.7))
  18    )
  19    instrument-equalizer-alist))
  20
  21 %}
  22
  23 flauti =  \relative c' {
  24   \set Staff.midiInstrument = #"flute"
  25   \set Staff.instrumentName = #"2 Flauti"
  26   \set Staff.shortInstrumentName = #"Fl."
  27
  28   c1\f R1*10
  29 }
  30
  31 oboi =  \relative c' {
  32   \set Staff.midiInstrument = #"oboe"
  33   \set Staff.instrumentName = #"2 Oboi"
  34   \set Staff.shortInstrumentName = #"Ob."
  35
  36   R1*1 c1\f R1*9
  37 }
  38
  39 clarinetti =  \relative c' {
  40   \set Staff.midiInstrument = #"clarinet"
  41   \set Staff.instrumentName = #"Clarinetti"
  42   \set Staff.shortInstrumentName = #"Cl"
  43
  44   R1*2 c1\f R1*8
  45 }
  46
  47 fagotti =  \relative c' {
  48   \set Staff.midiInstrument = #"bassoon"
  49   \set Staff.instrumentName = #"2 Fagotti"
  50   \set Staff.shortInstrumentName = #"Fg."
  51
  52   \clef bass
  53   R1*3 c1\f R1*7
  54 }
  55
  56 corni =  \relative c' {
  57   \set Staff.midiInstrument = #"french horn"
  58   \set Staff.instrumentName = #"Corni"
  59   \set Staff.shortInstrumentName = #"Cor"
  60
  61   R1*4 c1\f R1*6
  62 }
  63
  64 trombe =  \relative c' {
  65   \set Staff.midiInstrument = #"trumpet"
  66   \set Staff.instrumentName = #"Trombe"
  67   \set Staff.shortInstrumentName = #"Tp."
  68
  69   \clef bass
  70   R1*5 c1\f R1*5
  71 }
  72
  73 timpani =  \relative c' {
  74   \set Staff.midiInstrument = #"timpani"
  75   \set Staff.instrumentName = #"Timpani"
  76   \set Staff.shortInstrumentName = #"Timp."
  77
  78   R1*6 c1\f R1*4
  79 }
  80
  81 violinoI =  \relative c' {
  82   \set Staff.midiInstrument = #"violin"
  83   \set Staff.instrumentName = #"Violino I "
  84   \set Staff.shortInstrumentName = #"Vl. I "
  85
  86   R1*7 c1\f R1*3
  87 }
  88
  89 violinoII =  \relative c' {
  90   \set Staff.midiInstrument = #"violin"
  91   \set Staff.instrumentName = #"Violino II "
  92   \set Staff.shortInstrumentName = #"Vl. II "
  93
  94   R1*8 c1\f R1*2
  95 }
  96
  97 viola =  \relative c' {
  98   \set Staff.midiInstrument = #"viola"
  99   \set Staff.instrumentName = #"Viola"
 100   \set Staff.shortInstrumentName = #"Vla."
 101
 102   \clef alto
 103   R1*9 c1\f R1*1
 104 }
 105
 106 violoncello =  \relative c' {
 107   \set Staff.midiInstrument = #"cello"
 108                                 %\set Staff.midiInstrument = #"contrabass"
 109   \set Staff.instrumentName = #"Violoncello"
 110   \set Staff.shortInstrumentName = #"Vc."
 111
 112   \clef bass
 113   R1*10 c1\f
 114 }
 115
 116
 117 \score {
 118   <<
 119     \new StaffGroup = "legni" <<
 120       \new Staff = "flauti" \flauti
 121       \new Staff = "oboi" \oboi
 122       \new Staff = "clarinetti" \clarinetti
 123       \new Staff = "fagotti" \fagotti
 124     >>
 125     \new StaffGroup = "ottoni" <<
 126       \new Staff = "corni" \corni
 127       \new Staff = "trombe" \trombe
 128     >>
 129     \new StaffGroup = "timpani" <<
 130       \new Staff = "timpani" \timpani
 131       {
 132         \skip 1
 133         %% Hmm: this forces a staff-bracket, that's good!
 134         %% However, I can't find where is decided on staff-bracket yes/no
 135       }
 136     >>
 137     \new StaffGroup = "archi" <<
 138       \new GrandStaff = "violini" <<
 139         \new Staff = "violino1" \violinoI
 140         \new Staff = "violino2" \violinoII
 141       >>
 142       \new Staff = "viola" \viola
 143       \new Staff = "violoncello" \violoncello
 144     >>
 145   >>
 146
 147   \layout {
 148     \context {
 149       \RemoveEmptyStaffContext
 150     }
 151   }
 152
 153   \midi {
 154     \context {
 155       \Score
 156       tempoWholesPerMinute = #(ly:make-moment 60 1)
 157     }
 158   }
 159 }
 160
 161