mHEADmain

8 files changed, 669 insertions, 0 deletions

diff --git a/src/content/music/choro-da-saudade.ly b/src/content/music/choro-da-saudade.ly
new file mode 100644
index 0000000..2f6e686
--- /dev/null
+++ b/src/content/music/choro-da-saudade.ly
@@ -0,0 +1,233 @@
+\version "2.20.0"
+\pointAndClickOff
+#(ly:set-option 'embed-source-code #t)
+
+\include "common.ly.include"
+\include "guitar.ly.include"
+
+\header {
+  title = "Choro da Saudade"
+  composer = "Agustín Barrios"
+  copyright = \copyright
+  tagline = \tagline
+}
+
+globals = {
+  \clef "treble_8"
+  \key g \minor
+  \time 2/4
+  \set fingeringOrientations = #'(left)
+  \tempo Largo 4 = 50
+}
+
+upper = \relative c {
+  \globals
+
+  \repeat volta 2 {
+    <g-0>16 <d'-0> <bes'-2 ees-4> d, <bes'-2 d-3> d, d, d' |
+    <a-1> <d-0> <c'-4 ees-3> d, <c'-4 d-2> d, d, d' |
+  }
+
+  <g,-0>8. <d'-0>16 <bes'-2>\tenuto( <a-1>) a <g-0> |
+  \repeat volta 2 {
+    \mark \markup { \musicglyph #"scripts.segno" }
+    \repeat unfold 2 {
+      <ees'-2>4 <cis-1>16( <d-2>) <fis-1> <a-4> |
+      \pestanaSpan "III" <bes-4>8.\startTextSpan <g-1>16 <d-1> <bes-1> <g-3>( <d-0>)\stopTextSpan |
+      \pestanaSpan "V" <c-1>\startTextSpan <d'-2> <fis-3>( <g-4>) <a-1> <bes-2> <c-4> a\stopTextSpan |
+    }
+    \alternative {
+      {
+        <d-4>4\fermata <c-4>16( <bes-2>) <a-1> <g\2-4> |
+        <bes-2>4 <a-1>16( <bes-2>) <c-4> a |
+        \pestanaSpan "I" <g-4>4\startTextSpan <f-1>16 <ees-4> <d-3> <c-1>\stopTextSpan |
+        \pestanaSpan "III" <f-4>(\startTextSpan <d-1>) <bes-1> <g-1> <f-1>( <d-0>) <bes-1> <g-9>\stopTextSpan |
+        <fis-2>8.\fermata <d'-0>16 <bes'-2>\tenuto( <a-1>) a <g-0> |
+      }
+
+      {
+        <d''-4>4 \pestanaSpan "VII" <b-1>16\startTextSpan <g-2> <f-4> <d-1>\stopTextSpan |
+        \pestanaSpan "V" <c-1>\startTextSpan <g-1> <ees-4> <c-1> <a-3>( <bes-4>) <c-1> <ees-4>\stopTextSpan |
+        \pestanaSpan "III" <d-0>\startTextSpan <bes'-1> <d g-1>8 \appoggiatura { <d-1>16 <f-4> } <ees-2>16 <d-1> <c-3> <bes-1>\stopTextSpan |
+        <a,-1>( <cis-4>) <e-1> <g-0> <d-0> <fis-3> <a-1> <d-2> \mark \markup { \musicglyph #"scripts.coda" } |
+      }
+    }
+  }
+  \alternative {
+    { <g,-0> <d-0> g d bes'\tenuto( a) a g | }
+    { <g-0> <bes-2 d-3>8 <bes d>16 <bes d> <bes ees-4>8 <bes d>16 | }
+  }
+
+  % part B
+  r <c-4 d-2>8 <c d>16 r <bes-1 d-2>8 <bes d> 16 |
+  r <a-1 d-2>8 <a d>16 <a d> <a cis-1>8 <a d>16 |
+  r <b-0 g'-4>8 <b g'>16 r <c-1 g'-4>8 <c g'>16 |
+
+  \pestanaSpan "III" r\startTextSpan <d-1 g-1>8 <d g>16 <d g> <f-4 g-1>8 <e-3 g-1>16 |
+  r <ees-2 g-1>8 <ees g>16 r <ees g>8 <ees g>16\stopTextSpan |
+  \pestanaSpan "II" r\startTextSpan <c-4 ees-3 fis-1>8 <c ees fis>16 <c ees fis> <c ees g-2>8\stopTextSpan \pestanaSpan "III" <bes-1 d-1 bes'-4>16\startTextSpan |
+  r <c-3 d-1 a'-4>8 <c d a'>16 r <c-3 dis-2 a'-4>8 <c dis a'>16\stopTextSpan |
+
+  r <g-2 cis-3 bes'-4>8 <g cis bes'>16 r <g cis bes'>8 <g cis bes'>16 |
+  r <d'-2 g-3 bes-1>8 <d g bes>16 <d g bes> <d g c-4>8 <d g bes>16 |
+  r <cis-3 g'-4 a-2>8 <cis g' a>16 r <cis g' a>8 <cis g' a>16 |
+  \pestanaSpan "V" r\startTextSpan <c-1 fis-3 a-1>8 <c fis a>16 <c fis a> <c fis bes-2>8 <c fis a>16\stopTextSpan |
+
+  r <b-3 f'-4 g-2>8 <b f' g>16 r <b f' g>8 <b f' g>16 |
+  \pestanaSpan "III" r\startTextSpan <bes-1 e-3 g-1>8 <bes e g>16 <bes e g> <bes e a-4>8 <bes e g>16\stopTextSpan |
+  \pestanaSpan "I" r\startTextSpan <a-2 c-1 f-1>8 <a c f>16\stopTextSpan r <f'-1 bes-2 f'-4>8 <f bes f'>16 |
+  r <d-1 gis-4>8 <d gis>16 r <cis-2 g'-3 e'-4>8 <cis g' e'>16 |
+
+  \pestanaSpan "V" r\startTextSpan <c-1 fis-3 a-1>8 <c fis a>16\stopTextSpan r <b-0 f'-3 d'-4>8 <b f' d'>16 |
+  \pestanaSpan "V" r\startTextSpan <g-1 ees'-3 c'-4>8 <g ees' c'>16 <g ees' c'> <g ees' b'-2>8 <g ees' c'>16\stopTextSpan |
+  \pestanaSpan "III" r\startTextSpan <bes-1 d-1 bes'-4>8 <bes d bes'>16 <bes d bes'> <bes d a'-3>8 <bes d g-1>16\stopTextSpan |
+  r <g-2 cis-3 bes'-4>8 <g cis bes'>16 \pestanaSpan "III" r\startTextSpan <c-3 d-1 a'-4>8 <c d a'>16 |
+
+  <bes-1 d-1 g-1>8.\stopTextSpan <d,-0>16 <bes'-2>\tenuto( <a-1>) a <g-0> |
+
+  \bar "||"
+  <g-0>8. <d'-1\3>16\mordent <b-3\4> d <g-2> <b-1>
+  \key g \major
+  \repeat volta 2 {
+    <g,,-0>16 <d'''-4> <b,-0 e-2> g, <gis-1\6> <d'''-4> <b,-0 f'-3> gis, |
+    <a-1\6> <d''-4> <c,-3 fis-1> \corda "5" <d,-1>\startTextSpan <e-3>\stopTextSpan <g-0> <b-4\4> <d-1> |
+    <g,,-0> <g''-1> <bes,-2 d-1> g, <g'-4\4> <fis'-1> <bes,-2 cis-1> g |
+
+    <fis-3> <e'-0> <a,-1 d-2> e' <fis-2\3> <a-1> <c-4> <d-1> |
+    <ais,,-1> <e'''-4> <cis,-2 g'-3> ais, \pestanaSpan "VII" <b-3>\startTextSpan <d''-4> <d,-1 fis-1> b,\stopTextSpan |
+    <cis-1> <cis''-4> <ais,-2 e'-3> cis, <d-1> <b''-1> <b,-3 d-1> d, |
+    <e-1> <d''-2> <b,-0 cis-3> e,, <fis-3> <fis''-1> <e,-1 ais-2> fis' |
+
+    \rall <b,,-3>\startTextSpan <fis'-4> <d'-2> <cis-1> <c-4>\fermata <d-2>\fermata <fis-1>\fermata <a-4>\fermata\glissando |
+    \once \override NoteColumn.glissando-skip = ##t <g,,-0>16\stopTextSpan <d'''-4> <b,-0 e-2> g, <gis-1\6> <d'''-4> <b,-0 f'-3> gis, |
+    <a-1\6> <d''-4> <c,-3 fis-1> <c'-2>\mordent <a-4\2> <fis-1> <d-1\3> <c-4\4> |
+    <b-1> <f'-2 e'-4>8 <f e'>16 <g,,-0> <f''-1 b-2 g'-4>8 <f b e-3>16 |
+
+    <a,-3>16 <c-1 e-1 c'-4>8. r4 |
+    \pestanaSpan "VII" <a,-1\6>16\startTextSpan <c''-3> <e,-4 g-2> a,,\stopTextSpan \pestanaSpan "VI" <cis-1\5>\startTextSpan <ais''-1> <cis,-1 g'-4> cis,\stopTextSpan |
+    <d-0> <b''-1>8 <d,-1 g-2>16 r4 |
+    <e,,-1>16 <g'-4 b-3 cis-1>8 <g b cis>16 <d,-0>  <c''-1 fis-3 b-4>8 <c fis a-1>16 |
+  }
+  \alternative {
+    { <b-2 d-1 g-1>8. <d-1\3>16\mordent <b-3\4> <d-1> <g-2> <b-1> | }
+    { <b,-2 d-1 g-1>\tenuto <bes-2 d-3>8 <bes d>16 <bes d> <bes ees-4>8 <bes d>16 | }
+  }
+
+  \bar "||"
+
+  <g-0>4 <b'-2 d-3 g-4>
+
+  \bar "|."
+}
+
+lower = \relative c' {
+  \globals
+  \set stringNumberOrientations = #'(down)
+
+  \repeat volta 2 {
+    g,4. d8 |
+    a'4. d,8 |
+  }
+
+  g8. r16 r4 |
+  \repeat volta 2 {
+    r16 <a-1> <g'-3> <c-4> d,,4 |
+    <g-0>8 <bes'-1 d-1> r4 |
+    <c,-1>2 |
+
+    r16 <bes-2\6> <d'-1> <g-3> r4 |
+    r16 <d,,-0> <d'-0> <c'-1> r4 |
+    r16 <ees,,-1> <ees'-1> <a-2> r4 |
+    d,,2 |
+
+    fis8. r16 r4 |
+    r16 <a-1> <g'-3> <c-4> d,,4 |
+    <g-0>8 <bes'-1 d-1> r4 |
+    <c,-1>2 |
+
+    r16 <b-2\6> <f''-3> <g-1> r4 |
+    r2 |
+    d,4 d, |
+    r d |
+  }
+  \alternative {
+    { <g-0> r | }
+    { <g-0>4. d8 | }
+  }
+
+  % part B
+  <a'-1>4 <g-0> |
+  <fis-3>4. <d-0>8 |
+  <g-0>4 <a-2>\glissando |
+  <b-2>4. <g-0>8 |
+
+  <c-3>4 <bes-1> |
+  <a-1>4. <g-0>8 |
+  <fis-2>4\glissando <f-1>\glissando |
+  <e-1>\glissando <ees-1> |
+
+  <d-0>4. d8 |
+  \slashedGrace cis'\glissando <e-1\5>4\glissando <ees-1> |
+  <d-0>4. d8 |
+  <d-1\5>4 <des-1> |
+
+  <c-2>4. <bes-1>8 |
+  <ees-1>4 <d-0> |
+  <e-3\5> <a,-1\6> |
+  <d,-0> <g-0> |
+
+  <c-1>4. c8 |
+  <d-0>4. d8 |
+  <e,-1>4 <fis-2> |
+  <g-0>8. r16 r4 |
+
+  \bar "||"
+
+  \repeat volta 2 {
+    <g-0>4 b' |
+    g,8. g16 gis8. gis16 |
+    a8. d16 e4 |
+    g,8. g16 g'8. g16 |
+
+    fis8 a fis'4 |
+    ais,,8. ais16 b8. b16 |
+    cis8. cis16 d8. d16 |
+    e8. <e,-1>32( <eis-2>) fis8 e' |
+
+    b4 <d, fis'-3> |
+    g8. g16 gis8. gis16 |
+    a4 r |
+    b' g, |
+
+    \corda "4" a'8.\startTextSpan <gis-2>16 <b-3> <a-1>8\stopTextSpan \once \set stringNumberOrientations = #'(up) <e-3\5>16 |
+    a,8. a16 cis8. cis16 |
+    d4 \corda "5" <cis-1>16\startTextSpan <e-4> <d-2>\mordent <b-3>\stopTextSpan |
+    e,4 d |
+  }
+  \alternative {
+    { <g-0> b' | }
+    { <g,-0>4. <d-0>8 | }
+  }
+
+  \bar "||"
+
+  <g-0>4 <g-0 d'-0>
+
+  \bar "|."
+}
+
+staff = \new Staff <<
+  \upper
+  \\
+  \lower
+>>
+
+\score {
+  \staff
+  \layout { }
+}
+
+\score {
+  \unfoldRepeats \staff
+  \midi { }
+}
diff --git a/src/content/music/choro-da-saudade.ogg b/src/content/music/choro-da-saudade.ogg
new file mode 100644
index 0000000..c6a89cf
--- /dev/null
+++ b/src/content/music/choro-da-saudade.ogg
diff --git a/src/content/music/common.ly.include b/src/content/music/common.ly.include
new file mode 100644
index 0000000..b6ba93a
--- /dev/null
+++ b/src/content/music/common.ly.include
@@ -0,0 +1,15 @@
+copyright = \markup {
+  \with-url #"https://creativecommons.org/licenses/by-sa/4.0/" \line {
+    CC BY-SA 4.0
+  }
+}
+tagline = \markup {
+  \with-url #"https://euandre.org/music.html" \line {
+    euandre.org/music.html
+  }
+}
+
+rall = {
+  \override TextSpanner.bound-details.left.text = "rall."
+  \override TextSpanner.bound-details.right.text = "a tempo"
+}
diff --git a/src/content/music/dengoso.ly b/src/content/music/dengoso.ly
new file mode 100644
index 0000000..b5a3fae
--- /dev/null
+++ b/src/content/music/dengoso.ly
@@ -0,0 +1,310 @@
+\version "2.20.0"
+\pointAndClickOff
+#(ly:set-option 'embed-source-code #t)
+
+\include "common.ly.include"
+\include "guitar.ly.include"
+
+\header {
+  title = "Dengoso"
+  composer = "João Pernambuco"
+  copyright = \copyright
+  tagline = \tagline
+}
+
+globals = {
+  \clef "treble_8"
+  \key d \major
+  \time 2/4
+  \set fingeringOrientations = #'(left)
+  \tempo Andante 4 = 100
+}
+
+upper = \relative c {
+  \globals
+
+  r16 <d-0>8 <e-1>16 <fis-3> <e-1>8 <d-0>16 |
+  \corda "4" <a'-3>8.\startTextSpan a16 <g-1>8. g16 |
+  <fis-3>8. fis16 <f-2>8. <e-1>16\stopTextSpan |
+  r2 |
+
+  r16 d8 e16 fis e8 d16 |
+  \corda "4" a'8.\startTextSpan a16 g8. g16 |
+  fis8. fis16 f8. e16\stopTextSpan |
+  r2 |
+
+  <d'-2>8 \pestanaSpan "II" <fis,-3 a-1>\startTextSpan fis' d16\stopTextSpan <e-0>~ |
+  e2 |
+  d8 \pestanaSpan "II" <fis, a>\startTextSpan fis' d16\stopTextSpan e~ |
+  e2 |
+
+  \repeat volta 2 {
+    \pestanaSpan "V" a16\startTextSpan <a,-3 d-4>8 <a d>16 r16 <g'-4>8 <fis-3>16 |
+    a16 <g,-1 cis-2>8 <g cis>16 r16 <cis-2> <fis-4> <cis-2>\stopTextSpan |
+    <a-1 e'-0>16 <a d>8 \pestanaSingle "II" <a cis>16 <a b>8 a |
+    <b-0>16 <cis,-3 g'-4>8 <cis g'>16 \pestanaSpan "II" cis'8\startTextSpan <g a>\stopTextSpan |
+
+    <d'-2>16 <fis,-3 a-1>8 <fis a>16 <fis'-4>8 <a,-3 c-2> |
+    <e'-0>16 <a,-2 cis-3>8 <a cis>16 r16 <g-0> <cis-3> <e-0> |
+    <d gis d'>16 <d gis d'>8 <d gis d'>16 <d gis cis>8 <d gis b> |
+    <e'-4>16 <cis,-2 g'-3>8 <cis g'>16 <cis g' b\2>8 <cis-2 g'-3 a-1> |
+
+    \pestanaSpan "V" a'16\startTextSpan <a, d>8 <a d>16 r16 <g'>8 <fis>16 |
+    a16 <g, cis>8 <g cis>16 r16 <cis> <fis> <cis>\stopTextSpan |
+    <a e'>16 <a d>8 \pestanaSingle "II" <a cis>16 <a b>8 a |
+    <b>16 <cis, g'>8 <cis g'>16 \pestanaSpan "II" cis'8\startTextSpan <g a>\stopTextSpan |
+
+    d'16 <fis, a>8 <fis a>16 dis'8 <fis, a> |
+    <e'-0>8 <b-3 d-2>16 <ais-2 cis-1> <g b e> <d'-2>( <b-0>) <g-0> |
+    <fis-3> <d'-2> <a-1> <fis-3> <e-1> <cis'-2> <g-0> <e-1>
+  }
+  \alternative {
+    { d, \pestanaSpan "II" a''\startTextSpan d fis g fis g gis\stopTextSpan | }
+    { r4 \pestanaSingle "VII" <d fis d'> | }
+  }
+
+  \repeat volta 2 {
+    \key d \minor
+
+    <a-3>16 a <d-4 f-2> a a a <d f> a |
+    <g-3> g <bes-1 e-4> g g g <bes e> g |
+    <f-3> f <a-2 d-4> f f f <a d> f |
+    r <g-0 cis-2> <g cis> e' r <bes-3>( <a-2>) <g-0> |
+
+    <fis-4> <c-3> <dis-1>( <fis-4>) <a-2> <fis-4> c' a |
+    <d-4> <bes-3>( <g-0>) <d-0> <g-0> <d-0> <bes'-3>( <g-0>) |
+    <gis-1> <d-0> <b'-9> <gis-1> <d'-4>( <b-0>) <f'-4\2>( <d-1>) |
+    <bes'-2>( <a-1>) <g-4> <f-2> <e-1> <d-3> <cis-2> <bes-4\4> |
+
+    <a-3> a <d-4 f-2> a a a <d f> a |
+    <g-3> g <bes-1 e-4> g g g <bes e> g |
+    \pestanaSpan "III" f,\startTextSpan f <bes' d> f, f f <bes' d> f,\stopTextSpan |
+    \pestanaSpan "II" r\startTextSpan <a' cis> <a cis>( e')~ e4\stopTextSpan
+
+    \pestanaSpan "III" <bes-1>16(\startTextSpan <c-4>) <d-1> <e-4> <f-4>\stopTextSpan <g-1> <a-3> <bes-4> |
+    <bes-4>( <a-3>) <gis-2> <a-3> <d-4>( <bes-1>) <g-3> <e-0> |
+    <f-1> <d-4> <a-2> <f-3> <e-1> <cis'-2> <g-0> <e-1>
+  }
+  \alternative {
+    { r <g-0> <gis-1> <a-2> r <bes-3> <a-2> <g-0> | }
+    { r4 \pestanaSingle "X" <f' a d> | }
+  }
+
+  \key d \major
+  \pestanaSpan "V" a16\startTextSpan <a, d>8 <a d>16 r16 g'8 fis16 |
+  a16 <g, cis>8 <g cis>16 r16 cis fis cis\stopTextSpan |
+  <a e'>16 <a d>8 \pestanaSingle "II" <a cis>16 <a b>8 a |
+  b16 <cis, g'>8 <cis g'>16 \pestanaSpan "II" cis'8\startTextSpan <g a>\stopTextSpan |
+
+  d'16 <fis, a>8 <fis a>16 fis'8 <a, c> |
+  e'16 <a, cis>8 <a cis>16 r16 g cis e |
+  <d gis d'>16 <d gis d'>8 <d gis d'>16 <d gis cis>8 <d gis b> |
+  e'16 <cis, g'>8 <cis g'>16 <cis g' b\2>8 <cis g' a> |
+
+  \pestanaSpan "V" a'16\startTextSpan <a, d>8 <a d>16 r16 g'8 fis16 |
+  a16 <g, cis>8 <g cis>16 r16 cis fis cis\stopTextSpan |
+  <a e'>16 <a d>8 \pestanaSingle "II" <a cis>16 <a b>8 a |
+  b16 <cis, g'>8 <cis g'>16 \pestanaSpan "II" cis'8\startTextSpan <g a>\stopTextSpan |
+
+  d'16 <fis, a>8 <fis a>16 dis'8 <fis, a> |
+  e'8 <b d>16 <ais cis> <g b e> d'( b) g |
+  fis d' a fis e cis' g e
+  r4 \pestanaSingle "VII" <d' fis d'> |
+  \bar "||"
+
+  \key d \minor
+  <f-2>16 <a,-3 d-4>8 <a d>16 f'8 <a, d> |
+  <e'-4>16 <g,-3 bes-1>8 <g bes>16 <d'-4>8 <f,-3 a-2> |
+  <cis'-4>16 <e,-3 g-0>8 <e g>16 <f'-1>8 <g, cis> |
+  <e'-0>16 <g,-0 cis-4>8 <g cis>16 <d'-4>8 <f,-3 a-2> |
+
+  <f'-2>16 <a,-3 d-4>8 <a d>16 f'8 <a, d> |
+  \pestanaSpan "V" <e'-1>16\startTextSpan <a,-3 c-1>8 <a c>16 a,8 <a' c> |
+  <a-3>16 <c-1> <a'-4> c,\stopTextSpan <aes-3> <b-1> <b'-4> b, |
+  \pestanaSpan "V" <a-3>\startTextSpan <c-1> <a'-1> c, a c a' c,\stopTextSpan |
+
+  <f-2> <a,-3 d-4>8 <a d>16 f'8 <a, d> |
+  f'16 <a, d>8 <a d>16 <e'-1>8 <a,-3 cis-2> |
+  \pestanaSpan "III" <g'-1>16\startTextSpan <bes,-1 e-3>8 <bes e>16 g'8 <bes, e> |
+  g'16 <bes, e>8 <bes e>16\stopTextSpan \pestanaSpan "V" <a'-1>8\startTextSpan <c,-1 fis-3>\stopTextSpan |
+
+  \pestanaSpan "V" <bes'-2>16\startTextSpan <d,-3 g-4>8 <d g>16 <d g> <a'-1>8 <g-4>16 |
+  <f-2> <a,-3 d-4>8 <a d>16 <a d> <e'-0>8 <d-4>16 |
+  <c-2>^"[#]"
+  <a-3>8 a16 a <f'-2>8 <e-1>16 |
+  <d-4> <a-3>8 a16 a a8 a16\stopTextSpan |
+
+  \key d \major
+  \pestanaSpan "V" a'16\startTextSpan <a, d>8 <a d>16 r16 g'8 fis16 |
+  a16 <g, cis>8 <g cis>16 r16 cis fis cis\stopTextSpan |
+  <a e'>16 <a d>8 \pestanaSingle "II" <a cis>16 <a b>8 a |
+  b16 <cis, g'>8 <cis g'>16 \pestanaSpan "II" cis'8\startTextSpan <g a>\stopTextSpan |
+
+  d'16 <fis, a>8 <fis a>16 fis'8 <a, c> |
+  e'16 <a, cis>8 <a cis>16 r16 g cis e |
+  <d gis d'>16 <d gis d'>8 <d gis d'>16 <d gis cis>8 <d gis b> |
+  e'16 <cis, g'>8 <cis g'>16 <cis g' b\2>8 <cis g' a> |
+
+  \pestanaSpan "V" a'16\startTextSpan <a, d>8 <a d>16 r16 g'8 fis16 |
+  a16 <g, cis>8 <g cis>16 r16 cis fis cis\stopTextSpan |
+  <a e'>16 <a d>8 \pestanaSingle "II" <a cis>16 <a b>8 a |
+  b16 <cis, g'>8 <cis g'>16 \pestanaSpan "II" cis'8\startTextSpan <g a>\stopTextSpan |
+
+  d'16 <fis, a>8 <fis a>16 dis'8 <fis, a> |
+  e'8 <b d>16 <ais cis> <g b e> d'( b) g |
+  fis d' a fis e cis' g e
+  r4 \pestanaSingle "VII" <d' fis d'> |
+  \bar "|."
+}
+
+lower = \relative c {
+  \globals
+  \set stringNumberOrientations = #'(down)
+
+  r2_\markup { \circle 6 = D } |
+  r8 a r a |
+  r8 a r a |
+  r16 <a-0>8 <b-1>16 <cis-3> <b-1>8 <a-0>16 |
+
+  d16 r8. r4
+  r8 a r a |
+  r8 a r a |
+  r16 a8 b16 cis b8 a16 |
+
+  d,4. a''16 a,~ |
+  a a8 b16 cis b8 a16
+  d,4. a''16 a,~ |
+  a a8 b16 cis b8 a16 |
+
+  \repeat volta 2 {
+    d,4 dis' |
+    <e-3> g, |
+    <fis'-3>16 fis8 fis16 fis8 fis |
+    e,4 cis' |
+
+    d, dis |
+    <e-1> <ais-1> |
+    e' e |
+    a, r4 |
+
+    d, <dis'-2> |
+    e g, |
+    fis'16 fis8 fis16 fis8 fis |
+    e,4 cis' |
+
+    d, fis |
+    <e-4>8 r8 r4 |
+    fis'8. fis16 e8. e16 |
+  }
+  \alternative {
+    { d,2 | }
+    { d8 a' d4 | }
+  }
+
+  \repeat volta 2 {
+    \key d \minor
+
+    a'16\4 a8 a16 a a8 a16 |
+    g\4 g8 g16 g g8 g16 |
+    f f8 f16 f f8 f16 |
+    e4 a, |
+
+    r2 |
+    d8. r16 r4 |
+    r2 |
+    a2 |
+
+    a'16 a8 a16 a a8 a16 |
+    g g8 g16 g g8 g16 |
+    f, f8 f16 f f8 f16 |
+    e4 r16 <e-1>( <f-2>) <fis-3> |
+
+    g4 r4 |
+    d g' |
+    d8. f16 e8. e16 |
+  }
+  \alternative {
+    { d4 r | }
+    { d8 a d4 | }
+  }
+
+  \key d \major
+  d,4 dis' |
+  <e> g, |
+  <fis'>16 fis8 fis16 fis8 fis |
+  e,4 cis' |
+
+  d, dis |
+  <e> <ais> |
+  e' e |
+  a, r4 |
+
+  d, <dis'> |
+  e g, |
+  fis'16 fis8 fis16 fis8 fis |
+  e,4 cis' |
+
+  d, fis |
+  <e>8 r8 r4 |
+  fis'8. fis16 e8. e16 |
+  d,8 a' d4 |
+
+  \key d \minor
+  d,4 d |
+  a' a |
+  a a |
+  a d, |
+
+  d d |
+  a' a |
+  a' aes |
+  a a |
+
+  d,, d |
+  d a' |
+  a a |
+  a d |
+
+  <g-1> r |
+  d, r |
+  a'2 |
+  d, |
+
+  \key d \major
+  d4 dis' |
+  e g, |
+  fis'16 fis8 fis16 fis8 fis |
+  e,4 cis' |
+
+  d, dis |
+  e ais |
+  e' e |
+  a, r4 |
+
+  d, dis' |
+  e g, |
+  fis'16 fis8 fis16 fis8 fis |
+  e,4 cis' |
+
+  d, fis |
+  e8 r8 r4 |
+  fis'8. fis16 e8. e16 |
+  d,8 a' d4 |
+  \bar "|."
+}
+
+staff = \new Staff <<
+  \upper
+  \\
+  \lower
+>>
+
+\score {
+  \staff
+  \layout { }
+}
+
+\score {
+  \unfoldRepeats \staff
+  \midi { }
+}
diff --git a/src/content/music/dengoso.ogg b/src/content/music/dengoso.ogg
new file mode 100644
index 0000000..8041487
--- /dev/null
+++ b/src/content/music/dengoso.ogg
diff --git a/src/content/music/guitar.ly.include b/src/content/music/guitar.ly.include
new file mode 100644
index 0000000..5081dd9
--- /dev/null
+++ b/src/content/music/guitar.ly.include
@@ -0,0 +1,33 @@
+
+pestanaPrivate = \markup {
+  \fontsize #-2
+  \combine
+    \serif C
+    \translate #'(0.6 . -0.4) \draw-line #'(0 . 2.0)
+}
+
+pestanaSingle =
+  #(define-music-function (fret-number music) (string? ly:music?)
+     #{
+       $music ^\markup { \pestanaPrivate \fontsize #-2 $fret-number }
+     #})
+
+pestanaSpan =
+  #(define-music-function (fret-number) (string?)
+     #{
+       \once \override TextSpanner.font-shape = #'upright
+       \once \override TextSpanner.style = #'solid
+       \once \override TextSpanner.bound-details.left.stencil-align-dir-y = #CENTER
+       \once \override TextSpanner.bound-details.right.text = \markup { \draw-line #'(0 . -.5) }
+       \once \override TextSpanner.bound-details.left.text = \markup { \pestanaPrivate \fontsize #-2 $fret-number }
+     #})
+
+corda =
+  #(define-music-function (string-number) (string?)
+    #{
+      \once \override TextSpanner.style = #'solid
+      \once \override TextSpanner.font-size = #-5
+      \once \override TextSpanner.bound-details.left.stencil-align-dir-y = #CENTER
+      \once \override TextSpanner.bound-details.right.text = \markup { \draw-line #'( 0 . -.5) }
+      \once \override TextSpanner.bound-details.left.text = \markup { \circle \number $string-number }
+    #})
diff --git a/src/content/music/marcha-dos-marinheiros.ly b/src/content/music/marcha-dos-marinheiros.ly
new file mode 100644
index 0000000..48cc1c6
--- /dev/null
+++ b/src/content/music/marcha-dos-marinheiros.ly
@@ -0,0 +1,78 @@
+\version "2.20.0"
+\pointAndClickOff
+#(ly:set-option 'embed-source-code #t)
+
+\include "common.ly.include"
+\include "guitar.ly.include"
+
+\header {
+  title = "Marcha dos Marinheiros"
+  composer = "Canhoto"
+  copyright = \copyright
+  tagline = \tagline
+}
+
+globals = {
+  \clef "treble_8"
+  \key a \minor
+  \time 2/4
+  \set fingeringOrientations = #'(left)
+  \tempo Adagio 4 = 70
+}
+
+upper = \relative c {
+  \globals
+}
+
+lower = \relative c {
+  \globals
+  \set stringNumberOrientations = #'(down)
+
+  d4~ d16 <b-2> <c-3> <d-0> |
+  <e-2>4~ e16 <a,-0> <b-2> <c-3> |
+  d4~ d16 <gis,-4> <a-0> <b-2> |
+  <c-4>4 a8 e |
+
+  d'4~ d16 <b-2> <c-3> <d-0> |
+  <e-2>4~ e16 e <d-0> <c-4> |
+  <e-2>8 <d-0> <c-4> <b-2> |
+  a4~ a16 e' ees d |
+
+  \repeat volta 2 {
+    \mark \markup { \musicglyph #"scripts.segno" }
+    <c-4>4 <b-2>8 <e,-0> |
+    <a-0>4~ a16 <a'-2> <aes-1> <g-0> |
+    <f-3>4 <e-1>8 <a,-0> ||
+    <d-0>4~ d16 d e f |
+
+    d'8 c b a |
+  }
+  \alternative {
+    {
+      gis4~ gis16 d e f |
+      e8 d c b |
+      a4~ a16 e' ees d |
+    }
+    {
+      c'8 b a f |
+      e d c b |
+      a2 |
+    }
+  }
+}
+
+staff = \new Staff <<
+  \upper
+  \\
+  \lower
+>>
+
+\score {
+  \staff
+  \layout { }
+}
+
+\score {
+  \unfoldRepeats \staff
+  \midi { }
+}
diff --git a/src/content/music/marcha-dos-marinheiros.ogg b/src/content/music/marcha-dos-marinheiros.ogg
new file mode 100644
index 0000000..c07dabe
--- /dev/null
+++ b/src/content/music/marcha-dos-marinheiros.ogg