input/new/line-arrows.ly

   1 \version "2.10.0"
   2 \layout { ragged-right= ##t }
   3 \header {
   4   lsrtags = "expressive-marks"
   5   texidoc = "Arrows can be applied to text-spanners and line-spanners (such as the Glissando)"
   6   doctitle = "Line arrows"
   7 }
   8
   9 \relative c'' {
  10   \override TextSpanner #'bound-padding = #1.0
  11   \override TextSpanner #'dash-fraction = #'()
  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 gis8 a4 b4\glissando
  25   b,4 | g' c\stopTextSpan c
  26 }