mutopia/Coriolan/clarinetti.ly

   1
   2 \version "1.3.120";
   3
   4 \include "clarinetto-1.ly"
   5 \include "clarinetto-2.ly"
   6
   7 clarinettiStaff = \context VoiceCombineStaff = clarinetti <
   8         \property VoiceCombineStaff.midiInstrument = #"clarinet"
   9
  10         \property VoiceCombineStaff.instrument = #`((kern . 0.5)
  11         (lines "2 Clarinetti" (rows "(B" ,text-flat ")")))
  12
  13         \property VoiceCombineStaff.instr = #`((kern . 0.5)
  14         (lines "Cl."  (rows "(B" ,text-flat ")")))
  15
  16         % urg: can't; only My_midi_lexer:<non-static> () parses pitch?
  17         %\property VoiceCombineStaff.transposing = "bes"
  18         \property VoiceCombineStaff.transposing = #-2
  19
  20         \Time
  21         \notes { \key f \major; }
  22         \End
  23         \context VoiceCombineVoice=one \partcombine VoiceCombineVoice
  24                 \context VoiceCombineThread=one \clarinettoI
  25                 \context VoiceCombineThread=two  \clarinettoII
  26 >
  27