LA Estrella, partition complète, version pour Ténors

la_estrella

\version "2.15.14"
\language "italiano"
\paper {
	first-page-number	= #2		% Afin d'avoir la reliure du “bon” côté !
	print-page-number	= ##f

	binding-offset		= 0.75\cm	% Marge de reliure
	inner-margin		= 1.25\cm	% Marge extérieur
	outer-margin		= 1.25\cm	% Marge extérieur
	two-sided		= ##t

	%oddHeaderMarkup	= ##t
	%evenHeaderMarkup	= ##t

	%last-bottom-spacing	#'basic-distance = #10
	markup-system-spacing	#'basic-distance = #17
	min-systems-per-page	= #3
	ragged-bottom		= ##t	% Met l'ensemble des portées vers le haut
	%score-system-spacing	#'basic-distance = #20
	system-system-spacing	#'basic-distance = #15
	%top-system-spacing	#'basic-distance = #10
}
\header{
	% Les champs suivants sont centrés
	%dedication	= "Dédice"
	title		= "LA ESTRELLA"
	%subtitle	= "Sous-titre"
	subsubtitle	= "Letra de Amilcar Urbanos Sosa"
	%instrument	= "Instrument"

	% Les champs suivants sont alignés sur le bord gauche
	poet		= "a mis hijos Emilio A. y Carlos A."
	%meter		= "Tempo"

	% Les champs suivants sont alignés sur le bord droit
	composer	= "Emilio DUBLANC"
	%arranger	= "Arrangeur"

	tagline		= "Musique gravée par philippe@nenert.net à l'aide de LilyPond.org"
}
global = {
	\key sol \major
	\time 4/4
}



%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%
%%%	La musique
%%%
musicSOPRANO	= \relative do'	{
	mi8\f	fad	sol	fad	mi4	mi\fermata			%01
	r2	mi8\p	fad	sol	la					%02
	si4	si	si8	re	dod	re				%03
	si1\fermata								%04
	si8	re	dod	mi	la,4	la				%05
	la8	do	si	re	sol,4 	sol8	sol			%06
	la4.	la8	fad2\fermata						%07
	mi8\f	fad	sol2.							%08
	mi8\p	fad	sol	la	si4\>	si\!				%09
	mi,8	fad	la	sol	fad2					%10
	la8	si	do	re	mi4\>	mi\!				%11
	la,8	si	re	do	si2\fermata				%12
	si8	re	dod	mi	la,4	la				%13
	la8	do	si	re	sol,4	sol8	sol			%14
	la4.	la8	fad2\fermata						%15
	mi8\f	fad	sol2.							%16
	mi8	fad	sol	la	si4	si\fermata			%17
	la8	mi'	mi	re	mi2(					%18
	mi1)\fermata								%19
}
musicALTO	= \relative do'	{
	mi8\f	fad	sol	fad	mi4	mi\fermata			%01
	mi8\p	fad	sol	fad	mi	mi	mi	mi		%02
	mi4	mi	sol8	sol	la	la				%03
	sol2.(	fad4)\fermata							%04
	sol8	sol	la	sol	sol[(	mi])	fad4			%05
	fa8	fa	sol	fa	fa[(	re])	mi	mi		%06
	mi4.	mi8	mi4(	red)\fermata					%07
	mi8\f	mi	mi2.							%08
	mi8\p	mi	mi	red	fad4\>	mi\!				%09
	mi8	mi	mi	mi	mi[(	dod]	red4)			%10
	\override Stem #'direction = #UP
	fa8	fa	la	si	si4\>	la4\!				%11
	\revert Stem #'direction
	re,8	re	la'	la	la4(	sold)\fermata			%12
	sol8	sol	la	sol	sol[(	mi])	la4			%13
	fad8	fa	sol	fa	fa[(	re])	mi	mi		%14
	mi4.	mi8	mi4(	red)\fermata					%15
	mi8\f	mi	mi2.							%16
	mi8	mi	mib	mib	re4	re				%17
	\override Stem #'direction = #UP
	mi8	la	fad	fad	fad2					%18
	\revert Stem #'direction
	fad8	sold	la	do	si2\fermata				%19
}
musicALTObis	= \relative do'	{
	s1									%01
	s1									%02
	s1									%03
	s1									%04
	s1									%05
	s1									%06
	s1									%07
	s1									%08
	s1									%09
	s1									%10
	fa8	fa	fa	fa	mi4	mi				%11
	s1									%12
	s1									%13
	s1									%14
	s1									%15
	s1									%16
	s1									%17
	mi8	mi	fad	fad	fad2					%18
	s1									%19
}
musicTENORetBASSE	= {
	mi8\f	fad	sol	fad	mi4	mi(\fermata			%01
	mi2)	r2								%02
	r2	si8\p	si	si	si					%03
	mi8	re	dod	re	si2\fermata				%04
	re8	re	re	re	re4	re				%05
	re8	re	sol,	sol	do4	do8	do			%06
	fad,4.	fad8	si2\fermata						%07
	mi8\f	mi	re4(\>	do2)\!						%08
	do8	do	do	do	sol4	sol				%09
	do8	do	fad,	fad	si2					%10
	re8	re	re	re	do4	do				%11
	fa8	fa	si,	si	mi2\fermata				%12
	mi8	mi	la,	la	re4	re				%13
	re8	re	sol,	sol	do4	do8	do			%14
	fad,4.	sol8	si2\fermata						%15
	mi8	mi	re4(	do2)						%16
	do8	do	do	do	sol4	sol				%17
	do8	do	si	si						%18
}
musicTENOR 	= \relative do'	{
	\musicTENORetBASSE
	do2									%18
	do8	do	si	la	sold2\fermata				%19
}
musicBASSE 	= \relative do	{
	\musicTENORetBASSE
	la2									%18
	do8	si	do	la	mi'2\fermata				%19
}



