RE: nom des variables utilisant des chiffres ?

[daniel.bernair]

Merci par la réponse Valentin. Tous les tags (placés maintenant en commentaire 
pour le score) c'était avant d'avoir envoyé ma demande initiale. Cela 
fonctionne bien. J'ai ensuite reçu ta réponse que j'ai trouvée précieuse et 
voulu essayer. 
J'envoie tous mes fichiers sur votre adresse , pas au forum, cela ne passera 
jamais. 
Autre question : je reçois systématiquement deux fois vos réponses.
Bien amicalement, 
Daniel Bernair
-----Message d'origine-----
De : address@hidden <address@hidden> De la part de Valentin Villenave
Envoyé : dimanche 10 novembre 2019 12:22
À : address@hidden
Cc : Pierre Perol-Schneider <address@hidden>; lilypond-user-fr <address@hidden>
Objet : Re: nom des variables utilisant des chiffres ?

On 11/10/19, address@hidden <address@hidden> wrote:
> J'ai essayé \garderNuances, \enleverNuances , placés avant le premier 
> << , après le premier << , devant ScoreAPiccolo, après \scoreAPiccolo 
> , \enleverNuances et \squelinst entre { } ou << >> rien à faire. Le 
> nom des fonctions \enleverNuances et \garderNuances sont reconnus.

À ce stade il vaudrait peut-être mieux poster un fichier entier, ou en tout cas 
un bout de code compilable. (Je trouve notamment étrange d’avoir besoin 
d’utiliser autant de tags différents, il y a peut-être moyen de faire plus 
simple.)

> J'ai peut-être compris à l'enevers garder et enlever, mais rien à faire.

À toutes fins utiles, voici comment je rédigerais la fonction garderNuances :

%%%%

#(define (dynamic? x)
   (let ((name (ly:music-property x 'name)))
     (or
      (eq? name 'DynamicEvent)
      (eq? name 'AbsoluteDynamicEvent)
      (eq? name 'CrescendoEvent)
      (eq? name 'DecrescendoEvent)
      (eq? name 'SpanDynamicEvent))))

garderNuances =
#(define-music-function (m) (ly:music?)
   (music-filter
    (lambda (x)
      (let ((tags (ly:music-property x 'tags))
            (dir (ly:music-property x 'direction)))
        (not (and
              (dynamic? x)
              (not (memq 'garder tags))
              (null? dir)))))
    m))


enleverNuances =
#(define-music-function (m) (ly:music?)
   (music-filter
    (lambda (x)
      (let ((tags (ly:music-property x 'tags))
            (dir (ly:music-property x 'direction)))
        (not (and
              (dynamic? x)
              (not (memq 'ici tags))
              (null? dir)))))
    m))


garderNuances =
#(define-music-function (m) (ly:music?)
   (music-filter
    (lambda (x)
      (let ((tags (ly:music-property x 'tags))
            (dir (ly:music-property x 'direction)))
        (not (and
              (dynamic? x)
              (or (memq 'ici tags)
                  (not (null? dir)))))))
    m))


musique = { c'1\< c'\f c'_\pp c'\fff c' \tag #'ici \sfz }

{
  \enleverNuances \musique
}

{
  \garderNuances \musique
}

%%%%

V.


This email has been scanned by BullGuard antivirus protection.
For more info visit www.bullguard.com