Sorry, it happens just about everytime, with me, doesn't it ?
-- 
Stéphane Epardaud
\version "2.1.8"

\header {
  title      =  "Take The Time"
  instrument =  "Drums v1"
  arranger   =  "Transcribed by Stef Epardaud"
  composer =    "Composed by Dream Theater"
  copyright =   "Music Copyright Dream Theater"
  tagline   =   "Transcribed using LilyPond (www.lilypond.org)"
}

\include "drums.ly"

% tomh toml tommh tomml tomfh tomfl 
drh = \notes { 
 \tempo 4=120
 \time 4/4
 
 % depart basse
 R1*3

 \time 6/4
 <<
 \context Voice=VA {\voiceOne 
    sp4 r1 sp4
 }
 \context Voice=VB {\voiceTwo
                <<r8 bd8>> sn16 sn16 <<sn8 bd8>> r8 <<sn16 bd16>> r8 sn16 <<r8 bd8>>
    sn8 <<sn16 bd16>> sn16 sn16 r16 <<r4 bd4>>
 }
 >>

 \repeat unfold 2 {
  <<
  \context Voice=VA {\voiceOne 
     r1 r4 sp4
  }
  \context Voice=VB {\voiceTwo
                <<r8 bd8>> sn16 sn16 <<sn8 bd8>> r8 <<sn16 bd16>> r8 sn16 <<r8 bd8>>
     sn8 <<sn16 bd16>> sn16 sn16 r16 <<r4 bd4>>
  }
  >>
 }

 \time 9/8
 <<
 \context Voice=VA {\voiceOne 
 }
 \context Voice=VB {\voiceTwo
                <<r8 bd8>> sn16 sn16 <<sn16 bd16>> sn16 r8 <<sn16 bd16>> r8 sn16 <<r8 
bd8>>
     sn16 sn16 <<sn16 bd16>> sn16
 }
 >>

 <<
 \context Voice=VA {\voiceOne 
 }
 \context Voice=VB {\voiceTwo
                r8 <<sn16 bd16>> sn16 sn16 sn16 <<r8 bd8>> sn16 r16 <<r16 bd16>> sn16 
r8 
    <<sn16 bd16>> sn16 sn16 sn16
 }
 >>

 <<
 \context Voice=VA {\voiceOne 
 }
 \context Voice=VB {\voiceTwo
                <<r8 bd8>> sn16 sn16 <<sn16 bd16>> sn16 r8 <<sn16 bd16>> r8 sn16 <<r8 
bd8>>
     sn16 sn16 <<sn16 bd16>> sn16
 }
 >>

 \time 5/16
 <<
 \context Voice=VA {\voiceOne 
 }
 \context Voice=VB {\voiceTwo
                r8 <<\grace sn16 sn16 bd16>> sn16 sn16
 }
 >>

 \tempo 4=151
 \time 12/8
 <<
 \context Voice=VA {\voiceOne 
    cymc4. cymr4. cymr4. cymr4.
 }
 \context Voice=VB {\voiceTwo
                bd8 bd8 bd8 
                <<bd8 sn8>> bd8 bd8 
                bd8 bd8 bd8 
                <<bd8 sn8>> bd8 <<bd8 sn8>>
 }
 >>

 \repeat unfold 6{
  <<
  \context Voice=VA {\voiceOne 
     cymr4. cymr4. cymr4. cymr4.
  }
  \context Voice=VB {\voiceTwo
                bd8 bd8 bd8 
                <<bd8 sn8>> bd8 bd8 
                bd8 bd8 bd8 
                <<bd8 sn8>> bd8 <<bd8 sn8>>
  }
  >>
 }

 <<
 \context Voice=VA {\voiceOne 
    cymr4. cymr4. cymr8 cymr8 r8 cymr8 cymr8 r8
 }
 \context Voice=VB {\voiceTwo
                bd8 bd8 bd8 
                <<bd8 sn8>> bd8 bd8 
                bd8 bd8 <<bd8 sn8>>
                bd8 bd8 <<bd8 sn8>>
 }
 >>

 % charley
 \repeat volta 2 {
  <<
  \context Voice=VA {\voiceOne 
     cymc4. cc4. cc4. cc4.
  }
  \context Voice=VB {\voiceTwo
                bd8 bd8 bd8 
                <<bd8 sn8>> bd8 bd8 
                bd8 bd8 bd8
                <<bd8 sn8>> bd8 bd8
  }
  >>
 
  \repeat unfold 2{
   <<
   \context Voice=VA {\voiceOne 
      cc4. cc4. cc4. cc4.
   }
   \context Voice=VB {\voiceTwo
                bd8 bd8 bd8 
                <<bd8 sn8>> bd8 bd8 
                bd8 bd8 bd8
                <<bd8 sn8>> bd8 bd8
   }
   >>
  }
 
  <<
  \context Voice=VA {\voiceOne 
     cymc4.
  }
  \context Voice=VB {\voiceTwo
                bd8 bd8 bd8 
                <<bd8 sn8>> <<bd8 sn8>> <<bd8 sn8>> 
                <<bd8 sn8>> <<bd8 sn8>> <<bd8 sn8>> 
                <<bd8 sn8>> <<bd8 sn8>> <<bd8 sn8>> 
  }
  >>
 }

 \tempo 4=124
 \time 6/4
  <<
  \context Voice=VA {\voiceOne 
    cymc8 cc8 cc8^^ cc8 cc8^^ cc8 cc8^^ cc8 cc8^^ cc8 cc8^^ cc8
  }
  \context Voice=VB {\voiceTwo
                bd8 bd8 sn4 bd8 bd8 sn8. bd8. bd8 sn16 bd8.
  }
  >>

  <<
  \context Voice=VA {\voiceOne 
    cymc8 cc8 cc8^^ \times 2/3 {cc16 cc16 cc16} cc8^^ cc8 cc8^^ cc8 cc8^^ cc8 cc8^^ r8
  }
  \context Voice=VB {\voiceTwo
                bd8 bd8 sn4 bd8 bd8 sn8. bd8. bd8 sn8 sn16 sn16
  }
  >>

  <<
  \context Voice=VA {\voiceOne 
    cymc8 cc8 cc8^^ cc8 cc8^^ cc8 cc8^^ \times 2/3 {cc16 cc16 cc16} cc8^^ cc8 cc8^^ cc8
  }
  \context Voice=VB {\voiceTwo
                bd8 bd8 sn4 bd8 bd8 sn4 r8 bd8 sn16 bd8.
  }
  >>

  <<
  \context Voice=VA {\voiceOne 
    cc8^^ cc8 cc8 
    cc8^^ cc8 cc8 
    cc8^^ cc8 cc8 
    cc8^^ cc8^^ r8 
  }
  \context Voice=VB {\voiceTwo
                bd8 bd16 sn8. 
                bd8 bd16 sn8. 
                bd8 bd16 sn8. 
                bd8 bd8 sn16 sn16
  }
  >>

  % chant
  <<
  \context Voice=VA {\voiceOne 
    cymc8 cc8 cc8^^ \times 2/3 {cc16 cc16 cc16} cc8^^ cc8 cc8^^ cc8 cc8^^ cc8 cc8^^ cc8
  }
  \context Voice=VB {\voiceTwo
                bd8 bd8 sn4 bd8 bd8 sn8. bd8. bd8 sn16 bd8.
  }
  >>

  <<
  \context Voice=VA {\voiceOne 
    cc8^^ cc8 cc8^^ cc8 cc8^^ cc8 cc8^^ cc8 cc8^^ cc8 cc8^^ cc8
  }
  \context Voice=VB {\voiceTwo
                bd8 bd8 sn4 bd8 bd8 sn8. sn8. bd8 sn16 bd8.
  }
  >>

  <<
  \context Voice=VA {\voiceOne 
    cc8^^ cc8 cc8^^ \times 2/3 {cc16 cc16 cc16} cc8^^ cc8 cc8^^ cc8 cc8^^ cc8 cc8^^ cc8
  }
  \context Voice=VB {\voiceTwo
                bd8 bd8 sn4 bd8 bd8 sn8. sn8. bd8 sn16 bd8.
  }
  >>

  <<
  \context Voice=VA {\voiceOne 
    cc8^^ cc8 cc8^^ cc8 cc8^^ cc8 cc8^^ cc8 cc8^^ cc8 cc8^^ cc8
  }
  \context Voice=VB {\voiceTwo
                bd8 bd8 sn4 bd8 bd8 sn4 bd8. sn16 bd8. sn16
  }
  >>

  <<
  \context Voice=VA {\voiceOne 
    cc8^^ cc8 cc8^^ cc8 cc8^^ cc8 cc8^^ cc8 cc8^^ cc8 cc8^^ cc8
  }
  \context Voice=VB {\voiceTwo
                bd8 bd8 sn4 bd8 bd8 sn8. sn8. bd16 bd16 sn8 bd8
  }
  >>

}

\score { 
  \context Staff=drumst \notes <<
    \property Staff.NoteHead
     \set #'font-name = #"feta11"
    \property Staff.instrument="Drums"
    \clef "percussion"
    \apply #(drums->paper 'mydrums) <<
     \drh
    >>
 >>
 \paper {
   \translator {
      \StaffContext
      \consists Instrument_name_engraver
      Script \override #'padding = #0.5
   }
 }
}
\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
   }
 }
}
_______________________________________________
Bug-lilypond mailing list
[EMAIL PROTECTED]
http://mail.gnu.org/mailman/listinfo/bug-lilypond

Reply via email to