LEFT | RIGHT |
1 \version "2.17.5" | 1 \version "2.17.6" |
2 | 2 |
3 #(set-global-staff-size 22.45) | 3 #(set-global-staff-size 22.45) |
4 | 4 |
5 #(define (glissando::calc-extra-dy grob) | 5 #(define (glissando::calc-extra-dy grob) |
6 (let* ((original (ly:grob-original grob)) | 6 (let* ((original (ly:grob-original grob)) |
7 (left-bound (ly:spanner-bound original LEFT)) | 7 (left-bound (ly:spanner-bound original LEFT)) |
8 (right-bound (ly:spanner-bound original RIGHT)) | 8 (right-bound (ly:spanner-bound original RIGHT)) |
9 (left-pitch (ly:event-property (event-cause left-bound) 'pitch)) | 9 (left-pitch (ly:event-property (event-cause left-bound) 'pitch)) |
10 (right-pitch (ly:event-property (event-cause right-bound) 'pitch))) | 10 (right-pitch (ly:event-property (event-cause right-bound) 'pitch))) |
11 | 11 |
(...skipping 28 matching lines...) Expand all Loading... |
40 s2 s8 < e'-3 >4. ~ | 40 s2 s8 < e'-3 >4. ~ |
41 e4 \hideNotes \grace { b8 \glissando s4 } \unHideNotes < e-2 >4\5 e,2 ~ | 41 e4 \hideNotes \grace { b8 \glissando s4 } \unHideNotes < e-2 >4\5 e,2 ~ |
42 e2 < e'\6\harmonic > | 42 e2 < e'\6\harmonic > |
43 } | 43 } |
44 | 44 |
45 \score { | 45 \score { |
46 \new StaffGroup << | 46 \new StaffGroup << |
47 \new Staff = "guitar" << | 47 \new Staff = "guitar" << |
48 \context Voice = "upper guitar" { | 48 \context Voice = "upper guitar" { |
49 \clef "G_8" \voiceOne | 49 \clef "G_8" \voiceOne |
50 \override Glissando gap = #0.5 | 50 \override Glissando.gap = #0.5 |
51 \override Glissando extra-offset = #'(-0.5 . 0) | 51 \override Glissando.extra-offset = #'(-0.5 . 0) |
52 \override Glissando springs-and-rods = #ly:spanner::set-spacing-rods | 52 \override Glissando.springs-and-rods = #ly:spanner::set-spacing-rods |
53 \override Glissando minimum-length = #4 | 53 \override Glissando.minimum-length = #4 |
54 \override Glissando extra-dy = #glissando::calc-extra-dy | 54 \override Glissando.extra-dy = #glissando::calc-extra-dy |
55 \upper | 55 \upper |
56 } | 56 } |
57 \context Voice = "lower guitar" { | 57 \context Voice = "lower guitar" { |
58 \clef "G_8" \voiceTwo | 58 \clef "G_8" \voiceTwo |
59 \override Glissando bound-details.right.padding = #1 | 59 \override Glissando.bound-details.right.padding = #1 |
60 \override Glissando bound-details.left.padding = #0.2 | 60 \override Glissando.bound-details.left.padding = #0.2 |
61 \lower | 61 \lower |
62 } | 62 } |
63 >> | 63 >> |
64 \new TabStaff = "tab" << | 64 \new TabStaff = "tab" << |
65 \context TabVoice = "upper tab" { \clef "moderntab" \voiceOne \upper } | 65 \context TabVoice = "upper tab" { \clef "moderntab" \voiceOne \upper } |
66 \context TabVoice = "lower tab" { \clef "moderntab" \voiceTwo \lower } | 66 \context TabVoice = "lower tab" { \clef "moderntab" \voiceTwo \lower } |
67 >> | 67 >> |
68 >> | 68 >> |
69 | 69 |
70 \layout { | 70 \layout { |
71 \context { | 71 \context { |
72 \Staff | 72 \Staff |
73 \override StringNumber transparent = ##t | 73 \override StringNumber.transparent = ##t |
74 } | 74 } |
75 \context { | 75 \context { |
76 \TabStaff | 76 \TabStaff |
77 \revert Arpeggio stencil | 77 \revert Arpeggio.stencil |
78 } | 78 } |
79 } | 79 } |
80 } | 80 } |
LEFT | RIGHT |