input/lsr/creating-text-spanners.ly

   1 %% Do not edit this file; it is auto-generated from LSR http://lsr.dsi.unimi.it
   2 %% This file is in the public domain.
   3 \version "2.11.46"
   4
   5 \header {
   6   lsrtags = "expressive-marks, text, tweaks-and-overrides"
   7
   8   texidoc = "
   9 The @code{\\startTextSpan} and @code{\\stopTextSpan} commands allow the
  10 creation of text spanners as easily as pedal indications or
  11 octavations. Override some properties of the @code{TextSpanner} object
  12 to modify its output.
  13
  14 "
  15   doctitle = "Creating text spanners"
  16 } % begin verbatim
  17 \relative c'' {
  18   \override TextSpanner  #'edge-text = #'("bla" . "blu")
  19   a \startTextSpan
  20   b c
  21   a \stopTextSpan
  22
  23   \override TextSpanner  #'dash-period = #2
  24   \override TextSpanner  #'dash-fraction = #0.0
  25   a \startTextSpan
  26   b c
  27   a \stopTextSpan
  28
  29   \revert TextSpanner #'style
  30   \override TextSpanner  #'style = #'dashed-line \override TextSpanner #'bound-details #'left #'text = \markup { \draw-line #'(0 . 1) }
  31  \override TextSpanner #'bound-details #'right #'text = \markup { \draw-line #'(0 . -2) }
  32
  33   a \startTextSpan
  34   b c
  35   a \stopTextSpan
  36
  37   \set Staff.middleCPosition = #-13
  38   \override TextSpanner  #'dash-period = #10
  39   \override TextSpanner  #'dash-fraction = #0.5
  40   \override TextSpanner  #'thickness = #10
  41   a \startTextSpan
  42   b c
  43   a \stopTextSpan
  44   \set Staff.middleCPosition = #-6
  45 }