%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%
%%%	Le chant
%%%
chantSOPRANO	= \lyricmode	{
	Mi --	ra	cuán --	tas	bri --	llan				%01
	Mi --	ra	cuán --	tas						%02
	bri --	llan	en	la~in --	men --	si --			%03
	dad									%04
	u --	na~es	tu --	ya	ni	ño				%05
	u --	na~es	tu --	ya	ni -- 	ño~y	de			%06
	na --	die	más							%07
	Bús --	ca --	la							%08
	Bús --	ca  --	la_en --	tre	tan --	tas			%09
	que~en	el	cie --	lo~es --	tán				%10
	di --	cien --	do	tu	nom --	bre				%11
	con	su	pal --	pi -- 	tar					%12
	u --	na~es	tu --	ya	ni --	ño				%13
	u --	na~es	tu --	ya	ni --	ño~y	de			%14
	na --	die	más							%15
	Bús --	ca --	la							%16
	e --	sa~es --	tre --	lla~es	tu --	ya			%17
	y	de	na --	die	más.	__				%18
										%19
}
chantALTO	= \lyricmode {
	Mi --	ra	cuán --	tas	bri --	llan				%01
	Mi --	ra	cuán --	tas	Mi --	ra	cuán --	tas		%02
	bri --	llan	en	la~in --	men --	si --			%03
	dad	__								%04
	u --	na~es	tu --	ya	ni	ño				%05
	u --	na~es	tu --	ya ni --	ño~y	de			%06
	na --	die	más							%07
	Bús --	ca --	la							%08
	Bús --	ca  --	la_en --	tre	tan --	tas			%09
	que~en	el	cie --	lo~es --	tán				%10
	di --	cien --	do	tu	nom --	bre				%11
	con	su	pal --	pi --	tar					%12
	u --	na~es	tu --	ya	ni --	ño				%13
	u --	na~es	tu --	ya	ni --	ño~y	de			%14
	na --	die	más							%15
	Bús --	ca --	la							%16
	e --	sa~es --	tre --	lla~es	tu --	ya			%17
	y	de	na --	die	más					%18
	y	de	na --	die	más.					%19
}
chantTENORetBASSE	= \lyricmode {
	Mi --	ra	cuán --	tas	bri --	llan				%01
	__									%02
	en	la~in --	men --	si --	dad				%03
	la~in --	men --	si --	dad					%04
	u --	na~es	tu --	ya	ni	ño				%05
	u --	na~es	tu --	ya	ni --	ño~y	de			%06
	na --	die	más							%07
	Bús --	ca --	la	__						%08
	Bús --	ca  --	la~en --	tre	tan --	tas			%09
	que~en	el	cie --	lo~es --	tán				%10
	di --	cien --	do	tu	nom --	bre				%11
	con	su	pal --	pi --	tar					%12
	u --	na~es	tu --	ya	ni --	ño				%13
	u --	na~es	tu --	ya	ni --	ño~y	de			%14
	na --	die	más							%15
	Bús --	ca --	la	__						%16
	e --	sa~es --	tre --	lla~es	tu --	ya			%17
	y	de	na --	die	más					%18
	y	de	na --	die	más.					%19
}



