\paper{ 
 papersize = "a4"
 linewidth = -1.0
}

\include "paper16.ly"
\include "italiano.ly"

#(set-drum-kit 'mydrums (append `(
   (tambourine      diamond #f ,(ly:make-pitch 0 3 0))
   (maxstax         diamond #f ,(ly:make-pitch 0 4 0))
   (splash          diamond #f ,(ly:make-pitch 0 5 0))
   (chinesecymbal   diamond #f ,(ly:make-pitch 0 6 0))
   (hightom         default #f ,(ly:make-pitch 0 4 0))
   (lowtom          default #f ,(ly:make-pitch 0 3 0))
   (bassdrum        default #f ,(ly:make-pitch -1 1 0))
   (crash           cross   #f ,(ly:make-pitch 0 6 0))
   (crashcymbala    cross   #f ,(ly:make-pitch 0 6 0))
   (crashcymbalb    cross   #f ,(ly:make-pitch 1 0 0))
   (ridecymbal      xcircle #f ,(ly:make-pitch 0 5 0))
) (get-drum-kit 'drums)))

#(define-public drum-pitch-names (append `(
		(maxstax   stax	    ,(ly:make-pitch 0 4 NATURAL ))
		(crash     cc	      ,(ly:make-pitch 0 6 NATURAL ))
		(splash    sp	      ,(ly:make-pitch 0 5 NATURAL ))
) drum-pitch-names ))

\include "drumpitch-init.ly"

drumheader = \notes {
 \fatText
 \cadenzaOn
 tomh4^"8 TT "
 toml4^"10 TT "
 tommh4^"12 TT "
 tomml4^"13 TT "
 tomfh4^"16 TT "
 bd4^"Bass drum "
 sn4^"Snare "

 cymca4^"A Cr. "
 cymcb4^"B Cr. "
 cymr4^"Ride "
 cymch4^"Chin. "
 hh4^"HH "
 hho4^"HH open "
 hhc4^"HH closed "
 sp4^"Spl. "
 stax4^"Stax "
 tamb4^"Tambourine "
 \cadenzaOff
}

\score { 
  \context Staff=drumst \notes <<
    \property Staff.NoteHead
     \set #'font-name = #"feta11"
    \property Staff.instrument="Key"
    \clef "percussion"
    \apply #(drums->paper 'mydrums) <<
     \drumheader
    >>
 >>
 \paper {
   \translator {
      \StaffContext
      \consists Instrument_name_engraver
      Script \override #'padding = #0.5
   }
 }
}