]> git.newer.systems - circumnutation.git/commitdiff
finished Tags
authortuckerajohnsonmusic@gmail.com <tuckerajohnsonmusic@gmail.com>
Thu, 27 Apr 2023 07:08:54 +0000 (03:08 -0400)
committertuckerajohnsonmusic@gmail.com <tuckerajohnsonmusic@gmail.com>
Thu, 27 Apr 2023 07:08:54 +0000 (03:08 -0400)
17 files changed:
book.ly
manuscripts/10i.ly
manuscripts/11i.ly
manuscripts/12i.ly
manuscripts/13i.ly
manuscripts/14i.ly
manuscripts/15i.ly
manuscripts/1i.ly
manuscripts/2i.ly
manuscripts/3i.ly
manuscripts/4i.ly
manuscripts/5i.ly
manuscripts/6i.ly
manuscripts/7i.ly
manuscripts/8i.ly
manuscripts/9i.ly
variables/variables.ly

diff --git a/book.ly b/book.ly
index dcaf49a326b4a2957c1c17a46b5534a164856a78..920c8e34220b9b67cfd597061b33aaf5f53759bf 100644 (file)
--- a/book.ly
+++ b/book.ly
@@ -89,7 +89,7 @@ composer = \xcomp
 \include "manuscripts/14i.ly"
  }
 
-\tocItem \markup { "14. " \bold "Poco rubato," \italic "semplicemente; sotto voce" }
+\tocItem \markup { "15. " \bold "Poco rubato," \italic "semplicemente; sotto voce" }
 \score {
 \include "manuscripts/15i.ly"
 }
index 783815bcde1e9647ebd0f31a7468dae465763e7e..2e0e822c8ceff665ccb2eafe317ec473c40a1210 100644 (file)
@@ -62,7 +62,15 @@ gis,4.(\> cis, fis8)\p\fermata \clef bass \bar "||"
 <g' a>[ <e d'>])\p r4. |
 r8 <d fis>4.(\mf\< <cis g'>8~ |
 \time 6/8 8[ aes'8] <c, f>4.\f\> bes8
-\time 5/8 <a e'>4. <b dis>4)\p \bar "|."
+\time 5/8 <a e'>4. <b dis>4)\p
+\once \override Staff.BarLine.stencil =
+#(lambda (grob)
+(ly:stencil-combine-at-edge
+  (ly:bar-line::print grob)
+  X RIGHT
+  (grob-interpret-markup grob ten-barlineMarkup)
+  0))
+\bar "|."
 }
 }
 >>
index 43dcfe01d5acfe690e3e75f967b3b407adcb60db..5a2fb0125965670e9503ba973b055f0d3989ac76 100644 (file)
@@ -135,7 +135,15 @@ ges8 s8 s2 |
 \time 4/4 f2( bes2~ |
 \time 3/4 bes8) s8 s2 |
 \time 2/4 b2( |
-\time 3/4 gis2.) \bar "|."
+\time 3/4 gis2.)
+\once \override Staff.BarLine.stencil =
+#(lambda (grob)
+(ly:stencil-combine-at-edge
+  (ly:bar-line::print grob)
+  X RIGHT
+  (grob-interpret-markup grob eleven-barlineMarkup)
+  0))
+\bar "|."
 }
 >>
 }
index 87ea29e547274f97cb8d061abcfcb5da7c97e7ef..9ca260856c014bc7d9f1384a9af38b46da8a569e 100644 (file)
@@ -135,7 +135,15 @@ d4~( d8 a'8~ a4) |
 c1( |
 \time 3/4 f,2) s4 |
 s2. |
-\time 2/4 a2 \bar "|."
+\time 2/4 a2
+\once \override Staff.BarLine.stencil =
+#(lambda (grob)
+(ly:stencil-combine-at-edge
+  (ly:bar-line::print grob)
+  X RIGHT
+  (grob-interpret-markup grob twelve-barlineMarkup)
+  0))
+\bar "|."
 }
 >>
 }
