]> git.donarmstrong.com Git - lilypond.git/blob - input/test/noteheadstyle.ly
df11fef63f19a6a6f1477c4dd621fe8fd1ee76d7
[lilypond.git] / input / test / noteheadstyle.ly
1 \score { \notes \relative c{
2 c''4 c2 c8  c16 c16 c1 
3 \property Voice.noteHeadStyle = "diamond"
4 c4 c2 c8  c16 c16  c1
5 \property Voice.noteHeadStyle = "transparent"
6 c4 c2 c8  c16 c16  c1
7 \property Voice.noteHeadStyle = "cross"
8 c4 c2 c8  c16 c16  c1
9 \property Voice.noteHeadStyle = "harmonic"
10 c4 c2 c8  c16 c16  c1
11
12    \context ThreadedVoice <
13     \context Thread = TA
14       { \property Thread.noteHeadStyle = "cross"
15         \property ThreadedVoice.ydirection = \up c16} 
16     \context Thread = TB
17       { \property Thread.noteHeadStyle = "" a16  }
18     
19     \context Thread = TC
20       { \property Thread.noteHeadStyle = "harmonic" d16 }
21     
22   >
23 }
24
25     \paper {
26         \translator {
27           \VoiceContext
28           \remove Note_heads_engraver;
29           \accepts Thread;
30           \name ThreadedVoice;
31         }
32         \translator {
33           \StaffContext
34           \accepts ThreadedVoice;
35         }
36         \translator {
37           \type Engraver_group_engraver;
38           \consists Note_heads_engraver;
39           \name Thread;
40         }
41     }
42 }
43 \version "1.0.16";