Eclats de vers : Opus : Musica : Templates

Retour à l’accueil

Table of Contents

1. Petit chambre

Le résultat :

sejour.png

La source :

% vim: set fdm=indent:

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

%\version "2.24.0"

\language "english"

\header {
  title = "séjour"
  subtitle="chambre"
  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" \with {
    midiInstrument = "flute"
    midiMinimumVolume = #1.0
    midiMaximumVolume = #1.5
  } { \clef french
      << \voiceWindSoprano \\ \voiceWindAlto >> }
  \new Staff = "bass" \with {
    midiInstrument = "bassoon"
    midiMinimumVolume = #1.0
    midiMaximumVolume = #1.5
  } { \clef varbaritone
      << \voiceWindTenor \\ \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 = 2 flutes, 2 bassoons }
    \line { strings = 2 violins, 2 cellos }
    \line { lutes = archlute, theorbo }
    \vspace #1
  }
  \score {
    <<
      \instrumentWinds
      \instrumentStrings
      \instrumentKeyboard
      \instrumentLutes
      \instrumentVibraphone
      \instrumentDrums
    >>
    \layout { }
    \midi {
      \context {
	\Score
	%midiChannelMapping = #'instrument
	%\enablePolymeter
      }
    }
  }
  \paper {
    system-separator-markup = \slashSeparator
  }
}

Author: chimay

Created: 2023-05-10 mer 16:49

Validate