phds = #3.9
%notation marks
+pizz = ^\markup { "pizz" }
+arco = ^\markup { "arco" }
+pont = ^\markup { \bold \italic "sul pont" }
+tasto = ^\markup { \bold \italic "sul tasto" }
+ord = ^\markup { \bold \italic "ord" }
lsp = \override TextSpanner.bound-details.left.text = \markup { \bold "sul pont" }
rsp = \override TextSpanner.bound-details.right.text = \markup { \bold "sul pont" }
lst = \override TextSpanner.bound-details.left.text = \markup { \bold "sul tasto" }
niente = #(make-dynamic-script (markup (#:normal-text #:abs-fontsize 10 #:bold "n")))
harm = \once \override Staff.NoteHead.style = #'harmonic-mixed
-
-clusStemA = {
- \once \override Stem.length = #11
-}
-
-clusStemB = {
- \once \override NoteHead.X-offset = #4
- \once \override Stem.rotation = #'(-33 0 0)
- \once \override Stem.length = #9.7
- \once \override Stem.extra-offset = #'(2.65 . 0.4)
- \once \override Flag.style = #'no-flag
- \once \override Accidental.extra-offset = #'(4 . -.1)
-}
-
-clusStemC = {
- \once \override NoteHead.X-offset = #4.8
- \once \override Stem.rotation = #'(-37 0 0)
- \once \override Stem.length = #12.5
- \once \override Stem.extra-offset = #'(3.2 . 0.7)
- \once \override Flag.style = #'no-flag
- \once \override Accidental.extra-offset = #'(4.9 . -0.1)
-}
-
-doubleSeparator = \markup {
- \left-column {
- \vcenter \combine
- \beam #2.0 #0.3 #0.5
- \raise #0.7 \beam #2.0 #0.3 #0.5
- }
- \hspace #98
- \right-column {
- \vcenter \combine
- \beam #2.0 #0.3 #0.5
- \raise #0.7 \beam #2.0 #0.3 #0.5
- }
-}
-
-
-buzzSymbol = \markup \path #0.25
-#(let ((x 3/6) (y 2/5))
- `((moveto ,x ,(- y)) (lineto ,(- x) ,(- y))
- (lineto ,x ,y) (lineto ,(- x) ,y)))
-
-applyBuzzSymbol = #(grob-transformer 'stencil
- (lambda (grob orig)
- (let ((dir (ly:grob-property grob 'direction))
- (sten (grob-interpret-markup grob buzzSymbol)))
- (ly:stencil-add orig
- (ly:stencil-translate-axis sten (* 0.1 dir) Y)))))
-
-applyBuzzuSymbol = #(grob-transformer 'stencil
- (lambda (grob orig)
- (let ((dir (ly:grob-property grob 'direction))
- (sten (grob-interpret-markup grob buzzSymbol)))
- (ly:stencil-add orig
- (ly:stencil-translate-axis sten (* 1.6 dir) Y)))))
-
-applyBuzzdSymbol = #(grob-transformer 'stencil
- (lambda (grob orig)
- (let ((dir (ly:grob-property grob 'direction))
- (sten (grob-interpret-markup grob buzzSymbol)))
- (ly:stencil-add orig
- (ly:stencil-translate-axis sten (* 1.6 dir) Y)))))
-
-applyBuzzddSymbol = #(grob-transformer 'stencil
- (lambda (grob orig)
- (let ((dir (ly:grob-property grob 'direction))
- (sten (grob-interpret-markup grob buzzSymbol)))
- (ly:stencil-add orig
- (ly:stencil-translate-axis sten (* 2.1 dir) Y)))))
-
-
-buzz = \tweak Stem.stencil \applyBuzzSymbol \etc
-buzzu = \tweak Stem.stencil \applyBuzzuSymbol \etc
-buzzd = \tweak Stem.stencil \applyBuzzdSymbol \etc
-buzzdd = \tweak Stem.stencil \applyBuzzddSymbol \etc
instrumentName = \markup { violin I }
shortInstrumentName = \markup { "I " }
\override DynamicLineSpanner.staff-padding = \sods
- \override StringNumber.padding = 1
\consists Text_mark_engraver
}
\relative {
\clef treble
\tempo Rubato 2=32
\time 5/4
- \lst \rord aes''8[\2\startTextSpan ges f ees] d4. c8 b4 | %001
- a2\3\stopTextSpan r8 bes'8(\1 \tuplet 3/2 { g4) fis( dis') } | %002
- \harm e2. cis4(\glissando c8) \harm a8~\2 | %003
- \time 2/2 \harm a4 gis2.~ | %004
- \time 3/4 gis8 r8 r4 r4 | %005
- \revert BarLine.allow-span-bar
- \time 2/2 <b,^\2 e,\3>2 r8 <des^\3 f\2>8~ 4\fermata \bar "." | %006
- r8 d8~ d2. | %007
+ aes''8[\2\tasto\p ges f ees] d4.\< c8 b4\mf\> | %001
+ \after 4 \p a2\3\ord r8 bes'8(\1\mp\< \tuplet 3/2 { g4) fis( dis')\mf\> } | %002
+ \harm \after 2 \p e2. cis4(\mf\>\glissando c8) \ace \harm a8~\2\p\startTextSpan | %003
+ \time 2/2 \harm a4 gis2.~\mf\> | %004
+ \time 3/4 gis8\p\stopTextSpan \rit r8\startTextSpan r4 r4 | %005
+ \time 2/2 <b,^\2 e,\3>2->\f\pont r8 <des^\3 f\2>8~\p\ord 4\stopTextSpan\fermata \bar "." | %006
+ r8 d8~\tasto d2. | %007
}
\tempo Rubato 2=32
\time 5/4
R1*5/4 | %001
- \tuplet 3/2 { r4 <cis'' e>2~ } 4~ 8 r8 r4 | %002
- r4 aes'8 g f4 b,8(\glissando bes4) d8( | %003
- \time 2/2 \tuplet 3/2 { fis4) b( f4~ } f8) e8( ees c | %004
- \time 3/4 a) <a g'> <a bes'> <a cis'> d'4~ | %005
+ \tuplet 3/2 { r4 <cis''\3 e^\2>2~\p } 4~ 8 r8 r4 | %002
+ r4 aes'8\mf g f4 b,8(\glissando bes4)\> d8(\p\< | %003
+ \time 2/2 \tuplet 3/2 { fis4) b( f4~\mf } f8) e8(\> ees c | %004
+ \time 3/4 a)\p\< \lord \rsp <a g'>\startTextSpan <a bes'> <a cis'> d'4~\f\stopTextSpan | %005
\override BarLine.allow-span-bar = ##t
- \time 2/2 \tuplet 3/2 { d4 g,2 } r4 bes,4\fermata \bar "." %006
- r8 fis'8 gis8 a8 c8 dis8(\glissando b4) | %007
+ \time 2/2 \tuplet 3/2 { d4 g,2\pizz } r4 bes,4\mp\fermata \bar "." %006
+ r8 fis'8\p\arco\tasto gis8 a8 c8\< dis8(\glissando b4)\mf | %007
}