markup superposé à la barre de début de système

Bonjour,

Je sais mettre un markup dans une portée, mais pas à cheval sur le début d'un système...Une idée pour lever cette interdiction ?

Voici mon exemple (le bloc de couleur refuse de dépasser la barre de mesure de départ de système):

\version "2.20.0"

floatMarkup = #(define-music-function (parser location posx posy) (number? number?)
                 #{
                   \once \override TextScript.outside-staff-priority = ##f
                   \once \override TextScript.X-offset = $posx
                   \once \override TextScript.Y-offset = $posy
                 #})

\new ChoirStaff \with {\omit Clef \omit TimeSignature }
<<
{ \floatMarkup #'-5 #'1.1 c''1_\markup {
\with-color #red \filled-box #'(0 . 2) #'(-3.2 . 1) #0.1
}}
{c''1 }

···

Bonjour,

en tatonnant, bidouille quoi

%---------------------

floatMarkup = #(define-music-function (parser location posx posy) (number?
number?)
                 #{
%score plutôt que staff
                   \once \override TextScript.outside-score-priority = ##f
                   \once \override TextScript.X-offset = $posx
                   \once \override TextScript.Y-offset = $posy
                 #})

\new ChoirStaff \with {\omit Clef \omit TimeSignature }
<<
{ \floatMarkup #'-5 #'1.1 c''1_\markup {
%agrandissement du filled-box
\with-color #red \filled-box #'(0 . 2) #'(1 . -12) #0.1
}}
{c''1 }

%---------------------

···

-----
♫artial♪
--
Sent from: http://lilypond-french-users.1298960.n2.nabble.com/

Bonjour. J'ai pas testé mais pour Lilypond 2.20.0, il n e devrait pas y avoir les paramètres parser et location, me semble t-il.
floatMarkup = #(define-music-function (posx posy) (number? number?)
    ...

···

Le 2020-10-30 08:04, ****@**** a écrit :

\version "2.20.0"

floatMarkup = #(define-music-function (parser location posx posy)
(number? number?)
                 #{

--
Gilles

Tiens, c'est étrange cela ne fonctionne pas chez moi : propriété "outside-score-priority" non trouvée.

----- Mail original -----

···

De: "martial" <****@****>
À: lilypond-user-fr@gnu.org
Envoyé: Vendredi 30 Octobre 2020 10:27:52
Objet: Re: markup superposé à la barre de début de système

Bonjour,

en tatonnant, bidouille quoi

%---------------------

floatMarkup = #(define-music-function (parser location posx posy) (number?
number?)
                 #{
%score plutôt que staff
                   \once \override TextScript.outside-score-priority = ##f
                   \once \override TextScript.X-offset = $posx
                   \once \override TextScript.Y-offset = $posy
                 #})

\new ChoirStaff \with {\omit Clef \omit TimeSignature }
<<
{ \floatMarkup #'-5 #'1.1 c''1_\markup {
%agrandissement du filled-box
\with-color #red \filled-box #'(0 . 2) #'(1 . -12) #0.1
}}
{c''1 }

%---------------------

-----
♫artial♪
--
Sent from: http://lilypond-french-users.1298960.n2.nabble.com/

Gros bidouillage
pour 3 systèmes

%----------------

\version "2.20.0"
boxRed =\markup {
\with-color #red \filled-box #'(0 . 2) #'(1 . -12) #0.1
}

floatMarkup = #(define-music-function (parser location posx posy) (number?
number?)
                 #{
                   %\once \override TextScript.outside-score-priority = ##t
                   \once \override TextScript.X-offset = $posx
                   \once \override TextScript.Y-offset = $posy
                 #})

\new ChoirStaff \with { \omit Clef \omit TimeSignature }
<<
  {
    \floatMarkup #'-12 #'1.0 c''1_\boxRed \break
    \floatMarkup #'-25 #'1.0 c''_\boxRed \break
    \floatMarkup #'-25 #'1.0 c''_\boxRed \break
  }
  {
    c''1 \break
    c'' \break
    c'' \break
  }

%------------------------

···

-----
♫artial♪
--
Sent from: http://lilypond-french-users.1298960.n2.nabble.com/

"Bonjour. J'ai pas testé mais pour Lilypond 2.20.0, il n e devrait pas y
avoir les paramètres parser et location, me semble t-il.
floatMarkup = #(define-music-function (posx posy) (number? number?)
    ...
"

Si cela fonctionne, mais on voit toujours une partie de la barre de début de système :

http://lilybin.com/bhwrpy/1

Et en changeant le layer ?
C.f. http://lilybin.com/bhwrpy/2
Cordialement,
Pierre

···

Le ven. 30 oct. 2020 à 11:14, <****@****> a écrit :

