Hello,
I'd like to avoid "stem-merging" in measure 13 between the upper g2. and
the first lower g4.
Additionally I'd like to hide the stem of the first lower g4 in m.13
(should be no problem, if the stems don't merge).
I tried a couple of things to achieve this, but unfortunately I don't
find it.
Plus, I have a question about the collision between accidentals and
slurs. Is there a way to get the accidentals inside the slurs without
shaping each of them?
(\override Accidental.avoid-slur = #'inside doesn't help - i guess
Standard Settings restrict the shaping of slurs to a limit?)
musicus
\version "2.19.17"
\language "deutsch"
%\include "general-tools/clip-regions/definitions.ily"
%\include "custom-music-fonts/smufl/definitions.ily"
% Define a list with original page breaks (barnumbers)
%originalPageBreaks = #'(69 163)
% Define a region with barnumbers
%\setClipRegion 4 6
% Compile a single page
%\setClipPage 3
% Compile a page range
%\setClipPageRange 3 4
%\----------------------------------------Header und Abkürzungen----------------------------------------
\header {
tagline = ##f
title = "Soliloquy"
}
global = {
\key c\major
\time 3/4
\clef bass
\numericTimeSignature
%\bravuraOn
\overrideTimeSignatureSettings
3/4
1/8
#'(2 2 2)
#'()
\overrideTimeSignatureSettings
4/4
1/8
#'(2 2 2 2)
#'()
\overrideTimeSignatureSettings
2/4
1/8
#'(2 2)
#'()
\override Staff.TupletNumber #'avoid-slur = #'around
\override Staff.TupletBracket #'avoid-slur = #'around
%\override Staff.TupletNumber #'outside-staff-priority = #999
%\override Staff.TupletNumber #'direction = #UP
%\override Staff.TupletNumber #'extra-offset = #'( 0.0 . 1 )
\override Staff.TupletBracket #'outside-staff-priority = #999
}
h-spacing = #(define-music-function (parser location custom-factor) (number?)
#{
\newSpacingSection
\override Score.SpacingSpanner.spacing-increment = #custom-factor
#})
%----------------------------------------musikalischer Inhalt----------------------------------------
einsNoten = \relative c, {
| c4( es f)
| \time 2/4 g( b)
| c,( es)
| \time 3/4 f( g b)
<<
{
g2.
| \time 2/4 d'2
| \time 3/4 cis4( g2)
| d'2.
| dis4( e2)
| \time 2/4 d!
| \time 3/4 dis4( \times 2/3 {e fis g)}
| a2.
| g
| d'
| \clef tenor f
| \time 2/4 c'2
| \time 4/4 \times 2/3 {es4( d c)} \times 2/3 {b( a g)}
| \times 2/3 {d'( c b)} \times 2/3 {a( g f)}
| \clef bass \times 2/3 {c( b a)} \times 2/3 {g( f es)}
} \\
\relative c, {
c4( es f)
| g( b)
| c,( es f)
| g( b as)
| g( as g)
| as( b)
| g( as g)
| d'!( e fis)
<<
{g,} \\
{g( b g)}
>>
| f'!( a f)
| d( a' d,)
| es'( d,)
| d( es') d,( b')
| d,( d') d,( a')
| d,2 c,
}
>>
\relative c, {
| \time 3/4 d2( e4~
| e) fis2
| \time 2/4 g8 b g b
| \time 3/4 g a b d f d
| \time 2/4 g, b g b
| \time 3/4 g a b d
}
<<
\relative c' {
a4
| \time 5/8 es'4.~ es4
| \time 2/4 d,2
| \time 5/8 e'!4.~ e4
| \time 2/4 d, e!
| \time 5/8 f'4.~ f4
| \skip 8*5
| d8( f d e d)
| \clef tenor \stemDown e( fis) g( a) fis
| a b( c) a-- c--
| \time 4/4 \stemUp d\accent ( es) d\accent( es,) d\accent( es,) d4
| \skip 1
| c''8\accent( d) c\accent( es,) c\accent( es,) \clef bass d\accent( c)
} \\
\relative c {
f8( d)
| g( b g b g)
| g,( a b g)
| g'( b g b g)
| g,( a) b( g)
| a' c a h! a
| h cis d e cis
| d,4.~ d4
| \skip 8*5*2
| d4 d a' d,8\accent( es,)
| \oneVoice \times 2/3 {fis8 g a} b16 c d e! \times 4/5 {fis g a b c} \times 4/6 {d e! fis g a b}
| \voiceTwo d,,4 d a' c,8( es,)
}
>>
\relative c, {
\times 4/5 {d16( e!) fis g a} \times 4/5 {b c d e! fis} g a b c \times 2/3 {d8-- e!-- fis--}
| \time 3/4 \times 4/6 {g,,16( b' g') g( b, g,)} \times 4/6 {g( b' g') g( b, g,)} \times 4/6 {g( c' as') as( c, g,)}
| \time 2/4 \times 4/6 {g( cis' a'!) a( cis, g,)} \times 4/6 {g( d'' b') b( d, g,,)}
\set subdivideBeams = ##t
| c,!32( g' es' c'!) c( es, g, c,) d( a' fis' d') d( fis, a, d,)
\unset subdivideBeams
| \time 3/4 \times 4/6 {g16( g_0 d'_0) d( g, g)}
\repeat unfold 3 {
\times 4/6 {g16( g d') d( g, g)}
}
\times 4/6 { g(^0 b' a)^0 a( b g,)} \times 4/6 {g(^0 c' a)^0 a( c g,)}
| \time 2/4 \times 4/6 {g(^0 cis' a)^0 a( cis g,)} \times 4/6 {g( d'' b') b( d, g,,)}
\repeat unfold 2 {
\times 4/6 {des( as' f') f( as, des,)}
\set subdivideBeams = ##t
c!32(_0 g'_0 d'!_0 h'!) h( d, g, c,)
\unset subdivideBeams
}
| \time 3/4
\repeat unfold 3 {
\times 4/6 {des16( as' f') f( as, des,)}
}
\set subdivideBeams = ##t
| \time 2/4 \stemDown f32( des' as' a)_0 a( as d, f,) \stemNeutral
\unset subdivideBeams
\times 4/6 {c16(_0 g'_0 e') e( g, c,)}
| \time 3/4
\repeat unfold 3 {
\times 4/6 {c16( g' e') e( g, c,)}
}
}
<<
\relative c {
c4\rest( g as)
| \time 2/4 a!( b)
| \time 4/4 \times 2/3 {c( des es)} \times 2/3 {f-- g-- a--}
} \\
\relative c, {
| f2.
| f2
| c s
}
>>
\relative c {
| \time 5/8 g16\accent b g b g a b d! f d
| g,\accent b g b g a b d a'( d,)
| \time 3/8 b'\accent d, c'\accent d, d'\accent( d,)
| a\accent d b\accent d c\accent( d)
| c'\accent d, d'\accent d, es'\accent( d,)
| \time 5/8 <g g,>\accent b g b g a b d <f d,> d
| \time 3/4 <g,g,>\accent b g b g b g a b d <g d,> d
| <cis d,>\accent e q\accent e q\accent e cis d e( g) <a d,,>\accent( g)
| \time 5/8 <cis, d,>\accent e q\accent e q\accent d e( g) <b d,,>( g)
| <a d,,>\accent e a e g d f c! e b
| \time 3/4 <a' d,,>\accent e a e a e g d f c e b
| \time 2/4 a\accent e a e b' c d b
| \time 5/8 e\accent a, e\accent a e\accent d c b a g
| \time 3/4
\repeat unfold 2 {
\times 4/6 {c,( es' c') c( es, c,)}
}
\stemDown
\times 4/6 {c( f' des') des( f, c,)}
| \time 2/4 \times 4/6 {c( fis' d'!) d( fis, c,)} \times 4/6 {c( g'' es') es( g, c,,)}
\set subdivideBeams = ##t
| \time 3/4
c'32( as' f' a,)_0 a(_0 f' as, c,)
\repeat unfold 2 {
c32( as' f' a,) a( f' as, c,)
}
\unset subdivideBeams
| \time 2/4 \times 4/6 {g16(_0 d'_0 b') b( d, g,)} \times 4/6 {g16( d' b') b( d, g,)}
| \time 3/4
\set subdivideBeams = ##t
\repeat unfold 2 {
c32( as' f' a,) a( f' as, c,)
}
\unset subdivideBeams
\stemNeutral
\times 4/6 {b16( g_0 d'_0) d( g, b)}
| \times 4/6 {c,(_0 g'_0 es') es( g, c,)}
\times 4/6 {c( a'! fis') fis( a, c,)}
\times 4/6 {c( a' gis') gis( a, c,)}
| \times 4/6 {g'(_0 d'_0 b') b( d, g,)}
\times 4/6 {g( d' es') es( d, g,)}
\times 4/6 {g( f'! d') d( f, g,)}
\set subdivideBeams = ##t
| \time 4/4 c,32(-._0 g'-._0 es'-. c'-.) c(-.es,-. g,-. c,-.)
c(-. g'-. g'-. es'-.) es(-.g,-. g,-. c,-.)
c(-. g'-. a'-. fis'-.) fis(-. a,-. g,-. c,-.)
c(-. g'-. c'-. as'-.) as(-.c,-. g,-. c,-.)
| \time 3/4 c(-. g'-. d'-. h''-.) h(-. d,,-. g,-. c,-.)
c(-. g'-. d'-. es''-.) es(-. d,,-. g,-. c,-.)
c(-. g'-. d'-. d''-.) d(-. d,,-. g,-. c,-.)
| c( g' es'' c') c( es, g,, c,)
c( g' c' g') g( c, g, c,)
c( g' c' h') h( c, g, c,)
| c( g' c' as') as( c, g, c,)
c( g' d' fis') fis( d, g, c,)
c( g' h'! g') g( h, g, c,)
| c( g' es' c') c( es, g, c,)
\unset subdivideBeams
\times 4/6 {c16(-. g'-. g')-. g(-. g,-.c,)-.}
\times 4/6 {c16(-. g'-. h')-. h(-. g,-.c,)-.}
| \time 2/4 \times 4/6 {c16(-. g'-. as')-. as(-. g,-.c,)-.}
\times 4/6 {c16(-. g'-. fis')-. fis(-. g,-.c,)-.}
| \time 3/4 \times 4/6 {c16(-. g'-. g')-. g(-. g,-.c,)-.}
\set subdivideBeams = ##t
es32(\accent g_0 d'_0 a')_0 a( d, g, es)
d(\accent g d' a') a( d, g, d)
\repeat unfold 2 {
| c-.(\accent g'-. es'-. c'-.) c-.( es,-. g,-. c,-.)
es(\accent g d' a') a( d, g, es)
d(\accent g d' a') a( d, g, d)
}
| \time 2/4 c2\accent
\override TextScript.outside-staff-priority = 1000
| \time 3/4 r4 \tupletUp \times 2/3 {es'4^\markup {"pizz."} c' e,,!}
| \time 2/4 b'' r
| c,,32-.(^\markup {"arco"} g'-. d'-.h'!-.) h-.( d,-. g,-. c,-.)
c-.( g'-. f'-. d'-.) d-.( f,-. g,-. c,-.)
\unset subdivideBeams
| fis2
| \time 3/4 r4 \times 2/3 {g'^\markup {"pizz."} g, e''}
| \time 2/4 <cis' d,> r
| \time 3/4 \times 2/3 {h,! b, e} r
| r r cis
| R1*3/4
| c,!8 r c r h'' r
| c,, r b'' r c,, r
| \time 5/8 g'' as g es g
| \time 2/4 c,, r fis' g
| \time 3/4 fis r c, r d' r
| \time 5/8 es f es d c
| \time 2/4 g r h' r
| \time 3/4 c, r c, r b'' r
| \time 5/8 as b as g as
| \time 2/4 d, r f r
| <e g,> r g r
| \time 5/8 e g as b c
| <des f,> c b <as c,> g
| \time 2/4 as r g as
| f r es, r
| \time 5/8 d r as'' b c
| c,, r as'' b c
| \time 3/4 g, h! d g h! d
| \time 5/8 g r r g, r
| g, r r r4
| \time 3/4 c,8 r c r h'' r
| c,, r b'' r c,, r
| \time 5/8 g'' as g es g
| \time 2/4 c,, r fis' r
| c, r d' r
| \time 5/8 <es g,> f es <d g,> c
| <g' g,> as g <fis g,> g
| <h d,> c h <a d,> h
| \time 3/8 <d d,> es, <d g,>
| g <a g,> g
| <h d,> c <h d,>
| d <es d,> d
| \time 5/8 g, g, <h' d,> g, <d'' d,>
\repeat unfold 2 {
| \time 3/4 g,, <g'' h,> r g,, <g'' h,> r
}
r4 r8 g,, g'' r
| R1*3/4
| c,,,4( es f)
| \time 2/4 g( b)
| c,( es)
| \time 3/4 f( g b)
<<
{
g2.
| \time 2/4 d'2
| \time 3/4 cis4( g2)
| d'2.
| dis4( e2)
| \time 2/4 d!
| \time 3/4 dis4( \times 2/3 {e fis g)}
| \time 2/4 \times 2/3 {a!( g fis)}
| \times 2/3 {g( a b)}
| \times 2/3 {c( b a)}
| \times 2/3 {b( c des)}
| \time 3/4 {c2.}
| \time 2/4 g'2
| \time 3/4 fis4( c2)
| g'2.
| gis,,4( a2)
| \time 2/4 g!
| \time 3/4 gis4( \times 2/3 {a b c)}
| \time 2/4 d!2
} \\
\relative c, {
c4( es f)
| g( b)
| c,( es f)
| g( b as)
| g( as g)
| as( b)
| g( as g)
| b( g)
| b( g)
| des'( g,)
| des'( g,)
| <es' g, c,>( d es)
| b'( a)
| as( d, es)
| b'( a b)
| c,,( des c)
| des( es)
| c( des c)
| \times 2/3 {g'!( a b)}
}
>>
}
\relative c {
\overrideTimeSignatureSettings
5/8
1/8
#'(2 3)
#'()
| \time 5/8 c16\accent es c es c d es g b g
| c,\accent es, c es c d es g d' g,
| \time 3/8 es'^\accent g, f'^\accent g, g'^\accent g,
| d'\accent g, es'\accent g, f'\accent g,
| f\accent g g\accent g as\accent g
| \time 5/8 <c c,>\accent es c es c d es g b d,
| \time 3/4 <c' es,> es c es c es c d es g c g
| <fis d,>\accent a q\accent a q\accent a fis, g a( c) d,( c,)
\overrideTimeSignatureSettings
5/8
1/8
#'(3 2)
#'()
| \time 5/8 <fis' g,>\accent a q\accent a q\accent g a( c) <es d,>( c)
| <d d,>\accent a d a c g b f! a es
| \time 3/4 <fis' d,> d fis d fis d es c d b c a
| \time 2/4 fis(\accent a)^0 fis( g,)^0 fis'( a) fis( g,)
| \time 5/8 g'(\accent a) g(\accent g,) es'(\accent a) es( g,) fis es
| \time 3/4 \times 4/6 {d( g_0 d')_0 d( g, d)}
\times 4/6 {c( g' d') d( g, c,)}
\times 4/6 {es( g d') d( g, es)}
| \time 2/4 \tupletNeutral \times 4/6 {g(^0 d'^0 a')^0 a( d, g,)}
\times 4/6 {g( d' fis') fis( d, g,)}
\set subdivideBeams = ##t
| \time 3/4 c,32(_0 g'_0 d'_0 d') d( d, g, c,)
c( g' d' c') c( d, g, c,)
c( g' d' es') es( d, g, c,)
\unset subdivideBeams
| \time 2/4 \times 4/6 {a'16( g_0 d')_0 d( g, a)}
\times 4/6 {fis( g d') d( g, fis)}
| \time 3/4 \times 4/6 {g(^0 d'^0 a')^0 a( d, g,)}
\times 4/6 {a( d a') a( d, a)}
\times 4/6 {b( d a') a( d, b)}
\set subdivideBeams = ##t
| \time 2/4 c,32(_0 g'_0 d'_0 h') h( d, g, c,)
c( g' d' d') d( d, g, c,)
\unset subdivideBeams
| \times 4/6 {d16( es) f g a h!}
\times 4/6 {c( d) c h a g}
| \times 4/6 {f( g) a h! c d}
\times 4/6 {es( f) es d c h}
| \times 4/6 {a( h!) c d es f}
\times 4/6 {g( a) g f g a}
| \times 4/6 {h!( c) h a g a}
\times 4/6 {h c d es f g}
| \time 5/8 as4.\accent^\markup {\flat} \startTrillSpan r4 \stopTrillSpan
| \time 2/4 \times 4/6 {\repeat unfold 4{<g,, f>16-.\accent} q(\accent <g e>)} <g f>8-.\accent r
| \time 5/8 as''4.\accent^\markup {\flat} \startTrillSpan r4 \stopTrillSpan
| \time 2/4 \times 4/6 {<g,, d>16-.\accent q-.\accent <g es>-.\accent <g d>-.\accent q(\accent <g c,>)}
<g d>8-.\accent r
| \time 5/8 as''4.\accent^\markup {\flat} \startTrillSpan r4 \stopTrillSpan
| \time 2/4 \times 4/6 {<h,, c,>16-.\accent q-. <c c,>-. <h c,> q-. <a! c,>}
\times 4/6 {<d c,>-.\accent q-. <es c,>-. <d c,>-. q-. <c c,>-.}
| \times 4/6 {<f g,>-.\accent q-. <g g,>-. <f g,>-.q-. <es g,>-.}
\times 4/6 {<as g,>-.\accent q-. <b g,>-. <as g,>-. q-. <b g,>-.}
| \times 4/6 {<h! d,>\accent q <g' d,> <g as,> <f as,> q}
\times 4/6 {<es f,> q <d f,> q <c d,> q}
| \times 4/6 {<d d,>\accent q <as' d,,> <as h,!> <g h,> q}
\times 4/6 {<f d,> q <es d,> <es f,> <d f,> q}
| \times 4/6 {<h! d,>\accent q <h'! d,,> <h c,> <as c,> q}
\times 4/6 {<g d,> q <f d,> <es d,> <d d,> <c d,>}
| \times 4/6 {h! as g f es d}
\times 4/6 {c h! as g f es}
| \times 4/6 {d es f es f g}
\times 4/6 {a! g a h! c h}
| \times 4/6 {c d es d es f}
\times 4/6 {g f g a g a}
}
<<
\relative c' {
| \time 4/4 h1~ \startTrillSpan
| h~
| h~
| h~ \stopTrillSpan
| h
} \\
\relative c {
\override Script.outside-staff-priority = 1000
| \voiceTwo <d g, c,>8^\downbow s4. s2^\upbow
| s2.^\downbow s4^\upbow
| s2 s2^\downbow
\revert Script.outside-staff-priority
}
>>
\relative c' {
| \time 3/4 c2.
| \time 2/4 g'2
| \time 3/4 fis4( c2)
| g'2.
| as2( c,4)
| \time 2/4 g'4( fis)
| \time 3/4 c \times 2/3 {d( es c)}
| \time 2/4 d2
}
<<
\relative c {
| \time 3/4 c2.
| \time 2/4 g'2
| \time 3/4 fis4( c2)
| \time 2/4 g'2
} \\
\relative c, {
| c2.
| c2
| c2.
| c2
}
>>
\relative c {
| \time 3/4 b4.( as)
| g( f!)
| \time 4/4
\repeat unfold 2 {
\tupletUp \times 2/3 {es4( f es)} d--( g--)
}
| \time 5/4 \times 2/3 {es( f es)} d4.( es)
}
<<
\relative c {\time 4/4 \times 2/3 {g4( a h!} c d)} \\
\relative c, {c1}
>>
\relative c {
| \times 2/3 {es4 f( g)} a( h!)
| \time 3/4 c2.(
| \time 2/4 g2)
| \time 4/4 \clef tenor \times 2/3 {g'4 a( h)} c( d)
| \times 2/3 {es( f es)} d( es)
| \time 3/4 c2.~
| c
| \clef bass r4 c,,,2~
| c2.~
| c~
| c
| R1*3/4
\bar "|."
}
}
dynamics = {
\override Score.SpacingSpanner.spacing-increment = 1
\tempo "Moderato" 4 = 88 s2.\mp
| \skip 4*23
\h-spacing #2
| s2.\<
\h-spacing #1
| s2.
| s2.\!-\markup {\dynamic mf \italic "cresc."}
\skip 1*2
\h-spacing #2
\skip 1*2
| s1\f
\h-spacing #0.8
| s2.\>
| s
| s2\p
\skip 4*17
| s8-"cresc." s2
\skip 4*5
| s8\< s2
| s8 s2
| s1\!-\markup {\dynamic mf \italic "cresc."}
\skip 1*2
| s1\<
| s2.\!-\markup {\dynamic mf \italic "cresc."}
| \skip 1
| s2.-\markup {\dynamic p \italic "subito"}
| s4 \once \override TextScript.extra-offset = #'(-2 . -1)s2-"cresc"
\skip 2*7
\h-spacing #0.6
| s2.\f
\skip 2
| s1\<
\h-spacing #0.8
| s8\mf s2
\skip 8*25
| s2.\<
| s8 s2
| s8\f s2
\skip 4*5
| s4 s4.\>
| s2.\mf
\skip 4*10
| s2.-"cresc."
\skip 4*10
| s2.\f
\skip 4*28
\h-spacing #0.8
\skip 4*5
| s2.\mf
| s2 s4\mp
\skip 2.
| s2.\p
\skip 8*77
\once \override Hairpin.to-barline = ##f
| s2.\<
| s8\> s2
| s8 s2\!
\skip 8*25
| s8\< s2
\skip 8*22
| s8\f s2
\skip 4*6
\h-spacing #0.7
| s4. s\mf
| \skip 2.
| s2.\mp
\skip 4*23
\h-spacing #2
| s2.-"cresc."
\skip 4*8
\h-spacing #1
| s2.\f
\skip 4*8
| s2.-\markup {\dynamic p \italic "subito"}
\skip 2
| s2.\<
| s2
| s8\mf s2
\skip 8*56
| s2.-"cresc."
\skip 4*18
| s2\<
| s4.\f s4
\skip 8*18
\h-spacing #1.5
| s2-\markup {\dynamic mf \italic "molto cresc."}
\skip 4*10
\h-spacing #1
\skip 4*4
| s1\ff
\skip 1*2
| s1\>
| s
\h-spacing #0.8
| s2.\pp
\skip 4*47
| s1\<
| s
| s2.\>
| s2
| s1\!
| s1\>
| s2.*2
| s2\! s4\ppp
}
%----------------------------------------Partituraufbau----------------------------------------
Noten = \new StaffGroup {
<<
\new Staff = "eins" {
\global
{\einsNoten}
}
\new Dynamics {
\dynamics
}
>>
}
%----------------------------------------Layout----------------------------------------
\score {
\Noten
\layout {
\context {
\Score
%,\override SpacingSpanner.spacing-increment = 2.4
}
}
}
#(set-global-staff-size 15)
%#(set! paper-alist (cons '("custom-size" . (cons (* 200 mm) (* 300 mm))) paper-alist))
\paper{
system-system-spacing #'padding = #3
% top-system-spacing #'minimum-distance = 9
% top-system-spacing #'basic-distance = 8.5
% top-margin = 2
% bottom-margin = 2
%#(set-paper-size "custom-size" 'landscape)
print-page-number = ##t
print-first-page-number = ##t
oddHeaderMarkup = \markup \null
evenHeaderMarkup = \markup \null
oddFooterMarkup = \markup {
\fill-line {
\on-the-fly #print-page-number-check-first
\fromproperty #'page:page-number-string
}
}
evenFooterMarkup = \oddFooterMarkup
}_______________________________________________
lilypond-user mailing list
lilypond-user@gnu.org
https://lists.gnu.org/mailman/listinfo/lilypond-user
