mutopia/Coriolan/bassi.ly

   1 \version "1.3.120";
   2
   3 \include "violoncello.ly"
   4 \include "contrabasso.ly"
   5
   6 %{
   7 bassiGroup =  \context PianoStaff = bassi_group \notes <
   8         \staffCombinePianoStaffProperties
   9         \context Staff=oneBassi {
  10                 \property Staff.midiInstrument = #"cello"
  11                 \property Staff.instrument = #'(lines
  12                   "Violoncello" "    e" "Contrabasso")
  13
  14                 \property Staff.instr = #"Vc."
  15                 \clef "bass";
  16                 %\property Staff.clefGlyph = #"clefs-F"
  17                 %\property Staff.clefPosition = #2
  18
  19                 \global
  20         }
  21         \context Staff=twoBassi {
  22                 \property Staff.midiInstrument = #"contrabass"
  23                 \property Staff.instrument = #"Contrabasso"
  24                 \property Staff.instr = #"Cb."
  25                 \property Staff.transposing = #-12
  26                 \clef "bass";
  27                 %\property Staff.clefGlyph = #"clefs-F"
  28                 %\property Staff.clefPosition = #2
  29
  30                 \global
  31         }
  32         \context Staff=oneBassi \partcombine Staff
  33                 \context Voice=oneBassi \violoncello
  34                 \context Voice=twoBassi \contrabasso
  35 >
  36 %}
  37
  38 bassiGroup =  \context PianoStaff = bassi_group \notes <
  39         \context Staff=violoncelloStaff <
  40                 \property Staff.midiInstrument = #"cello"
  41                 \property Staff.instrument = #"Violoncello  "
  42                 \property Staff.instr = #"Vc.  "
  43                 \clef "bass";
  44                 \global
  45                 \violoncello
  46         >
  47         \context Staff=contrabassoStaff <
  48                 \property Staff.midiInstrument = #"contrabass"
  49                 \property Staff.instrument = #"Contrabasso  "
  50                 \property Staff.instr = #"Cb.  "
  51                 \property Staff.transposing = #-12
  52                 \clef "bass";
  53                 \global
  54                 \contrabasso
  55         >
  56 >