\paper{ papersize = "a4" linewidth = -1.0 } \include "paper16.ly" \include "italiano.ly" #(define note '(columns (music "noteheads-2" ((kern . -0.1) "flags-stem")))) #(define eight-note `(columns ,note ((kern . -0.1) (music ((raise . 3.5) "flags-u3"))))) #(define dotted-eight-note `(columns ,eight-note (music "dots-dot"))) #(define mydrums (append `( (tambourine diamond #f ,(make-pitch 0 3 0)) (maxstax diamond #f ,(make-pitch 0 4 0)) (splash diamond #f ,(make-pitch 0 5 0)) (chinesecymbal diamond #f ,(make-pitch 0 6 0)) (hightom default #f ,(make-pitch 0 4 0)) (lowtom default #f ,(make-pitch 0 3 0)) (bassdrum default #f ,(make-pitch -1 1 0)) (crash cross #f ,(make-pitch 0 6 0)) (crashcymbala cross #f ,(make-pitch 0 6 0)) (crashcymbalb cross #f ,(make-pitch 1 0 0)) (ridecymbal xcircle #f ,(make-pitch 0 5 0)) ) drums )) #(define drum-pitch-names (append `( (maxstax stax ,(make-pitch -3 6 0 )) (crash cc ,(make-pitch -3 6 0 )) (splash sp ,(make-pitch -3 6 0 )) (splash sp ,(make-pitch -3 6 0 )) ) drum-pitch-names )) \include "drumpitch-init.ly" stax = \notes { hc } drumheader = \notes { \cadenzaOn \fatText 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 " \break \property Score.currentBarNumber = #0 \cadenzaOff }