[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: Fonction conditionnelle pour insérer une page blanche
From: |
Eulogia |
Subject: |
Re: Fonction conditionnelle pour insérer une page blanche |
Date: |
Fri, 9 Dec 2022 14:45:33 +0100 |
Bonjour.
Et pour éviter le \bookpart et avoir une structure conditionnelle, j'en suis
une fois de plus revenu au parser-include-string, j'ai enregistré les deux
variantes de \bookpart dans deux fichiers ily, et je les appelle avec
\CreerPageVide "Gauche"
\CreerPageVide "Droite"
CreerPageVide =
#(define-void-function (parser location Type)(string?)
(
cond
((string=? Type "Gauche") (ly:parser-include-string (format #f "\\include
\"~A\"\n" "Modeles/Recueil/PageVideGauche.ily" )))
((string=? Type "Droite") (ly:parser-include-string (format #f "\\include
\"~A\"\n" "Modeles/Recueil/PageVideDroite.ily" )))
)
)
En tout cas grand merci, cette fonction me simplifie beaucoup la gestion de mes
recueils.
Au plaisir,
ben
> Le 8 déc. 2022 à 18:16, Eulogia <eulogia@eulogia.ch> a écrit :
>
> Argh, j'ai oublié de remettre le \bookpart lors du lancement de la variable,
> d'où mon problème…
>
> Cette fois cela fonctionne, et il suffit d'une seule evenHeaderMarkup = ""
> pour cacher les numéro de page.
>
> Merci!
>
>
> CreerPageVideConditionnelle =
> \bookpart {
> \paper {
> evenHeaderMarkup = ""
> #(use-modules (ice-9 match))
> page-breaking =
> #(lambda (paper-book)
> (match-let* (((page) (ly:optimal-breaking paper-book))
> (num (ly:prob-property page 'page-number)))
> (if (even? num)
> (list page)
> '())))
> }
> \markup ""
> }
>
> \bookpart { \CreerPageVideConditionnelle }
>
>
> Au plaisir,
>
> ben
>
>
>
>> Le 8 déc. 2022 à 14:03, Jean Abou Samra <jean@abou-samra.fr> a écrit :
>>
>> Le 08/12/2022 à 14:00, Jean Abou Samra a écrit :
>>> oddHeaderMarkup = ""
>>> oddFooterMarkup = ""
>>
>>
>> Oups, pour correspondre à votre code, la première ligne devrait être «
>> evenFooterMarkup = "" » et pas « oddHeaderMarkup = "" ».
>>
>