*/
MAKE_SCHEME_CALLBACK (Ottava_bracket, print, 1);
SCM
Ottava_bracket::print (SCM smob)
{
*/
MAKE_SCHEME_CALLBACK (Ottava_bracket, print, 1);
SCM
Ottava_bracket::print (SCM smob)
{
{
SCM heads = b->get_property ("note-heads");
common = common_refpoint_of_list (heads, common, X_AXIS);
{
SCM heads = b->get_property ("note-heads");
common = common_refpoint_of_list (heads, common, X_AXIS);
- if (Text_interface::markup_p (markup))
- text = *unsmob_stencil (Text_interface::interpret_markup (paper->self_scm (), properties, markup));
-
+ if (Text_interface::markup_p (markup))
+ text = *unsmob_stencil (Text_interface::interpret_markup (layout->self_scm (), properties, markup));
- 0.3 is ~ italic correction.
- */
- Real text_size = text.extent (X_AXIS).is_empty ()
- ? 0.0 : text.extent (X_AXIS)[RIGHT] + 0.3;
-
+ 0.3 is ~ italic correction.
+ */
+ Real text_size = text.extent (X_AXIS).is_empty ()
+ ? 0.0 : text.extent (X_AXIS)[RIGHT] + 0.3;
+
Stencil b;
Interval empty;
if (!bracket_span_points.is_empty () && bracket_span_points.length () > 0.001)
b = Tuplet_bracket::make_bracket (me,
Y_AXIS, Offset (bracket_span_points.length (), 0),
Stencil b;
Interval empty;
if (!bracket_span_points.is_empty () && bracket_span_points.length () > 0.001)
b = Tuplet_bracket::make_bracket (me,
Y_AXIS, Offset (bracket_span_points.length (), 0),
Just a small amount, yes. In tight situations, it is even
possible to center the `8' directly below the note, dropping the
ottava line completely...
*/
Just a small amount, yes. In tight situations, it is even
possible to center the `8' directly below the note, dropping the
ottava line completely...
*/
b.translate_axis (bracket_span_points[LEFT], X_AXIS);
text.translate_axis (span_points[LEFT], X_AXIS);
text.align_to (Y_AXIS, CENTER);
b.add_stencil (text);
b.translate_axis (bracket_span_points[LEFT], X_AXIS);
text.translate_axis (span_points[LEFT], X_AXIS);
text.align_to (Y_AXIS, CENTER);
b.add_stencil (text);