bach c minor fugue 2022 project

2022-projects/35-bach-fugue-cminor.ly

@@ -0,0 +1,64 @@
+\version "2.22.1"
+\language "english"
+
+#(set-global-staff-size 18)
+
+\header {
+  tagline = ""
+}
+
+\paper {
+  % system-system-spacing = #'((basic-distance . 0.1) (padding . 4))
+}
+
+global = {
+  % \set Staff.printKeyCancellation = ##f
+  % \numericTimeSignature
+  \compressEmptyMeasures
+  \override TupletBracket #'bracket-visibility = #'if-no-beam
+  \override MultiMeasureRest.expand-limit = #3
+  \override Score.ChordName.font-name = #"Noto Serif"
+  \override Score.ChordName.font-size = #0
+  \override Score.LyricText.font-name = #"Noto Serif"
+  \override Score.LyricText.font-size = #0
+}
+
+\score {
+  <<
+    \new PianoStaff <<
+      \new Staff = "right" \relative c'' {
+        \time 4/4
+        \global
+        \key c \minor
+
+        <<
+          {
+            \partial 4. b16 a b8 r | r c16 b c8 g af c16 b! c8 d | \partial 8 g,8 |
+          }  \\
+          {
+            \partial 4. g16 f g8 b, |
+            \override NoteHead.color = #red c16 f ef d \change Staff = "left" \override Stem.direction = #up c bf! af g f8
+              \revert NoteHead.color
+              \change Staff = "right" \revert Stem.direction af'8 g f |
+            \partial 8 \override Stem.direction = #down ef |
+          }
+        >>
+
+
+      }
+      \new Staff = "left" \relative c {
+        \global
+        \key c \minor
+        \clef bass
+
+        \partial 4. \override Stem.direction = #down f8 ~ f16 b, c d | ef8  r r \tweak NoteHead.color #red e f f, ef! d | \partial 8 r |
+      }
+    >>
+  >>
+  \layout {
+    indent = 0
+    \context {
+      \Score \omit BarNumber
+    }
+  }
+}