]> git.donarmstrong.com Git - lilypond.git/blob - input/test/noteheadstyle.ly
bd313628cedcf7f9dc75c3abb9e2fc82619ad9a6
[lilypond.git] / input / test / noteheadstyle.ly
1
2 \version "1.3.110";
3
4
5 \score { \notes \relative c{
6 % anyone wanna pop?
7 c''4 c2 c8  c16 c16 c1 c\breve
8 \property Voice.NoteHead \override #'style = #'diamond
9 c4 c2 c8  c16 c16  c1 c\breve
10 \property Voice.NoteHead \override #'style = #'transparent
11 c4 c2 c8  c16 c16  c1 c\breve
12 \property Voice.NoteHead \override #'style = #'cross
13 c4 c2 c8  c16 c16  c1 c\breve
14 \property Voice.NoteHead \override #'style = #'mensural
15 c4 c2 c8  c16 c16  c1 c\breve c\longa
16 \property Voice.NoteHead \override #'style = #'harmonic
17 c4 c2 c8  c16 c16  c1 c\breve
18 \property Voice.NoteHead \override #'style = #'baroque
19 c4 c2 c8  c16 c16  c1 c\breve c\longa
20
21
22    \context Voice <
23     \context Thread = TA
24       {
25         \property Thread.NoteHead \override #'style = #'cross
26         \property Voice.Stem \override #'direction = #1
27         c16
28        }
29     \context Thread = TB
30       { \property Thread.NoteHead \override #'style = #'default a16  }
31
32     \context Thread = TC
33       { \property Thread.NoteHead \override #'style = #'mensural d16 }
34
35   >
36
37
38    \context Voice <\context Thread = TA {
39    \property Thread.NoteHead \override #'style = #'default
40    c4 c4 }
41 \context Thread = TB {
42    \property Thread.NoteHead \override #'style = #'mensural
43   c'4 \stemDown c
44 } >
45
46 }
47
48     \paper {
49
50
51 }
52 }