|
From: | Christophe Pochon |
Subject: | Re: Faire apparaître le nom d'un système en cours de pièce |
Date: | Wed, 25 Mar 2015 07:37:21 +0100 |
> | portée 1
>
> R |
> U |
> E | portée 2
> O |
> H |
> C | portée 3
>
pour écrire un nom d'instrument de haut en bas, en pouvant régler l'écartement
entre les caractères, j'utilise la fonction suivante :
%%%%%%%%%%%%%%%%%
% ATTENTION !!! Non compatible avec des accents ; ê û etc ...
#(define-markup-command (char-column layout props name baseline) (string?
number?)
"Print each character of string `name in a centered-column"
(interpret-markup layout props
(if (<= (string-length name) 2)
(markup name)
(markup (make-override-markup (cons 'baseline-skip baseline)
(make-center-column-markup (map
(lambda(c)
(make-line-markup (list
(make-hspace-markup 0.3)
(make-simple-markup (string c))
(make-hspace-markup 0.3))))
(string->list name))))))))
%%%%%%%%%%%%%%%%%%%%%%%%
Pour avoir les caractères de bas en haut, il suffit de remplacer
(string->list name)
par
(reverse (string->list name))
La fonction s'utilise de la manière suivante :
InstrumentName = \markup \char-column #"CHOEUR" #2.1
(Notez bien, CHOEUR et non CHŒUR : que des caractères ascii !)
--
Gilles
_______________________________________________
liste de diffusion lilypond-user-fr
address@hidden
https://lists.gnu.org/mailman/listinfo/lilypond-user-fr
[Prev in Thread] | Current Thread | [Next in Thread] |