3 \header { texidoc
="@cindex Trill
4 Show trill line type. "
9 \context RhythmicStaff
\notes {
11 \property Voice
.Stem
\override #'transparent
= ##t
12 \property Voice
.TextSpanner
\set #'style
= #'dotted-line
13 \property Voice
.TextSpanner
\set #'edge-height
= #'(0 . 1.5)
14 \property Voice
.TextSpanner
\set #'edge-text
= #'("bla " . "")
15 a#(ly
:export
(make-span-event
'TextSpanEvent START
)) b c a #(ly
:export
(make-span-event
'TextSpanEvent STOP
))
17 %\property Voice.TextSpanner \set #'font-family = #'music
18 \property Voice
.TextSpanner
\set #'style
= #'trill
19 \property Voice
.TextSpanner
\set #'edge-height
= #'(0 . 0)
20 \property Voice
.TextSpanner
\set #'edge-text
21 = #(cons
(make-musicglyph-markup
"scripts-trill") "")
22 a#(ly
:export
(make-span-event
'TextSpanEvent START
)) b c a #(ly
:export
(make-span-event
'TextSpanEvent STOP
))
24 \paper { raggedright
= ##t
}