\version "2.12.3"

% Accordion piece template. To create an accordion piece from this,
% save it as e.g. MyPiece.ly and 
% create MyPieceDefinitions.ly from accTemplateDefinitions.ly.

\header { % adapt title, composer etc. to your piece
  title = "Greensleeves"
  subtitle = "for Standard Bass Accordion"
  composer = "traditional"
  % Adapted for the Lilypond Accordion Template from:
%{    mutopiatitle = "Greensleeves"
    mutopiacomposer = "Traditional"
    mutopiainstrument = "Accordion"

    source = "Mutopia Project"
    style = "Renaissance"
    copyright = "Public Domain"

    maintainer = "Ralf Axel Gehlert"

    maintainerEmail = "raggraebe-mutopia@Yahoo.Com"
    lastupdated = "2008/Jan/12"

    moreInfo="This piece is a simple version of the well known song for the standard bass accordion. It is an adaption of mutopias piano version."%}
}

#(set-global-staff-size 20)

\include "accDefinitions.ly"	% these are constant, define e.g. accTremolo

oBr = { } % orig. break
sBr = { \break } % structural break, makes structure more obvious

% Melody and chords definition per piece, for both layout and MIDI; adapt these
upper = \relative c'' { 
    \partial 4 a4\accTremolo | 
    c2 d4 | e4. f8 e4 | d2 b4 | g4. a8 b4 | c2 a4 | a4. gis8 a4 | \oBr b2 gis4 | e2 a4 | \sBr
    c2 d4 | e4. f8 e4 | d2 b4 | g4. a8 b4 | c4. b8 a4 | \oBr gis4. fis8 gis4 | a2. | a2. | \bar "||" \sBr
    g'2. | g4. fis8 e4 | d2 b4 | g4. a8 b4 | \oBr c2 a4 | a4. gis8 a4 | b2 gis4 e2. | \sBr
    g'2. | g4. fis8 e4 | \oBr d2 b4 | g4. a8 b4 | c4. b8 a4 | gis4. fis8 gis4 | a2. | a2 \bar "||" }

chord = \chordmode { 
    s4 | a2.:min | e4 a2:min | g2. | d4 g2 | f2. | c4 f2 | e2. | b4 e2 | 
    a2.:min | e4 a2:min | g2. | d4 g2 | f2. | e2.:7 | a2.:min | a2. | 
    c2. | g4 c2 | d4 g2 | g2. | f2. | c4 f2 | e2.:7 | b4 e2 | 
    c2. | g4 c2 | d4 g2 | g2. | f2. | e2.:7 | a2.:min | a2:min }

% layout part: make sure accLayoutDefinitions.ly contains all definitions you need
\include "accLayoutDefinitions.ly"   % should be constant, but make sure it's complete
first = { r4 } % MIDI here needs a \p
\include "Greensleeves Definitions.ly" % copy this file and edit the copy; rename the included file

\score {
    <<
    \new PianoStaff <<
    \set PianoStaff.instrumentName = #"Accordion"
    \new Staff = "upper" { % adapt key, time if necessary
        \clef treble
	\time 3/4
	\key a \minor
	\upper
    }
    % RhythmicStaff advantages: chords line closer to bass staff; disadvantage: not PianoStaff brace
%     \new RhythmicStaff = "lower" {
    % (normal) Staff advantage: PianoStaff brace; disadvantage: distance chords line - bass staff
    \new Staff = "lower" {
	\autoBeamOff
        \clef bass
	\override Staff.Stem #'transparent = ##t  % tell Stem_engraver not to print stems
	\override Staff.StaffSymbol #'line-count = 1  % or ledger-line-thickness 
	\lower
    }
    >>	
    \new ChordNames {
        \override VerticalAxisGroup #'nonstaff-unrelatedstaff-spacing = #'((basic-distance . 0) (minimum-distance . 0) (padding . 0) ( stretchability . 0))
        \override VerticalAxisGroup #'Y-extent = #'(0 . 0)
 	\set chordChanges = ##f
	\chord
    }
    >>
    \layout { }
}


\include "accMidiDefinitions.ly"
first = { r4\p } % bass usually needs lower volume; for this to work, we need a \p (piano) sign
\include "Greensleeves Definitions.ly" % rename the included file


\score {
<<
    \new Staff = "upper" { % adapt key, time if necessary
        \clef treble
	\time 3/4
	\key a \minor
	\set Staff.midiInstrument = #"accordion"
	\upper
    }
    \new Staff = "lower" {
        \clef bass
	\time 3/4
	\key a \minor
	\set Staff.midiInstrument = #"accordion"
	\set Staff.midiMinimumVolume = #0.25 % set bass volume
	\set Staff.midiMaximumVolume = #0.5
	\lower
    }
>>
%     \layout { }	% to see the generated MIDI
    \midi {
	\context {
	    \Score
	    tempoWholesPerMinute = #(ly:make-moment 150 4) % adapt MIDI tempo
	}
    }
}