>|On Sun, 19 Jun 2011, Bob Tennent wrote:
 >|
 >|> If you already have a musixtex score and don't want to start again using
 >|> pmx, you can "suppress" instruments as follows: [...]
 >|
 >|Could you please provide an example with 3 or 4 instruments and 3 or 4
 >|measures?

The original source is in

http://icking-music-archive.org/scores/bach/bwv988/quod.zip

Note that the other parts are indeed suppressed, but the note spacing
has to be corrected in the resulting part score. Also multiple-bar
rests.

Bob

______________________________________________________________________________

\input musixtex.tex
\input musixsty.tex

\def\tr#1{\zcharnote{#1}{\ppff tr}}%
\def\pince#1{\shake{#1}}%
\vsize9.75in
\voffset-0.5in
\hsize7.0in
\hoffset-0.25in
\smallmusicsize
\bigaccid
\advance\parindent by 10pt
\def\writebarno{\llap{\ninebf\the\barno\barnoadd}}%
\def\raisebarno{4\internote}%
\def\shiftbarno{1.5\Interligne}%
\nobarnumbers
\geometricskipscale

\def\omit#1{}%

\def\tql#1#2{\tbl{#1}\qb{#1}{#2}}
\def\tqu#1#2{\tbu{#1}\qb{#1}{#2}}
\def\nbbqu#1#2{\nbbu{#1}\qb{#1}{#2}}
\def\nbbql#1#2{\nbbl{#1}\qb{#1}{#2}}

\def\nqql#1#2{\roffset{0.25}{\tbbl{#1}\tbbl{#1}\qb{#1}{#2}}}
\def\nqqu#1#2{\roffset{0.25}{\tbbu{#1}\tbbu{#1}\qb{#1}{#2}}}
\def\tqql#1#2{\roffset{0.25}{\tbbl{#1}\tbl{#1}\qb{#1}{#2}}}
\def\tqqu#1#2{\roffset{0.25}{\tbbu{#1}\tbu{#1}\qb{#1}{#2}}}
\def\tqqql#1#2{\roffset{0.25}{\tbbbl{#1}\tbl{#1}\qb{#1}{#2}}}
\def\tqqqu#1#2{\roffset{0.25}{\tbbbu{#1}\tbu{#1}\qb{#1}{#2}}}

\instrumentnumber1
%\setclef1\bass\setbassclefsymbol1\bassoct
%\setclef4\treble\settrebleclefsymbol4\trebleoct
\catcodesmusic
\generalsignature{+1}
\generalmeter\meterC
\setname1{A}
%\setname2{T}
%\setname3{A}
%\setname4{S}
%\songtop4
%\songbottom1
\fulltitle{Quodlibet}
\subtitle{Variation 30 of the Goldberg Variations for Clavier}
\title{Quodlibet}
\author{J. S. Bach (1685-1750)}
\shortauthor{J. S. Bach}
\othermention{Arranged for Recorders by R. D. Tennent}
\maketitle
\startbarno=0
\nobarnumbers
\stafftopmarg=4.0\Interligne%
\staffbotmarg=4.0\Interligne%
%\setinterinstrument3{2.5\internote}%
\startpiece\addspace\afterruleskip%
\makeatletter
\def\vnotes#1\elemskip#2&#3&#4&#5\en{\noteskip#1\@l@mskip\@vnotes#4\en}%
\makeatother
\systemnumbers%
\Notes\ds&\cu d&\ds&\ds\en
\bar%1
\Notes\hl N&\ibu1g2\qb1{ghi}\tqu1j&&\hpause\en
\Notes\hl M&\ibl1k{-2}\qb1k&&\en
\notes&\nbbl1\qb1j\tql1i&&\qp\en
\Notes&\ibu1h0\qb1h&&\ds\en
\notes&\nbbu1\qb1g\tqu1h&&\cu d\en
\def\atnextbar{\znotes&&\centerpause&&\en}%
\bar%2
\Notes\hl L&\ibu1i{-2}\qb1i\tqu1h&\ql n&\ibu3g2\qb3{gh}\en
\Notes&\itied1g\qu g&\ql n&\qb3i\tqu3j\en
\Notes\ql{.K}&\ttie1\qu g&\ql o&\ibl3k{-2}\qb3k\en
\notes&&&\nbbl3\qb3j\tql3i\en
\Notes&\ibu1f0\pince{n}\qb1f&\cl o&\cu h\en
\notes\cu J&\nbbu1\qb1e\tqu1f&\ds&\ds\en
\bar%3
\Notes\hu I&\qu g&\ibl2n{-1}\qb2{no}&\ql k\en
\Notes&\ds\cl k&\qb2{n}\tql2{=m}&\ql k\en
\Notes\hu J&\ibu1j{-2}\qb1{ji}&\ibl2j{0}\qb2{lk}&\ql l\en
\Notes&\qb1h\tqu1g&\qb2j\tql2p&\ql l\en
\bar%4
\Notes\hl K&\itied1f\pince{n}\qu f&\ibl2o{-1}\qb2{on}&\ibl3k{-1}\qb3{kl}\en
\notes&\ttie1\ibbu1e{-2}\qb1f\tbbu1\qb1e&\qb2o&\qb3k\en
%\vnotes1.5\elemskip&\nbbbu1\qb1e\tbbu1\qb1f&&\en
\Notes&\itied1d\tqu1d&\tql2m&\tql3j\en
\Notes\qu G&\ttie1\qu d&\ibl2n{-2}\qb2n\tql2m&\ibu3h{-1}\pince{p}\qb3i\tqu3h\en
\Notes\ds&\qp&\ibl2n{-5}\qb2n&\qu g\en
\notes\ibbl0b{-1}\qb0b\tql0a&&\tql2k&\en
\bar%5
\endpiece%
\eject
\end
-------------------------------
[email protected] mailing list
If you want to unsubscribe or look at the archives, go to 
http://tug.org/mailman/listinfo/tex-music

Reply via email to