%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%
%%%	La partition
%%%
#(define taille		-2)
#(define couleur	blue)

% Cette façon de faire viens de la page http://lsr.dsi.unimi.it/LSR/Snippet?id=726
% Merci Valentin d'avoir partagé son code, rendons à César ce qui lui appartient
bgcolor =
	#(define-music-function (parser location color) (string?)
		#{\override Staff.StaffSymbol $'stencil =
			 $(lambda (grob)
				(let* ((staff (ly:staff-symbol::print grob))
					(X-ext (ly:stencil-extent staff X))
					(Y-ext (ly:stencil-extent staff Y))
					)
					(set! Y-ext (cons
						(- (car Y-ext) 2)
						(+ (cdr Y-ext) 2))
					)
					(ly:grob-set-property! grob 'layer -10)
					(ly:stencil-add
						(ly:make-stencil (list 'color (eval-string color)
						(ly:stencil-expr (ly:round-filled-box X-ext Y-ext 0))
						X-ext Y-ext))
						staff
					)
				)
			)
		#}
	)
%%%%%%%%
\score {
	\new ChoirStaff <<
		%%%%%%%%%%%%% SOPRANO %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
		\new Staff = "Soprano"
			\with {
				fontSize		= #taille
				instrumentName		= "Soprano"
				shortInstrumentName	= "S. "
			}
			<<
				\new Voice = "Soprano" {
					\autoBeamOff
					\dynamicUp
					\global
					\musicSOPRANO
					\bar "||"
				}
			>>
		\new Lyrics
			\lyricsto "Soprano" {
				\set fontSize	= #taille
				\chantSOPRANO
			}
		%%%%%%%%%%%%% ALTO %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
		\new Staff = "Alto"
			\with {
				fontSize		= #taille
				instrumentName		= "Alto"
				shortInstrumentName	= "A. "
			}
			<<
				\new Voice = "Alto" {
					\autoBeamOff
					\dynamicUp
					\global
					\musicALTO
				}
				\new Voice = "SopranoBis" {
					\autoBeamOff
					\dynamicUp
					\global
					\stemDown
					\musicALTObis
				}
			>>
		\new Lyrics
			\lyricsto "Alto" {
				\set fontSize	= #taille
				\chantALTO
			}
		%%%%%%%%%%%%% TENOR %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
		\new Staff = "Tenor"
			\with {
				instrumentName		= "Ténor"
				shortInstrumentName	= "T. "
				\override InstrumentName	#'color = #couleur
				\override shortInstrumentName	#'color = #couleur

				%\override Accidental		#'color = #couleur
				%\override Beam			#'color = #couleur
				%\override Clef			#'color = #couleur
				%\override DynamicText		#'color = #couleur
				%\override DynamicTextSpanner	#'color = #couleur
				%\override KeySignature		#'color = #couleur
				%\override Hairpin		#'color = #couleur
				%\override NoteHead		#'color = #couleur
				%\override Rest			#'color = #couleur
				%\override Script		#'color = #couleur
				%\override Stem			#'color = #couleur
				%\override TextScript		#'color = #couleur
				%\override Time			#'color = #couleur
				%\override TimeSignature	#'color = #couleur
			}
			<<
				\clef "G_8"
				\new Voice = "Tenor" {
					\autoBeamOff
					\dynamicUp
					\global
					\bgcolor "(rgb-color 1 1 0.7)" \musicTENOR
				}
			>>
		\new Lyrics
			\with {
				%\override LyricText		#'color = #couleur
				%\override LyricHyphen		#'color = #couleur
				%\override LyricExtender	#'color = #couleur
			}
			\lyricsto "Tenor" {
				\chantTENORetBASSE
			}
		%%%%%%%%%%%%% BASSE %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
		\new Staff = "Basse"
			\with {
				fontSize		= #taille
				instrumentName		= "Basse"
				shortInstrumentName	= "B. "
			}
			<<
				\clef bass
				\new Voice = "Basse" {
					\autoBeamOff
					\dynamicUp
					\global
					\musicBASSE
				}
			>>
		\new Lyrics
			\lyricsto "Basse" {
				\set fontSize	= #taille
				\chantTENORetBASSE
			}
	>>
}