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:tex-music-boun...@tug.org] On Behalf Of Andre
> Van Ryckeghem
> Sent: Wednesday, March 15, 2017 11:17 PM
> To: Werner Icking Music Archive <tex-music@tug.org>
> 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 / ====================
> 
> -------------------------------
> TeX-music@tug.org mailing list
> If you want to unsubscribe or look at the archives, go to
> http://tug.org/mailman/listinfo/tex-music

-------------------------------
TeX-music@tug.org 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