Thomas Morley <[email protected]> writes:
> 2013/4/5 Thomas Morley <[email protected]>:
>> 2013/4/5 David Kastrup <[email protected]>:
>>> Thomas Morley <[email protected]> writes:
>>>
>>>> 2013/4/4 David Kastrup <[email protected]>:
>>>>
>>>>>
>>>>> Regarding the "you can't have LilyPond figure out page breaking" angle:
>>>>> maybe
>>>>> <URL:http://code.google.com/p/lilypond/issues/detail?id=1334> is
>>>>> a
>>>>> suitable building block for that.
>>>>>
>>>>> --
>>>>> David Kastrup
>>>>
>>>> \markup \score { ... } now _can_ handle pageBreak, though, if you try
>>>> (with appropriate settings of line-width)
>>>> \markup \line { \score { ... } \score { ... } }
>>>> it fails again.
>>>> Found no way around.
>>>
>>> \score must be used in a place where _only_ markup lists are allowed to
>>> be a markup list rather than a single markup. So something like
>>> \column-lines \score
>>>
>>> --
>>> David Kastrup
>>
>> Couldn't figure it out.
>> \markuplist \column-lines { \score { ... } \score { ... } } places the
>> two scores vertically on top of each other
>
> (forgot to add:)
> and without pageBreak
Well, you'll still need to fiddle with alignment or whatever in order to
get the bottom right, but here is something that should at least give
you a clue:
#(define-markup-list-command (parallel layout props markups-1 markups-2)
(markup-list? markup-list?)
(let* ((m1 (interpret-markup-list layout props markups-1))
(m2 (interpret-markup-list layout props markups-2))
(l (- (length m1) (length m2))))
(interpret-markup-list
layout props
(map (lambda (a b) (make-override-markup
'(word-space . 4)
(make-line-markup
(list
(make-stencil-markup a)
(make-stencil-markup b)))))
(interpret-markup-list
layout props
(make-column-lines-markup-list
(map make-stencil-markup
(if (negative? l)
(append m1 (make-list (- l) point-stencil))
m1))))
(interpret-markup-list
layout props
(make-column-lines-markup-list
(map make-stencil-markup
(if (positive? l)
(append m2 (make-list l point-stencil))
m2))))))))
\markuplist
\parallel \score { \repeat unfold 300 c'4
\layout { line-width = 6\cm }
}
\score { \repeat unfold 500 c'2
\layout { line-width = 8\cm }
}
--
David Kastrup
_______________________________________________
lilypond-user mailing list
[email protected]
https://lists.gnu.org/mailman/listinfo/lilypond-user
