Add appendix for percussion notes.

diff --git a/Documentation/user/notation-appendices.itely b/Documentation/user/notation-appendices.itely
index 399657042985084bbef6c8355e2756db6654be77..987df7f8fbfd1fe943258108e928566bbd816689 100644 (file)
--- a/Documentation/user/notation-appendices.itely
+++ b/Documentation/user/notation-appendices.itely
@@ -14,15 +14,16 @@
 
 @menu
 * Chord name chart::            
-* Common chord modifiers::
-* Predefined fretboard diagrams::
+* Common chord modifiers::      
+* Predefined fretboard diagrams::  
 * MIDI instruments::            
 * List of colors::              
 * The Feta font::               
 * Note head styles::            
 * Text markup commands::        
-* Text markup list commands::   
+* Text markup list commands::
 * List of articulations::       
+* Percussion notes::            
 * All context properties::      
 * Layout properties::           
 * Identifiers::                 
@@ -593,9 +594,14 @@ The following styles may be used for note heads.
 
 Here is a chart showing all scripts available,
 
-@lilypondfile[ragged-right,quote]{script-chart.ly}
+@lilypondfile[quote]{script-chart.ly}
 
 
+@node Percussion notes
+@appendixsec Percussion notes
+
+@lilypondfile[quote]{percussion-chart.ly}
+
 
 @node All context properties
 @appendixsec All context properties

diff --git a/input/manual/percussion-chart.ly b/input/manual/percussion-chart.ly
new file mode 100644 (file)
index 0000000..cc0b304
--- /dev/null
+++ b/input/manual/percussion-chart.ly
@@ -0,0 +1,68 @@
+\version "2.11.51"
+
+% yes, I know this is a mess.  But I'm not going to fuss with
+% it one day before I leave.  -gp
+
+% this chart is used in the manual too.
+
+\header {
+    texidoc ="@cindex Percussion notes
+
+This chart shows all percussion and drum notes."
+}
+
+myBreak = { \bar " " \break }
+
+\new Score \with {
+  \remove "Bar_number_engraver"
+} \new DrumStaff \with {
+  \remove "Time_signature_engraver"
+} \context DrumVoice {
+
+%% this stuff set up nice || bar lines to divide percussion notes
+%% into related fields, but it should be placed in the actual
+%% music, not as a separate voice.  -gp
+%{
+barlines = {  
+\repeat "unfold" 4 {s 1 \bar" " } s 1 \bar "||" 
+\repeat "unfold" 2 { s 1 \bar" "  s 1 \bar" " s 1 \bar "||" }
+\repeat "unfold" 4 {s 1 \bar" " } s 1 \bar "||" 
+\repeat "unfold" 7  {s 1 \bar" " }  s 1 \bar "||" 
+s 1 \bar" "  s 1 \bar "||" 
+\repeat "unfold" 2 { \repeat "unfold" 5 {s 1 \bar" " } s 1 \bar "||" }         
+\repeat "unfold" 2 { s 1 \bar" "  s 1 \bar "||" }
+\repeat "unfold" 2 {s 1 \bar" " } s 1 \bar "||" 
+\repeat "unfold" 4 {s 1 \bar" " } s 1 \bar "||" 
+s 1 \bar" "  s 1 \bar "||" 
+\repeat "unfold" 3 {s 1 \bar" " } s 1 \bar "||" 
+\repeat "unfold" 2 {s 1 \bar" " } s 1 \bar "||" 
+\repeat "unfold" 3 {\repeat "unfold" 4 {s 1 \bar" " } s 1 \bar "||"  }
+}
+%}
+
+\drummode { 
+\textLengthOn
+\cadenzaOn
+bda1 ^"acousticbassdrum: bda" bd   ^"bassdrum: bd" sn  ^"snare: sn" sne  ^"electricsnare: sne" sna  ^"acousticsnare: sna" \myBreak
+tomfl  ^"lowfloortom: tomfl" tomfh  ^"highfloortom: tomfh" toml  ^"lowtom: toml"  tomh  ^"hightom: tomh" 
+tomml  ^"lowmidtom: tomml" tommh  ^"himidtom: tommh" \myBreak
+hhc  ^"closedhihat: hhc"  hh  ^"hihat: hh" hhp  ^"pedalhihat: hhp" hho  ^"openhihat: hho" hhho  ^"halfopenhihat: hhho" \myBreak
+cymca  ^"crashcymbala: cymca" cymc  ^"crashcymbal: cymc" cymra  ^"ridecymbala: cymra" cymr  ^"ridecymbal: cymr"  \myBreak cymch  ^"chinesecymbal: cymch" cyms  ^"splashcymbal: cyms"
+cymcb  ^"crashcymbalb: cymcb"  cymrb  ^"ridecymbalb: cymrb" 
+rb  ^"ridebell: rb" cb  ^"cowbell: cb" \myBreak
+bohm  ^"mutehibongo: bohm" boh  ^"hibongo: boh" boho  ^"openhibongo: boho" bolm  ^"mutelobongo: bolm" bol  ^"lobongo: bol" bolo  ^"openlobongo: bolo"\myBreak
+cghm  ^"mutehiconga: cghm" cglm  ^"muteloconga: cglm" cgho  ^"openhiconga: cgho" cgh  ^"hiconga: cgh" cglo  ^"openloconga: cglo" cgl  ^"loconga: cgl" \myBreak
+timh  ^"hitimbale: timh" timl  ^"lotimbale: timl"  
+agh  ^"hiagogo: agh" agl  ^"loagogo: agl" \myBreak
+ssh ^"hisidestick: ssh" ss  ^"sidestick: ss" ssl  ^"losidestick: ssl" \myBreak
+guis  ^"shortguiro: guis" guil  ^"longguiro: guil" gui  ^"guiro: gui" cab  ^"cabasa: cab" mar  ^"maracas: mar" \myBreak
+whs  ^"shortwhistle: whs" whl  ^"longwhistle: whl"  \myBreak
+hc  ^"handclap: hc" tamb  ^"tambourine: tamb" vibs  ^"vibraslap: vibs" tt ^"tamtam: tt"  \myBreak
+cl  ^"claves: cl" wbh  ^"hiwoodblock: wbh" wbl  ^"lowoodblock: wbl"  \myBreak
+cuim  ^"mutecuica: cuim" cuio  ^"opencuica: cuio"
+trim  ^"mutetriangle: trim" tri  ^"triangle: tri" trio  ^"opentriangle: trio"  \myBreak
+ua  ^"oneup: ua" ub  ^"twoup: ub" uc  ^"threeup: uc" ud  ^"fourup: ud" ue  ^"fiveup: ue"  \myBreak
+da  ^"onedown: da" db  ^"twodown: db" dc  ^"threedown: dc" dd  ^"fourdown: dd" de ^"fivedown: de"  \myBreak
+}
+}
+