input/new/line-arrows.ly

   1 \version "2.11.61"
   2 \header {
   3   lsrtags = "expressive-marks"
   4   texidoc = "Arrows can be applied to text-spanners and line-spanners
   5 (such as the Glissando)."
   6   doctitle = "Line arrows"
   7 }
   8
   9 \relative c'' {
  10   \override TextSpanner #'bound-padding = #1.0
  11   \override TextSpanner #'style = #'line
  12   \override TextSpanner #'bound-details #'right #'arrow = ##t
  13   \override TextSpanner #'bound-details #'left #'text = #"fof"
  14   \override TextSpanner #'bound-details #'right #'text = #"gag"
  15   \override TextSpanner #'bound-details #'right #'padding = #0.6
  16
  17   \override TextSpanner #'bound-details #'right #'stencil-align-dir-y = #CENTER
  18   \override TextSpanner #'bound-details #'left #'stencil-align-dir-y = #CENTER
  19
  20   \override Glissando #'bound-details #'right #'arrow = ##t
  21   \override Glissando #'arrow-length = #0.5
  22   \override Glissando #'arrow-width = #0.25
  23
  24   a8\startTextSpan gis a4 b\glissando b,
  25   g'4 c\stopTextSpan c2
  26 }