Subject: Re: Lot lilypond-user-fr, Vol 875, Parution 11

From: Sébastien MANEN <[email-masked]>
Date: Sat, 16 Sep 2023 20:36:38 +0200

Bonjour Pierre,

:FacePalm: Mais que je suis bête !

Merci. C'est réglé. Par contre il faut préciser le contexte (Staff) dans 
mon cas.

Et pour la fonction je vais me débrouiller.

Sébastien

Le 16/09/2023 à 18:00, [email-masked] a écrit :
> Envoyez vos messages pour la liste lilypond-user-fr à
> 	[email-masked]
>
> Pour vous (dés)abonner par le web, consultez
> 	https://lists.gnu.org/mailman/listinfo/lilypond-user-fr
>
> ou, par email, envoyez un message avec 'help' dans le corps ou dans le
> sujet à
> 	[email-masked]
>
> Vous pouvez contacter l'administrateur de la liste à l'adresse
> 	[email-masked]
>
> Si vous répondez, n'oubliez pas de changer l'objet du message afin
> qu'il soit plus spécifique que "Re: Contenu du digest de
> lilypond-user-fr..."
>
> Thèmes du jour :
>
>     1. tweak sur MeasureCounter (Sébastien MANEN)
>     2. Re: tweak sur MeasureCounter (Pierre Perol-Schneider)
>
> _______________________________________________
> liste de diffusion lilypond-user-fr
> [email-masked]
> https://lists.gnu.org/mailman/listinfo/lilypond-user-fr

---

From: Jean Abou Samra <[email-masked]>
Date: Sun, 17 Sep 2023 00:24:00 +0200

> Et pour la fonction je vais me débrouiller.

C'est ça que vous cherchez ?

\version "2.24.1"

offsetCounter = \once \override Staff.MeasureCounter.extra-offset = \etc

\layout {
     \context {
         \Staff
         \consists #Measure_counter_engraver
     }
}

musicA = \relative c' {
     \key f \major \time 4/4 \clef bass
     a2 a
     \startMeasureCount a a
     \offsetCounter #'(0 . -2)
     a a
     a a \stopMeasureCount
     a a
}

\score {
     <<
         \new Staff {
             \musicA
         }
}

---

From: Sébastien MANEN <[email-masked]>
Date: Sun, 17 Sep 2023 00:30:49 +0200

J'ai fait un peu plus compliqué pour avoir un petit liseré blanc quand 
ça tombe dans la portée...

countEO = #(define-music-function
     (offset)
     (pair?)
     #{
         \once \override Staff.MeasureCounter.extra-offset = #offset
         \once \override Staff.MeasureCounter.whiteout = #1
         \once \override Staff.MeasureCounter.whiteout-style = #'outline
     #}
)

Mais je pense jamais à cette forme réduite sans le define-music-function...

Sébastien