\makeatletter%
\def\vnotes#1\elemskip#2|#3&#4\en{\noteskip#1\@l@mskip\@vnotes#2|\smallnotesize\relax#3&#4\enotes}%
\def\nextvoice{%
\@ndstaff\reflect\noport@@\advance\noport@@-1\beginstaff\noport@@\reflect\smallnotesize}%
\makeatother%
