texlive[59879] Master/texmf-dist: musixtex (8jul21)
commits+karl at tug.org
commits+karl at tug.org
Thu Jul 8 22:42:43 CEST 2021
Revision: 59879
http://tug.org/svn/texlive?view=revision&revision=59879
Author: karl
Date: 2021-07-08 22:42:42 +0200 (Thu, 08 Jul 2021)
Log Message:
-----------
musixtex (8jul21)
Modified Paths:
--------------
trunk/Master/texmf-dist/doc/generic/musixtex/ChangeLog-133.txt
trunk/Master/texmf-dist/doc/generic/musixtex/README
trunk/Master/texmf-dist/doc/generic/musixtex/musixdoc/frontmatter.tex
trunk/Master/texmf-dist/doc/generic/musixtex/musixdoc/miscellaneous.tex
trunk/Master/texmf-dist/doc/generic/musixtex/musixdoc.pdf
trunk/Master/texmf-dist/tex/generic/musixtex/musixtex.tex
Modified: trunk/Master/texmf-dist/doc/generic/musixtex/ChangeLog-133.txt
===================================================================
--- trunk/Master/texmf-dist/doc/generic/musixtex/ChangeLog-133.txt 2021-07-08 20:42:13 UTC (rev 59878)
+++ trunk/Master/texmf-dist/doc/generic/musixtex/ChangeLog-133.txt 2021-07-08 20:42:42 UTC (rev 59879)
@@ -1,8 +1,8 @@
-Changes from MusiXTeX 132 to 133:
+Changes from MusiXTeX 132 to 133a:
* \tabfnt etc. now uses (Helvetica) bold for tablature notes
- * replace ledger lines by slashes (/) for tablature notes below the staff
- * new commands \tzqu, \tzcup, etc. for stems without noteheads, for use in
+ * replace ledger lines by slashes (/) or numbers for tablature notes below the staff
+ * new commands \tzqu, \tzcup, etc. for tiny notes to indicate duration, for use in
tablature
Modified: trunk/Master/texmf-dist/doc/generic/musixtex/README
===================================================================
--- trunk/Master/texmf-dist/doc/generic/musixtex/README 2021-07-08 20:42:13 UTC (rev 59878)
+++ trunk/Master/texmf-dist/doc/generic/musixtex/README 2021-07-08 20:42:42 UTC (rev 59879)
@@ -1,4 +1,4 @@
-This is MusiXTeX, version 1.33 (2021-07-04).
+This is MusiXTeX, version 1.33a (2021-07-07).
MusiXTeX is a TeX-based system for typesetting music.
The main author was Daniel Taupin, who died in a climbing
Modified: trunk/Master/texmf-dist/doc/generic/musixtex/musixdoc/frontmatter.tex
===================================================================
--- trunk/Master/texmf-dist/doc/generic/musixtex/musixdoc/frontmatter.tex 2021-07-08 20:42:13 UTC (rev 59878)
+++ trunk/Master/texmf-dist/doc/generic/musixtex/musixdoc/frontmatter.tex 2021-07-08 20:42:42 UTC (rev 59879)
@@ -68,7 +68,7 @@
takes advantage of the greater capacity of the e\TeX\ version of \TeX.
This manual
is the definitive reference to all features of
-\musixtex\ version~1.32.
+\musixtex\ version~1.33a.
Novice users need not start here.
Most
Modified: trunk/Master/texmf-dist/doc/generic/musixtex/musixdoc/miscellaneous.tex
===================================================================
--- trunk/Master/texmf-dist/doc/generic/musixtex/musixdoc/miscellaneous.tex 2021-07-08 20:42:13 UTC (rev 59878)
+++ trunk/Master/texmf-dist/doc/generic/musixtex/musixdoc/miscellaneous.tex 2021-07-08 20:42:42 UTC (rev 59879)
@@ -844,7 +844,8 @@
\item \keyindex{tab}\verb|{|$n$\verb|}|\verb|{|$p$\verb|}|
puts $p$ on string $n$
(counting from top to bottom); $p$ is centered, using \verb|\ccharnote|.
-Ledger lines are replaced by slashes (/) for $n$ greater than the number of staff lines.
+Ledger lines are replaced by slashes (/) for $n$ greater than the number of staff lines,
+or simply the number of courses below the staff if this is greater than 3.
\item \keyindex{ltab}\verb|{|$n$\verb|}|\verb|{|$p$\verb|}|
uses \verb|\zcharnote| so $p$
spills to the right and
@@ -860,7 +861,7 @@
\end{itemize}
A size-dependent font \keyindex{tabfnt} is used for tab characters; Helvetica bold is the default font family.
-The default tablature style is to place the fingering notations \emph{on} the staff line;
+The default tablature style is to place fingering notations \emph{on} staff lines;
Postscript specials are used to ``blank'' staff lines below
the tab characters.
If it is desired to locate the fingering notations \emph{above} staff lines, use
@@ -957,8 +958,7 @@
&\zql K\ibbu0g{-1}\qb0g\slur edd2\qb0e\qb0f\tqu0d\en
\NOtesp\zltab50\zltab40\ltab30&\zhl{d}\zhu{f}\qu{.h}\en
\Notes\ltab30&\cu{h}\en
-\bar%
-\zendextract
+\bar\zendextract
\end{verbatim}\end{quote}
\end{footnotesize}
@@ -1014,7 +1014,7 @@
\medskip
\noindent
-In pure tablature, note durations are typically specified by stems without noteheads immediately
+In pure tablature, note durations can be specified by tiny notes
above the staff, as in:
\medskip
@@ -1060,13 +1060,12 @@
\end{music}
\medskip
\noindent
-Note that this notation does not
-specify the duration of \emph{every} note.
\smallskip
-A stem (without a notehead) is generated immediately above the staff using one of the commands
-\keyindex{tzqu}, \keyindex{tzqup}, \keyindex{tzcu}, \keyindex{tzcup}, \keyindex{tzccu}, \ldots\
+\noindent
+A tiny note can be generated above the staff using one of the commands
+\keyindex{tzwh}, \keyindex{tzwhp}, \keyindex{tzhu}, \keyindex{tzhup}, \keyindex{tzqu}, \keyindex{tzqup}, \keyindex{tzcu}, \keyindex{tzcup}, \keyindex{tzccu}, \ldots\
\emph{before} a spacing command. Coding
for the notes in the example above is as follows:
\begin{footnotesize}
Modified: trunk/Master/texmf-dist/doc/generic/musixtex/musixdoc.pdf
===================================================================
(Binary files differ)
Modified: trunk/Master/texmf-dist/tex/generic/musixtex/musixtex.tex
===================================================================
--- trunk/Master/texmf-dist/tex/generic/musixtex/musixtex.tex 2021-07-08 20:42:13 UTC (rev 59878)
+++ trunk/Master/texmf-dist/tex/generic/musixtex/musixtex.tex 2021-07-08 20:42:42 UTC (rev 59879)
@@ -27,13 +27,19 @@
\def\mxmajorvernumber{1}
\def\mxminorvernumber{33}
\def\mxvernumber{\mxmajorvernumber\mxminorvernumber}% make it possible to compare with \ifnum
-\def\mxversuffix{}%
+\def\mxversuffix{a}%
\edef\mxversion{\mxmajorvernumber.\mxminorvernumber\mxversuffix}
-\def\mxdate{2021-07-04}
+\def\mxdate{2021-07-07}
\immediate\write16{MusiXTeX(c) \mxversion\space<\mxdate>}%
\everyjob{\immediate\write16{MusiXTeX(c) \mxversion\space<\mxdate>}}%
+% version 1.33a
+%
+% improved implementations of the tablature commands:
+% + 4-7 slashes are replaced by numbers 4-7
+% + notehead-less stems are replaced by tiny notes (without ledger lines)
+
% version 1.33
%
% \tabfnt etc. now uses (Helvetica) bold
@@ -5489,6 +5495,10 @@
% %
% 1.33 RDT %
% replace ledger lines by slashes (/) for string numbers > number of staff lines %
+% %
+% 1.34 RDT %
+% replace 4-7 slashes by numbers 4-7 %
+% %
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\newcount\stringraise
@@ -5581,7 +5591,7 @@
\nslashes=\stringnum
\advance\nslashes by -\nblines
\def\numslashes{\the\nslashes}
-\ifcase\numslashes\or\ccn{-3}{\tabfnt/#2}\or\ccn{-3}{\tabfnt//#2}\or\ccn{-3}{\tabfnt///#2}\or\ccn{-3}{\tabfnt////#2}\or\ccn{-3}{\tabfnt/////#2}\or\ccn{-3}{\tabfnt//////#2}\or\ccn{-3}{\tabfnt///////#2}\fi%
+\ifcase\numslashes\or\zcn{-3}{\tabfnt/#2}\or\zcn{-3}{\tabfnt//#2}\or\zcn{-3}{\tabfnt///#2}\or\zcn{-3}{\tabfnt 4}\or\zcn{-3}{\tabfnt 5}\or\zcn{-3}{\tabfnt 6}\or\zcn{-3}{\tabfnt 7}\fi%
\else\tabbox{#1}{#2}\fi}
% left spilling \ztab
@@ -5591,7 +5601,7 @@
\nslashes=\stringnum
\advance\nslashes by -\nblines
\def\numslashes{\the\nslashes}
-\ifcase\numslashes\or\zcn{-3}{\tabfnt/#2}\or\zcn{-3}{\tabfnt//#2}\or\zcn{-3}{\tabfnt///#2}\or\zcn{-3}{\tabfnt////#2}\or\zcn{-3}{\tabfnt/////#2}\or\zcn{-3}{\tabfnt//////#2}\or\zcn{-3}{\tabfnt///////#2}\fi%
+\ifcase\numslashes\or\zcn{-3}{\tabfnt/#2}\or\zcn{-3}{\tabfnt//#2}\or\zcn{-3}{\tabfnt///#2}\or\zcn{-3}{\tabfnt 4}\or\zcn{-3}{\tabfnt 5}\or\zcn{-3}{\tabfnt 6}\or\zcn{-3}{\tabfnt 7}\fi%
\else\ltabbox{#1}{#2}\fi}
% right spilling \ztab
@@ -5601,7 +5611,7 @@
\nslashes=\stringnum
\advance\nslashes by -\nblines
\def\numslashes{\the\nslashes}
-\ifcase\numslashes\or\lcn{-3}{\tabfnt/#2}\or\lcn{-3}{\tabfnt//#2}\or\lcn{-3}{\tabfnt///#2}\or\lcn{-3}{\tabfnt////#2}\or\lcn{-3}{\tabfnt/////#2}\or\lcn{-3}{\tabfnt//////#2}\or\lcn{-3}{\tabfnt///////#2}\fi%
+\ifcase\numslashes\or\zcn{-3}{\tabfnt/#2}\or\zcn{-3}{\tabfnt//#2}\or\zcn{-3}{\tabfnt///#2}\or\zcn{-3}{\tabfnt 4}\or\zcn{-3}{\tabfnt 5}\or\zcn{-3}{\tabfnt 6}\or\zcn{-3}{\tabfnt 7}\fi%
\else\rtabbox{#1}{#2}\fi}
%
@@ -5621,39 +5631,92 @@
\ifnum\nblines=6\lower1.5\internote\box1
\else\ifnum\nblines=4\lower3.5\internote\box1\else\lower2.5\internote\box1\fi\fi}
-%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
-% stems without noteheads for use above tablature staff %
-% 1.33 RDT %
-%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+% tiny duration notes placed above tablature staff %
+% 1.34 RDT %
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
-\newcount\stem at hgt % = 2 * \nblines -1
-\def\tzqu{\advancefalse%
-\stem at hgt=\nblines\multiply\stem at hgt by 2\advance\stem at hgt by -1
-\def\q at u{}\@qu{\the\stem at hgt}}
-\def\tzqup{\advancefalse%
-\stem at hgt=\nblines\multiply\stem at hgt by 2\advance\stem at hgt by -1
-\def\q at u{}\@qup{\the\stem at hgt}}
-\def\tzcu{\advancefalse%
-\stem at hgt=\nblines\multiply\stem at hgt by 2\advance\stem at hgt by -1
-\def\q at u{}\@cu{\the\stem at hgt}}
-\def\tzcup{\advancefalse%
-\stem at hgt=\nblines\multiply\stem at hgt by 2\advance\stem at hgt by -1
-\def\q at u{}\@cup{\the\stem at hgt}}
-\def\tzccu{\advancefalse%
-\stem at hgt=\nblines\multiply\stem at hgt by 2\advance\stem at hgt by -1
-\def\q at u{}\@ccu{\the\stem at hgt}}
-\def\tzccup{\advancefalse%
-\stem at hgt=\nblines\multiply\stem at hgt by 2\advance\stem at hgt by -1
-\def\q at u{}\@ccup{\the\stem at hgt}}
-\def\tzcccu{\advancefalse%
-\stem at hgt=\nblines\multiply\stem at hgt by 2\advance\stem at hgt by -1
-\def\q at u{}\@cccu{\the\stem at hgt}}
-\def\tzcccup{\advancefalse%
-\stem at hgt=\nblines\multiply\stem at hgt by 2\advance\stem at hgt by -1
-\def\q at u{}\@cccup{\the\stem at hgt}}
+\newcount\tiny at hgt % = 2 * \nblines + 1
+% need to suppress ledger lines and prevent raising dots in dotted notes
+\def\settiny at hgt{\tiny at hgt=\nblines\multiply\tiny at hgt by 2\advance\tiny at hgt by1}
+\def\tzwh{%
+\settiny at hgt
+\tinynotesize\advancefalse\def\w at h{\musixfont\nin@}\y at v\wn at width
+\check at staff\getn at i{\the\tiny at hgt}\relax\let\n at fon\g at w \let\n at sym\w at h
+\pl at base\setst at m\resetst at m\raise\y at i\hbox{\n at sym}\advancetrue\fi}
+
+\def\tzwhp{%
+\settiny at hgt
+\tinynotesize\advancefalse\def\w at h{\musixfont\nin@}\y at v\wn at width
+\check at staff\getn at i{\the\tiny at hgt}\relax\let\n at fon\g at w \let\n at sym\w at h
+\pl at base\setst at m\resetst at m\raise\y at i\hbox{\n at sym\musixchar\z@}\advancetrue\fi}
+
+\def\tzhu{%
+\settiny at hgt
+\tinynotesize\advancefalse
+\check at staff\getn at i{\the\tiny at hgt}\relax\y at v\qn at width
+\pl at base\setst at m\upst at m\raise\y at i\hbox{\musixfont\@ight}\advancetrue\fi}
+
+\def\tzhup{%
+\settiny at hgt
+\tinynotesize\advancefalse
+\check at staff\getn at i{\the\tiny at hgt}\relax\y at v\qn at width
+\pl at base\setst at m\upst at m\raise\y at i\hbox{\musixfont{\@ight}\musixchar\z@}\advancetrue\fi}
+
+\def\tzqu{%
+\settiny at hgt
+\tinynotesize\advancefalse
+\check at staff\getn at i{\the\tiny at hgt}\relax\y at v\qn at width
+\pl at base\setst at m\upst at m\raise\y at i\hbox{\musixfont\s at v@n}\advancetrue\fi}
+
+\def\tzqup{%
+\settiny at hgt
+\tinynotesize\advancefalse
+\check at staff\getn at i{\the\tiny at hgt}\relax\y at v\qn at width
+\pl at base\setst at m\upst at m\raise\y at i\hbox{\musixfont{\s at v@n}\musixchar\z@}\advancetrue\fi}
+
+\def\tzcu{%
+\settiny at hgt
+\tinynotesize\advancefalse\q at symbol\n at vii\@xl
+\check at staff\getn at i{\the\tiny at hgt}\relax\let\n at fon\g at q \let\n at sym\q at u\y at v\qn at width
+\pl at base\setst at m\up at flag\raise\y at i\hbox{\n at sym}\advancetrue\fi}
+
+\def\tzcup{%
+\settiny at hgt
+\tinynotesize\advancefalse\q at symbol\n at vii\@xl
+\check at staff\getn at i{\the\tiny at hgt}\relax\let\n at fon\g at qp \let\n at sym\q at up\y at v\qn at width
+\pl at base\setst at m\up at flag\raise\y at i\hbox{\n at sym}\advancetrue\fi}
+
+\def\tzccu{%
+\settiny at hgt
+\tinynotesize\advancefalse\q at symbol\n at vii\@xli
+\check at staff\getn at i{\the\tiny at hgt}\relax\let\n at fon\g at q \let\n at sym\q at u\y at v\qn at width
+\pl at base\setst at m\up at flag\raise\y at i\hbox{\n at sym}\advancetrue\fi}
+
+\def\tzccup{%
+\settiny at hgt
+\tinynotesize\advancefalse\q at symbol\n at vii\@xli
+\check at staff\getn at i{\the\tiny at hgt}\relax\let\n at fon\g at qp \let\n at sym\q at up\y at v\qn at width
+\pl at base\setst at m\up at flag\raise\y at i\hbox{\n at sym}\advancetrue\fi}
+
+\def\tzcccu{%
+\settiny at hgt
+\tinynotesize\advancefalse\q at symbol\n at vii42
+\check at staff\getn at i{\the\tiny at hgt}\relax\let\n at fon\g at q \let\n at sym\q at u\y at v\qn at width
+\pl at base\setst at m\up at flag\raise\y at i\hbox{\n at sym}\advancetrue\fi}
+
+\def\tzcccup{%
+\settiny at hgt
+\tinynotesize\advancefalse\q at symbol\n at vii42
+\check at staff\getn at i{\the\tiny at hgt}\relax\let\n at fon\g at qp \let\n at sym\q at up\y at v\qn at width
+\pl at base\setst at m\up at flag\raise\y at i\hbox{\n at sym}\advancetrue\fi}
+
+
+%%%%%%%% end of tablature support %%%%%%%%%%%%
+
\let\origin at lwrit@staffs\writ at staffs
\def\writ at staffs{%
\origin at lwrit@staffs
More information about the tex-live-commits
mailing list.