pipeband-music/2-4_marches/caller_herrin/pipes.ly

\version "2.18.2"

\include "bagpipe.ly"

\include "./config.ily"
\include "./notes.pipes.ily"

markTextEolDown = #(define-music-function (parser location text) (string?) #{
    \once \override Score.RehearsalMark #'break-visibility = #end-of-line-visible
    \once \override Score.RehearsalMark #'self-alignment-X = #RIGHT
    \once \override Score.RehearsalMark #'direction = #DOWN
    \mark \markup $text
#})

fine = {\markTextEolDown "Fine" }
dsalfine = {\markTextEolDown "D.S. al Fine" }


\score {
    \new Staff {
		\global
		\pipeglobal
		<<
			\new NullVoice = "format" {
				\repeat volta 2 {
					\part
					\halfline
					\mark \markup { \musicglyph "scripts.segno"}
					%\inStaffSegno
					\halfline
					\fine
				}
				\break

				\part
				\halfline
				\halfline
				\dsalfine
				\bar "||"
				%\break
				%\halfline
				%\break
				%\halfline
				%\bar "|."
			} % Format
			\new Voice = "pipes" {
				\pipesA s8

				\removeWithTag #'fine \pipesB
			} % Pipes
		>>
	}
	\header {
		title = \title
		meter = \meter
		instrument = \instrumentPipes
		composer = \composerPipes
		arranger = \arrangerPipes
	}
}
\score {
	\new Staff { \global \pipeglobal
		\set Staff.midiInstrument = #"bagpipe"
		%%Tune
		\partial 8
		\unfoldRepeats {
			\repeat volta 2 {
				\pipesA
			}
			\removeWithTag #'fine \pipesB
			\removeWithTag #'fineRemove \pipesA
		}

	}
	\midi { \confTempo }
	\header {
		title = \title
		subtitle = \subtitle
		meter = \meter
		instrument = \instrumentPipes
		composer = \composerPipes
		arranger = \arrangerPipes
	}
}