input/test/ottava.ly

   1 \version "1.7.16"
   2
   3
   4 fragment = \notes {
   5   a'''' b c a
   6   \property Voice.TextSpanner \set #'type = #'dotted-line
   7   \property Voice.TextSpanner \set #'edge-height = #'(0 . 1.5)
   8   \property Voice.TextSpanner \set #'edge-text = #'("8va " . "")
   9   \property Staff.centralCPosition = #-13
  10   a#(ly:export (make-span-event 'TextSpanEvent START)) b c a #(ly:export (make-span-event 'TextSpanEvent STOP))
  11 }
  12
  13 \paper { raggedright = ##t}
  14
  15 \score {
  16   \notes\relative c \fragment
  17   \paper { }
  18 }
  19 %% new-chords-done %%