%apple\bulmer
\documentclass{cfart}
\input texmuse.tex
\begin{document}
\makeatletter
\newinstrument{righthand}
\newinstrument[\bassclef]{lefthand}
\parindent0pt
\FontSplit140
\title{Invention in E$\flat$}
\author{J. S. Bach}
\maketitle
\thispagestyle{empty}
\begin{figure}[b]
\flushright\small Typeset by \TeXmuse
\end{figure}
\begin{texmuse}
\meter44\key{-3}
\righthand{\rangefrom{E4}
    4R3[ED-]4[EF]5GA     4R3[FE]4[FG]5AB
    4[GC][BA]3[GABA]4[GF]   [EGBE+=]3[E+CDE+]4[F+E+]    [3DE+DC][DE+CD]\rangefrom{C5}[B-B\nAB][GAFG]
    3[EGFG][EFDE][CB\nAG][ABGA]     [B-B\nAG][ABGA][FB\bAG][FGEF]   [DGFE][DECD][F-EDC][DECD]
    4[E3B-A-][4B-C]5\bDE    4R3[CB-]4[C\nD]5EF      4R3[DC]4[DE]5FG
    3[EFED][EFDE][CC+BC+][ABGA]     [FAGA][FGEF][DC+\nB\nA][BC+AB]      [EC+\bB\bA][BC+AB][GC+BA][GAFG]
    3[\nEAGF][EFDE][G-FED][EFDE]     4[F3F-\nE-][4F-G-]5A-B-]   \rangefrom{G4}4R[3GF-]4[GA]5BC
    [4A\bDCB]3[\nABCB]4[AG]  [F-\nACE=][3EC\bDE]4[FE]    [3\bDEDC][DECD][BA+G+F][G+A+FG+]
    [A+\bDCB][CDBC][AG+F\nE][FG+EF]     [G+CBA][BCAB][GF\nED][EFDE] 4[F3AG][4AB]5C\bD
    4R[3BA][4AC]5\bDE   3[CA+G+A+][FG+EF][\bDB+A+B+][CDBC]       [ACBC][ABGA][F-EDC][DECD]
    4[E3E-D-][4E-F-]5GA 4R3[F-E-]4[F-G]5AB  4[GCBA]3[GABA]4[GF-]
    [E-FE\bD]3[CDED]4[CB]   [ACEA+=]3[A+FG+A+]4[B+A+]   [4G+.3F]5F6E
    }
\lefthand{\rangefrom{E3}
    5EE-3R[E+DE+][CDBC]     [ACBC][ABGA][FE+DC][DE+CD]
    [EE+DC][DE+CD][GE+DC][BCAB]     [GCBA][GAFG][C-B\nAG][ABGA]     4[B3B-\nA-]4[B-C-]5D-E
    \rangefrom{C3}4R3[CB-]4[CD]5EF  4[DGFE][3DEFE]4[DC]     [B-DFA=][3AFGA][4BA]
    3[GAGF][FAFG][EE+\bD+E+][C+D+BC+]   [ABAG][ABGA][FF+E+F+][D+E+C+D+]     [BC+C\nA][BC+\nAB][GAFG][EFED]
    4[C3C\nB-]4[CD]5EF      4R[3DC]4[DE]5FG     [4EAGF]3[\nEFGF]4[ED]
    4[C\nEGB=]3[BGAB][4C+B]     [3ABAG][ABGA][FF+\bE+F+][\bD+E+C+E+]    [B\bD+C+D+][BC+AB]\rangefrom{G3}[GF\nE\nD][EFDE]
    [F-F\bE\bD][EFDE][CFED][CDBC]   [\nA\bDCB][ABGA][C-BAG][AGGA]   4[B3B-\nA-][4B-C-]5\bD-E-
    \rangefrom{F2}4R3[\bAG]4[AB]5C\bD   4R3[GF][4GA]5BC     \rangefrom{C3}3[F-C+BC+][ABGA][FAGA][FGEF]
    [\bDFEF][DECD][B-AGF][FGAG]     4[A3E\nD]4[EF]5GA   4R3[FE]4[FG]5AB
    3[GAGF][GAFG][EE+D+E+][C+D+BC+]     [AC+BC+][ABGA][FE+D+C+][D+E+C+D+]   [EE+D+C+][D+E+C+D+][BE+D+C+][BC+AB]
    3[GC+BA][GAFG][EAGF][EF\bDE]    [CFE\bD][CDB-C][F-E\nDC][DECD]  4[EG-A-B-]6E-
    }
\end{texmuse}

\music{lefthand,righthand}

\end{document}