]> git.donarmstrong.com Git - lilypond.git/blob - input/regression/midi-volume-equaliser.ly
Regtest: add tweak to test what it claims to test.
[lilypond.git] / input / regression / midi-volume-equaliser.ly
1 \version "2.12.0"
2 \header {
3   texidoc = "@cindex Midi Volume Equaliser
4 The full orchestra plays a note, 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
26   c1\f R1*10
27 }
28
29 oboi =  \relative c' {
30   \set Staff.midiInstrument = #"oboe"
31
32   R1*1 c1\f R1*9
33 }
34
35 clarinetti =  \relative c' {
36   \set Staff.midiInstrument = #"clarinet"
37
38   R1*2 c1\f R1*8
39 }
40
41 fagotti =  \relative c' {
42   \set Staff.midiInstrument = #"bassoon"
43
44   \clef bass
45   R1*3 c1\f R1*7
46 }
47
48 corni =  \relative c' {
49   \set Staff.midiInstrument = #"french horn"
50
51   R1*4 c1\f R1*6
52 }
53
54 trombe =  \relative c' {
55   \set Staff.midiInstrument = #"trumpet"
56
57   \clef bass
58   R1*5 c1\f R1*5
59 }
60
61 timpani =  \relative c' {
62   \set Staff.midiInstrument = #"timpani"
63
64   R1*6 c1\f R1*4
65 }
66
67 violinoI =  \relative c' {
68   \set Staff.midiInstrument = #"violin"
69
70   R1*7 c1\f R1*3
71 }
72
73 violinoII =  \relative c' {
74   \set Staff.midiInstrument = #"violin"
75   
76   R1*8 c1\f R1*2
77 }
78
79 viola =  \relative c' {
80   \set Staff.midiInstrument = #"viola"
81
82   \clef alto
83   R1*9 c1\f R1*1
84 }
85
86 violoncello =  \relative c' {
87   \set Staff.midiInstrument = #"cello"
88                                 %\set Staff.midiInstrument = #"contrabass"
89   
90   \clef bass
91   R1*10 c1\f
92 }
93
94
95
96 \score {
97   << 
98     \new StaffGroup = "legni" << 
99       \new Staff = "flauti" \flauti
100       \new Staff = "oboi" \oboi
101       \new Staff = "clarinetti" \clarinetti 
102       \new Staff = "fagotti" \fagotti 
103     >>
104     \new StaffGroup = "ottoni" <<
105       \new Staff = "corni" \corni
106       \new Staff = "trombe" \trombe
107     >>
108     \new StaffGroup = "timpani" <<
109       \new Staff = "timpani" \timpani
110       { 
111         \skip 1 
112         %% Hmm: this forces a staff-bracket, that's good!
113         %% However, I can't find where is decided on staff-bracket yes/no
114       }
115     >>
116     \new StaffGroup = "archi" <<
117       \new GrandStaff = "violini" <<
118         \new Staff = "violino1" \violinoI
119         \new Staff = "violino2" \violinoII
120       >>
121       \new Staff = "viola" \viola
122       \new Staff = "violoncello" \violoncello
123     >>
124   >>
125
126   \midi {
127     \context {
128       \Score
129       tempoWholesPerMinute = #(ly:make-moment 60 1)
130     }
131   }
132 }
133
134