\version "2.18.2"

%% for testing
%% terminal command-sequence:
%%
%%  lilypond new-drum-pitches-02.ly 
%%  midi2ly new-drum-pitches-02.midi
%%  gedit new-drum-pitches-02-midi.ly


drumPitchNames.dbass      = #'dbass
drumPitchNames.dba        = #'dbass  % db seems to be in use
drumPitchNames.dbassmute  = #'dbassmute
drumPitchNames.dbm        = #'dbassmute
drumPitchNames.dbassopen  = #'dbassopen
drumPitchNames.dopen      = #'dopen
drumPitchNames.do         = #'dopen
drumPitchNames.dopenmute  = #'dopenmute
drumPitchNames.dom        = #'dopenmute
drumPitchNames.dopenopen  = #'dopenopen
drumPitchNames.dslap      = #'dslap
drumPitchNames.ds         = #'dslap
drumPitchNames.dslapmute  = #'dslapmute
drumPitchNames.dsm        = #'dslapmute
drumPitchNames.dslapopen  = #'dslapopen

#(define djembe '(
         (dbass            default   #f           -2)
         (dbassmute        default   "stopped"    -2)
         (dbassopen        default   "open"       -2)
         (dopen            default   #f           0)
         (dopenmute        default   "stopped"    0)
         (dopenopen        default   "open"       0)
         (dslap            default   #f           2)
         (dslapmute        default   "stopped"    2)
         (dslapopen        default   "open"       2)
         (sidestick       cross     #f           -4)
         ))


midiDrumPitches.dbass = g
midiDrumPitches.dopen =  a
midiDrumPitches.dslap =  b
midiDrumPitches.dbassmute = fis
midiDrumPitches.dopenmute = gis
midiDrumPitches.dslapmute = ais

one = \drummode { r4 dba4 do ds r dbm dom dsm } 

\score {
   \new DrumStaff
    \with {
      \override StaffSymbol.line-count =  #3
      instrumentName = #"Djembe 1"
      drumStyleTable = #(alist->hash-table djembe)
      drumPitchTable = #(alist->hash-table midiDrumPitches)
    }
    \one
  \layout {}
  \midi {}
}