This is the pmx file with the pdf Andre
-----Oorspronkelijk bericht----- From: Don Simons
Sent: Thursday, March 16, 2017 3:54 PM To: 'Werner Icking Music Archive' Subject: Re: [Tex-music] trio with interstaff beam puzzle Thanks for the suggestions, Andre! You obviously spent a lot of time compiling this. And now I won't have to worry about how to spend my time once I retire :-). But because of line folding in Outlook, I had some trouble processing your file. I do have something that compiles, but it's messed up somewhere. Could you provide a separately attached pmx file? --Don
-----Original Message----- From: TeX-Music [mailto:[email protected]] On Behalf Of Andre Van Ryckeghem Sent: Wednesday, March 15, 2017 11:17 PM To: Werner Icking Music Archive <[email protected]> Subject: Re: [Tex-music] trio with interstaff beam puzzle Thanks to everyone for looking at it. Don's solution is a handsome discovery, but had a drawback that i cannot read the value of the 3th note in the trio (it comes on the wrong line if
in the
lower staff). Now i humbly ask for allowing rests at the end of xtuplets. And also for combined flags and beams in xtuplets. Here are a few examples of what are my wishes. Andre =============== 2 1 2 4 0 6 0 0 1 3 20 0 tt ./ AT %Method: Put an any note where the rest should come. %(if beamed, the hight defines the slope. %Then replace the note by the musixtex dummy note (*) %The put a normal rest (ie. \ds) % \\\staffbotmarg6\Interligne\
\\\stafftopmarg10\Interligne\
\\interstaff{20}\ %definitions
\\let\cusav\cu\let\clsav\cl\let\ccusav\ccu\let\cclsav\ccl\
\\let\qusav\qu\let\qlsav\ql\let\qbsav\qb\
\\let\tbusav\tbu\let\tblsav\tbl\
\\let\iblsav\ibl\let\ibblsav\ibbl\let\ibusav\ibu\let\ibbusav\ibbu\
\\let\tblsav\tbl\let\tbusav\tbu\
%
%NOT BEAMED
%replace a 4th note by a dummy (*)
\\def\trioq{\def\qu##1{\let\ql\qlsav\let\qu\qusav\qu{*}}\
\\def\ql##1{\let\qu\qusav\let\ql\qlsav\ql{*}}\qp}\
% lower the rest
\\def\trioql#1{\def\qu##1{\let\ql\qlsav\let\qu\qusav\qu{*}}\
\\def\ql##1{\let\qu\qusav\let\ql\qlsav\ql{*}}\lower#1\Interligne\qp}\
%replace an 8th note by a dummy (*)
\\def\trioc{\def\cu##1{\let\cl\clsav\let\cu\cusav\cu{*}}\
\\def\cl##1{\let\cu\cusav\let\cl\clsav\cl{*}}\ds\bsk}\
% lower the rest
\\def\triocl#1{\def\cu##1{\let\cl\clsav\let\cu\cusav\cu{*}}\
\\def\cl##1{\let\cu\cusav\let\cl\clsav\cl{*}}\lower#1\Interligne\ds\bsk}\
%replace an 16th note by a dummy (*)
\\def\triocc{\def\ccu##1{\let\cl\cclsav\let\ccu\ccusav\ccu{*}}\
\\def\cl##1{\let\ccu\ccusav\let\ccl\cclsav\ccl{*}}\qs\bsk}\
% lower the rest
\\def\trioccl#1{\def\ccu##1{\let\cl\cclsav\let\ccu\ccusav\ccu{*}}\
\\def\cl##1{\let\ccu\ccusav\let\ccl\cclsav\ccl{*}}\lower#1\Interligne\qs\bsk
}\
%
% BEAMED
% replace an 8th beamed note by a dummy (*), then put a musixtex rest %
the \bsk adapt the lenght of the beam
\\def\triods{\def\qb##1##2{\let\qb\qbsav\qb##1{*}}\ds\bsk}\
% lower the rest
\\def\triodsl#1{\def\qb##1##2{\let\qb\qbsav\qb##1{*}}\lower#1\Interlign
e\ds\bsk}\
% shorter beam
\\def\triodsb{\triods\bsk\bsk\def\tbu##1{\let\tbu\tbusav\tbu##1\sk}}\
\\def\triodsbl#1{\triodsl#1\bsk\bsk\def\tbu##1{\let\tbu\tbusav\tbu##1}}\
% replace an 16th beamed note by a dummy (*)
\\def\trioqs{\def\qb##1##2{\let\qb\qbsav\qb##1{*}}\qs\bsk}\
% lower the rest
\\def\trioqsl#1{\def\qb##1##2{\let\qb\qbsav\qb##1{*}}\lower#1\Interlign
e\qs\bsk}\
% shorter beam
\\def\trioqsb{\trioqs\bsk\def\tbu##1{\let\tbu\tbusav\tbu##1\sk}}\
\\def\trioqsbl#1{\triodsl#1\bsk\def\tbu##1{\let\tbu\tbusav\tbu##1\qs}}\
%
% BEAMS and FLAG combined
% 8th note up
\\def\triobuc{\def\qb##1##2{\let\qb\qbsav\qb##1{*}\cu{##2}}\bsk}\
\\def\triobubc{\bsk\let\ibu\ibusav\def\ibu##1##2##3{\sk\ibusav{##1}{##2}
{##3}\bsk\bsk}\
\\def\qb##1##2{\let\qb\qbsav\qb##1{*}\cu{##2}}\sk}\
\\def\triobucc{\def\qb##1##2{\let\qb\qbsav\qb##1{*}\ccul{##2}}\bsk}\
\\def\triobubcc{\bsk\let\ibbu\ibbusav\def\ibbu##1##2##3{\sk\ibbusav{##1
}{##2}{##3}\bsk\bsk}\
\\def\qb##1##2{\let\qb\qbsav\qb##1{*}\ccu{##2}}\sk}\
% 8th note low
\\def\trioblcc{\def\qb##1##2{\let\qb\qbsav\qb##1{*}\ccl{##2}}\bsk}\
\\def\trioblbcc{\bsk\let\ibbl\ibblsav\def\ibbl##1##2##3{\sk\ibblsav{##1}{#
#2}{##3}\bsk\bsk}\
\\def\qb##1##2{\let\qb\qbsav\qb##1{*}\ccl{##2}}\sk}\
\\def\trioblc{\def\qb##1##2{\let\qb\qbsav\qb##1{*}\cl{##2}}\bsk\tbl1}\
\\def\trioblbc{\bsk\let\ibl\iblsav\def\ibl##1##2##3{\sk\iblsav{##1}{##2}{##
3}\bsk\bsk}\
\\def\qb##1##2{\let\qb\qbsav\qb##1{*}\cl{##2}}\sk}\
%
\\def\st{\smalltype}\def\bs{$\backslash$}\
%1
%rest at the end of a trio, not beamed
d44ax3nf+1 D"\st d4ax3 e $\backslash$trioc f"-3 e \trioc\ f
b4-ax3nf D"\st b4ax3 e $\backslash$triocl2 g"-3 e \triocl2\ g | %rest at
the
end of a trio, beamed ex3nf D"\st ex3 b \bs triodsl2\ g"-3 d \triodsl2\ g
ex3nf
D"\st ex3 d \bs triodsbl3\ g"-3 d \triodsbl3\ g // % normal ones d45ax3nf-2 r e rx3nf-2 r e | % other examples g-Dx2 D"\st gDx2 \bs trioc\ g"+19 \trioc\ g cx3 D"\st cx3 b \bs triodsb\ g"+21 D"voices not sychron"+26 b \triodsb\ g
/ %
%2 end rest, low beam g44x3 D"\st g+x3 r \bs triodsl2\ g"-3 r \triodsl2\ g % end rest, no beam
gax3nf
D"\st g+x3 r \bs triocl2\ f"-5 r \triocl2\ f | % testing other cases rDx3n+1 D"\st rDx3 \bs triocl2\ b"-7-5 \triocl2\ b rx3 D"\st rx3 \bs trioql2\ bD"-7-5 \trioql2\ bD // % normal one r2x3 r b+ | % exotic ones [u-2 c8x3n-3 D"\st [ c8x3 \bs triods\ bD ]"+22-4 \triods\ bD ] b8ax3n-3 D"\st b8ax3 \bs trioc\ bD "+22-1 \trioc\ bD rx3n-3 bD baDx3n-3 D"\st baDx3 \bs triocc\ b "+22-1 \triocc\ b / rp rp / % %3 beam and flag e8-x3nf sf D"\st e8-x3nf sf d s \bs trioblcc\ c "-7 d s \trioblcc\ c
\trioblbcc\
e8x3nf D"\st \bs trioblbcc\ e8x3 d sf c s"-3+3 d sf c s %
\\\def\trioblcns{\def\qb##1##2{\let\qb\qbsav\tbl##1\qb##1##2}}\
\\\def\trioblcnsi{\def\qb##1##2{\cl##2}\def\tbl##1{}}\
%
e4x3nf D"\st e4x3 sf \bs trioblcns\ d s \bs trioblcnsi\ c"-2 sf
\trioblcns\ d s
\trioblcnsi\ c | \trioblbc\ e4x3nf D"\st \bs trioblbc\ e4x3 d sf c s "-6+6
d sf c s
% end rest, low beam shorted
bl4Dx3nf+2 D"\st b4Dx3 \bs triocl4\ b"-4 \triocl4\ b //
r8ax3n-2 D"\st r8ax3 r \bs trioccl{-1}\ g "+22-5 r \trioccl{-1}\ g
r8 r D"voices not sychron"+16 r1 r | r8 r1 r
b4x3 D"\st b4x3 a \bs triobuc\ c"+21 a \triobuc\ c / %
%5
\\\interstaff{12}\
%
% this line messes up the trios
%r8 r r r r r r r //
rb4 [jl f8+ ] r \ibl3{20}0\ [l rb4x3 rb XS-1 \def\cu{\qu}\stemlength5\ fu
]
r4 / r8+6 r+6 r+6 r+6 r8+0 r+0 r r // [l b8- a ]j rb r-4 [jl b4x3nf a \triodsl4\ b- ] r4 / ==================== ------------------------------- [email protected] mailing list If you want to unsubscribe or look at the archives, go to http://tug.org/mailman/listinfo/tex-music
------------------------------- [email protected] mailing listIf you want to unsubscribe or look at the archives, go to http://tug.org/mailman/listinfo/tex-music
xtest.pmx
Description: Binary data
xtest.pdf
Description: Adobe PDF document
------------------------------- [email protected] mailing list If you want to unsubscribe or look at the archives, go to http://tug.org/mailman/listinfo/tex-music
