Add BWV1056 largo

6 files changed, 233 insertions, 0 deletions

diff --git a/bwv1056/largo/all.ly b/bwv1056/largo/all.ly
new file mode 100644
index 0000000..2bb7429
--- /dev/null
+++ b/bwv1056/largo/all.ly
@@ -0,0 +1,5 @@
+\include "violin1.ly"
+\include "violin2.ly"
+\include "viola.ly"
+\include "continuo.ly"
+\include "keyboard.ly"
diff --git a/bwv1056/largo/continuo.ly b/bwv1056/largo/continuo.ly
new file mode 100644
index 0000000..2dbd7a3
--- /dev/null
+++ b/bwv1056/largo/continuo.ly
@@ -0,0 +1,31 @@
+notes = {
+    aes4^\pizzicato r8 aes g4 r8 g |
+    f4 r8 f ees4 r8 ees |
+    aes4 r8 g f4 r8 ees |
+    d4 r8 d ees4 r8 d |
+    c4 r8 c d4 r8 d |
+    ees4 r8 g aes f bes bes, |
+    ees4 r8 des c4 r8 ees |
+    f4 r8 ges8 a,4 r8 f |
+    bes4 r8 bes' aes4 r8 aes |
+    ges4 r8 ges f ees f f, |
+    bes4 r8 aes' g4 r8 ees |
+    aes4 r8 ges f4 r8 aes |
+    des,4 r8 c bes4 r8 aes |
+    g4 r8 ees aes c f des |
+    ees4 r8 g aes4 r8 aes |
+    g4 r8 g f4 r8 f |
+    ees4 r8 ees aes4 r8 aes, |
+    des4 r8 d ees des ees ees, |
+    aes4 r8 g f4 r8 f' |
+    ees4 r8
+    ees,^\arco des2 |
+    c1\fermata
+}
+
+continuo = {
+  \time 4/4
+  \key aes \major
+  \largo
+  \clef bass \relative c' \notes
+}
diff --git a/bwv1056/largo/keyboard.ly b/bwv1056/largo/keyboard.ly
new file mode 100644
index 0000000..c57bba8
--- /dev/null
+++ b/bwv1056/largo/keyboard.ly
@@ -0,0 +1,103 @@
+ar = {
+  c4\mordent~ c16 des ees f \appoggiatura c8 bes4~ bes16 c des ees |
+  aes,8 aes'16 f des8~ des32 ees des c des16 bes' g ees \tr des8\trill c16 des |
+  \appoggiatura des8 c8 bes16 aes r4 aes'~ aes16 g32 f g16 aes |
+  bes,4~ bes16 d f aes g4~ g32 f ees d c16 bes |
+  aes8~ aes32 bes aes g aes16 c ees g f4~ f32 ees d ees f d bes aes |
+  g16 bes d f ees4~ ees16 f32 g aes g aes c d,8.\mordent ees16 |
+  ees4 r
+}
+
+al = {
+  r8 aes aes, aes' r g g, g' |
+  r f f, f' r ees ees, ees' |
+  r  aes aes, g' r f f, ees' |
+  r d d, d' r ees ees, d' |
+  r c c, c' r d d, d' |
+  r ees ees, g' aes f bes bes, |
+  r ees ees, des'
+}
+
+br = {
+  ges4~ ges16  \appoggiatura f ees \appoggiatura des c bes |
+  a4~ a16 bes c des ees f ges a c ees,~ ees32 f ges f |
+  ees16( des) c\prall bes des'8. f,16
+  \appoggiatura ges16 f32 ees32 f16 des'16. c64*2/3 bes a
+  \appoggiatura a16 bes8. f16 |
+  f32 d ees16~ ees32 f ges64 f ees32 c'8. ees,32*2/3 des c 
+  des16 f bes c c8. bes16 |
+  bes4 r4
+}
+
+bl = {
+  r8 c c, ees' |
+  r f f, ges' r a, a, f' |
+  r bes bes, bes'' r aes aes, aes' |
+  r ges ges, ges' f ees f f, |
+  r bes bes, aes''
+}
+
+cr = {
+  des4~ des32 ees des c des16 bes' |
+  \appoggiatura des,8 c4~ c16 aes bes c des32( ees des c des ees f ges)
+  aes16 ges32 f ges c, ges'16~ |
+  \override TupletBracket.bracket-visibility = #'if-no-beam
+  ges8 f r16 bes,16 c\turn des \tuplet 3/2 {g,16[ f g]}
+  \tuplet 3/2 {aes g aes} \tuplet 3/2 {bes[ c bes]} \tuplet 3/2 {aes[ bes c]} |
+  \tuplet 3/2 { des c des} bes'8~ bes32 c, des ees des c bes16
+  c( ees aes f)  ees( des g aes) |
+  c,8\prall bes r4
+}
+
+cl = {
+  r8 g g, ees' |
+  r aes aes, ges' r f f, aes' |
+  r des, des, c' r bes bes, aes' |
+  r g g, ees' aes c f des |
+  r ees ees, g'
+}
+
+
+
+dr = {
+  c4~ c32 bes des c ees des f16 |
+  f16 bes,8.~ bes32 aes c bes des c ees16 ees aes, aes' f \appoggiatura ees8 des4~ |
+  des16 bes' g ees ees(\tr des\trill c des) \appoggiatura des16 c16 des32 ees des c bes aes
+  aes8( ges32\prall) f ges16 |
+  f16( g) \appoggiatura aes g( aes) aes4~ aes32 bes aes g aes des bes16 \tr g8.\trill aes16 |
+  aes c f32 d ees16 ees8. ees16~ ees f32 g aes f c16 des16~ des32 c bes c des16 |
+  \appoggiatura aes16 g16. aes64 bes \tr bes32\trill aes bes16 c8~ c64 bes aes g aes c e,32
+  f16 f'16. g64 f e32 f c8( bes16.) c32 |
+  c1\fermata \bar "||"
+}
+
+dl = {
+  r8 aes aes, aes' |
+  r g g, g' r f f, f' |
+  r ees ees, ees' r aes aes, aes' |
+  r des, d, d' ees des ees ees, |
+  r aes g g' r f f, f' |
+  r ees ees, ees' r des des, des' |
+  c1\fermata
+}
+
+upper = {
+  \key aes \major
+  \time 4/4
+  \clef treble
+  \largo
+  \relative c'' \ar
+  \relative c''' \br
+  \relative c'' \cr
+  \relative c'' \dr
+}
+
+lower = {
+  \key aes \major
+  \time 4/4
+  \clef bass
+  \relative c' \al
+  \relative c \bl
+  \relative c' \cl
+  \relative c' \dl
+}
diff --git a/bwv1056/largo/viola.ly b/bwv1056/largo/viola.ly
new file mode 100644
index 0000000..9e282fb
--- /dev/null
+++ b/bwv1056/largo/viola.ly
@@ -0,0 +1,32 @@
+notes = {
+  r8^\pizzicato ees aes r r ees g r |
+  r c, f r r g des' r |
+  r aes c r r c, f r |
+  r bes d r r bes, ees r |
+  r aes c r r bes bes, r |
+  r bes' ees r r ees d r |
+  r ees, g r r c, ees r |
+  r ees a, r r c ees r |
+  r des f r r f bes r |
+  r bes, ees r r des c r |
+  r bes des r r g bes r |
+  r aes c r r aes ges r |
+  r des f r r f bes r |
+  r ees, g r r aes f r |
+  r f bes, r r ees aes r |
+  r ees g r r c, f r |
+  r ees des r r aes' ees r |
+  r ees aes r r f ees r |
+  r f g r r c, f r |
+  r bes, g r
+  r des'^\arco aes f |
+  c'1\fermata
+}
+
+viola = {
+  \time 4/4
+  \key aes \major
+  \clef alto
+  \largo
+  \relative c' \notes
+}
diff --git a/bwv1056/largo/violin1.ly b/bwv1056/largo/violin1.ly
new file mode 100644
index 0000000..59ffc67
--- /dev/null
+++ b/bwv1056/largo/violin1.ly
@@ -0,0 +1,31 @@
+notes = {
+  r8^\pizzicato c ees r r bes ees r |
+  r aes, des r r des bes' r |
+  r ees, aes r r aes c r |
+  r f, bes r r g bes r |
+  r ees, aes r r f aes r |
+  r aes g r r f aes r |
+  r g bes r r ees, a, r |
+  r c f, r r ees a r |
+  r bes des r r des f r |
+  r ees a r r bes a r |
+  r f bes r r bes, ees r |
+  r ees aes r r aes c r |
+  r aes, des r r des' g, r |
+  r bes des, r r ees aes r |
+  r d, ees r r c ees r |
+  r bes ees r r aes, des r |
+  r des bes' r r ees, c' r |
+  r bes f r r f bes, r |
+  r ces bes r r c aes' r |
+  r g c, r
+  r aes^\arco f f'~ |
+  f g16( f) f( e) e( d) e2\fermata |
+}
+
+violini =  {
+  \time 4/4
+  \key aes \major
+  \largo
+  \relative c'' \notes
+}
diff --git a/bwv1056/largo/violin2.ly b/bwv1056/largo/violin2.ly
new file mode 100644
index 0000000..41bfadb
--- /dev/null
+++ b/bwv1056/largo/violin2.ly
@@ -0,0 +1,31 @@
+notes = {
+  r8^\pizzicato aes c r r g bes r |
+  r f aes r r bes g' r |
+  r c, ees r r f aes r |
+  r d, f r r ees g r |
+  r c, ees r r d f r |
+  r f bes, r r c bes r |
+  r bes ees r r ges c, r |
+  r a c r r c f, r |
+  r f bes r r bes des r |
+  r ees c r r ges' f r |
+  r des f r r ees g r |
+  r c, ees r r des ees r |
+  r f aes r r bes  des, r |
+  r des bes r r c c r |
+  r aes g r r aes c r |
+  r g bes r r f aes r |
+  r bes g' r r c, aes' r |
+  r bes, ces r r bes g r |
+  r aes ees r r aes des, r |
+  r g ees r
+  r f^\arco f' bes, |
+  aes bes16( aes) aes( g) g( f) g2\fermata |
+}
+
+violinii = {
+  \time 4/4
+  \key aes \major
+  \largo
+  \relative c'' \notes
+}