"Bonjour. J'ai pas testé mais pour Lilypond 2.20.0, il n e devrait pas y
avoir les paramètres parser et location, me semble t-il.
floatMarkup = #(define-music-function (posx posy) (number? number?)
...
"

Si cela fonctionne, mais on voit toujours une partie de la barre de début de système :

http://lilybin.com/bhwrpy/1

Oui c'est beaucoup plus élégant !
Merci !

----- Mail original -----

···

De: "Pierre Perol-Schneider" <****@****>
À: "JoëlG" <****@****>
Cc: "Gilles Thibault" <****@****>, "lilypond-user-fr" <lilypond-user-fr@gnu.org>, "lilypond-user-fr" <lilypond-user-fr-bounces+gillesth=****@****>
Envoyé: Vendredi 30 Octobre 2020 11:22:06
Objet: Re: markup superposé à la barre de début de système

Et en changeant le layer ?
C.f. http://lilybin.com/bhwrpy/2
Cordialement,
Pierre

Le ven. 30 oct. 2020 à 11:14, < ****@**** > a écrit :

"Bonjour. J'ai pas testé mais pour Lilypond 2.20.0, il n e devrait pas y
avoir les paramètres parser et location, me semble t-il.
floatMarkup = #(define-music-function (posx posy) (number? number?)
...
"

Si cela fonctionne, mais on voit toujours une partie de la barre de début de système :

http://lilybin.com/bhwrpy/1

Tiens, c'est étrange cela ne fonctionne pas chez moi : propriété
"outside-score-priority" non trouvée.

Je suis version en 2.21.7

j'ai laissé 2.20.0 par flemme

···

-----
♫artial♪
--
Sent from: http://lilypond-french-users.1298960.n2.nabble.com/

Oui c'est beaucoup plus élégant !

Sinon j’avais quelque chose du genre :

%%%%%

highlightSystem =
#(define-music-function (color width) (color? number?)
   (define (combine grob)
     (let* ((stil (ly:system-start-delimiter::print grob))
            (yext (ly:stencil-extent stil Y))
            (xext (ly:stencil-extent stil X))
            (highlight (stencil-with-color
                        (ly:round-filled-box (cons 0 width) yext 0)
                        color)))
       (ly:make-stencil
        (ly:stencil-expr
         (ly:stencil-combine-at-edge
          stil X RIGHT highlight 0))
        xext yext)))
   #{
     \once \override Score.SystemStartBar.stencil = ##f
     \once \override Score.SystemStartBrace.stencil = $combine
     \once \override Score.SystemStartBracket.stencil = $combine
     \once \override Score.SystemStartSquare.stencil = $combine
   #})

\new ChoirStaff \with {\omit Clef \omit TimeSignature }
<<
  {
    \highlightSystem #red #2 c''1
  }
  {c''1 }

%%%%

V.

···

On 10/30/20, ****@**** <****@****> wrote:

Alors là j'en reste baba...
Chapeau bas et 1000 mercis !

----- Mail original -----

···

De: "Valentin Villenave" <****@****>
À: "joel gauvrit" <****@****>
Cc: "Pierre Perol-Schneider" <****@****>, "lilypond-user-fr" <lilypond-user-fr@gnu.org>, "lilypond-user-fr" <lilypond-user-fr-bounces+gillesth=****@****>
Envoyé: Vendredi 30 Octobre 2020 13:58:47
Objet: Re: markup superposé à la barre de début de système

On 10/30/20, ****@**** <****@****> wrote:

Oui c'est beaucoup plus élégant !

Sinon j’avais quelque chose du genre :

%%%%%

highlightSystem =
#(define-music-function (color width) (color? number?)
   (define (combine grob)
     (let* ((stil (ly:system-start-delimiter::print grob))
            (yext (ly:stencil-extent stil Y))
            (xext (ly:stencil-extent stil X))
            (highlight (stencil-with-color
                        (ly:round-filled-box (cons 0 width) yext 0)
                        color)))
       (ly:make-stencil
        (ly:stencil-expr
         (ly:stencil-combine-at-edge
          stil X RIGHT highlight 0))
        xext yext)))
   #{
     \once \override Score.SystemStartBar.stencil = ##f
     \once \override Score.SystemStartBrace.stencil = $combine
     \once \override Score.SystemStartBracket.stencil = $combine
     \once \override Score.SystemStartSquare.stencil = $combine
   #})

\new ChoirStaff \with {\omit Clef \omit TimeSignature }
<<
  {
    \highlightSystem #red #2 c''1
  }
  {c''1 }

%%%%

V.

top !

···

-----
♫artial♪
--
Sent from: http://lilypond-french-users.1298960.n2.nabble.com/