]> git.donarmstrong.com Git - lilypond.git/blob - input/features/ottava.ly
patch::: 1.3.128.jcn4
[lilypond.git] / input / features / ottava.ly
1
2 fragment = \notes {
3   a'''' b c a
4   \property Voice.TextSpanner \set #'type = #'dotted-line
5   \property Voice.TextSpanner \set #'edge-height = #'(0 . 1.5)
6   \property Voice.TextSpanner \set #'edge-text = #'("8va " . "")
7   \property Staff.centralCPosition = #-13
8   a\spanrequest \start "text" b c a \spanrequest \stop "text"
9 }
10
11 \paper { linewidth = -1.; } 
12
13 \score {
14   \notes\relative c \fragment
15   \paper { }  
16 }