]> git.donarmstrong.com Git - lilypond.git/blob - input/template/jazz-combo.ly
new file.
[lilypond.git] / input / template / jazz-combo.ly
1 \version "1.6.6"
2 \header {
3         title = "Song"
4         subtitle = "(tune)"
5         composer = "Me"
6         meter = "moderato"
7         piece = "Swing"
8         tagline = "Lilypond example file by Amelie Zapf, Berlin 07/07/2003"
9         texidoc = "Jazz tune for combo (horns, piano, drums, bass, guitar)."
10 }
11
12 \include "paper16.ly"
13 \include "english.ly"
14
15 %%%%%%%%%%%% Some macros %%%%%%%%%%%%%%%%%%%
16
17 sl = {
18           \property Voice.NoteHead \override #'style = #'slash
19           \property Voice.Stem \override #'length = #0 }
20 nsl = {
21          \property Voice.NoteHead \revert #'style
22          \property Voice.Stem \revert #'length }
23 cr = \property Voice.NoteHead \override #'style = #'cross
24 ncr = \property Voice.NoteHead \revert #'style
25 jzchords = \property ChordNames.ChordName \override #'style = #'jazz
26
27 %%%%%%%%%%%% Keys'n'thangs %%%%%%%%%%%%%%%%%
28
29 global = \notes {
30         \time 4/4
31 }
32
33 Key = \notes \key c \major
34
35 % ############ Horns ############
36 % ------ Trumpet ------
37 trpt = \notes \transpose d' \relative c'' {
38         \Key
39         c1 c c
40 }
41
42 trpharmony = \chords \transpose d { \jzchords }
43 trumpet = {
44         \global 
45         \property Staff.instrument = #"Trumpet"
46         \clef treble
47         \context Staff <
48                 \trpt
49         >
50 }
51
52 % ------ Alto Saxophone ------
53 alto = \notes \transpose a' \relative c' {
54         \Key
55         c1 c c
56 }
57
58 altoharmony = \chords \transpose a { \jzchords }
59 altosax = {
60         \global
61         \property Staff.instrument = #"Alto Sax"
62         \clef treble
63         \context Staff <
64                 \alto
65         >
66 }
67
68 % ------ Baritone Saxophone ------
69 bari = \notes \transpose a'' \relative c {
70         \Key
71         c1 c \sl d4^"Solo" d d d \nsl
72 }
73
74 bariharmony = \chords \transpose a { \jzchords s1 s d2:maj e:m.7 }
75 barisax = {
76         \global
77         \property Staff.instrument = #"Bari Sax"
78         \clef treble
79         \context Staff <
80                 \bari
81         >
82 }
83 % ------ Trombone ------
84 tbone = \notes \relative c {
85         \Key
86         c1 c c
87 }
88
89 tboneharmony = \chords { \jzchords }
90 trombone = {
91         \global
92         \property Staff.instrument = #"Trombone"
93         \clef bass
94         \context Staff <
95                 \tbone
96         >
97 }
98 % ############ Rhythm Section #############
99 % ------ Guitar ------
100 gtr = \notes \relative c'' {
101         \Key
102         c1 \sl b4 b b b \nsl c1
103 }
104
105 gtrharmony = \chords { \jzchords
106         s1 c2:min.7+ d2:maj.9
107 }
108
109 guitar = {
110         \global
111         \property Staff.instrument = #"Guitar"
112         \clef treble
113         \context Staff <
114                 \gtr
115         >
116 }
117
118 %% ------ Piano ------
119 rhUpper = \notes \relative c'' {
120         \voiceOne
121         \Key
122         c1 c c
123 }
124
125 rhLower = \notes \relative c' {
126         \voiceTwo
127         \Key
128         e1 e e
129 }
130
131 lhUpper = \notes \relative c' {
132         \voiceOne
133         \Key
134         g1 g g
135 }
136
137 lhLower = \notes \relative c {
138         \voiceTwo
139         \Key
140         c1 c c
141 }
142
143 PianoRH = {
144         \clef treble
145         \global
146         \property Staff.midiInstrument = "acoustic grand"
147         \context Staff <
148                 \context Voice = one \rhUpper
149                 \context Voice = two \rhLower
150         >
151 }
152
153 PianoLH = {
154         \clef bass
155         \global
156         \property Staff.midiInstrument = "acoustic grand"
157         \context Staff <
158                 \context Voice = one \lhUpper
159                 \context Voice = two \lhLower
160         >
161 }
162
163 piano = {
164         \context PianoStaff <
165                 \property PianoStaff.instrument = #"Piano"
166                 \context Staff = upper \PianoRH
167                 \context Staff = lower \PianoLH
168         >
169 }
170
171 % ------ Bass Guitar ------
172 bass = \notes \relative c {
173         \Key
174         c1 c c
175 }
176
177 bass = {
178         \global
179         \property Staff.instrument = #"Bass"
180         \clef bass
181         \context Staff <
182                 \bass
183         >
184 }
185
186 % ------ Drums ------
187 \include "drumpitch-init.ly"
188 up = \notes {
189         hh4 <hh4 sn> hh4 <hh4 sn> hh4 <hh4 sn> hh4 <hh4 sn>
190         hh4 <hh4 sn> hh4 <hh4 sn>
191 }
192 down = \notes {
193         bd4 s bd s bd s bd s bd s bd s
194 }
195
196 drums = {
197         \global
198         \property Staff.instrument = #"Drums"
199         \clef percussion
200         \context Staff <
201                 \context Voice = first { \voiceOne \up }
202                 \context Voice = second { \voiceTwo \down }
203         >
204 }
205
206 %%%%%%%%% It All Goes Together Here %%%%%%%%%%%%%%%%%%%%%%
207
208 \score {
209 <
210         \context StaffGroup = horns <
211                 \context Staff = trumpet \trumpet
212
213                 \context Staff = altosax \altosax
214
215                 \context ChordNames = barichords \bariharmony
216
217                 \context Staff = barisax \barisax
218
219                 \context Staff = trombone \trombone
220         >
221
222         \context StaffGroup = rhythm <
223                 \context ChordNames = chords \gtrharmony
224                 \context Staff = guitar \guitar
225                 \context PianoStaff = piano \piano
226                 
227                 \context Staff = bass \bass
228                 
229                 \apply #(drums->paper 'drums) \context Staff = drums \drums
230         >
231 >
232         \midi { \tempo 4 = 75 }
233         \paper {
234                 linewidth = 15.0 \cm
235                 \translator { \HaraKiriStaffContext }
236                 \translator {
237                         \StaffContext
238                         \consists Instrument_name_engraver
239                 }
240                 \translator {
241                         \ScoreContext
242                         BarNumber \override #'padding = #3
243                         RehearsalMark \override #'padding = #2
244                         skipBars = ##t
245                 }
246         }
247 }
248