]> git.donarmstrong.com Git - lilypond.git/blob - input/test/trill.ly
*** empty log message ***
[lilypond.git] / input / test / trill.ly
1 \version "2.1.28"
2
3 \header { texidoc="@cindex Trill
4 The extended trill may be produced using @code{TextSpanner} with @code{trill} 
5 spanner style.
6 "
7 }
8
9
10 \score {
11   \context RhythmicStaff \notes {
12     \stemDown
13     \override Stem  #'transparent = ##t
14     \override TextSpanner  #'dash-fraction = #0.0
15     \override TextSpanner  #'dash-period = #1.0
16     \override TextSpanner  #'edge-height = #'(0 . 1.5)
17     \override TextSpanner  #'edge-text = #'("bla " . "")
18     a\startTextSpan b c a\stopTextSpan
19
20
21     %% TODO: should have trill spanner.
22     \override TextSpanner  #'style = #'trill
23     \override TextSpanner  #'edge-height = #'(0 . 0)
24     \override TextSpanner  #'edge-text
25   = #(cons (make-musicglyph-markup "scripts-trill")  "")
26     a\startTextSpan b c a\stopTextSpan
27   }
28         \paper { raggedright = ##t} 
29 }
30
31