]> git.donarmstrong.com Git - lilypond.git/blob - input/regression/cluster.ly
* Documentation/user/refman.itely: updates.
[lilypond.git] / input / regression / cluster.ly
1 \version "1.7.16"
2 \header {
3     texidoc = "Clusters are a device to denote that a complete range of
4 notes is to be played."
5 }
6
7 voiceI = % same as voiceII, but with ordinary notes
8         \context Voice = voiceI {
9             \notes \relative c' {
10                 \stemUp
11                 c4 f4
12                 a4 <<e d'>>4 | \break
13                 << g a >>8 << e a >>8 a4 c1 << d b >>4 e4 |
14                 c4 a4 f4 g4 a4
15             }
16         }
17
18 voiceII = % same as voiceI, but with cluster notation
19         \context Voice = voiceII {
20             \notes \relative c' {
21                 \property Thread.NoteHead \set #'transparent = ##t
22                 \property Voice.Stem \set #'transparent = ##t
23                 \property Voice.Beam \set #'transparent = ##t
24                 \property Staff.Accidental \set #'transparent = ##t
25                 \property Voice.Cluster \set #'padding = #0.25
26                 \property Voice.Cluster \set #'shape = #'ramp
27                 c4 f4-\startCluster
28                 a4 <<e d'>>4 | \break
29                 %%% do not try something like: < { g8 e8 } a4 >
30                 %%% instead, do the following: << g a >>8 << e a >>8
31                 << g a >>8 << e a >>8 a4 c1 << d b >>4 e4 |
32                 c4-\stopCluster a4 f4 g4 a4
33             }
34         }
35
36 \score {
37         \context PianoStaff {
38         <
39                 \voiceI
40                 \voiceII
41         >
42         }
43         \paper{
44                 linewidth = 15.0 \cm
45         }
46 }
47 %% new-chords-done %%