[ << MIDI ]	[Top][Contents]	[ Templates >> ]
[ < Démonstration de midiInstrument ]	[ Up : MIDI ]	[ Templates > ]

---

Réglage de l’égalisation par défaut des instruments MIDI

L’égaliseur basique peut être modifié par la définition d’une nouvelle procédure Scheme instrumentEqualizer au sein du contexte Score. Cette procédure prend en unique argument le nom d’un instrument MIDI et renverra une paire de fractions correspondant aux minimum et maximum de volume alloué à cet instrument.

Dans l’exemple suivant sont réglés les volumes relatifs de la flûte et de la clarinette.

#(define my-instrument-equalizer-alist '())

#(set! my-instrument-equalizer-alist
  (append
    '(
      ("flute" . (0.7 . 0.9))
      ("clarinet" . (0.3 . 0.6)))
    my-instrument-equalizer-alist))

#(define (my-instrument-equalizer s)
  (let ((entry (assoc s my-instrument-equalizer-alist)))
    (if entry
      (cdr entry))))

\score {
  <<
    \new Staff {
      \key g \major
      \time 2/2
      \set Score.instrumentEqualizer = #my-instrument-equalizer
      \set Staff.midiInstrument = "flute"
      \new Voice \relative {
        r2 g''\mp g fis~
        4 g8 fis e2~
        4 d8 cis d2
      }
    }
    \new Staff {
      \key g \major
      \set Staff.midiInstrument = "clarinet"
      \new Voice \relative {
        b'1\p a2. b8 a
        g2. fis8 e
        fis2 r
      }
    }
  >>
  \layout { }
  \midi {  }
}