Re: [Tex-music] trio with interstaff beam puzzle

2017-03-16 Thread Don Simons
Thanks again, Andre. I can say pretty confidently that the beams extending
over rests at the end of xtups will be very low on my priority list. Have
you ever seen those in any published music?

--Don

> -Original Message-
> From: TeX-Music [mailto:tex-music-boun...@tug.org] On Behalf Of Andre
> Van Ryckeghem
> Sent: Thursday, March 16, 2017 10:03 AM
> To: Werner Icking Music Archive <tex-music@tug.org>
> Subject: Re: [Tex-music] trio with interstaff beam puzzle
> 
> 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: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\bs
> > k}\
> >
> > %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\Interlig
> > n
> > 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\Interlig
> > n
> > 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}}
> > \
> > %
> >

Re: [Tex-music] trio with interstaff beam puzzle

2017-03-16 Thread Andre Van Ryckeghem

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: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

Re: [Tex-music] trio with interstaff beam puzzle

2017-03-16 Thread Don Simons
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 

Re: [Tex-music] trio with interstaff beam puzzle

2017-03-16 Thread Bob Tennent
 >|I tend to believe, that tuplet.tex has been incorporated into musixtex.
 >|However,
 >|when I call André's trio example:
 >|==
 >|2 1 2 4 0 6 0 0 1 1 20 0
 >|
 >|tt
 >|./
 >|AT
 >|\\let\qbsav\qb\
 >|\\def\triodummy{\def\qb##1##2{\let\qb\qbsav\qb##1{*}}}\
 >|\\interstaff{12}\
 >|%
 >|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+6 r+6 r r //
 >|[l b8 a ]j rb r-4 [jl b4x3nf a \triodummy\ b- ] r4 /
 >|==
 >|I get the response:
 >|==
 >|This is pdfTeX, Version 3.14159265-2.6-1.40.17 (MiKTeX 2.9 64-bit)
 >|entering extended mode
 >|(trio_15032017.tex
 >|("C:\Program Files\MiKTeX 2.9\tex\generic\musixtex\musixtex.tex"
 >|MusiXTeX(c) 1.24 <2017-02-28>
 >|maxinstruments=6 max128beams=6 maxgroups=3 maxslurs=6 maxtrills=6
 >|maxoctlines=6) ("C:\Program Files\MiKTeX 2.9\tex\generic\pmx\pmx.tex"
 >|PMX, a Preprocessor for MusiXTeX, Version 2.74b <20 Feb 16>
 >|) maxslurs=24
 >|Normal \dimen register pool exhausted, switching to extended pool.
 >|Normal \count register pool exhausted, switching to extended pool.
 >|maxinstruments=24
 >|! I can't find file `tuplet'.
 >|
 >|\def
 >|l.27 \input tuplet\def
 >|\xnumt#1#2#3{\zcharnote{#2}{~}\def\tuplettxt{\smalltyp...
 >|Please type another input file name:
 >|===
 >|When I put tuplet.tex (downloaded from WIMA archive) into the same folder,
 >|   tuplet.tex is being found and everything runs through.
 >|
 >|I cannot find the command  "\input tuplet", but it should not be there.

\input tuplet is generated by pmxab; look at line 27 of the
tex file.  Here are the relevant comments in the source file:

c 2.410
c   "AT" to allow Col. S.'s tuplet option. Simply input tuplet.tex and redefine
c  \xnum, \unbkt, \ovbkt.


An empty tuplet.tex will work just as well.

Bob

---
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


Re: [Tex-music] trio with interstaff beam puzzle

2017-03-16 Thread Dieter

Hi Don and André,

when all these intersting triplet cases have been solved inside PMX, I 
propose another one in this area:


which was realized (if I remember properly by André) as:
==
\\\let\qlnew\ql\
e4 d \downtrio{-4}{1.6}0\ d2x3Dn
\def\ql#1{\ibl060\qb0{#1}\tbl0\qb0{6}\let\ql\qlnew}\ e |  /
===
I wonder whether this could be realized on PMX level.

--Dieter

Am 16.03.2017 um 07:16 schrieb Andre Van Ryckeghem:

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\Interligne\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\Interligne\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 

Re: [Tex-music] trio with interstaff beam puzzle

2017-03-16 Thread Andre Van Ryckeghem

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\Interligne\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\Interligne\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 |


Re: [Tex-music] trio with interstaff beam puzzle

2017-03-15 Thread Don Simons
Also klunky:

===
2 1 2 4 2 4 0 0
1 1 20 0

tt
.\
\\input musixfll\
\\makeatletter\
\\def\h@lineidt{\empty}\
\\makeatother\
rb4 r /
[l+5+1 b43x3 a \longledgerlines\ g- ] \autoledgerlines\ r /


Maybe you should contact the PMX developer and ask him to allow rests at the
end of xtuplets :-)

--Don


> -Original Message-
> From: TeX-Music [mailto:tex-music-boun...@tug.org] On Behalf Of Andre
> Van Ryckeghem
> Sent: Wednesday, March 15, 2017 1:01 AM
> To: Werner Icking Music Archive 
> Subject: [Tex-music] trio with interstaff beam puzzle
> 
> I need trios with interstave beams, they are not allowed because there can
> be no rest at the end of a trio.
> 
> I tried to build one with included musixtex commands but this is far from
> elegant and also not stable (ie. if adding a second voice in the lower
staff).
> The first one is with normal 8th notes, the 2nd is a trio.
> 
> The musixtex commands are to remove a last note in a trio and also for
> helping to remember the no  and height of the beam.
> 
> Someone has something better?
> 
> Andre
> 
> ==
> 2 1 2 4 0 6 0 0 1 1 20 0
> 
> tt
> ./
> AT
> \\let\qbsav\qb\
> \\def\triodummy{\def\qb##1##2{\let\qb\qbsav\qb##1{*}}}\
> \\interstaff{12}\
> %
> 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+6 r+6 r r //
> [l b8 a ]j rb r-4 [jl b4x3nf a \triodummy\ b- ] r4 / ==
> 
> (the voice with rests is for showing the difference between trio and the
8th
> notes
> 
> ---
> 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


Re: [Tex-music] trio with interstaff beam puzzle

2017-03-15 Thread Bob Tennent
 >|The example does not run through, because it does not
 >|find "tuplet.tex".
 >|
 >|Where would I find this? I am using MusiXTeX 1.24 and PMX
 >|2.77 (unpublished so far).

tuplet.tex has been incorporated into musixtex.tex from
version 1.16. The pmx.tex you're using should not be trying
to load tuplet.tex.

Bob T.
---
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


Re: [Tex-music] trio with interstaff beam puzzle; pls. disregard my previous mail!

2017-03-15 Thread Dieter

Sorry, I found the tuplet file.
Dieter


Am 15.03.2017 um 09:53 schrieb Dieter:

Hi André,

not that I can be of any help to solve your problem. But I want at 
least understand, what it is about.

The example does not run through, because it does not find "tuplet.tex".

Where would I find this? I am using MusiXTeX 1.24 and PMX 2.77 
(unpublished so far).


Regards, Dieter


Am 15.03.2017 um 09:01 schrieb Andre Van Ryckeghem:

2 1 2 4 0 6 0 0 1 1 20 0

tt
./
AT
\\let\qbsav\qb\
\\def\triodummy{\def\qb##1##2{\let\qb\qbsav\qb##1{*}}}\
\\interstaff{12}\
%
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+6 r+6 r r //
[l b8 a ]j rb r-4 [jl b4x3nf a \triodummy\ b- ] r4 / 






--

Dr. Dieter Glötzel
Im Rosengarten 27
64367 Mühltal
Tel.: 06151 / 360 82 72

---
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


Re: [Tex-music] trio with interstaff beam puzzle

2017-03-15 Thread Dieter

Hi André,

not that I can be of any help to solve your problem. But I want at least 
understand, what it is about.

The example does not run through, because it does not find "tuplet.tex".

Where would I find this? I am using MusiXTeX 1.24 and PMX 2.77 
(unpublished so far).


Regards, Dieter


Am 15.03.2017 um 09:01 schrieb Andre Van Ryckeghem:

2 1 2 4 0 6 0 0 1 1 20 0

tt
./
AT
\\let\qbsav\qb\
\\def\triodummy{\def\qb##1##2{\let\qb\qbsav\qb##1{*}}}\
\\interstaff{12}\
%
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+6 r+6 r r //
[l b8 a ]j rb r-4 [jl b4x3nf a \triodummy\ b- ] r4 / 



--

Dr. Dieter Glötzel
Im Rosengarten 27
64367 Mühltal
Tel.: 06151 / 360 82 72

---
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