|
En fait, j'ai peut-être accusé un peu vite les markup (flèches).
Il me semble que le problème vient d'ailleurs.
J'ai fait quelques ajustements, le résultat me convient, sauf
l'extra zone blanche en bas.
J'ai annihilé le haut par un top-system-spacing, mais je n'arrive
pas à faire de même en bas (j'ai essayé d'annuler les valeurs de
bottom-system-spacing).
Voici le code retravaillé :
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\version "2.23.0"
\language français
\include "teamim_code.ly"
clefAjout = { \break \set Staff.explicitClefVisibility =
#end-of-line-invisible \set Staff.forceClef = ##t \clef treble }
melody = \relative do' {
mi8 [mi] fa^\markup {
\center-column {
\combine
\draw-line #'(0 . 3)
\arrow-head #Y #DOWN ##f
}
} mi [mi] sold mi mi16 [(re)] mi8\noBeam \breathe\clefAjout
mi mi [mi] mi16 [(fa^\markup {
\center-column {
\combine
\draw-line #'(0 . 3)
\arrow-head #Y #DOWN ##f
}
})] mi8 mi [mi] re
}
\paper {
indent = 6\mm
paper-height = 7.2\cm
paper-width = 13\cm
line-width = 13\cm
bottom-margin = 0\mm
top-margin = 0\mm
ragged-last-bottom = ##f
tagline = ##f
system-system-spacing = #'(
(basic-distance . 20)
(minimum-distance . 0)
(stretchability . 0))
top-system-spacing = #'(
(basic-distance . 0)
(minimum-distance . 0)
(stretchability . 0))
last-bottom-spacing = #'(
(basic-distance . 0)
(minimum-distance . 0)
(stretchability . 0))
}
traduc = \lyricmode {
16se leva8. / Abraham4 de8 bon matin, 8.il4 sangla son âne
}
paroles = \lyricmode {
va -- Yash -- kém av -- ra -- ham ba -- bo -- kér
va -- Ya -- \markup\concat{\underline "h""a"} -- vosch
ét \markup\concat{\underline "h""a"} -- mo -- ro
}
teamiminf = \lyricmode {
\hide \sillouk _ _ _ _ _ _ _ _ _
\sillouk
}
teamimsup = \lyricmode {
_ _ \pashta _ _ \geresh _ \revia _
_ _ _ \tweak X-offset #4 \pashta _ _ _ \zakef_katon
}
\layout {
\context {
\Staff
\remove Time_signature_engraver
\remove Bar_engraver
}
\context {
\Score
\remove Timing_translator
\remove Bar_number_engraver
\override SpacingSpanner.spacing-increment = 3
}
}
\score {
<<
\new Lyrics \with {
\override LyricText.font-shape = #'italic
fontSize = -2
}\traduc
\new Staff
<<
\new Voice = "chant" \melody
\new Lyrics \with {
fontSize = -0.75
\override
VerticalAxisGroup.nonstaff-relatedstaff-spacing.padding = #3
\override VerticalAxisGroup.nonstaff-nonstaff-spacing
= #'((basic-distance . 0)
(minimum-distance . 0)
(padding . 0))
}
\lyricsto "chant" \paroles
\new Lyrics \with {
fontSize = 9.5
}
\lyricsto "chant" \teamiminf
\new Lyrics \with {
fontSize = 9.5
}
\lyricsto "chant" \teamimsup
>>
>>
}
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
Cordialement
|