1 % DO NOT EDIT this file manually; it is automatically
2 % generated from Documentation/snippets/new
3 % Make any changes in Documentation/snippets/new/
4 % and then run scripts/auxiliar/makelsr.py
6 % This file is in the public domain.
7 %% Note: this file works from version 2.19.21
12 lsrtags = "scheme-language, midi"
14 texidoc = "The default MIDI instrument equalizer can be replaced by
15 setting the @code{instrumentEqualizer} property in the @code{Score}
16 context to a user-defined Scheme procedure that uses a MIDI instrument
17 name as its argument along with a pair of fractions indicating the
18 minimum and maximum volumes respectively to be applied to that
21 The following example sets the minimum and maximum volumes for flute
22 and clarinet respectively."
24 doctitle = "Replacing default MIDI instrument equalization"
28 #(define my-instrument-equalizer-alist '())
30 #(set! my-instrument-equalizer-alist
33 ("flute" . (0.7 . 0.9))
34 ("clarinet" . (0.3 . 0.6)))
35 my-instrument-equalizer-alist))
37 #(define (my-instrument-equalizer s)
38 (let ((entry (assoc s my-instrument-equalizer-alist)))
47 \set Score.instrumentEqualizer = #my-instrument-equalizer
48 \set Staff.midiInstrument = #"flute"
49 \new Voice \relative {
57 \set Staff.midiInstrument = #"clarinet"
58 \new Voice \relative {