new file.

diff --git a/ChangeLog b/ChangeLog
index 8e9f54a1cdcadfcf94174495bf0dd659028956db..7ea5ca5c5694dc5c69dcc4114387a42d628a0e8e 100644 (file)
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,7 @@
+2003-07-07  Han-Wen Nienhuys  <hanwen@cs.uu.nl>
+
+       * input/template/jazz-combo.ly: new file.
+
 2003-07-06  Han-Wen Nienhuys  <hanwen@cs.uu.nl>
 
        * mf/feta-toevallig.mf: tweak for bottom of flat sign. 

diff --git a/Documentation/user/refman.itely b/Documentation/user/refman.itely
index 61fdaa9cf8795f668ac46afb8739dc424e95ba67..ad7a5ecce0cd7e3f43b7f9839494d47a313b2fb7 100644 (file)
--- a/Documentation/user/refman.itely
+++ b/Documentation/user/refman.itely
@@ -6684,7 +6684,7 @@ in @file{scm/grob-description.scm}), includes the following definitions for
 
 
 By adding variables on top of these existing definitions, the system
-defaults is overriden, and the appearance of a layout objects is
+default is overriden, and the appearance of a layout objects is
 altered.
 
 @syntax

diff --git a/input/template/jazz-combo.ly b/input/template/jazz-combo.ly
new file mode 100644 (file)
index 0000000..981822b
--- /dev/null
+++ b/input/template/jazz-combo.ly
@@ -0,0 +1,248 @@
+\version "1.6.6"
+\header {
+        title = "Song"
+        subtitle = "(tune)"
+        composer = "Me"
+        meter = "moderato"
+        piece = "Swing"
+       tagline = "Lilypond example file by Amelie Zapf, Berlin 07/07/2003"
+       texidoc = "Jazz tune for combo (horns, piano, drums, bass, guitar)."
+}
+
+\include "paper16.ly"
+\include "english.ly"
+
+%%%%%%%%%%%% Some macros %%%%%%%%%%%%%%%%%%%
+
+sl = {
+          \property Voice.NoteHead \override #'style = #'slash
+          \property Voice.Stem \override #'length = #0 }
+nsl = {
+         \property Voice.NoteHead \revert #'style
+         \property Voice.Stem \revert #'length }
+cr = \property Voice.NoteHead \override #'style = #'cross
+ncr = \property Voice.NoteHead \revert #'style
+jzchords = \property ChordNames.ChordName \override #'style = #'jazz
+
+%%%%%%%%%%%% Keys'n'thangs %%%%%%%%%%%%%%%%%
+
+global = \notes {
+        \time 4/4
+}
+
+Key = \notes \key c \major
+
+% ############ Horns ############
+% ------ Trumpet ------
+trpt = \notes \transpose d' \relative c'' {
+       \Key
+        c1 c c
+}
+
+trpharmony = \chords \transpose d { \jzchords }
+trumpet = {
+        \global 
+        \property Staff.instrument = #"Trumpet"
+        \clef treble
+        \context Staff <
+                \trpt
+        >
+}
+
+% ------ Alto Saxophone ------
+alto = \notes \transpose a' \relative c' {
+       \Key
+        c1 c c
+}
+
+altoharmony = \chords \transpose a { \jzchords }
+altosax = {
+        \global
+        \property Staff.instrument = #"Alto Sax"
+        \clef treble
+        \context Staff <
+                \alto
+        >
+}
+
+% ------ Baritone Saxophone ------
+bari = \notes \transpose a'' \relative c {
+       \Key
+        c1 c \sl d4^"Solo" d d d \nsl
+}
+
+bariharmony = \chords \transpose a { \jzchords s1 s d2:maj e:m.7 }
+barisax = {
+        \global
+        \property Staff.instrument = #"Bari Sax"
+        \clef treble
+        \context Staff <
+                \bari
+        >
+}
+% ------ Trombone ------
+tbone = \notes \relative c {
+       \Key
+        c1 c c
+}
+
+tboneharmony = \chords { \jzchords }
+trombone = {
+        \global
+        \property Staff.instrument = #"Trombone"
+        \clef bass
+        \context Staff <
+                \tbone
+        >
+}
+% ############ Rhythm Section #############
+% ------ Guitar ------
+gtr = \notes \relative c'' {
+       \Key
+        c1 \sl b4 b b b \nsl c1
+}
+
+gtrharmony = \chords { \jzchords
+        s1 c2:min.7+ d2:maj.9
+}
+
+guitar = {
+        \global
+        \property Staff.instrument = #"Guitar"
+        \clef treble
+        \context Staff <
+               \gtr
+        >
+}
+
+%% ------ Piano ------
+rhUpper = \notes \relative c'' {
+        \voiceOne
+       \Key
+        c1 c c
+}
+
+rhLower = \notes \relative c' {
+        \voiceTwo
+       \Key
+        e1 e e
+}
+
+lhUpper = \notes \relative c' {
+        \voiceOne
+       \Key
+        g1 g g
+}
+
+lhLower = \notes \relative c {
+        \voiceTwo
+       \Key
+        c1 c c
+}
+
+PianoRH = {
+        \clef treble
+        \global
+        \property Staff.midiInstrument = "acoustic grand"
+        \context Staff <
+                \context Voice = one \rhUpper
+               \context Voice = two \rhLower
+        >
+}
+
+PianoLH = {
+        \clef bass
+        \global
+        \property Staff.midiInstrument = "acoustic grand"
+        \context Staff <
+               \context Voice = one \lhUpper
+               \context Voice = two \lhLower
+        >
+}
+
+piano = {
+       \context PianoStaff <
+               \property PianoStaff.instrument = #"Piano"
+               \context Staff = upper \PianoRH
+               \context Staff = lower \PianoLH
+        >
+}
+
+% ------ Bass Guitar ------
+bass = \notes \relative c {
+       \Key
+        c1 c c
+}
+
+bass = {
+        \global
+        \property Staff.instrument = #"Bass"
+        \clef bass
+        \context Staff <
+                \bass
+        >
+}
+
+% ------ Drums ------
+\include "drumpitch-init.ly"
+up = \notes {
+        hh4 <hh4 sn> hh4 <hh4 sn> hh4 <hh4 sn> hh4 <hh4 sn>
+       hh4 <hh4 sn> hh4 <hh4 sn>
+}
+down = \notes {
+        bd4 s bd s bd s bd s bd s bd s
+}
+
+drums = {
+       \global
+       \property Staff.instrument = #"Drums"
+       \clef percussion
+       \context Staff <
+               \context Voice = first { \voiceOne \up }
+               \context Voice = second { \voiceTwo \down }
+       >
+}
+
+%%%%%%%%% It All Goes Together Here %%%%%%%%%%%%%%%%%%%%%%
+
+\score {
+<
+        \context StaffGroup = horns <
+                \context Staff = trumpet \trumpet
+
+                \context Staff = altosax \altosax
+
+               \context ChordNames = barichords \bariharmony
+
+                \context Staff = barisax \barisax
+
+                \context Staff = trombone \trombone
+        >
+
+        \context StaffGroup = rhythm <
+               \context ChordNames = chords \gtrharmony
+                \context Staff = guitar \guitar
+               \context PianoStaff = piano \piano
+                
+                \context Staff = bass \bass
+                
+                \apply #(drums->paper 'drums) \context Staff = drums \drums
+        >
+>
+        \midi { \tempo 4 = 75 }
+        \paper {
+                linewidth = 15.0 \cm
+                \translator { \HaraKiriStaffContext }
+                \translator {
+                        \StaffContext
+                        \consists Instrument_name_engraver
+                }
+                \translator {
+                        \ScoreContext
+                        BarNumber \override #'padding = #3
+                        RehearsalMark \override #'padding = #2
+                        skipBars = ##t
+                }
+        }
+}
+