\version "2.13.40" % Version

\header{ % Header
  title = "Magma" % Title
  composer = \markup \bold "LARRY CLARK" % Composer
  instrument = "Trumpet" % Instrument
} % End Header

% Variables
Intro = { d1\f\< | d4\! e r2 | d2\< e4 f | g\! e r2 | d1\< | e4\! f r }
FourDescTwos = { a2 g | f e }
FourAscFours = { d4 e f a }
FourDescFours = { a4 g f e }
FourDescFoursUp = { a'4 g f e }
AscOnesTwo = { e4 f g2 }
DescOnesTwo = { g4 f e2 }
SwingDownOnesTwoCr = { d4 c d2\< }
SwingDownOnes = { r4 g e g }
SwingDownOnesfk = { r4\! g\f e g }
ArcD = { d4 e f d }
ArcDmf = { d4\mf e f d }
ArcDfk = { d4\!\f e f d }
ArcDffk = { d4\!\ff e f d }
ArcE = { e4 f g e }
ArcG = { g4 f e g }
AccA = { a4_> r g_> r }
AccAk = { a'4\!_> r g_> r }

barNumberMark = {
  \once \override Score.BarNumber #'direction = #UP
  \once \override Score.BarNumber #'stencil = #(make-stencil-boxer 0.1 0.25 ly:text-interface::print)
  \once \override Score.BarNumber #'font-series = #'bold
}


\score{ % Score
  \new Staff \with {
    instrumentName = \markup \bold "BPS42"  % Bullshit: Only to make BPS42 appear there
  } { % Staff
    % Settings
    \clef treble % Treble
    \numericTimeSignature % Force 4/4 instead of C
    \time 4/4 % Force 4/4
    \tempo "Aggressive" 4 = 152 % Tempo
    \compressFullBarRests % Allow compression, to get |--| full-measure rests
    \override MultiMeasureRest #'expand-limit = #1 % Force limit to less than 2
    
    % Music
    \bar ""
    \relative c' { % Score proper
      \repeat volta 2 {\Intro d4 } % part of 1st line
      \alternative { % Repeat
	{ \FourDescFoursUp | \SwingDownOnesTwoCr\break} % End 1st line
	{ a'2\! g } % Beginning 2nd line
      } % End Repeat 
      { f e~ | e1\< | \barNumberMark d4_>\ff\! r4 r2 | R1*3 | \barNumberMark \ArcDmf | \AscOnesTwo | \FourAscFours } \break % part of 2nd line
      { \DescOnesTwo | \ArcD | \ArcE | \FourDescFours | \SwingDownOnesTwoCr | \barNumberMark \ArcDfk | \AscOnesTwo } \break % 3rd line
      { \FourAscFours | \DescOnesTwo | \ArcD | \ArcE | \FourDescFours | \SwingDownOnesTwoCr | \barNumberMark R1*7\! } \break % 4th line
      { r2 g\mp\< | \barNumberMark \SwingDownOnesfk | \ArcG | r4 a f d | g4 f g2 | \SwingDownOnes | \ArcG } \break % 5th line
      { f4 e a e | d e d2\< | \barNumberMark \AccAk | a4_> g_> r2 | R1*2 | \AccA | f4_> e_> r2 | R1*2 } \break % 6th line
      { \AccA | a4_> g_> r4 g | \FourDescTwos | a1( | g) | R1 | r2 f4\mf\< e | \barNumberMark \ArcDffk } \break % 7th line
      { \AscOnesTwo | \FourAscFours | \DescOnesTwo | \ArcD | \ArcE | \FourDescTwos | R1 | \barNumberMark \Intro g4 } % 8th + beginning of 9th line
      { \AccA | f4_> r e_> r | d2_>\ff c4_> e_> d_> d_> r2 } % part of 9th and last line
    } % End of Music
  } % End of Staff
  \layout {
    \context {
      \Score
      barNumberVisibility = #all-bar-numbers-visible  % to print "1" also
      \override BarNumber #'break-visibility = #'#(#f #t #t)  % #end-of-line-invisible
      \override BarNumber #'direction = #DOWN
      \override BarNumber #'self-alignment-X = #CENTER
    }
  }
} % End of Score