\documentstyle[a4,musictex,musictrp,musicvbm,french]{article}

% De'finit une mesure :
\newcommand\mesure[1]{\notes #1\enotes\barre}
% Une macro pour déclarer 2 croches :
\newcommand\Croches[3]{\Ibu#1#2#31\qh#1#2\tqh#1#3}
% Idem mais vers le bas :
\newcommand\CrochesB[3]{\Ibl#1#2#31\qb#1#2\tqb#1#3}
\newcommand\DoublesCroches[3]{\Ibbu#1#2#31\qh#1#2\tqh#1#3}
\newcommand\DoublesCrochesB[3]{\Ibbl#1#2#31\qb#1#2\tqb#1#3}
\newcommand\PetitesCroches[3]{{\noteskip=0.5\elemskip\tinynotesize\Croches{#1}{#2}{#3}}}
\newcommand\PetitesCrochesB[3]{{\noteskip=0.5\elemskip\tinynotesize\CrochesB{#1}{#2}{#3}}}
\newcommand\PetitesDoublesCroches[3]{{\noteskip=0.5\elemskip\tinynotesize\DoublesCroches{#1}{#2}{#3}}}
\newcommand\PetitesDoublesCrochesB[3]{{\noteskip=0.5\elemskip\tinynotesize\DoublesCrochesB{#1}{#2}{#3}}}

%\newcommand\Triolet[4]{\ibl0j0\triolet M\qb0{jk}\tbl0\qb0j}
\newcommand\Triolet[4]{\Ibu#1#2#42%
  \xtuplet3o\qh#1#2\qh#1#3\tqh#1#4}%will provide you with a number under or over your beam and it could beadapted for sextuplets or anything else.  This will make you a nicetriplet:        \Notes\ibl0j0\triolet M\qb0{jk}\tbl0\qb0j\enotes---
%\newcommand\UnAccord[1]{\Uptext{{\hbox{\sf\bf #1}}}}
\newcommand\UnAccord[1]{\Uptext{#1}}
\newcommand\aDo{\UnAccord{Do}}
\newcommand\aRe{\UnAccord{Ré}}
\newcommand\aMim{\UnAccord{Mim}}
\newcommand\aSol{\UnAccord{Sol}}
\newcommand\aLam{\UnAccord{Lam}}
\newcommand\aSim{\UnAccord{Sim}}



\begin{document}
%
\title{Floating from Skerry}
\author{Lynn Tocken}
\maketitle
\noindent
\begin{music}
  \def\nbinstruments{1}% 1 seule portée
  %\def\freqbarno{5}% Numérote 1 mesure sur 5
  %\raggedlinestrue
  \generalsignature{1}% 1 fa #
  \generalmeter{\meterfrac{3}{4}}% Un morceau en 3/4
                                %
  \debutmorceau
  \large
  %\transpose=7%
  \notes \qu d\segno n\enotes
  %\setdoublebar\barre
  \leftrepeat
  % Partie 1 :
  \mesure{\aMim\qu e\Croches0ef\Croches1gh}
  \mesure{\aSol\qup i\sk \PetitesDoublesCrochesB1ji\cu h\qu g}
  \mesure{\aRe\hu h\sk\Croches0ik}
  \mesure{\aDo\hl l\sk\CrochesB0nm}
  \notes \aMim\qlp l\sk\cl k \ql i\enotes \barre
  \mesure{\qu i\PetitesDoublesCrochesB1ji\qu h\qu g}
  \mesure{\aSim\qu f\PetitesDoublesCrochesB1gf\qu d\qu b}
  \mesure{\hu b\sk \qu d}
  \mesure{\aMim\qu e\Croches0ef\Croches1gh}
  \mesure{\aSol\qup i\sk \PetitesDoublesCrochesB1ji\cu h\qsk\qu g}
  \mesure{\aRe\hu h\sk\Croches0ik}
  \mesure{\aDo\hl l\sk\CrochesB0nm}
  \mesure{\aMim\qlp l\sk\cl k \ql i}
  \mesure{\aLam\qu j\PetitesDoublesCrochesB1kj\qu i\qu h}
  \mesure{\aMim\Croches0ig\Croches1eg\aRe\Triolet2fed
                                %\Ibbu2fd2\qh2f\tbu2\qh2e\tqh2d
    }
  \notes \coda n\aMim\hu e\sk \qu b\enotes
  \setrightrepeat\alaligne%\suspmorceau
  %\reprmorceau\setleftrepeat \barre
  %
  %\notes \qu b\enotes \barre
  % Partie 2 :
  \leftrepeat\mesure{\aMim\qup e\sk \cu f \Croches0ge}
  \mesure{\aRe\qup h\sk \cu g\Croches0fd}
  \mesure{\aDo\qup e\sk \cu f\qsk\Triolet2gfe%
                                %\Ibbu2fd2\qh2f\tbu2\qh2e\tqh2d
    }
  \mesure{\aSim\qu f\qu d\qu b}
  %
  \mesure{\aMim\qup e\sk \cu f \Croches0ge}
  \mesure{\aRe\qup h\sk \cu g\Croches0fd}
  \notes \aDo\hup e\sk\enotes \setprimavolta \barre
  \notes \aMim\hu e\sk \qu b\enotes
  \setsecondavolta \setrightrepeat \barre
  \notes \aMim\hu e\sk \qu d\segno n\enotes
  \finmorceau
\end{music}
\end{document}

