Il 24/11/2012 03:34, Keith OHara ha scritto:
Federico Bruni <fedelogy <at> gmail.com> writes:
I've updated to 2.16 the following piece of Mutopia:
http://www.mutopiaproject.org/cgibin/piece-info.cgi?id=636
Can anyone review it?
I made one pass through, and made potential-corrections as I went.
(attached) Hopefully you can use a 'diff' program to see the changes.
Thanks Keith!
I see that you've fixed a lot of fingerings, now it makes sense. You
just missed a string number in the second voice of bar 15.
I've also added the right harmonic (fifth fret of third string) in the
last bar:
\harmonicByFret #5 g,4.\3\fermata^"Octav."
The barré formatting is awesome.
\version "2.16.0"
#(define RH rightHandFinger)
% Function contributed by Thomas Morley:
% http://lsr.dsi.unimi.it/LSR/Item?id=857
barre =
#(define-music-function (parser location strg music)(number? ly:music?)
#{
\set TabStaff.minimumFret = $strg
\set TabStaff.restrainOpenStrings = ##t
\once\override TextSpanner #'(bound-details left text) = #(format #f "B ~@r" strg)
\once\override TextSpanner #'font-shape = #'upright
\once\override TextSpanner #'bound-details #'left #'stencil-align-dir-y = #CENTER
\once\override TextSpanner #'style = #'line
\once\override TextSpanner #'bound-details #'right #'text = \markup \draw-line #'(0 . -1)
\once\override TextSpanner #'to-barline = ##t
\once\override TextSpanner #'(bound-details right padding) = #1.5
<>\startTextSpan
$music
<>\stopTextSpan
\unset TabStaff.minimumFret
\unset TabStaff.restrainOpenStrings
#})
\header {
title = "Sicilienne (Op 78)"
composer = "Gabriel Fauré"
copyright = "Domaine Public - Transcription guitare Ludovic Alexandre Morin - revue et doigtée Olivier Flatrès - 20/11/05"
mutopiatitle = "Sicilienne"
mutopiacomposer = "FaureG"
mutopiaopus = "O 78"
mutopiainstrument = "Guitar"
date = "19th Century"
source = "Transcription"
style = "Romantic"
typesetter = "Olivier Flatrs"
maintainer = "Federico Bruni"
lastupdated = \markup {
\simple #(strftime "%x" (localtime (current-time)))
}
footer = "Mutopia-2005/11/25-636"
tagline = \markup {
\override #'(box-padding . 1.0) \override #'(baseline-skip . 2.7)
\box \center-column { \small
\line { Sheet music from \with-url #"http://www.MutopiaProject.org"; \line { \teeny www. MutopiaProject \teeny .org \hspace #0.5 } ⢠\hspace #0.5 \italic Free to download, with the \italic freedom to distribute, modify and perform. }
\line { \small \line { Typeset using \with-url #"http://www.LilyPond.org"; \line { \teeny www. LilyPond \teeny .org } by \typesetter \hspace #-1.0 ⢠Updated by \maintainer on \lastupdated } }
\line { \teeny \line { This sheet music has been placed in the public domain by the typesetter, for details see: \hspace #-0.5 \with-url #"http://creativecommons.org/licenses/publicdomain"; http://creativecommons.org/licenses/publicdomain } } }
}
}
global = {
\set Score.alternativeNumberingStyle = #'numbers
\time 6/8
\key bes \major
}
first = \relative c {
\global
\partial 8 <d\5-3-\RH #2 >8_>
\repeat volta 2 {
%\override StringNumber #'padding = #1.5
<g-\RH #3 >16-> <d\5-3-\RH #2 > <g\4-4-\RH #4 > d\5 \barre3 { <bes'\3-1-\RH #3 >-> <g\4-\RH #2 > <d'-\RH #3 >-> <f,-\RH #1 > <bes-\RH #2 > <d-\RH #3 > <g-\RH #4 >8-> } |
<bes-1-\RH #3 >16-> <d,\3-3-\RH #2 > <g\2-4-\RH #4 > a-> g8\2-> \barre3 { a16-4 c,\3 d c\3 d8-> } |
\barre1 { <d-\RH #3 >8.-> <c-1-\RH #3 >16-> e8-> d8.-> c16-> e8-> } |
<d-2-\RH #3 >16-> <fis,-3-\RH #1 > <a-1-\RH #2 > fis a fis <d'-\RH #4 >8 <a-\RH #3 > <d,\4\open-\RH #2 >-> |
g16-> <d\5-3-\RH #2 > <g\4-\RH #4 > d\5 \barre 3 { <bes'\3-1-\RH #3 >-> g\4 d'-> f, bes d f8\2-> } |
\barre 1 { <aes-4-\RH #4 >16-> <aes,-\RH #2 > <c-\RH #3 > <g'-3-\RH #4 >-> f8-> } <g-2-\RH #4 >16-> g, b g f'8\2-> |
<e\open-\RH #4 >16-> <g,\4-4-\RH #1 > <bes-2-\RH #2 > g <ees'-3-\RH #4 >8-> <d-2-\RH #4 >16-> <fis,-4> <a-1> <fis> <bes-1>8->^\coda |
}
\alternative {
{ <g\3-\RH #3 >8-> <g\4-4-\RH #2 >16 <d\5-\RH #1 > g\4 d\5 <g-\RH #3 >4-> <d\5-\RH #2 >8-> | }
{ g8-> g16\4 d\5 g\4 d\5 g4-> r8 | }
}
\repeat volta 2 {
\barre 5 { <b'-4-\RH #4 >16-> <g,-\RH #1 > <d'-3-\RH #2 > <g-4-\RH #3 >-> <a-1-\RH #4 >8-> <bes-3-\RH #3 >16-> <g,-\RH #1 > <c-\RH #2 > <c'-4-\RH #3 >-> <cis-4-\RH #4 >8-> } |
\barre 8 { <d-3-\RH #4 >16-> <ees,-\RH #2 > <a-3-\RH #3 > <ees-\RH #2 >-> <f-\RH #3 >8-> } \barre 1 { <g-4-\RH #4 >16-> <f,-3-\RH #1 > <aes-\RH #1 > <f-3-\RH #1 > <d'-4-\RH #3 >8-> } |
<bes-4-\RH #3 >16-> <bes,-2-\RH #1 > <d-\RH #1 > <g-\RH #3 >-> <a-2-\RH #4 >8-> \barre 1 { <bes-4-\RH #3 >16-> <ees,-\RH #1 > <bes'-\RH #2 > <c-\RH #3 >-> <cis-2-\RH #4 >8-> } |
<d-2-\RH #3 >16-> <fis,-3-\RH #1 > <a-1-\RH #2 > <e'\open-\RH #3 >-> <fis-1-\RH #4 >8-> \barre 3 <g-\RH #4 d-\RH #3 bes-\RH #2 >4-> r8 |
}
\break
\repeat volta 2 {
<g\2-4-\RH #4 >16-> <a,-1\4-\RH #2 > <ees'-3\3-\RH #3 > a,\4 ees'8\3 \barre 3 { <d-1-\RH #4 >16 <g,-4> <bes-1> g bes8 } |
\barre 6 { <bes'-1-\RH #4 >16-> <bes,-2-\RH #1 > <des-1-\RH #2 > <a'-4-\RH #3 >-> <g-3-\RH #2 >8-> } \barre 5 { <a-1-\RH #4 >16-> <a,-2-\RH #1 > <c-1-\RH #2 > <g'-4-\RH #3 >-> <fis-3-\RH #2 >8-> } |
<g\2-4-\RH #4 >16-> <a,\4-1-\RH #2 > <ees'\3-3-\RH #3 > a,\4 ees'8\3 \barre 3 { <d-1-\RH #4 >16-> <g,-4> <bes-1> g bes8 } |
}
\alternative {
{ <bes-4-\RH #3 >16-> <ees,-1-\RH #2 > <a-2-\RH #3 > <ees-\RH #2 > <bes'-4-\RH #3 >8-> \barre 2 { <a-1-\RH #3 >8-> <fis-3-\RH #1 >16 <a-1-\RH #1 > <d-2-\RH #3 > <fis-1-\RH #4 > } | }
{ <bes,-4-\RH # 3 >16-> <ees,-1-\RH #2 > <a-2-\RH #3 > <ees-\RH #2 > <bes'-4-\RH #3 >8-> <a-2 d,>4.->^\fermata | }
}
\bar "||" \break
%% Coda
\mark \markup { \musicglyph #"scripts.coda" }
\barre 3 { <g-4-\RH #2 >16-> <d-3-\RH #1 > <g-\RH #2 > <bes-\RH #3 > <d-\RH #2 > <g-\RH #3 > } \harmonicByFret #5 g,4.\3\fermata^"Octav." |
\bar "|."
\stopStaff s1
}
second = \relative c {
\global
\set stringNumberOrientations = #'(down)
\partial 8 s8 |
\repeat volta 2 {
<g-\RH #1 >4. f |
e'4.\5 f\4 |
<bes,\5-\RH #1 >16 <f'-2-\RH #1 > <bes-3-\RH #2 >8~ bes bes,16 f' bes8~ bes |
<d,,-\RH #1 >4.~ d |
g4. f |
<ees-\RH #1 >4. <d-\RH #1 > |
c'4. d, |
}
\alternative {
{ <g-\RH #1 >4. s | }
{ <g-\RH #1 >4. s | }
}
\repeat volta 2 {
<e'\5_2-\RH #1 >4. <ees\5-2-\RH #1 > |
<f-\RH #1 >4. <bes,-\RH #1 > |
<ees,-1-\RH #1 >4. <c'-3-\RH #1 > |
<d,-\RH #1 >4. <g_3-\RH #1 >4 r8 |
}
\repeat volta 2 {
<f'\5_2-\RH #1 >4. <g,_3-\RH #1 > |
<ees'-\RH #1 >4. <d-\RH #1 > |
<f\5_2-\RH #1 >4. <g,_3 -\RH #1 > |
}
\alternative {
{ <c_3-\RH #1 >4. <d_4-\RH #1 > | }
{ <c_3-\RH #1 >4. <a d,>^" D.C. al Coda" | }
}
<g_2-\RH #1 >4. <g -\RH #1 > |
}
music = {
\new StaffGroup <<
\new Staff = "guitar" \with {
midiInstrument = "acoustic guitar (nylon)"
fingeringOrientations = #'(left)
%\override Fingering #'font-size = #-8
% Avoid collision between stems and string numbers
%\override StringNumber #'self-alignment-X = #RIGHT
\override StringNumber #'add-stem-support = ##t
\override Fingering #'add-stem-support = ##t
\override Fingering #'whiteout = ##t
\override StringNumber #'stencil = ##f
\override StrokeFinger #'font-size = #-2
\override StrokeFinger #'whiteout = ##t
}
<<
\context Voice = "first voice" { \clef "G_8" \voiceOne \first }
\context Voice = "second voice" { \clef "G_8" \voiceTwo \second }
>>
\new TabStaff = "tab" \with {
stringTunings = #guitar-drop-d-tuning
}
<<
\context TabVoice = "tab first voice" { \voiceOne \first }
\context TabVoice = "tab second voice" {\voiceTwo \second }
>>
>>
}
\score {
\music
\layout{}
}
\score {
\unfoldRepeats
\music
\midi {
\tempo 4 = 100
}
}
_______________________________________________
lilypond-user mailing list
lilypond-user@gnu.org
https://lists.gnu.org/mailman/listinfo/lilypond-user
