Adaptation automatique de la taille de portée à la taille de police (#1)

jperon · May 28, 2015 · 19d85ff · 19d85ff
1 parent 71b916c
commit 19d85ff
Show file tree

Hide file tree

Showing 3 changed files with 12 additions and 5 deletions.
diff --git a/lyluatex.lua b/lyluatex.lua
@@ -59,6 +59,9 @@ end
 
 
 function entete_lilypond(facteur, largeur)
+    if facteur == 0 then
+        facteur = font.fonts[font.current()].size/39321.6
+    end
     return string.format(
 [[%%En-tête
 \version "2.18.2"

diff --git a/lyluatex.sty b/lyluatex.sty
@@ -17,9 +17,9 @@
 {\catcode`p=12 \catcode`t=12 \gdef\un#1pt{#1}}
 \newcommand*{\largeur}{\expandafter\un\the\linewidth}
 % Taille des partitions
-%\newcounter{staffsize}\setcounter{staffsize}{17}
-%\newcounter{localstaffsize}\setcounter{staffsize}{17}
-\def\staffsize{17}
+% Si la valeur est 0, elle sera automatiquement calculée
+% à partir de la taille de police.
+\def\staffsize{0}
 \let\localstaffsize\staffsize
 
 

diff --git a/test.tex b/test.tex
@@ -1,4 +1,4 @@
-\documentclass[a5paper,12pt]{scrbook}
+\documentclass[a5paper,fontsize=12pt]{scrbook}
 \usepackage{fontspec}
 \usepackage{libertine}
 \usepackage[program=lilypond]{lyluatex}
@@ -7,10 +7,14 @@
 \title{}
 \author{}
 
-\def\staffsize{20.5}
+% Si vous voulez changer globalement la taille des partitions.
+% Autrement, elle sera automatiquement adaptée à la taille de police.
+%\def\staffsize{20.5}
 
 \begin{document}
 
+Taille de police
+
 % Import d'une partition externe. La commande \includely est strictement équivalente.
 \lilypondfile{ly/AveMariaDeLourdes/AveMariaDeLourdes.ly}