Hi Don, > Dirk Baack sent me this one, and it might not be PMX's fault. > > This PMX code (incorrectly) causes a cautionary natural on the D: > > ======================= > 1 1 3 4 3 4 0 -1 > 1 1 20 .05000 > > t > ./ > c45nc za dn zb r / > ======================= > > while this makes a normal natural on the D: > > ======================= > 1 1 3 4 3 4 0 -1 > 1 1 20 .05000 > > t > ./ > Ab > c45nc za dn zb r / > ======================= > > In the TeX files, the accidental command on the D is \na in both cases. The > only difference in the TeX files is the command \bigaccid in the second one. > > ??????????????? > > --Don Simons >
I found some macros for small accidentals and cautionary accidentals
are shared.
The followings are related codes for naturals. Same as flats, etc.
(line numbers are for musixtex.tex version 115)
3838: \def\bigaccid{\let\small@test\iftrue}
3839: \def\smallaccid{\let\small@test\iffalse}
3844: \def\na#1{\small@test\bigna{#1}\else\smallna{#1}\fi}
3869: \def\smallna{\set@sa \let\@Tii\@Na \n@v\f@ur \C@acc}
3858: \def\bigna{\set@ba \let\@Tii\@Na \n@v\f@ur \C@acc}
3875: \def\cna{\n@vii\maxdimen \smallna}
3864: \def\@sa{\ifnum\n@vii=\maxdimen \C@ChaR \musixchar\n@v \kern.3\qn@width
3865: \else \musixchar\n@v \fi \n@vii\z@}
3866: \def\writ@sa{\pl@base\raise\y@i\llap{\@sa\kern\accshift}}
3867: \def\set@sa{\let\@Ti\writ@sa \n@iv\fiv@ \n@vi\@xl }
\@sa (=small accidental) expects that \n@vii is reset to \z@
at its end.
however, it seems to be inside a group, so it is set to \maxdimen
again at the end of \writ@sa, in case once \cna is invoked.
(I can't understand clearly why it is inside a group...)
Adding \global prefix is not appropriate because \n@vii is used for
other objective in other sections.
This bug is there in T.114 too. I don't search any previous versions
but it seems to be a historical bug (maybe T.109).
Anyway I tried making a quick patch. It works, but I do not have
any confidence that the patch is right.
Best regards,
----
Hiroaki MORIMOTO <[email protected]>
Tokyo, Japan
fixca.tex
Description: Binary data
------------------------------- [email protected] mailing list If you want to unsubscribe or look at the archives, go to http://tug.org/mailman/listinfo/tex-music
