|
From: | Didier Griffaut |
Subject: | Re: grille d'accords 100% Lilypond |
Date: | Tue, 13 Mar 2018 13:02:24 +0100 |
User-agent: | Mozilla/5.0 (X11; Linux x86_64; rv:52.0) Gecko/20100101 Thunderbird/52.6.0 |
Malheureusement, ce code ne fonctionne pas chez moi :( Analyse... Interprétation en cours de la musique...[8] Pré-traitement des éléments graphiques.../usr/share/lilypond/2.18.2/scm/define-markup-commands.scm:950:59: In procedure car in _expression_ (car x): /usr/share/lilypond/2.18.2/scm/define-markup-commands.scm:950:59: Wrong type (expecting pair): largeurs Arrêté avec le code de retour 1 Le 11/03/2018 18:31, NOreply
<address@hidden> a écrit :
\version "2.18.2" \paper { system-system-spacing.basic-distance = #20 } gridPath = \markup \with-dimensions #'(0 . 0) #'(-4.3 . 2) \path #0.1 #'((moveto 0 -15.1) (rlineto 26.5 9.9) ) coinPath = \markup \with-dimensions #'(0 . 0) #'(-4.3 . 2) \path #0.1 #'((moveto 12.5 -10) (rlineto 14.5 -5.1) (moveto 12.5 -10) ; on peut remplacer par lineto pour ajuster les largeurs de cellules (rlineto 14.4 4.8) ) %%%%%%%%%%%%%%%%%%%%%%%%%% "\\/" = #(define-music-function (parser location mus1 mus2) ( ly:music? ly:music? ) #{ \mark \markup { \gridPath } \once \override ChordName.extra-offset = #'(1 . .5 ) $mus1 \once \override ChordName.extra-offset = #'(3 . -3 ) $mus2 #}) v = #(define-music-function (parser location mus1 mus2 ) ( ly:music? ly:music? ) #{ \mark \markup { \coinPath } \once \override ChordName.extra-offset = #'(2 . -1 ) $mus1 \once \override ChordName.extra-offset = #'(-2 . -1 ) $mus2 #}) %%%%%%%%%%%%%%%%%%%%%%%%%%%% \new ChordNames \with { \override BarLine.bar-extent = #'(-5 . 5) \consists "Bar_engraver" \consists "Staff_symbol_engraver" \consists "Percent_repeat_engraver" } \chordmode { \omit BarNumber \override ChordNames.ChordName.extra-offset = #'(10 . -1 ) \override ChordNames.StaffSymbol.line-positions = #'( -10 10 ) \bar ".|:" bes1:7 \/ c2 d e1 \v f2. c4 \break \repeat percent 2 {e1} \v c2. d4 \noBreak c1 f1:maj7 f:7 c e \bar ":|." } \layout { indent = 0 ragged-right = ##f ragged-last = ##f \context { \Score \omit BarNumber \override SpacingSpanner.strict-note-spacing = ##t proportionalNotationDuration = #(ly:make-moment 1/16) } } |
[Prev in Thread] | Current Thread | [Next in Thread] |