%******************************
\version "2.10.2"
%******************************
numeroHimno = "2"
tituloHimno = "Padre En Los Cielos"
%************************************************************
\paper {
oddHeaderMarkup = \markup { \right-align \bold \large \numeroHimno }
print-page-number = ##f
between-system-space = 0.3\cm
head-separation = 0.1\cm
}
%************************************************************
%************************************************************
\header {
title = \tituloHimno
copyright = "Iglesia Bautista de Jesucristo"
tagline = ""
meter = \markup { "(CAPO I)" }
}
%************************************************************
%************************************************************
acordes= \chordmode {
\set chordChanges = ##t
f4 f4 f4 f2 d4:m
g2:7 c4 f2. f4 f4 f4 \break
g2:m7 c4 f2 g4:m c2. c4 c4 c4 g2 c4
g2:7 g4:7 c2. f4 f4 f4:7 bes4:9 bes4:9 bes4:9 c2:sus4 c4:7 f
}
%************************************************************
#(define (parenthesis-ignatzek-chord-names in-pitches bass inversion context)
(markup #:line ("(" (ignatzek-chord-names in-pitches bass inversion context) ")")))
%************************************************************
acordesConCapo= << \chordmode {
\set chordChanges = ##t
\set chordNameFunction = #parenthesis-ignatzek-chord-names
\transpose f e {
f4 f4 f4 f2 d4:m
g2:7 c4 f2. f4 f4 f4 \break
g2:m7 c4 f2 g4:m c2. c4 c4 c4 g2 c4
g2:7 g4:7 c2. f4 f4 f4:7 bes4:9 bes4:9 bes4:9 c2:sus4 c4:7 f
}
}
>>
%************************************************************
%************************************************************
tope = \relative c' {
\key f \major
\time 3/4
<<
\new Voice = "melodia" {
<f a> <f a> <f a>
<f c'>2<< { \voiceOne f4} \new Voice { \voiceTwo f4} >> \oneVoice
<< { \voiceOne g2} \new Voice { \voiceTwo f2} >> \oneVoice <e g>4
<f a>2.
<f c'>4 <f c'> <f c'> \break
<f bes>2 <e c'>4
<f a>2 <g bes>4
<e g>2.
<e g>4 <e g> <e g>
<d g>2 <e g>4 \break
<f b>2 <f b>4
<e c'>2.
<f a>4 <f a> <ees a>
<d a'>4 <d g> <d f>
<c f>2 <c e>4 <c f>2.
}
>>
}
%************************************************************
%************************************************************
versoUno = \lyricmode {
\set stanza = "1. "
Pa4 -- "dre en" los cie2 -- los,4 con2 a -- mor O4 -- fre -- ces
vi2 -- "da al" pe2 -- ca -- dor. An -- te tu tro -- "no, en"
hu -- mil -- dad, Per -- dón pe -- di -- mos, en tu bon -- dad.
}
versoDos = \lyricmode {
\set stanza = "2. "
Ver -- "bo en" -- car -- na -- do, a tu grey E -- res fiel
Sa -- cer -- do -- te, Rey. An -- te tu tro -- "no, en"
hu -- mil -- dad, Pe -- di -- mos gra -- cia, a -- mor, pie -- dad.
}
versoTres = \lyricmode {
\set stanza = "3. "
Con -- so -- la -- dor, "tu a" -- lien -- to es Di -- vi -- no
Guà -- "a a" nues -- tros pies. An -- te tu tro -- "no, en"
hu -- mil -- dad, Ro -- ga -- mos, Haz hoy tu vo -- lun -- tad.
}
versoCuatro = \lyricmode {
\set stanza = "4. "
}
%************************************************************
%************************************************************
bajo = \relative c' {
\clef bass
\key f \major
\time 3/4
<c f,>4 <c f,> <c f,>
<c a,>2 <a d,>4
<d bes,>2 <c c,>4
<c f,>2.
<c a>4 <c a> <f a,> \break
<d g,>2 <c c,>4
<c~ f,> <d d,> <d bes,>
<c c,>2.
<c c,>4 <c c,> <c c,>
<b g>2 <c g>4 \break
<d g,>2 <d g,>4
<c c,>2.
<c f,>4 <c f,> <c f,>
<c bes,> <bes bes,> <a bes,>
<< { \voiceOne \stemDown c,2 } \new Voice { \voiceTwo \stemUp \slurUp g'4 ( a4 ) } >> \oneVoice <bes c,>4
<a f>2.
}
%************************************************************
\score {
<<
\new ChordNames { \acordes }
\new ChordNames { \acordesConCapo }
\context ChoirStaff <<
\new Staff = bajo { \tope }
\new Lyrics \lyricsto "melodia" \versoUno
\new Lyrics \lyricsto "melodia" \versoDos
\new Lyrics \lyricsto "melodia" \versoTres
\new Lyrics \lyricsto "melodia" \versoCuatro
\new Staff = bajo { \bajo }
>>
>>
\layout {
indent = 0
\context { \ChoirStaff \accepts "Lyrics" }
\context { \Score \remove "Bar_number_engraver" }
\context { \Lyrics \override LyricSpace #'minimum-distance = #1.5 }
\context { \Lyrics \override VerticalAxisGroup #'minimum-Y-extent = #'(-1 . 1) }
\context { \ChordNames \override ChordName #'font-size = #1 }
}
}
\markup { \bold "Acordes Usados" }
\score{
<<
\new ChordNames \chordmode {
e
cis:m
fis:7
b
fis:m7
fis:m
fis
e:7
a:9
b:sus4
b:7
}
\new Lyrics \lyricmode {
\markup {\fret-diagram-terse #"o;2;2;1;o;o;"}
\markup {\fret-diagram-terse #"x;4-(;6;6;5;4-);"}
\markup {\fret-diagram-terse #"2-(;4;;3;;2-);"}
\markup {\fret-diagram-terse #"x;2-(;4;4;4;2-);"}
\markup {\fret-diagram-terse #"2-(;4;;;;2-);"}
\markup {\fret-diagram-terse #"2-(;4;4;;;2-);"}
\markup {\fret-diagram-terse #"2-(;4;4;3;;2-);"}
\markup {\fret-diagram-terse #"o;2;2;1;3;o;"}
\markup {\fret-diagram-terse #"x;o;2-(;4;;2-) 3;"}
\markup {\fret-diagram-terse #"x;2-(;4;4;5;2-);"}
\markup {\fret-diagram-terse #"o;2;2;1;o;o;"}
} >>
}
_______________________________________________
lilypond-user mailing list
[email protected]
http://lists.gnu.org/mailman/listinfo/lilypond-user
