On Sun, 5 Feb 2012, Kieren MacMillan wrote:

Hi Martin and David,

I've adapted scoreTitleMarkup to get the increased space you want:

For [IMO] an even more elegant solution, use the \put-mm function (can't 
remember who wrote it? and shouldn't it be in the base code by now??).
This allows you to avoid all those \column groupings and baseline overrides, 
and the adjustments (in mm) are more intuitive.

Hope this helps!
Kieren.
_____________________

\version "2.14.2"

#(define-markup-command (mm-feed layout props amount) (number?)
(let ((o-s (ly:output-def-lookup layout 'output-scale)))
 (ly:make-stencil "" '(0 . 0) (cons 0 (abs (/ amount o-s))))))

#(define-markup-command (put-mm layout props dir amount arg)
(ly:dir? number? markup?) (interpret-markup layout props
 (markup #:put-adjacent Y dir arg #:mm-feed amount)))

\paper {
 ragged-right = ##f
 scoreTitleMarkup = \markup {
   \column {
     \fill-line { \huge \larger \bold \fromproperty #'header:title }
     \fill-line { \put-mm #UP #5 \bold \fromproperty #'header:subtitle }
     \fill-line { \smaller \bold \fromproperty #'header:subsubtitle }
     \fill-line {
       \fromproperty #'header:poet
       \fromproperty #'header:composer
     }
     \fill-line {
       \fromproperty #'header:meter
       \fromproperty #'header:arranger
     }
   }
 }
}

\score {
 \new Staff { c''1 }
 \header {
   title = "Title"
   subtitle = "Subtitle"
   composer = "Composer"
   arranger = "Arranger"
 }
}

Hi Kieren,

I like this solution. The less schemish code I need, the better. But, to get the result I was looking for, I need to change "\put-mm #UP" to "\put-mm #DOWN" in the above example you give. Then I get more vertical space between the title/subtitle and the composer/arranger.

--

MT




_______________________________________________
lilypond-user mailing list
lilypond-user@gnu.org
https://lists.gnu.org/mailman/listinfo/lilypond-user

Reply via email to