%
%para convertir .midi en .wav:
%timidity filename.midi -Ow -o finename.wav
%
%
%Para convertir de .wav a .mp3:
%lame -h -m j filename.wav
%
%
%para escuchar el midi:
%timidity nombrefichero.midi
%


%versión de lilypond para la que se ha escrito esta partitura:
\version "2.16.0"

	%Tamaño papel
	#(set-default-paper-size "a4")
	%Tamaño partitura
	#(set-global-staff-size 20)
	%No responde al pulsar sobre una nota
	#(ly:set-option 'point-and-click #f)

%parámetros del encabezamiento:
\header {
	title = "SALMO 88"
	subtitle = "San José, esposo de la Virgen María"
	composer = "Desconocido"
	poet = "Solemnidad. 19 de marzo"
	meter = ""
	arranger = "Tono original: Re m"
	tagline="www.cancionero-liturgico.org"
	copyright="Editado con LilyPond para Linux"
	tiempo = ""
	usos = "Salmo"
	letra = "Su linaje será perpetuo."
	}

%parámetros asociados al papel:
\paper  {
	oddHeaderMarkup = \markup {\fill-line { \on-the-fly #not-first-page \fromproperty #'header:title \on-the-fly #not-first-page \fromproperty #'header:composer }}
	evenHeaderMarkup = \markup {\fill-line { \fromproperty #'header:composer \fromproperty #'header:title }}
	#(set-paper-size "a4")
	print-page-number = ##f
	first-page-number = 1
	print-first-page-number = ##f
%	head-separation = 3.0 \cm
	top-margin = 2.0 \cm
	bottom-margin = 0.5\cm
%%%	bottom-margin = -1.0\cm
	left-margin = 3.0 \cm
	line-width = 16.0 \cm 
	indent = 8\mm
	interscoreline = 2.\mm
	between-system-space = 15\mm
%	para que las partituras no llenen la hoja:
	ragged-bottom = ##t
%	idem para la última hoja:
	ragged-last-bottom = ##f
%	para que las partituras llenen el ancho del papel:
	ragged-last = ##f
	after-title-space = 2.5 \cm
%page-count=1
%system-count=8

	%Flexible Vertical Spacing
%	markup-markup-spacing =
%	#'((basic-distance . 15) (minimum-distance . 15) (padding . 3))
	markup-system-spacing =
	#'((basic-distance . 15) (minimum-distance . 15) (padding . 3))
	system-system-spacing =
	#'((basic-distance . 15) (minimum-distance . 15) (padding . 3))
	score-system-spacing =
	#'((basic-distance . 15) (minimum-distance . 15) (padding . 5))
%	top-system-spacing = % header
%	#'((basic-distance . 8) (minimum-distance . 0) (padding . 3))
%	top-markup-spacing =
%	#'((basic-distance . 20) (minimum-distance . 20) (padding . 3))
	last-bottom-spacing = % footer
	#'((basic-distance . 5) (minimum-distance . 5) (padding . 3))
%	score-markup-spacing =
%	#'((basic-distance . 16) (minimum-distance . 13) (padding . 3))

	}


%parámetros que afectan a toda la partitura:
global =  {
	%clave de sol (G):
	\clef G
	%armadura:
%	\transpose e d
	\key d \minor
	\tempo 4=100
	\set Score.tempoHideNote = ##t
	}


acordes = {
	\italianChords
	\chordmode {
%	\transpose e d
{

d2:m a:m g:m d:m d:m

	}
	}
}

melodia = 
%	\transpose e d
{
	\relative c''{
	\time 2/4

a4. bes8
a4 e8 \breathe f
g4 f8 (e)
d4 d~
d4 r4

	\bar "|."
	}
	}


texto = \lyricmode {
Su li -- na -- je se -- rá per -- pe -- tuo. __
	}


acordesStaff = \context ChordNames = acordesStaff <<
	\set chordChanges = ##t
	\acordes
	>>


vozStaff = \context Voice = vozStaff
\with {\consists "Ambitus_engraver"}
<<
%	\set Staff.instrumentName = ""
%	\set Staff.shortInstrumentName = ""
%	\set Staff.midiInstrument = #"clarinet"
%	\set Staff.midiInstrument = #"cello"
%	\set Staff.midiInstrument = #"flute"
	\set Staff.midiInstrument = #"electric guitar (jazz)"
%	\set Staff.midiInstrument = #"english horn"
%	\set Staff.midiInstrument = #"violin"
%	\set Staff.midiInstrument = #"glockenspiel"
	\set Staff.midiMinimumVolume = #0.7
	\set Staff.midiMaximumVolume = #0.9
	\global
	\melodia
	>>


textoStaff = \context Lyrics = textoStaff <<
	\lyricsto vozStaff \texto
	>>

\book {
	\score {
		\context ChoirStaff {
			\override StaffGroup.SystemStartBracket #'collapse-height = #1
			\override Score.SystemStartBar #'collapse-height = #1
			<<
			\acordesStaff
			\vozStaff
			\textoStaff
			>>
			}
		\layout {
	    		\context {
				\Lyrics
				\override LyricText #'font-size = #2
				}
	   		 \context {
				\Score
				%fontSize = #3
				\override StaffSymbol #'staff-space = #(magstep +3)
				%\override Beam #'thickness = #0.55
				%\override SpacingSpanner #'spacing-increment = #1.0
				%\override Slur #'height-limit = #1.5
				}
			}
		}
	\score {
		\unfoldRepeats
		\context ChoirStaff {
			<<
			\acordesStaff
			\vozStaff
			>>
			}
		\midi {
	  		\context {
	  			\Score
				tempoWholesPerMinute = #(ly:make-moment 70 4)
				}
			}
		}
	}

%Partitura para clarinete
#(define output-suffix "C")
\book {
	\header{
		instrument = "Clarinete"
		}
	\score {
		\context ChoirStaff {
			\override StaffGroup.SystemStartBracket #'collapse-height = #1
			\override Score.SystemStartBar #'collapse-height = #1
\transpose c d
			<<
			\acordesStaff
			\vozStaff
			\textoStaff
			>>
			}
		\layout {
	    		\context {
				\Lyrics
				\override LyricText #'font-size = #2
				}
	   		 \context {
				\Score
				%fontSize = #3
				\override StaffSymbol #'staff-space = #(magstep +3)
				%\override Beam #'thickness = #0.55
				%\override SpacingSpanner #'spacing-increment = #1.0
				%\override Slur #'height-limit = #1.5
				}
			}
		}
	}

%Partitura para saxofón
#(define output-suffix "S")
\book {
	\header{
		instrument = "Saxofón"
		}
	\score {
		\context ChoirStaff {
			\override StaffGroup.SystemStartBracket #'collapse-height = #1
			\override Score.SystemStartBar #'collapse-height = #1
\transpose c a
			<<
			\acordesStaff
			\vozStaff
			\textoStaff
			>>
			}
		\layout {
	    		\context {
				\Lyrics
				\override LyricText #'font-size = #2
				}
	   		 \context {
				\Score
				%fontSize = #3
				\override StaffSymbol #'staff-space = #(magstep +3)
				%\override Beam #'thickness = #0.55
				%\override SpacingSpanner #'spacing-increment = #1.0
				%\override Slur #'height-limit = #1.5
				}
			}
		}
	}