[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: make-column-markup
From: |
David Séverin |
Subject: |
Re: make-column-markup |
Date: |
Sun, 31 Aug 2008 15:41:01 -0300 |
Le Sun, 31 Aug 2008 15:34:44 +0200,
"Gilles THIBAULT" <address@hidden> a écrit :
>
> > when 'my' colmark markup-command
> Nice function ...
> >is called with one of its
> >arg being either \papaccel or \papritar, it's sort of thinking
> >it should 'piling up' the given args with the previous call of
> >colmark
>
> Don't sure i undertand what you want but perhaps you can try the command
> \textLengthOn
> before your music.
> (
> http://lilypond.org/doc/v2.11/Documentation/user/lilypond/Text-scripts#Text-scripts
> )
>
> The notes will be spaced to make room for each of your \markup texts.
>
> Sorry if it was not what you needed.
>
> Gilles
>
Thank You Gilles,
I should have asked my question in a better way [and sorry for having
copied the pdf, where everybody on the list could reproduce it, it
takes 'energy' for nothing ...]
In fact, I just upgraded from 2.10.33 to 2.11.57, for the best off
course. It's just that in 2.10.33, if the markup text was long and
overlaped next column[s], successive call to my colmark function would
not take that into account [and off ourse I would not place any other
markup text in the next column either...]
Your are off source right to mention \textengthOn, but this obviously
leads to a desplacement of follwing notes in accordance ... [and that
is obvisouly the desired behavior], which for tuplets is not what I am
looking for.
What I'd like is, against 'the logic' of 2.11.57 which is great, that
I have an option to tell my colmark to start positionning its objects
passed in args as if there where no 'overtaken space' in previous call.
Could this be possible ?
Many Thanks,
David
;; -- simple lily example
% #!lilypond les-cinq-pieds.ly -*- coding: utf-8; -*-
\version "2.11.57"
#(define-markup-command (colmark layout props args)
(markup-list?)
(let ((entries (cons (list '(baseline-skip . 2.4)) props)
))
(interpret-markup layout entries
(make-column-markup
(map (lambda (arg)
(markup arg))
(reverse args))))))
db = \markup { \musicglyph #"scripts.downbow" }
ub = \markup { \musicglyph #"scripts.upbow" }
papaccel = \markup \tiny \italic \bold "poco a poco accel."
papritar = \markup \tiny \italic \bold "poco a poco ritar."
\paper {
head-separation = 0\cm
page-top-space = 0\cm
}
ViolinSolo = \relative c' {
\voiceOne
\time 4/4
\stemUp
\tupletDown
%% Measure 1
\times 2/3 { d4 ^\markup \colmark { "line 1" "line 2" "line 3" "line 4" } d d
}
\times 2/3 { d4 ^\markup \colmark { "line 1" "line 2" "line 3" "line 4" } d d
}
%% Measure 2
\times 2/3 { d4 ^\markup \colmark { \db \tiny "IV" \papaccel "line 4" } d d }
\times 2/3 { d4 ^\markup \colmark { "line 1" "line 2" "line 3" "line 4" } d d
}
%% Measure 3
\times 2/3 { d4 ^\markup \colmark { \ub \tiny "IV" \papritar "line 4" } d d }
\times 2/3 { d4 ^\markup \colmark { "line 1" "line 2" "line 3" "line 4" } d d
}
%% Measure 4
\times 2/3 { d4 ^\markup \colmark { "line 1" "line 2" "line 3" "line 4" } d d
}
\times 2/3 { d4 ^\markup \colmark { "line 1" "line 2" "line 3" "line 4" } d d
}
}
\score {
<<
\relative <<
\new Staff \ViolinSolo
>>
>>
\layout {
indent = 0.0
ragged-last = ##t
\context {
\Staff
}
}
}