\include "paper16.ly"
\paper  { papersize = "a4" }

%\version "1.8.2"
     %date 02/10/03

\include "nederlands.ly"

\header {
  title = "Hana-Bi"
%  subtitle = " "
%  subsubtitle = " "
%  dedication = " "
  composer = "Thorkil Wolvendans"
  opus = "Opus X"
  copyright = "Copyright (c) 2003 Thorkil Wolvendans"
%  tagline = " "
  source =  "Urtext"
  enteredby = "Thorkil Wolvendans"
  maintainerEmail = "address@hidden"
}

%*****  GLOBAL  *****%

timesig = \notes {
	%maat 1-51
	     \time 4/8
	     s2*51
	%maat 52-63
	     \time 5/8
}
tempdir = \notes {
   \property Score.MetronomeMark \set #'minimum-space = #'-2.0
	\tempo 8 = 200
}

repmark = \notes {
%CHECK IF MARKUP CAN BE RAISED PERMANTELY!!
	%maat 1-7
	     s2*7\break
	%maat 8-14
	     s2^\markup { ""}^\markup { ""}^\markup {\box \huge \bold "A"}
	     s2*6
	%maat 15-30
	     s2^\markup { ""}^\markup { ""}^\markup {\box \huge \bold "B"}
	     s2*15
	%maat 31-44
	     s2^\markup { ""}^\markup { ""}^\markup { ""}^\markup { ""}^\markup { ""}^\markup {\box \huge \bold "C"}
	     s2*13 \break
	%maat 45-51
	     s2^\markup { ""}^\markup { ""}^\markup {\box \huge \bold "D"}
	     s2*6
	%maat 52-63
	     s2^\markup { ""}^\markup { ""}^\markup {\box \huge \bold "E"}
}

bars = \notes {
   s2*7
     \bar "||"
   s2*7
     \bar "||"
   s2*16
     \bar "||"
   s2*14
     \bar "||"
   s2*7
     \bar "||"
}

%***** TRUMPET *****%

tptdyn = \notes {
	%maat 1-7
	     s2\f
	     s2*6
	%maat 8-14
	     s2*7
	%maat 15-27
	     s2*13
	%maat 28-30
	     s2\ff
	     s2*2
	%maat 31-44
	     s2\f
	     s2*13
}

tptexp = \notes {
	%maat 1-7
	     s2^\markup { \bold Mute }
	     s2*6
	%maat 8-14
	     s2*7
	%maat 15-27
	     s2*12
	     R2^\markup { \bold \center < Mute w/Hand > }
	%maat 28-30
	     s2^\markup { ""}^\markup { ""}^\markup { ""}^\markup { ""}^\markup {\bold "Growl"}
	     s2*2
	%maat 31-44
	     s2^\markup { ""}^\markup {\bold "Natural"}
	     s2*13
}

tpt = \notes \transpose c d \relative c' {
	\property Staff.instrument = #"Trumpet " {
	%maat 1-7
	     es8-> r16 d->( es f es8) | r16 d->( es f es) d( es f |
	     es8) r16 d->( es f es8) | r16 d->( es f fis8 fis |
	     fis16 f es8) r16 d( es f | es) d->( es f es8) r16 d->( |
	     es f fis8 fis->) r |
%	%maat 8-14
%	     R2*7
%	%maat 15-27
%	     R2*12
		\property Score.skipBars = ##t R2*7  R2*12
	     R2
	%maat 28-30
	     g2-\stopped ~ | g-\open | R2 |
	%maat 31-44
	     g8-> r16 f->( g b g8) | r16 f->(g b g) f->(g b |
	     g8) r16 f->( g b g8) | r16 f->( g b cis8-> cis-> |
	     cis16 b g8) r16 f->( g b | g) f( g b g8) r16 f( |
	     g b cis8 d->) r | b16-> (a f8) r b16->( a f) b->( a f) b( a f8) |
	     r8 b16->( a f) b->( a f) | b( a f8) r8 b16->( a |
	     f) b->( a f) b( a f8) | r8 b16->( a f) b->( a f) |
	     b->( a f) b->( a f8) r16 |
%	%maat 45-51
%	     R2*7
		\property Score.skipBars = ##t R2*7
%	%maat 52-63
%	     R2*4
		\property Score.skipBars = ##t R1*5/8*4
	     b4 ~ b4 ~ b8 ~ | b2 r8 | c16 fis, r8 r r4 |
	     b4 ~ b4 ~ b8 ~ | b2 r8 | b16 c gis fis r8 r4 | R1*5/8 |
	%maat 64-71

	}	     	     
}

\score {
	\context Staff = trumpet <<
%	\property Staff.midiInstrument = #"muted trumpet"
	  \clef treble
	    \timesig
	      \tempdir
	    \bars
	      \repmark
	\tpt
          \tptdyn
	  \tptexp
	>>
}
   \midi {
%     \tempo 8 = 200
   }

   \paper {}