% page height
\vsize=10.5in
% page width
\hsize= 4in
% top margin
\voffset=-0.75in
% left margin
\hoffset=0in
\output{\plainoutput}

%T, L, M, K, S, V: output bass note/chord name.

\def\userTu#1{\accchord{$\underline{\hbox{\csname uc#1\endcsname}}$}}
                                                        % T for third/terts
\def\userLu#1{\accchord{\csname uc#1\endcsname  }}      % L for low/laag
\def\userMu#1{\accchord{\csname lc#1\endcsname  }}      % M for Major/majeur
\def\userKu#1{\accchord{\csname lc#1\endcsname m}}      % K for minor/klein
\def\userSu#1{\accchord{\csname lc#1\endcsname 7}}      % S for seventh/septiem
\def\userVu#1{\accchord{\csname lc#1\endcsname d}}      % V for dim/verminderd

\let\userTl\userTu
\let\userLl\userLu
\let\userMl\userMu
\let\userKl\userKu
\let\userSl\userSu
\let\userVl\userVu


\def\doaccchord#1{\zcharnote e{\gfont \vbox{\hbox{#1}\unvbox\waitingchord}}}
\let\accchord\doaccchord

% W: do not typeset the notename immediately, but combine with the
% following.
\newbox\waitingchord
\def\userW{\let\accchord\postponeachchord}
\def\postponeachchord#1{\gfont
\setbox\waitingchord=\vbox{\kern0.9pt\hbox{#1}\unvbox\waitingchord}%
\let\accchord\doaccchord}

\def\userWu#1{\userW}
\let\userWl\userWu

% the following needs expansion for tunes in other keys!
\chardef\lcM=`f
\chardef\lcc=`c
\chardef\lcN=`g
\chardef\ucF=`F
\chardef\ucJ=`C
\chardef\ucG=`G
\chardef\ucK=`D
\chardef\ucE=`E


\catcodesmusic
\def\userUu#1#2\bar#3&{\itied0{#1}#2\bar#3&\ttie0}
\def\userUl#1#2\bar#3&{\itieu0{#1}#2\bar#3&\ttie0} % U looks like slur..

X:1
T:Merrily we roll along
M:4/4
L:1/4
K:C 1&1
LC  Mc LC  Mc & E D C  D|\
LC  Mc LC  Mc & E E E2  |\
LG, MG LG, MG & D D D2  |\
LC  Mc LC  Mc & E G G2  |\
LC  Mc LC  Mc & E D C  D|\
LC  Mc LC  Mc & E E E2  |\
LG, MG LG, MG & D D E  D|\
\mulooseness=1
LC & C4&& Mc &    && LC &   && Mc &  |

\interinstrument=5pt

X:2
T:Oh when the Saints
M:4/4
L:1/4
K:C 1&1
z3&CEF|\
LC  Mc & UG4     && LC  Mc &     |\
LC  Mc & G   C   && LC  Mc & E  F|\
LC  Mc & UG4     && LC  Mc &     |\
LC  Mc & G   C   && LC  Mc & E  F|\
LC  Mc & G2      && LC  Mc & E2  |\
LC  Mc & C2      && LC  Mc & E2  |\
LG, SG & E   UD3 && LG, SG &     |\
LG, SG & D   E   && LG, SG & E  D|\
LC  Mc LC & C3      &&  Mc &    C|\
LC  Mc & E2      && LC  Mc & G  G|\
LF, MF & G   UF3 && LF, MF &     |\
LF, MF & F2      && LF, MF & E  F|\ 
LC  Mc & G2      && LC  Mc & E2  |\
LC  Mc & C2      && LG, SG & D2  |\
LC  Mc & UC4     && LC  Mc &     |\
\mulooseness=2
[WLCMc] & C||

X:3
T:Scales of C
M:4/4
L:1/4
K:C
"1"C "2"D "3"E "1"F| "2"G "3"A "4"B "1"c|\
"2"d "3"e "1"f "2"g| "3"a "4"b "5"c'2|\
"5"c' "4"b "3"a "2"g| "1"f "3"e "2"d "1"c|\
"4"B "3"A "2"G "1"F| "3"E "2"D "1"C "2"B,|"1"C4||

X:4
T:Scales of B flat
M:4/4
L:1/4
K:Bb
"2"B, "1"C "2"D "3"E| "1"F "2"G "3"A "4"B|\
"1"c "2"d "3"e "1"f | "2"g "3"a "4"b2 |\
"4"b "3"a "2"g "1"f| "3"e "2"d "1"c "4"B|\
"3"A "2"G "1"F "3"E| "2"D "1"C "2"B,2||

X:5
T:Arpeggios
M:3/4
L:1/4
K:C
"1"C "2"E "3"G| "5"c "3"G "2"E| "1"C "2"E "3"G| "5"c "3"G "2"E|\
"1"F "2"A "3"c| "5"f "3"c "2"A| "1"F "2"A "3"c| "5"f "3"c "2"A|
"1"G "2"B "3"d| "5"g "3"d "2"B| "1"G "2"B "3"d| "5"g "3"d "2"B|\
"1"C "2"E "3"G| "5"c "3"G "2"E| "1"C3-| C3||\

X:6
T:Oh when the Saints (alternating basses)
M:4/4
L:1/4
K:C 1&1
z3&CEF|\
LC  Mc & UG4     && LG, Mc &     |\
LC  Mc & G   C   && LG, Mc & E  F|\
LC  Mc & UG4     && LG, Mc &     |\
LC  Mc & G   C   && LG, Mc & E  F|\
LC  Mc & G2      && LG, Mc & E2  |\
LC  Mc & C2      && LG, Mc & E2  |\
LD  SG & E   UD3 && LG, SG &     |\
LD  SG & D   E   && LG, SG & E  D|\
LC  Mc LC & C3      &&  Mc &    C|\
LG, Sc & E2      && LC  Sc & G  G|\
LF, MF & G   UF3 && LC  MF &     |\
LF, KF & F2      && LC, KF & E  F|\ 
LC  Mc & G2      && LG, Mc & E2  |\
LC  Mc & C2      && LG, SG & D2  |\
LC  Mc & UC4     && LG, Mc &     |\
\mulooseness=2
[WLCMc] & C||