\version "2.10.25"

trpI =
{
	\transpose a b \relative c''
	{
		\key a \minor
		R1*6 | \bar "||"
		a8 b a b c d e4~ | e \times 2/3 { g8 g g } g8 g r a | r a r as r as g4 |
		r4 \times 2/3 { b,8 c d } c8 d es f | g4-. r8 ges~ ges4 f | r \times 2/3 { r8 b, bes } a8 bes d f |
		fis1 | r4 \times 2/3 { e8 e e } d8 g r g | e4-. r8 g->~ g4 b8-> b-^ | R1 | \bar "||" R1*3 |
		r4. e,8 e e r g | r g r g r g fis4~ | fis8 fis fis4-. fis8 fis r d~ | d f!4 e8~ e  gis a4^^ |
		R1 | \bar "||" R1*7 | r8 bes-> bes4^^ r2 | \bar "||" R1 | r8 b, e2. | r2.. a,8 |
		c8 d e4->-\bendAfter #-2 r2 | R1*12 | \bar "||" d,2~ \times 2/3 { d4 f8 } \times 2/3 { d f a } |
		bes2 d4. b8~ | b2~ b8 c d e~ | e2. r4 | R1*3 | r8 bes'8-> bes4^^ r2 | \bar "||" R1*5 | r8 es, d2. | R1 |
		r2 r8 g4. | \bar "||" \key a \major
		gis2-\bendAfter #-2 r | R1*2 | r8 e-\bendAfter #-2 r4 r2 | R1*2 | r8 e, fis a r b r cis |
		r8 e cis4-. fis8 fis r gis  | a4^^ r r2 | R1 | r4. e8 r4 b~\fp\< | b2. r4\! | R1*3 |
		r8 gis b e d gis^^ r4 | \bar "||" R1*3 | r8 e~ e2 r4 | R1*2 | r8 cis r e,~ e4 fis | a4. b16 c b4. fis8 |
		a1~ | a2. r4 | r8 bes bes bes r bes r4 | r2 r8 d4. | fis4^^ r r2 | R1 | r4. e8-> e4^^ e^^ |
		r2 f-> | \bar "||" \key a \minor
		d4^^ r8 f,~ f a g as~ | as b d g~ g4 r8 f | e c r4 r8 e r g | f4 r r8 as r g | R1 |
		e8 d16 c b8 a gis b gis a | r4. a'8-> r ais-> b4^^ | R1 | \bar "||:" \repeat volta 2 { R1*8 }
		\repeat volta 2 { R1*8 } R1*8 | \bar "||:"
		\repeat volta 2
		{
			r8 g^^ r4 r4. g8^^ | r2 g8-> g^^ r4 | r8 a^^ r4 r2 | a,4 c f e | r8 g^^ r4 r4. g8^^ |
			r2 g8-> f^^ r e->-\bendAfter #-2 | R1*2 | r4. a,8 r d e f | r f r as g f r g |
			r e r g~ g g g g | r2 g,8 a c d | e4. d8 r2 | R1 | r8 d'^^ r4 r2 |
		}
		\alternative 
		{ { R1 } { r2 e, | g8-> a g a->~ a4 ges8-> as | ges as4.-> f8-> g f g->~ | g1 | b4-> r r2 | } } \bar "||:"
		\repeat volta 2 { R1*8 }
		\repeat volta 3 { R1*3 | r8 as, bes c d es f g | f4. e!8 d4-. g->~ | g2 r8 f^^ r e^^ | }
		\alternative { { r4. gis8-> a4^^ dis,8-> e^^ | r b c4-. r2 } { r4. a'8^^ r4. a8-> | g4^^ a2.-> } }
		\bar "||:" R1*7
		\override Score.VoltaBracket #'font-name = #"Century Schoolbook L"
		\set Score.repeatCommands = #'((volta "Till cue")) R1
		\set Score.repeatCommands = #'((volta #f)) \bar ":|"
		\set Score.repeatCommands = #'((volta "On cue")) R1
		\set Score.repeatCommands = #'((volta #f)) \bar "||"
	}
}

trpII =
{
	\transpose a b \relative c''
	{
		\key a \minor
		R1*6 | \bar "||"
		a8 b a b c d e4~ | e \times 2/3 { c8 c c } c8 c r d | r d r es r es d4 |
		r4 \times 2/3 { b8 c d } c8 d es f | c4-. r8 des~ des4 c | r4 \times 2/3 { r8 b bes } a8 bes d! f |
		r8 d~ d2. | r4 \times 2/3 { c8 c c } bes8 d r d | c4-. r8 e->~ e4 e8-> e^^ | R1 | \bar "||"
		R1*3 | r4. a,8 a a r d | r d r d r d cis4~ | cis8 cis cis4-. cis8 cis r d~ | d f4 e8~ e d e4^^ | R1 |
		\bar "||" R1*7 | r8 f-> f4^^ r2 | \bar "||" R1 | r8 b, e2. | r2.. fis,8 | a c c4->-\bendAfter #-2 r2 |
		R1*12 | \bar "||" d,2~ \times 2/3 { d4 f8 } \times 2/3 { d f a } | f2 as4. g8~ | g2.. c8~ | c2. r4 |
		R1*3 | r8 f-> f4^^ r2 | \bar "||" R1*5 | r8 c b2. | R1 | r4. c8~ c2 | \bar "||" \key a \major
		cis2-\bendAfter #-2 r | R1*2 | r8 d-\bendAfter #-2 r4 r2 | R1*2 | r8 e, fis a r b r cis |
		r8 e cis4-. d8 d r dis | e4^^ r r2 | R1 | r4. b8 r4 b~\fp\< | b2. r4\! | R1*3 | r8 gis b e d e^^ r4 |
		\bar "||" R1*2 | r2. b4~ | b2. r4 | R1*2 | r8 cis r e,~ e4 fis | a4. b16 cis b4. fis8 | fis1 | f2. r4 |
		r8 f f f r f r4 | r4. a8~ a2 | cis4^^ r r2 | R1 | r4. d8-> d4^^ cis^^ | r2 des-> | \bar "||" \key a \minor
		c4^^ r8 f,~ f a g gis~ | gis b a e'~ e4 r8 f | e c r4 r8 e r g | c,4 r r8 es r d | R1 |
		e8 d16 c b8 a gis b gis a | r4. d8-> r dis-> e4^^ | R1 | \bar "||:"
		\repeat volta 2 { R1*8 } \repeat volta 2 { R1*8 } R1*8 \bar "||:"
		\repeat volta 2
		{
			r8 e^^ r4 r4. e8^^ | r2 d8-> d^^ r4 | r8 e^^ r4 r2 | a,4 c f e | r8 e^^ r4 r4. e8^^ |
			r2 d8-> c^^ r c->-\bendAfter #-2 | R1*2 | r4. a8 r d e f | r f r as g f r g | r e r e~ e e e e |
			r2 g,8 a c d | c4. b8 r2 | R1 | r8 e^^ r4 r2 |
		}
		\alternative { { R1 } { r2 b | d4. d des4~ | des8 des4. c c8~ | c1 | e4-> r r2 } } \bar "||:"
		\repeat volta 2 { R1*8 }
		\repeat volta 3 { R1*3 | r8 as, bes c d es f g | f4. e!8 d4-. d->~ | d2 r8 c^^ r b^^ }
		\alternative { { r4. dis8-> e4^^ b8-> c^^ | r b c4-. r2 } { r4. e8^^ r4. e8-> | d4^^ e2.-> } }
		\bar "||:" R1*7
		\override Score.VoltaBracket #'font-name = #"Century Schoolbook L"
		\set Score.repeatCommands = #'((volta "Till cue")) R1
		\set Score.repeatCommands = #'((volta #f)) \bar ":|"
		\set Score.repeatCommands = #'((volta "On cue")) R1
		\set Score.repeatCommands = #'((volta #f)) \bar "||"
	}
}

trpIII =
{
	\transpose a b \relative c''
	{
		\key a \minor
		R1*6 | \bar "||"
		a8 b a b c d e4~ | e \times 2/3 { b8 b b } b8 b r c | r c r b r b b4 |
		r \times 2/3 { b8 c d } c8 d es f | bes,4-. r8 a~ a4 a | r \times 2/3 { r8 b bes } a8 bes d f |
		r4. a,8~ a2 | r4 \times 2/3 { b8 b b } a8 as r as | as4-. r8 d->~ d4 c8-> c^^ | R1 | \bar "||"
		R1*3 | r4. g8 g g r b | r b r b r b bes4~ | bes8 bes bes4-. bes8 bes r d~ | d f4 e8~ e b! c4^^ |
		R1 | \bar "||" R1*7 | r8 des-> des4^^ r2 | \bar "||" R1 | r8 b e,2. | r2.. e8 |
		fis8 a a4->-\bendAfter #-2 r2 | R1*12 | \bar "||" d,2~ \times 2/3 { d4 f8 } \times 2/3 { d f a } |
		d,2 f4. e8~ | e2.. b'8~ | b2. r4 | R1*3 | r8 des-> des4^^ r2 | \bar "||" R1*4 | r2 r8 b, r c~ |
		c8 d r as'~ as2 | R1 | r8 a!~ a2. | \bar "||" \key a \major
		b2-\bendAfter #-2 r2 | R1*2 | r8 b-\bendAfter #-2 r4 r2 | R1*2 | r8 e, fis a r b r cis |
		r8 e cis4-. a8 a r c8 | cis!4^^ r r2 | R1 | r4. a8 r4 b~\fp\< | b2. r4\! | R1*3 | r8 gis b e d d^^ r4 |
		\bar "||" R1*2 | r4. fis,8~ fis2~ | fis8 e~ e2 r4 | R1*2 | r8 cis' r e,~ e4 fis | a4. b16 c b4. fis8 |
		e1~ | e2. r4 | r8 es es es r es r4 | r8 e!~ e2. | a4^^ r r2 | R1 | r4. c8-> c4^^ b^^ | r2 c-> |
		\bar "||" \key a \minor
		a4^^ r8 f~ f a g as~ | as b f d'~ d4 r8 f, | e c r4 r8 e r g | bes4 r r8 b r b | R1 |
		e8 d16 c b8 a gis b gis a | r4. bes8-> r b-> c4^^ | R1 | \bar "||:" \repeat volta 2 { R1*8 }
		\repeat volta 2 { R1*8 } R1*8 \bar "||:"
		\repeat volta 2
		{
			r8 b^^ r4 r4. b8^^ | r2 as8^> as^^ r4 | r8 c^^ r4 r2 | a4 c f e | r8 b^^ r4 r4. b8^^ |
			r2 as8^> as^^ r a->-\bendAfter #-2 | R1*2 | r4. a8 r d e f | r f r as g f r g |
			r8 e r c~ c c c c | r2 g8 a c d | a4. a8 r2 | R1 | r8 c^^ r4 r2
		}
		\alternative { { R1 } { r2 as-> | bes4. bes a!4~ | a8 a4. as as8~ | as1 | c4-> r r2 } } \bar "||:"
		\repeat volta 2 { R1*8 }
		\repeat volta 3 { R1*3 | r8 as bes c d es f g | f4. e!8 d4-. as->~ | as2 r8 as^^ r ges^^ }
		\alternative { { r4. b8-> c4^^ bes8-> b^^ | r b c4-. r2 } { r4. c8^^ r4. c8-> | bes4^^ des2.-> } }
		\bar "||:" R1*7
		\override Score.VoltaBracket #'font-name = #"Century Schoolbook L"
		\set Score.repeatCommands = #'((volta "Till cue")) R1
		\set Score.repeatCommands = #'((volta #f)) \bar ":|"
		\set Score.repeatCommands = #'((volta "On cue")) R1
		\set Score.repeatCommands = #'((volta #f)) \bar "||"
	}
}

trb = \relative c'
{
	\clef bass \key a \minor
	R1*6 | \bar "||"
	a8 b a b c d e4~ | e \times 2/3 { e8 e e } e8 e r f | r f r f r f e4 | r \times 2/3 { b8 c d } g8 f es d |
	es4-. r8 es~ es4 d | r \times 2/3 { r8 b bes } a8 bes d f | r2 r8 e4. | r4 \times 2/3 { g8 g g } f8 e r e |
	d4-. r8 gis8->~ gis4 fis8-> fis^^ | R1 | \bar "||" R1*3 | r4. c8 c c r e | r e r e r e e4~ |
	e8 e e4-. e8 e r d~ | d f4 e8~ e f fis4^^ | R1 | \bar "||" R1*7 | r8 g-> g4^^ r2 | \bar "||" d2 r8 c r b~ |
	b2 r | c4. b8 r c a4~ | a r r2 | R1*12 | \bar "||" r2 \times 2/3 { g8 c d } \times 2/3 { g,8 c d } |
	gis,2 d'4. d8~ | d2.. fis8~ | fis2. r4 | R1*3 | r8 g-> g4^^ r2 | \bar "||" R1*4 | r2 r8 a, r gis~ | gis1 | R1 |
	d'1 | \bar "||" \key a \major
	e2-\bendAfter #-2 r | R1*2 | r8 a-\bendAfter #-2 r4 r2 | R1*3 | r2 e8 e r f | fis!4^^ r r2 | R1 |
	r4. c8 r4 b~\fp\< | b2. r4\! | R1*2 | r8 d r f r a gis4~ | gis2~ gis8 gis^^ r4 | \bar "||" R1*2 | fis,,1 |
	r8 e'~ e2 r4 | R1*4 | r8 fis' r a, r b r a | c2 b4 r | r8 b b b r b r bes~ | bes1 | d4^^ r r2 | R1 |
	r4. a'8-> a4^^ gis^^ | r2 g-> | \bar "||" \key a \minor
	f4^^ r r2 | r4 d8 gis~ gis4 r8 f | e c r4 r8 e r g | ges4 r r8 f r e | R1*2 | r4. e8-> r f-> fis4^^ | R1 |
	\bar "||:" \repeat volta 2 { R1*8 } \repeat volta 2 { R1*8 } R1*8 \bar "||:"
	\repeat volta 2
	{
		r8 f^^ r4 r4. f8^^ | r2 e8-> e^^ r4 | r8 fis^^ r4 r2 | R1 | r8 f^^ r4 r4. f8^^ |
		r2 e8-> d^^ r fis->-\bendAfter #-2 | R1 | a,4-. c-. e4. d8~ | d1 | R1 | r4. a'8~ a a a a | R1 |
		f4. f8 r2 | R1 | r8 fis^^ r4 r2
	}
	\alternative { { R1 } { r2 f! | e4. e es4~ | es8 es4. d d8~ | d1 | fis4^^ r r2 } } \bar "||:"
	\repeat volta 2 { R1*8 }
	\repeat volta 3 { r8 d r f e4 d | g2 r8 f r c | r c r es d4 c | R1 | r2. e4->~ | e2 r8 d^^ r c^^ }
	\alternative { { r4. f8-> ges4^^ f8-> ges^^ | R1 } { r4. fis8^^ r4. fis8-> | g!4^^ g2.-> } } \bar "||:" R1*7
	\override Score.VoltaBracket #'font-name = #"Century Schoolbook L"
	\set Score.repeatCommands = #'((volta "Till cue")) R1
	\set Score.repeatCommands = #'((volta #f)) \bar ":|"
	\set Score.repeatCommands = #'((volta "On cue")) R1
	\set Score.repeatCommands = #'((volta #f)) \bar "||"
}

\book
{
	\score
	{
		<<
			\new StaffGroup = "horns"
			<<
				\set StaffGroup.systemStartDelimiterHierarchy
					= #'(SystemStartBracket (SystemStartSquare a b c) d)
				\new Staff = "trpI" \trpI
				\new Staff = "trpII" \trpII
				\new Staff = "trpIII" \trpIII
				\new Staff = "trb" \trb
			>>
		>>
		
		\layout { }
	}
}