lilypond-user-fr
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: Visibilité des «+»


From: Pierre Perol-Schneider
Subject: Re: Visibilité des «+»
Date: Mon, 16 Feb 2015 16:20:37 +0100

Bonjour Bernard,

Le 16 février 2015 14:26, Bernard Meylan <address@hidden> a écrit :
Bonjour à tous,

je cherche à augmenter la visibilité des «+» utilisés dans des motets
français; non pas en augmentant leur taille de fonte, mais en les
«grassifiant» ou épaississant.

Le code pour obtenir le signe se trouve dans un fichier concocté par notre
ami Nicolas:

plus =
#(make-music 'HeadOrnamentationEvent
   'shift-when-on-line #t
   'left-text #{ \markup \fontsize #-3 \musicglyph #"scripts.stopped" #})

J'ai introduit un \bold après le \fontsize pensant que ça devrait suffire...
des clous!

Non, ça ne peut marcher puisqu'il n'existe pas de glyphes '\bold'

têtu, je remplace la dernière ligne par celle-ci:

'left-text #{ \markup { \override #'(font-name . "Garamond Premier Pro
Bold") \fontsize #1 "+" }})

mais rien à fiche, ça ne marche pas...

Avant de revenir à la bonne vieille plume, papier et pigeon voyageur, qqun
aurait-il un bout de solution?

Deux propositions :
- Une en superposant le glyphe avec un léger décalage.
- Une en redessinant le glyphe.

Soit :

plus =
#(make-music 'HeadOrnamentationEvent
   'shift-when-on-line #t
   'left-text #{ \markup \fontsize #-3 \musicglyph #"scripts.stopped" #})


plusBold =
#(make-music 'HeadOrnamentationEvent
   'shift-when-on-line #t
   'left-text #{
            \markup\concat\fontsize #-3 {
              \musicglyph #"scripts.stopped"
              \hspace #-.84
              \raise #.03 \musicglyph #"scripts.stopped"
              \hspace #.1
            }
         #})

plusBoldAlter =
#(make-music 'HeadOrnamentationEvent
   'shift-when-on-line #t
   'left-text #{
            \markup\concat {
              \override #'(thickness . 2.6)
              \draw-line #'(-.6 . 0)
              \hspace #-.55
              \raise #.29
              \override #'(thickness . 2.6)
              \draw-line #'(0 . -.6)
              \hspace #-.2
            }
         #})

%% tests :

{
  c''\plus c'' \plusBold c'' \plusBoldAlter
}



Cordialement,
Pierre

 


reply via email to

[Prev in Thread] Current Thread [Next in Thread]