]> git.donarmstrong.com Git - lilypond.git/blob - input/regression/note-head-style.ly
covnert-ly
[lilypond.git] / input / regression / note-head-style.ly
1 \version "1.5.68"
2 \header{
3 texidoc="
4 Note head shapes are settable.  The stem endings should be adjusted
5 per note head.  If you want different note head styles on one stem,
6 you must create a special context called Thread.
7
8 Harmonic notes have a different shape and different
9 dimensions. Nevertheless, noteheads in both styles can be combined, on
10 either up or down stems.
11 "
12 }
13
14 \score { \notes \relative c'{ \clef C
15 % \property Voice.Stem \override #'thickness = #5.0
16 \property Voice.NoteHead \set #'style = #'default
17 c4 c2 c8  c16 c16 c1 c\breve b4 b2 b8  b16 b16 b1 b\breve \break
18 \property Voice.NoteHead \set #'style = #'diamond
19 c4 c2 c8  c16 c16 c1 c\breve b4 b2 b8  b16 b16 b1 b\breve \break
20 \property Voice.NoteHead \set #'style = #'transparent
21 c4 c2 c8  c16 c16 c1 c\breve b4 b2 b8  b16 b16 b1 b\breve \break
22 \property Voice.NoteHead \set #'style = #'cross
23 c4 c2 c8  c16 c16 c1 c\breve b4 b2 b8  b16 b16 b1 b\breve \break
24 \property Voice.NoteHead \set #'style = #'xcircle
25 c4 c2 c8  c16 c16 c1 c\breve b4 b2 b8  b16 b16 b1 b\breve \break
26 \property Voice.NoteHead \set #'style = #'triangle
27 c4 c2 c8  c16 c16 c1 c\breve b4 b2 b8  b16 b16 b1 b\breve \break
28 \property Voice.NoteHead \set #'style = #'slash
29 c4 c2 c8  c16 c16 c1 c\breve b4 b2 b8  b16 b16 b1 b\breve \break
30 \property Voice.NoteHead \set #'style = #'mensural
31 c4 c2 c8  c16 c16  c1 c\breve c\longa b4 b2 b8  b16 b16 b1 b\breve b\longa \break
32 \property Voice.NoteHead \set #'style = #'harmonic
33 c4 c2 c8  c16 c16 c1 c\breve b4 b2 b8  b16 b16 b1 b\breve \break
34 \property Voice.NoteHead \set #'style = #'baroque
35 c4 c2 c8  c16 c16  c1 c\breve c\longa b4 b2 b8  b16 b16 b1 b\breve b\longa \break
36
37
38    \context Voice = another <
39     \context Thread = TA
40       {
41         \property Thread.NoteHead \set #'style = #'cross
42         \property Voice.Stem \set #'direction = #1
43         c16
44        }
45     \context Thread = TB
46       { \property Thread.NoteHead \set #'style = #'default a16  }
47
48     \context Thread = TC
49       { \property Thread.NoteHead \set #'style = #'mensural d16 }
50
51   >
52
53
54    \context Voice <
55      \context Thread = TA {
56        \property Thread.NoteHead \set #'style = #'cross
57        c4 c4 c4 c4 }
58      \context Thread = TB {
59        \property Thread.NoteHead \set #'style = #'mensural
60        c'4 \stemDown c
61        \property Thread.NoteHead \set #'style = #'slash
62        \stemUp c4 \stemDown c
63 } >
64
65 }
66
67     \paper {}
68 }