index bf649884020dfaa73119bc35f1f941c7771fe2ec..c3dc9edca3caf63feeef030f42aec49b27d1783d 100644 (file)
@@ -46,6 +46,14 @@ r4 r8 a'''''8-. fis-. dis-. \tuplet 3/2 { bes-.\sustainOff ees,-. d-. } \clef ba
 \tuplet 3/2 { 8 bes4~ } 16) |
 \tuplet 3/2 { a8-. g-. c,-. } \tuplet 3/2 { b-. fis-. d-. } \tuplet 3/2 { des( ees aes) } r4\sustainOn |
 \tuplet 3/2 { cis8-. fis-. a-. } \clef treble \tuplet 3/2 { c-.\sustainOff d-. ees-. } \tuplet 3/2 { e-. f( g } \tuplet 3/2 { gis a b) }
+\once \override Staff.BarLine.stencil =
+#(lambda (grob)
+(ly:stencil-combine-at-edge
+  (ly:bar-line::print grob)
+  X RIGHT
+  (grob-interpret-markup grob thirteen-barlineMarkup)
+  0))
+\bar "|."
 }
 >>
 }
index e7c71dd62f05254dfa0c192e7f3812da9b9df596..c209617626aa1a321e90bddc702a1276b2598b55 100644 (file)
@@ -27,7 +27,7 @@
        \time 4/4
        r2 <f bes g''>2\arpeggio\fermata |
        r2 <ees des' aes'>2\arpeggio\fermata |
-       r2 <d c' fis'>2\arpeggio\fermata \bar "|."
+       r2 <d c' fis'>2\arpeggio\fermata
       }
     >>
   }
@@ -50,7 +50,7 @@
            r2 g2 a2\fermata |
            r2 <aes c>2\arpeggio\fermata |
            r2 <f bes>2\arpeggio\fermata |
-           r2 <e b'>2\arpeggio\fermata |
+           r2 <e b'>2\arpeggio\fermata
          }
          \new Voice \relative {
            \voiceTwo
            \tuplet 3/2 { r4 c8( } f2.) r2 |
            des4(\mp ees2.) |
            fis4( b,2.) |
-           g'4(\mf a2.) |
+           g'4(\mf a2.)
+           \once \override Staff.BarLine.stencil =
+           #(lambda (grob)
+           (ly:stencil-combine-at-edge
+             (ly:bar-line::print grob)
+             X RIGHT
+             (grob-interpret-markup grob fourteen-barlineMarkup)
+             0))
+           \bar "|."
          }
        >>
       }
index 875bf17a74d04e9dfd490a6c7f168fed29f126a0..1d1737ab703c50e640b7594353d6161cc5ade097 100644 (file)
@@ -57,7 +57,7 @@
 \time 2/4 f4_( ees) |
 \time 4/4 s1 |
 \time 2/4 \stemUp des2 |
-\time 4/4 c1 \arpeggio \bar "|." }
+\time 4/4 s1 \bar "|." }
 \\
 \relative { \tmarksev \dtim
 \time 7/4 s1*7/4 |
@@ -74,7 +74,7 @@
 \time 2/4 s1*2/4 |
 \time 4/4 s1 |
 \time 2/4 s1*2/4 |
-\time 4/4 f1 \arpeggio \bar "|." }
+\time 4/4 <c f>1 \arpeggio \bar "|." }
 >>
 }
 \new Staff = "di7" { \clef bass
 \time 2/4 a4(\sustainOff\sustainOn g) |
 \time 4/4 s1\sustainOff\sustainOn |
 \time 2/4 f4_(\sustainOff\sustainOn ees) |
-\time 4/4 d1\sustainOff\sustainOn \arpeggio \bar "|." }
+\time 4/4 d1\sustainOff\sustainOn \arpeggio
+\once \override Staff.BarLine.stencil =
+           #(lambda (grob)
+           (ly:stencil-combine-at-edge
+             (ly:bar-line::print grob)
+             X RIGHT
+             (grob-interpret-markup grob fifteen-barlineMarkup)
+             0))
+           \bar "|."
+}
 >>
 }
 >>
index 01d0c6e6a6fd655064744959ddd8aa50f796bbd2..5cd21e709cd74671a46a427bca002abee4720131 100644 (file)
   \change Staff = "di1" b[ a g fis e d cis]
   ees[ aes, g bes c d f]
   fis[ gis a b cis \change Staff = "ui1" dis e] \change Staff = "di1"
-  \override Staff.BarLine.allow-span-bar = ##t \bar "|." \revert Staff.BarLine.stencil
+  \override Staff.BarLine.allow-span-bar = ##t
+\once \override Staff.BarLine.stencil =
+#(lambda (grob)
+(ly:stencil-combine-at-edge
+  (ly:bar-line::print grob)
+  X RIGHT
+  (grob-interpret-markup grob one-barlineMarkup)
+  0))
+\bar "|."
+  \revert Staff.BarLine.stencil
   }
 >>
 }
index 86424f6a12ceed1f23b1ae321d75d5e2ba76cd6e..64d7c65a968e7448aa8400e1cc21ac522606a17d 100644 (file)
@@ -64,7 +64,15 @@ s8 s8 s8 s8 s8 s8 s8 |
 s8 s8 s8 s8\p s8 s8 s8 |
 s8 s8 s8\< s8 s8 s8 s8 |
 s8 s8\mf\> s8 s8 s8 s8 s8 |
-s8 s8 s8 s8 s8 s8 s8\pp |
+s8 s8 s8 s8 s8 s8 s8\pp
+\once \override Staff.BarLine.stencil =
+#(lambda (grob)
+(ly:stencil-combine-at-edge
+  (ly:bar-line::print grob)
+  X RIGHT
+  (grob-interpret-markup grob two-barlineMarkup)
+  0))
+\bar "|."
 }
 >>
 }
index e2110ec193f5a2e88ca95bbe52209458fc71f991..0ce9dd686ad1cd7970e5d7c01f3be099751f4046 100644 (file)
@@ -26,7 +26,7 @@ r8^"Tempo primo" dis8-.-> cis4~-> cis8 fis16( g a,4)
 \time 5/8 r8\mp\< b4( e,4) |
 e8(\mf\> f4~ f4) |
 bes4(\mp\< c4.)
-\time 2/4 r4\f r4\fermata \bar "|."
+\time 2/4 r4\f r4\fermata
 }
 >>
 }
@@ -52,7 +52,15 @@ b2( e2) |
 \time 5/8 cis8( d fis gis a) |
 c( bes a g d) |
 ges( f ees aes, des) |
-\time 2/4 b8( e8~ e4)\fermata \bar "|."
+\time 2/4 b8( e8~ e4)\fermata
+\once \override Staff.BarLine.stencil =
+#(lambda (grob)
+(ly:stencil-combine-at-edge
+  (ly:bar-line::print grob)
+  X RIGHT
+  (grob-interpret-markup grob three-barlineMarkup)
+  0))
+\bar "|."
 }
 >>
 }
@@ -62,6 +70,6 @@ ges( f ees aes, des) |
 \context {
 \Score
 \override BarNumber.font-size = #1
-\override SpacingSpanner.base-shortest-duration = #(ly:make-moment 1/10)
+\override SpacingSpanner.base-shortest-duration = #(ly:make-moment 1/16)
 }
 }
index cb1dedc973dd7149e61bd4addc30c8d1b88f0159..c5729a28b0dbcddd37dddb591c6928256d03a6d6 100644 (file)
@@ -46,7 +46,15 @@ bes2)\fermata |
 \time 2/4 4\fermata <aes f'>8\pp g8 |
 \time 3/4 <dis b' e>2 bes4~ |
 \time 2/4 \tuplet 3/2 { 8 <c' d a'>4 } <ees, aes>4~ |
-2\fermata \bar "|."
+2\fermata
+\once \override Staff.BarLine.stencil =
+#(lambda (grob)
+(ly:stencil-combine-at-edge
+  (ly:bar-line::print grob)
+  X RIGHT
+  (grob-interpret-markup grob four-barlineMarkup)
+  0))
+\bar "|."
 }
 >>
 }
index fc5acdef419fc72f7b035cbde15675c792dff6a9..da7d9da1613b80767dffd03da40c42ea2f882551 100644 (file)
          \voiceTwo
          f4\mf \clef treble |
          r8 r8 bes8~\fermata\sustainOn 2 |
-         cis8([\> dis e fis] gis4.)\p \bar "|."
+         cis8([\> dis e fis] gis4.)\p
+         \once \override Staff.BarLine.stencil =
+         #(lambda (grob)
+         (ly:stencil-combine-at-edge
+           (ly:bar-line::print grob)
+           X RIGHT
+           (grob-interpret-markup grob five-barlineMarkup)
+         0))
+       \bar "|."
        }
       >>
     }
index ee488ec9473d228f52bb2ba1b5f61247c6451430..2b5e440590b493fdec47c973937fe04d9e169a29 100644 (file)
@@ -135,7 +135,15 @@ a8 s8 s4 |
 \time 4/4 b'2 fis2 |
 \time 2/4 cis8--) s8 s4 |
 s2 |
-\time 4/4 d1 \bar "|."
+\time 4/4 d1
+\once \override Staff.BarLine.stencil =
+#(lambda (grob)
+(ly:stencil-combine-at-edge
+  (ly:bar-line::print grob)
+  X RIGHT
+  (grob-interpret-markup grob six-barlineMarkup)
+  0))
+\bar "|."
 }
 >>
 }
index b1000a74de893e8d38b0f39a6b8e51496ec729d8..79af30616b95731398be13881561e7d883d7eef3 100644 (file)
@@ -46,7 +46,15 @@ dis8 cis gis' e b a |
 ees'2. |
 d8 fis a b e cis |
 g'8\p ees c bes f aes~ |
-aes2.\fermata |
+aes2.\fermata
+\once \override Staff.BarLine.stencil =
+#(lambda (grob)
+(ly:stencil-combine-at-edge
+  (ly:bar-line::print grob)
+  X RIGHT
+  (grob-interpret-markup grob seven-barlineMarkup)
+  0))
+\bar "|."
 }
 >>
 }
index 837a2d5d78ef3ada5a6306c6f4b9ff16ea20cad8..07106791954fc62576367969fc171019c9fa6fc5 100644 (file)
@@ -97,7 +97,15 @@ s4 fis8([ gis] dis4.) |
 \change Staff = "u" r8 dis'8[^. \change Staff = "d" fis,,_.  b']-. \stemDown e,,4(\< a8) |
 f8( aes4. g4.)\mf |
 r8 b4^\f c,8[^. g''^. d,^. a'']^. |
-des,,4( bes' ees,4.) |
+des,,4( bes' ees,4.)
+\once \override Staff.BarLine.stencil =
+#(lambda (grob)
+(ly:stencil-combine-at-edge
+  (ly:bar-line::print grob)
+  X RIGHT
+  (grob-interpret-markup grob eight-barlineMarkup)
+  0))
+\bar "|."
 }
 >>
 }
index ca145c26ffb8acf0e68ae1ba312d028d7533059c..cc0a9b99a60ac5e84ae7976cddce9956e0afee6a 100644 (file)
 <g d>4(_\ppsempre <f c>) <ees bes>( <des aes>) <b fis>( <a e>) |
 bes8( ees,8 <c' f,>4) <d g,>4( <e a,>) <fis b,>( <gis cis,>)\fermata |
 <g d>4( <f c>) <ees bes>( <des aes>) <b fis>( a8[ e8]) |
-<bes' ees,>4( <c f,>4) <d g,>4( <e a,>) <fis b,>( <gis cis,>)\fermata \bar "|."
+<bes' ees,>4( <c f,>4) <d g,>4( <e a,>) <fis b,>( <gis cis,>)\fermata
+\once \override Staff.BarLine.stencil =
+#(lambda (grob)
+(ly:stencil-combine-at-edge
+  (ly:bar-line::print grob)
+  X RIGHT
+  (grob-interpret-markup grob nine-barlineMarkup)
+  0))
+\bar "|."
 }
 >>
 }
index d4b1f482a999f76b0b203eed072be77b8a6098af..3dd1e84beb1d989257dc7dad39a37c80629725f6 100644 (file)
@@ -7,8 +7,8 @@ xcomp = \markup { Tucker Johnson }
 xinst = \markup  { keyboard }
 xdur = \markup { "30\" - 15\'" }
 xcr = \markup \tiny { Copyright \char ##x00A9 MMXXIII Umbel Press. }
-oddfoot = \markup { \fill-line { \null \center-column { \concat { " - " \fromproperty #'page:page-number-string " - " } \small { \xcomp } } \null } }
-evfoot = \markup { \fill-line { \null \center-column { \concat { " - " \fromproperty #'page:page-number-string " - " } \small { \xtitle } } \null } }
+oddfoot = \markup { \fill-line { \null \center-column { \concat { " - " \fromproperty #'page:page-number-string " - " } \teeny { \xcomp } } \null } }
+evfoot = \markup { \fill-line { \null \center-column { \concat { " - " \fromproperty #'page:page-number-string " - " } \teeny { \xtitle } } \null } }
 finfoot = \markup { \fill-line { \null \center-column { \concat { " - " \fromproperty #'page:page-number-string " - " } \small \typewriter { "February 1st, 2022 - Rochester, New York" } } \null } }
 
 %music
@@ -49,3 +49,185 @@ dtwo = \change Staff = "di2"
 
 U = \change Staff = "u"
 D = \change Staff = "d"
+
+%barline notations
+
+one-barlineMarkup = \markup {
+  \with-dimensions #'(+9.1 . +9.1) #'(0 . 0)
+  \whiteout
+  \pad-around #0.1
+  \rotate #90 \teeny \fontsize #-3
+  \column {
+    \line { "                       " \italic { Rochester, NY (Aug 14, 2022) } }
+    \vspace #-0.4
+    \line { "                       " \fontsize #-3 \typewriter { 1660518082293 } }
+  }
+}
+
+two-barlineMarkup = \markup {
+  \with-dimensions #'(+9.1 . +9.1) #'(0 . 0)
+  \whiteout
+  \pad-around #0.1
+  \rotate #90 \teeny \fontsize #-3
+  \column {
+    \line { "                       " \italic { Rochester, NY (Aug 29, 2022) } }
+    \vspace #-0.4
+    \line { "                       " \fontsize #-3 \typewriter { 1661781408932 } }
+  }
+}
+
+three-barlineMarkup = \markup {
+  \with-dimensions #'(+8.8 . +8.8) #'(0 . 0)
+  \whiteout
+  \pad-around #0.1
+  \rotate #90 \teeny \fontsize #-3
+  \column {
+    \line { "                       " \italic { Rochester, NY (Sep 07, 2022) } }
+    \vspace #-0.4
+    \line { "                       " \fontsize #-3 \typewriter { 1662603692350 } }
+  }
+}
+
+four-barlineMarkup = \markup {
+  \with-dimensions #'(+9.1 . +9.1) #'(0 . 0)
+  \whiteout
+  \pad-around #0.1
+  \rotate #90 \teeny \fontsize #-3
+  \column {
+    \line { "                       " \italic { Rochester, NY (Sep 20, 2022) } }
+    \vspace #-0.4
+    \line { "                       " \fontsize #-3 \typewriter { 1663722072473 } }
+  }
+}
+
+five-barlineMarkup = \markup {
+  \with-dimensions #'(+8.8 . +8.8) #'(0 . 0)
+  \whiteout
+  \pad-around #0.1
+  \rotate #90 \teeny \fontsize #-3
+  \column {
+    \line { "                       " \italic { Lansing, MI (Apr 18, 2023) } }
+    \vspace #-0.4
+    \line { "                       " \fontsize #-3 \typewriter { 1681821703025 } }
+  }
+}
+
+six-barlineMarkup = \markup {
+  \with-dimensions #'(+9.1 . +9.1) #'(0 . 0)
+  \whiteout
+  \pad-around #0.1
+  \rotate #90 \teeny \fontsize #-3
+  \column {
+    \line { "                       " \italic { Rochester, NY (Oct 20, 2022) } }
+    \vspace #-0.4
+    \line { "                       " \fontsize #-3 \typewriter { 1666354838403 } }
+  }
+}
+
+seven-barlineMarkup = \markup {
+  \with-dimensions #'(+9.1 . +9.1) #'(0 . 0)
+  \whiteout
+  \pad-around #0.1
+  \rotate #90 \teeny \fontsize #-3
+  \column {
+    \line { "                       " \italic { Rochester, NY (Jan 12, 2023) } }
+    \vspace #-0.4
+    \line { "                       " \fontsize #-3 \typewriter { 1673533434392 } }
+  }
+}
+
+eight-barlineMarkup = \markup {
+  \with-dimensions #'(+8.8 . +8.8) #'(0 . 0)
+  \whiteout
+  \pad-around #0.1
+  \rotate #90 \teeny \fontsize #-3
+  \column {
+    \line { "                       " \italic { Lansing, MI (Jan 06, 2023) } }
+    \vspace #-0.4
+    \line { "                       " \fontsize #-3 \typewriter { 1673052692437 } }
+  }
+}
+
+nine-barlineMarkup = \markup {
+  \with-dimensions #'(+9.1 . +9.1) #'(0 . 0)
+  \whiteout
+  \pad-around #0.1
+  \rotate #90 \teeny \fontsize #-3
+  \column {
+    \line { "                       " \italic { Rochester, NY (Jan 10, 2023) } }
+    \vspace #-0.4
+    \line { "                       " \fontsize #-3 \typewriter { 1673401987439 } }
+  }
+}
+
+ten-barlineMarkup = \markup {
+  \with-dimensions #'(+9.1 . +9.1) #'(0 . 0)
+  \whiteout
+  \pad-around #0.1
+  \rotate #90 \teeny \fontsize #-3
+  \column {
+    \line { "                       " \italic { Rochester, NY (Apr 15, 2023) } }
+    \vspace #-0.4
+    \line { "                       " \fontsize #-3 \typewriter { 1681537384482 } }
+  }
+}
+
+eleven-barlineMarkup = \markup {
+  \with-dimensions #'(+9.1 . +9.1) #'(0 . 0)
+  \whiteout
+  \pad-around #0.1
+  \rotate #90 \teeny \fontsize #-3
+  \column {
+    \line { "                       " \italic { Rochester, NY (Oct 29, 2022) } }
+    \vspace #-0.4
+    \line { "                       " \fontsize #-3 \typewriter { 1667099098403 } }
+  }
+}
+
+twelve-barlineMarkup = \markup {
+  \with-dimensions #'(+9.1 . +9.1) #'(0 . 0)
+  \whiteout
+  \pad-around #0.1
+  \rotate #90 \teeny \fontsize #-3
+  \column {
+    \line { "                       " \italic { Rochester, NY (Oct 30, 2022) } }
+    \vspace #-0.4
+    \line { "                       " \fontsize #-3 \typewriter { 1667143160032 } }
+  }
+}
+
+thirteen-barlineMarkup = \markup {
+  \with-dimensions #'(+9.1 . +9.1) #'(0 . 0)
+  \whiteout
+  \pad-around #0.1
+  \rotate #90 \teeny \fontsize #-3
+  \column {
+    \line { "                       " \italic { Rochester, NY (Apr 05, 2023) } }
+    \vspace #-0.4
+    \line { "                       " \fontsize #-3 \typewriter { 1680723242730 } }
+  }
+}
+
+fourteen-barlineMarkup = \markup {
+  \with-dimensions #'(+9.1 . +9.1) #'(0 . 0)
+  \whiteout
+  \pad-around #0.1
+  \rotate #90 \teeny \fontsize #-3
+  \column {
+    \line { "                       " \italic { Rochester, NY (Apr 27, 2023) } }
+    \vspace #-0.4
+    \line { "                       " \fontsize #-3 \typewriter { 1682571212379 } }
+  }
+}
+
+fifteen-barlineMarkup = \markup {
+  \with-dimensions #'(+9.1 . +9.1) #'(0 . 0)
+  \whiteout
+  \pad-around #0.1
+  \rotate #90 \teeny \fontsize #-3
+  \column {
+    \line { "                       " \italic { Rochester, NY (Aug 18, 2022) } }
+    \vspace #-0.4
+    \line { "                       " \fontsize #-3 \typewriter { 1660852714574 } }
+  }
+}