% -*- coding: utf-8 -*-

\include "/home/eyolf/.templates/sheetLayout.ly"

\header {
  title = "Ahi con piegata mano"
  subtitle = "Tarquinio Longo: Lodi e Canzonette (1608)"
	subsubtitle = "Aria X. per le Lodi Della XIV Maniera"
  subsubtitle = "Tarquinio Longo: Lodi e Canzonette (1608)"
	subsubtitle = "Longo 1608, pp. 154--155"
  composer = ""
  poet = ""
  tagline = ##f
}

%% Macros

genStuff = {
  \key a\minor
  \time 4/4
  \layoutTweaks
%\set Score.measureLength = #(ly:make-moment 4 2)	
}

%% Melodies

melodySoprano = \relative c'' {
  \genStuff
  \clef treble
  \CPrim
  \once \override TextScript #'padding = #2
r2^\markup { \italic { \bold { Aria X. per le Lodi Della XIV. Maniera } } (pp. 154–55) }  e2. b8 b b4 b c1 b r8 c d e f2. e4 d2 c1
  \fullBarDbl
  %r4%ikke i kilden
  r8 b c4. b8 a4. b8 b2. a2 
  r8 d e fis8 g4. e8 fis2 e
  %r4%ikke i kilden
  r8 e f4. e8 d4. e8 e2. d2 
  r4 b c d e2. a,4 b1 a
}

melodyAlt = \relative c'' {
  \genStuff
  \clef treble
  \CSec
  c2. gis8 gis gis2. gis4 a1. gis2
  r8 a b cis8 d4 cis4 b c2 b4 c1
  r4 r8 gis8 a4.  gis8 fis4. gis8 gis2 a
  r8 b b a b4 e e dis4 e2

  %r4 b g2
  %det er noe merkelig i slutten, uansett hvordan man vender på det. Det
  %mangler en nøkkel, men custos angir a som første tone. Tar man det
  %for god fisk, blir det:
  %a1 b2 cis4. b8 ais4 ais b ais ais f'\longa,
  %hvilket overhodet ikke gir mening.
  %(a) det forutsetter et nøkkelbytte, og (b) det er for mange slag
  %tilsammen.
  %Arbeider man seg bakfra, bør de siste tonene være  gis4 gis a gis
  %a1
%======================================================================
%Original
%r4 r8 cis8 d4.  cis8 b4. cis8 cis2 d
%r2  r4 b a1 a2 b4. a8
%======================================================================
%r4 r8 cis8 d4.  cis8 b4. cis8 cis2 d
  %r2  r4 b a2 b4 cis8. b16 
%======================================================================
%r4 r8 cis8 d4.  cis8 b4. cis8 cis2 d
%r2  r4 b a1 a2 b4. a8
%======================================================================
r4 r8 cis8 d4.  cis8 b4. cis8 cis2 d
r2 r4 b a a gis a a gis8 fis gis2 a1
%======================================================================
  
}


melodyTenor = \relative c' {
  \genStuff
  \clef bass
  \Basso
  a2. e8 e e2. e4 a,1 e'1
  r8 a g e d4 e g1 c,1
  r4 r8 e f4. e8 d4. e8 e2 a
  r8 g g fis8 e4 c b2 e
  r4 r8 a8 bes4. a8 g4. a8 a2 d,2
  r2 r4 b c d e cis4 e1 a,1
}


%% Lyrics

textSoprano = \lyricmode { 
  \lyricTweak
  Ahi con pia -- ga -- ta ma -- no
  bat -- te -- rò sem -- pre_in va -- no
  le por -- te del tuo co -- re
  in -- gra -- to_à tan -- to_a -- mo -- re,
  le por -- te del tuo co -- re
  in -- gra -- to_à tan -- to_a -- mo -- re.
}
textAlt = \lyricmode {
  \lyricTweak
  Ahi con pia -- ga -- ta ma -- no
  bat -- te -- rò sem -- pre_in va -- _ _ no
  le por -- te del tuo co -- re
  in -- gra -- to_à tan -- to_a -- mo -- _ re,
  le por -- te del tuo co -- re
  in -- gra -- to_à tan -- to_a -- mo -- re.
}
textTenor = \lyricmode {
  \lyricTweak
  Ahi con pia -- ga -- ta ma -- no
  bat -- te -- rò sem -- pre_in va -- no
  le por -- te del tuo co -- re
  in -- gra -- to_à tan -- to_a -- mo -- re,
  le por -- te del tuo co -- re
  in -- gra -- to_à tan -- to_a -- mo -- re.
}

textBass = \lyricmode {
  \lyricTweak
  Ahi con pia -- ga -- ta ma -- no
  bat -- te -- rò sem -- pre_in va -- no
  le por -- te del tuo co -- re
  in -- gra -- to_à tan -- to_a -- mo -- re,
  le por -- te del tuo co -- re
  in -- gra -- to_à tan -- to_a -- mo -- re.

}

%% score
% for layout:
\score {
  <<
    \context StaffGroup = choirStaff
    <<
      \context Voice = sop { \autoBeamOff \melodySoprano \fullBarFinal }
      \new Lyrics \lyricsto "sop"  \textSoprano
      \context Voice = alt { \autoBeamOff	\melodyAlt }
      \new Lyrics \lyricsto "alt"  \textAlt
      \context Voice = ten { \autoBeamOff \melodyTenor }
    >>
    \new Lyrics \lyricsto "ten"  \textTenor
  >>
  \layout {
    indent = 1\cm
    \context {
      \Lyrics
      \consists "Bar_engraver"
      \consists "Separating_line_group_engraver"
      \override BarLine #'transparent = ##t
    }
  }
}
%for midi
%for midi
\score { 
  \context ChoirStaff <<
    \context Staff \melodySoprano 
    \context Staff \melodyAlt 
    \context Staff \melodyTenor 
  >>
  \midi {
    \context {
      \Score
      tempoWholesPerMinute = #(ly:make-moment 100 2)
    }
  }
}