release commit
[lilypond.git] / input / test / trill.ly
blob8cd763f3fc688dded87fb8c01b8a44bf27596a1c
1 \version "2.1.7"
3 \header { texidoc="@cindex Trill
4 Show trill line type. "
8 \score {
9 \context RhythmicStaff \notes {
10 \stemDown
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}