Eclats de vers : Opus : Musica : Templates

% vim: set fdm=indent:

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

%\version "2.24.0"

\language "english"

\header {
  title = "divers"
  subtitle="subtitle"
  composer = "composer"
  poet = "poet"
  %piece = "piece"
}

\layout {
  % ---- score
  \override Staff.NoteHead.style = #'baroque
  \override Score.BarNumber.break-visibility = ##(#t #t #t)
  \context {
    \Score
    %barNumberVisibility = #(every-nth-bar-number-visible 8)
    barNumberVisibility = #(modulo-bar-number-visible 8 0)
  }
  % ---- staff
  \context {
    \Staff
    \RemoveEmptyStaves
    \consists "Merge_rests_engraver"
  }
}

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

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

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

\include "include/mel.ly"

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

voiceTestTreble = \fixed c'' {
  \global
  % Music follows here.
  \tempo 2. = 50
  %\anacrusis
  s2.*8
}

voiceTestBass = \fixed c {
  \global
  % Music follows here.
  %\anacrusis
  \themeTest
}

voiceGuitar = \fixed c {
  \global
  % Music follows here.
}

voiceBassGuitar = \fixed c {
  \global
  % Music follows here.
}

voiceLute = \fixed c {
  \global
  % Music follows here.
}

voiceHarpUpper = \fixed c'' {
  \global
  % Music follows here.
}

voiceHarpLower = \fixed c {
  \global
  % Music follows here.
}

voiceEffects = \fixed c' {
  %\set Staff.midiInstrument = #"fx 1 (rain)"
  %c2. c2.
}

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

instrumentTest = \new GrandStaff \with {
  instrumentName = "Test"
  shortInstrumentName = "t"
  connectArpeggios = ##t
} <<
  \new Staff = "treble" \with {
    midiInstrument = "flute"
    midiMinimumVolume = #1.0
    midiMaximumVolume = #1.5
  } { \clef treble
      \showStaffSwitch
      \voiceTestTreble }
  \new Staff = "bass" \with {
    midiInstrument = "orchestral harp"
    midiMinimumVolume = #1.0
    midiMaximumVolume = #1.5
    % fine clef tweak
    clefGlyph = #"clefs.F"
    clefPosition = #2
    clefTransposition = #0
    middleCPosition = #6
    middleCClefPosition = #6
  } { %\clef bass
      \showStaffSwitch
      \voiceTestBass }
>>

instrumentGuitar = \new Staff \with {
  instrumentName = "Guitar"
  shortInstrumentName = "gtr"
  midiInstrument = "acoustic guitar (nylon)"
  midiMinimumVolume = #1.0
  midiMaximumVolume = #1.5
} { \clef tenor
    %\override Staff.StaffSymbol.line-count = #7
    \voiceGuitar }

instrumentTabGuitar = \new TabStaff \with {
  instrumentName = "Guitar"
  shortInstrumentName = "gtr"
  % ---- guitar
  stringTunings = \stringTuning <e, a, d g b e'>
  % ---- midi
  midiInstrument = "acoustic guitar (nylon)"
  midiMinimumVolume = #1.0
  midiMaximumVolume = #1.5
} { \clef tab
    \tabFullNotation
    \tabChordRepeats
    \voiceGuitar }

instrumentBassGuitar = \new Staff \with {
  instrumentName = \markup { \column { Bass Guitar } }
  shortInstrumentName = \markup { \column { bs gtr } }
  midiInstrument = "acoustic bass"
  midiMinimumVolume = #1.0
  midiMaximumVolume = #1.5
} { \clef subbass
    %\override Staff.StaffSymbol.line-count = #7
    \voiceBassGuitar }

instrumentTabBassGuitar = \new TabStaff \with {
  instrumentName = \markup { \column { Bass Guitar } }
  shortInstrumentName = \markup { \column { bs gtr } }
  % ---- bass guitar
  stringTunings = \stringTuning <e,, a,, d, g,>
  % ---- midi
  midiInstrument = "acoustic bass"
  midiMinimumVolume = #1.0
  midiMaximumVolume = #1.5
} { \clef tab
    \tabFullNotation
    \tabChordRepeats
    \voiceBassGuitar }

instrumentLute = \new Staff \with {
  instrumentName = "Lute"
  shortInstrumentName = "lt"
  midiInstrument = "acoustic guitar (nylon)"
  midiMinimumVolume = #1.0
  midiMaximumVolume = #1.5
} { \clef alto
    %\override Staff.StaffSymbol.line-count = #7
    \voiceLute }

instrumentTabLute = \new TabStaff \with {
  instrumentName = "Lute"
  shortInstrumentName = "lt"
  % ---- lute
  tablatureFormat = #fret-letter-tablature-format
  fretLabels = #'("a" "b" "c" "d" "e" "f" "g" "h" "i" "j" "k" "l")
  % -- renaissance lute, 6 courses
  %stringTunings = \stringTuning <g, c f a d' g'>
  % -- renaissance lute, 8 courses
  %stringTunings = \stringTuning <g, c f a d' g'>
  %additionalBassStrings = \stringTuning <e, f,>
  % -- late renaissance / early baroque lute, 10 courses
  %stringTunings = \stringTuning <g, c f a d' g'>
  %additionalBassStrings = \stringTuning <c, d, ef, f,>
  % -- baroque lute, 13 courses
  %stringTunings = \stringTuning <a, d f a d' f'>
  %additionalBassStrings = \stringTuning <a,, b,, c, d, e, f, g,>
  % -- archlute, 14 courses
  stringTunings = \stringTuning <g, c f a d' g'>
  additionalBassStrings = \stringTuning <f,, g,, a,, b,, c, d, e, f,>
  % -- theorbo
  %stringTunings = \stringTuning <a, d g b e a>
  %additionalBassStrings = \stringTuning <g,, a,, b,, c, d, e, f, g,>
  % ---- midi
  midiInstrument = "acoustic guitar (nylon)"
  midiMinimumVolume = #1.0
  midiMaximumVolume = #1.5
} { \clef tab
    \tabFullNotation
    \tabChordRepeats
    \voiceLute }

instrumentHarp = \new GrandStaff \with {
  instrumentName = "Harp"
  shortInstrumentName = "hp"
} <<
  \new Staff = "upper" \with {
    midiInstrument = "orchestral harp"
    midiMinimumVolume = #1.5
    midiMaximumVolume = #1.9
  } { \clef treble \voiceHarpUpper }
  \new Staff = "lower" \with {
    midiInstrument = "orchestral harp"
    midiMinimumVolume = #1.5
    midiMaximumVolume = #1.9
  } { \clef bass \voiceHarpLower }
>>

instrumentEffects = \new Staff \with {
  instrumentName = "Effects"
  shortInstrumentName = "fx"
} { \clef percussion
    \override Staff.StaffSymbol.line-count = #1
    \voiceEffects
}

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

\book {
  \score {
    <<
      \instrumentTest
      \instrumentGuitar
      \instrumentTabGuitar
      \instrumentBassGuitar
      \instrumentTabBassGuitar
      \instrumentLute
      \instrumentTabLute
      \instrumentHarp
      \instrumentEffects
    >>
    \layout { }
    \midi {
      \context {
	\Score
	midiChannelMapping = #'instrument
      }
    }
  }
  \paper {
    system-separator-markup = \slashSeparator
  }
}