Eclats de vers : Opus : Musica : Templates

% vim: set fdm=indent:

% ------------ headers ------------

%\version "2.24.0"

\language "english"

\header {
  title = "kiosque"
  subtitle="chambre avec quatuor à vent"
  composer = "composer"
  poet = "poet"
  %piece = "piece"
}

\layout {
  %\enablePolymeter
  \override Score.BarNumber.break-visibility = ##(#t #t #t)
  \context {
    \Score
    measureBarType = #","
    %barNumberVisibility = #(every-nth-bar-number-visible 8)
    barNumberVisibility = #(modulo-bar-number-visible 8 0)
  }
  \context {
    \Staff
    \RemoveEmptyStaves
    \consists "Merge_rests_engraver"
  }
}

% ------------ view only the beg/end ------------

%showFirstLength = R2.*8
%showLastLength = R2.*8

% ------------ melodies ------------

\include "include/mel.ly"

% ------------ voices ------------

voiceWindSoprano = \fixed c'' {
  \global
  \tempo 2. = 50
  % Music follows here.
  \anacrusis

}

voiceWindAlto = \fixed c' {
  \global
  % Music follows here.
  \anacrusis

}

voiceWindTenor = \fixed c {
  \global
  % Music follows here.
  \anacrusis

}

voiceWindBass = \fixed c, {
  \global
  % Music follows here.
  \anacrusis

}

voiceStringSoprano = \fixed c'' {
  \global
  % Music follows here.
  \anacrusis

}

voiceStringAlto = \fixed c' {
  \global
  % Music follows here.
  \anacrusis

}

voiceStringTenor = \fixed c {
  \global
  % Music follows here.
  \anacrusis

}

voiceStringBass = \fixed c, {
  \global
  % Music follows here.
  \anacrusis

}

voiceKeyboardRight = \fixed c'' {
  \global
  % Music follows here.
  \anacrusis

}

voiceKeyboardLeft = \fixed c {
  \global
  % Music follows here.
  \anacrusis

}

voiceLuteTreble = \fixed c' {
  \global
  % Music follows here.
  \anacrusis

}

voiceLuteBass = \fixed c {
  \global
  % Music follows here.
  \anacrusis

}

voiceVibraphone = \fixed c' {
  \global
  % Music follows here.
  \anacrusis

}

voiceDrums = \drummode {
  \global
  % Music follows here.
  \anacrusisDrums

}

% ------------ instruments ------------

instrumentWinds = \new StaffGroup \with {
  instrumentName = "winds"
  shortInstrumentName = "wd"
} <<
  \new Staff = "treble"
  << \clef french
     \new Voice \with {
       midiInstrument = "flute"
       midiMinimumVolume = #1.0
       midiMaximumVolume = #1.5
     } { \voiceOne \voiceWindSoprano }
     \new Voice \with {
       midiInstrument = "oboe"
       midiMinimumVolume = #1.0
       midiMaximumVolume = #1.5
     } { \voiceTwo \voiceWindAlto }
  >>
  \new Staff = "bass"
  << \clef varbaritone
     \new Voice \with {
       midiInstrument = "english horn"
       midiMinimumVolume = #1.0
       midiMaximumVolume = #1.5
     } { \voiceOne \voiceWindTenor }
     \new Voice \with {
       midiInstrument = "bassoon"
       midiMinimumVolume = #1.0
       midiMaximumVolume = #1.5
     } { \voiceTwo \voiceWindBass }
  >>
>>

instrumentStrings = \new StaffGroup \with {
  instrumentName = "strings"
  shortInstrumentName = "st"
} <<
  \new Staff = "treble" \with {
    midiInstrument = "violin"
    midiMinimumVolume = #1.0
    midiMaximumVolume = #1.5
  } { \clef treble
      << \voiceStringSoprano \\ \voiceStringAlto >> }
  \new Staff = "bass" \with {
    midiInstrument = "cello"
    midiMinimumVolume = #1.0
    midiMaximumVolume = #1.5
  } { \clef bass
      << \voiceStringTenor \\ \voiceStringBass >> }
>>

instrumentKeyboard = \new GrandStaff \with {
  instrumentName = \markup \column { harpsi- chord }
  shortInstrumentName = \markup \column { hp cd }
  connectArpeggios = ##t
} <<
  \new Staff = "treble" \with {
    midiInstrument = "harpsichord"
    midiMinimumVolume = #1.5
    midiMaximumVolume = #2.0
  } { \clef treble
      %\showStaffSwitch
      \voiceKeyboardRight }
  \new Staff = "bass" \with {
    midiInstrument = "harpsichord"
    midiMinimumVolume = #1.5
    midiMaximumVolume = #2.0
  } { \clef bass
      %\showStaffSwitch
      \voiceKeyboardLeft }
>>

instrumentLutes = \new GrandStaff \with {
  instrumentName = "lutes"
  shortInstrumentName = "lt"
} <<
  \new Staff = "treble" \with {
    midiInstrument = "acoustic guitar (nylon)"
    midiMinimumVolume = #1.5
    midiMaximumVolume = #2.0
    % 3rd line G clef
    clefGlyph = #"clefs.G"
    clefPosition = #0
    clefTransposition = #0
    middleCPosition = #-4
    middleCClefPosition = #-4
  } { %\clef treble 
      \voiceLuteTreble }
  \new Staff = "bass" \with {
    midiInstrument = "acoustic guitar (steel)"
    midiMinimumVolume = #1.5
    midiMaximumVolume = #2.0
  } { \clef subbass \voiceLuteBass }
>>

instrumentVibraphone = \new Staff \with {
  instrumentName = \markup \column { vibra- phone }
  shortInstrumentName = "vb"
  midiInstrument = "vibraphone"
  midiMinimumVolume = #1.0
  midiMaximumVolume = #1.5
} { \clef treble \voiceVibraphone }

instrumentDrums = \new DrumStaff \with {
  instrumentName = "drums"
  shortInstrumentName = "dm"
} { \clef percussion \voiceDrums }

% ------------ book ------------

\book {
  \markup \column {
    \vspace #1
    \line { winds = flute, oboe, english horn, bassoon }
    \line { strings = 2 violins, 2 cellos }
    \line { lutes = archlute, theorbo }
    \vspace #1
  }
  \score {
    <<
      \instrumentWinds
      \instrumentStrings
      \instrumentKeyboard
      \instrumentLutes
      \instrumentVibraphone
      \instrumentDrums
    >>
    \layout { }
    \midi {
      \context {
	\Score
	%midiChannelMapping = #'voice
	%\enablePolymeter
      }
      \context {
	\Staff
	\remove "Staff_performer"
      }
      \context {
	\Voice
	\consists "Staff_performer"
      }
    }
  }
  \paper {
    system-separator-markup = \slashSeparator
  }
}