Re: Au sujet de titres

[Christophe Pochon]

Version avec quelques lignes superflues supprimées :

%%%%%%

\version "2.19.20"
montitreps  = #"
   /r  25  def  
    /ch  1 string  def
  /Times findfont
   4 scalefont
setfont
/text (Texte sur un arc-de-cercle) def
/depar text  stringwidth  pop    90  mul  3.14  div
r  div   def    
0  0  moveto
depar  rotate
text {   ch  0  3  2  roll  put
/l  ch  stringwidth  pop  def
/dec l r  atan  2  div  neg  def
0  0  moveto dec rotate  l neg  2 div r rmoveto
ch  show dec  rotate
} forall
"

montitre = \markup {
  \with-dimensions #'(0 . 0) #'(0 . 30)
  \postscript #montitreps
}
\header {
  title = \montitre
}
\relative c'' {
  c1
}

%%%%%%%%%5

Christophe Pochon

Le ven. 24 janv. 2020 à 09:31, Christophe Pochon <address@hidden> a écrit :

Oh, mais j'ai trouvé !

%%%%%%%

\version "2.19.20"

montitreps  = #"
40 4 translate    /r  25  def    /r2  30  def     /a  3.5  def
/c a r2  atan def     /ch  1 string  def
  /Arial findfont
   5 scalefont
setfont
/text (Texte sur un arc-de-cercle) def
/depar text  stringwidth  pop    90  mul  3.14  div
r  div   def    0  0  moveto depar  rotate
text {   ch  0  3  2  roll  put
/l  ch  stringwidth  pop  def
/dec l r  atan  2  div  neg  def
0  0  moveto dec rotate  l neg  2 div r rmoveto
ch  show dec  rotate
} forall

      "

montitre = \markup {
  \with-dimensions #'(0 . 73) #'(0 . 35)
  \postscript #montitreps
}
\header {
  title = \montitre
}
\relative c'' {
  c1
}

%%%%%%%

Christophe Pochon

Le jeu. 23 janv. 2020 à 17:51, Gerard <address@hidden> a écrit :

Bonsoir,

Rien trouvé dans "Titrages personnalisés"...

Une possibilité avec Lualatex-Lilypond et Tikz

Exemple joint (2 images png) + source .tex

Cordialement

G.

Le 19/01/2020 à 18:47, Bernard Meylan a écrit :
> Bonjour à toutes/tous!
>
> Savez-vous où se trouve, dans le manuel, les infos concernant la possibilité
> (ou pas…?) de pouvoir faire un titre qui suit une courbe, en ce qui me
> concerne un léger arc-de-cercle…
>
>
>
> -----
> Cordialement
>
> Bernard
> --
> Sent from: http://lilypond-french-users.1298960.n2.nabble.com/
>