|
From: | Remy CLAVERIE |
Subject: | tags et CueDuring [Le RETOUR...] |
Date: | Tue, 15 Nov 2016 07:00:34 +0100 (CET) |
Patatra, ça me marche pas complètement...
Bonjour à tous,
Pour mémoire, je cherche à poser des Lyrics sur des notes insérées avec cueDuring. Il y a sur le net, plusieurs discussions sur ce sujet et même un ou deux snippets.
Olivier m'avait bien aidé et la solution qu'il a proposé fonctionne bien, mais seulement avec la première insertion. Le code suivant donne un exemple de ce que je souhaite faire : poser des Lyrics sur toutes les cue notes.
%% http://lsr.di.unimi.it/LSR/Item?id=388
\version "2.16.2"
% set the cue instrument name and clef
setClefCue = #(define-music-function (parser location instr clef) (string? string?)
#{
\once \override Staff.Clef #'font-size = #-3 \clef $clef
\set Voice.instrumentCueName = $instr
#} )
% generate a cue music section with instrument names and clef changes
cleffedCueDuring = #(define-music-function (parser location cuevoice direction instrcue clefcue instr clefinstr cuemusic) (string? number? string? string? string? string? ly:music?)
#{
\tag #'cued { \cueDuring #cuevoice #direction { \setClefCue #instrcue #clefcue $cuemusic \setClefCue #instr #clefinstr } }
\tag #'uncued $cuemusic
#}
)
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\markup\vspace #2
% the voice, where cue notes are inserted:
Solo = \relative c'' {
c2 c |
\cleffedCueDuring #"vIQuote" #UP #"" #"treble" #"" #"treble" { R1*2}
c2 c \bar"||"
\clef "bass"
c,,2 c |
\cleffedCueDuring #"vIQuote" #UP #"" #"treble" #"" #"bass" { R1*2 }
c2 c |
}
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% the voice to be quoted
vI = \relative c'' { \clef "treble" e2 f | f f | g f | f f | f f | f f | f f | f f | }
\addQuote vIQuote \new Voice = "cue" { \vI }
vI_lyrics = \lyricmode { \set stanza = "Cantus." Al -- le -- lu -- ja, A -- men, A -- men, A -- men, }
% Solo score with cue notes:
\score {
<<
\new Staff = "staff" {
\new Voice { \keepWithTag #'cued \Solo }
}
\new Lyrics \with { alignAboveContext = "staff" } \lyricsto "cue" { \vI_lyrics }
>>
\header { piece="Solo score with cue notes" }
}
% full score with cue notes removed:
\score {
<<
\new Staff \keepWithTag #'uncued \Solo
\new Staff \keepWithTag #'uncued \vI
>>
\header { piece="Full score with cue notes removed"}
}
\layout {
\context {
\Score % set the font of the instrument names to a smaller size:
%\override InstrumentSwitch #'font-size = #-3
\override LyricText #'font-size = #-3
\override StanzaNumber #'font-size = #-3
}
}
L'un de vous a t-il une idée ? Est-ce que cela est possible ?
Merci
Rémy
> Message du 30/10/16 08:46
> De : "Remy CLAVERIE" <address@hidden>
> A : "Olivier Miakinen" <address@hidden>, "Mailing list Lilypond" <address@hidden>
> Copie à :
> Objet : re: Eurêka [Re: tags et CueDuring]
>
>> Merci Olivier d'avoir passé du temps sur ce Pb.
> Je vais essayer ta solution.
>
> Bon WE
>
> Rémy
>
>
>
>
>
> Message du 25/10/16 10:56
> De : "Olivier Miakinen" <address@hidden>
> A : "Mailing list Lilypond" <address@hidden>
> Copie à :
> Objet : Eurêka [Re: tags et CueDuring]
>
> Je suis parti du « snippet » que j'ai modifié petit à petit jusqu'à ce
> que ça ne fonctionne plus, et j'ai fini par trouver où ça coince.
>
>
> Le 24/10/2016 09:22, Remy CLAVERIE a écrit :
> >
> > [...]
> >
> > \addQuote SmallCantus \new Voice = "CueCantus" { \Cantus }
> >
> > [...]
> >
> > \lyricsto "CueCantus" { Al -- le -- lu -- ia }
>
> Remplace à ces deux endroits "CueCantus" par "cue", et miraculeusement
> ça se met à fonctionner.
>
>
> Pire que ça : ne remplace que le second. Donc tu laisses :
>
> \addQuote SmallCantus \new Voice = "CueCantus" { \Cantus }
>
> Mais tu mets :
>
> \lyricsto "cue" { Al -- le -- lu -- ia }
>
>
> Quant à savoir si c'est un bug...
>
> _______________________________________________
> liste de diffusion lilypond-user-fr
> address@hidden
> https://lists.gnu.org/mailman/listinfo/lilypond-user-fr
>
_______________________________________________
liste de diffusion lilypond-user-fr
address@hidden
https://lists.gnu.org/mailman/listinfo/lilypond-user-fr
[Prev in Thread] | Current Thread | [Next in Thread] |