2012/11/17 Olivier Biot <[email protected]>:
> Is there a more elegant and less verbose way than the following approach to
> add a 3-column section for documenting editorial changes to scores?
>
> %% BEGIN
> \version "2.16.0"
>
> % LSR snippet: http://lsr.dsi.unimi.it/LSR/Snippet?id=464
> #(define-markup-command (columns layout props args) (markup-list?)
[...]
Hi Olivier,
I do like this \columns-command and from my point of view it
_is_elegant and _not_ verbose.
I'd recommend to store more stuff in variables.
If you prefer a version without \columns you may want to use this:
\version "2.16.0"
txt¹ = \markup {
\override #'(line-width . 32) {
\column {
\huge \bold \fill-line { Bemerkungen }
\wordwrap { % Deutsch
\bold { N° 30. } Crantz Ausgabe T. 11: cis \bold { e } gis:
}
}
}
}
txt² = \markup {
\override #'(line-width . 36) {
\column {
\huge \bold \fill-line \italic { Remarques }
\wordwrap \italic { % Français
\bold {N° 30.} Édition Crantz, mesure 11: do dièse \bold
{ mi } sol dièse:
}
}
}
}
txt³ = \markup {
\override #'(line-width . 36) {
\column {
\huge \bold \fill-line { Notes }
\wordwrap { % English
\bold {N° 30.} Crantz Edition, mesure 11: C sharp \bold {
E natural } G sharp:
}
}
}
}
mus = \markup {
% Music annotation
\score {
\new Staff \with {
\override Fingering #'add-stem-support = ##t
\override Fingering #'avoid-slur = #'outside
\override TupletBracket #'bracket-visibility = ##t
fontSize = #-3
\override StaffSymbol #'staff-space = #(magstep -3)
\override StaffSymbol #'thickness = #(magstep -3)
\remove "Time_signature_engraver"
} {
\key fis \minor
\time 4/4
\clef bass
\bar ""
\set Score.currentBarNumber = #11
cis2 ~ cis8 cis-. e?-. gis-.
}
\layout { ragged-right = ##t }
}
}
\markup
\override #'(box-padding . 1)
\rounded-box \center-column {
\fill-line { \txt¹ \txt² \txt³ }
\vspace #0.1
\mus
}
HTH,
Harm
_______________________________________________
lilypond-user mailing list
[email protected]
https://lists.gnu.org/mailman/listinfo/lilypond-user
