diff options
Diffstat (limited to 'Master/texmf-dist/tex/generic/musixtex/musixmad.tex')
-rw-r--r-- | Master/texmf-dist/tex/generic/musixtex/musixmad.tex | 149 |
1 files changed, 149 insertions, 0 deletions
diff --git a/Master/texmf-dist/tex/generic/musixtex/musixmad.tex b/Master/texmf-dist/tex/generic/musixtex/musixmad.tex new file mode 100644 index 00000000000..850597a269d --- /dev/null +++ b/Master/texmf-dist/tex/generic/musixtex/musixmad.tex @@ -0,0 +1,149 @@ +% +% This file is part of MusiXTeX +% +% MusiXTeX is free software; you can redistribute it and/or modify +% it under the terms of the GNU General Public License as published by +% the Free Software Foundation; either version 2, or (at your option) +% any later version. +% +% MusiXTeX is distributed in the hope that it will be useful, +% but WITHOUT ANY WARRANTY; without even the implied warranty of +% MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +% GNU General Public License for more details. +% +% You should have received a copy of the GNU General Public License +% along with MusiXTeX; see the file COPYING. If not, write to +% the Free Software Foundation, Inc., 59 Temple Place - Suite 330, +% Boston, MA 02111-1307, USA. +% + +\ifx\staffspacingxii\undefined\else\endinput\fi + +\edef\catcodeat{\the\catcode`\@}\catcode`\@=11 + +\ifnum\maxinstruments<\nin@ \input musixadd \fi + +\immediate\write10{MusiXMore ADditional instruments T.99\space<24 March 2000>}% + +%\ifx\undefined\documentstyle \else +% \errmessage{MusiXMAD+LaTeX will need too many dimension registers, it's +%better to stop with 'x'}\fi + +\let\@wloG\wlog +\def\wlog#1{} + +\let\maxinstruments\tw@lv@ + +\let\interinstrumentx\interinstrument +\let\interinstrumentxi\interinstrument +\let\interinstrumentxii\interinstrument + +\let\T@Rx\z@ +\let\T@Rxi\z@ +\let\T@Rxii\z@ + +\let\staffspacingx\@ne +\let\staffspacingxi\@ne +\let\staffspacingxii\@ne + +\newskip\k@ix +\newskip\k@ixi +\newskip\k@ixii + +\newskip\i@nx +\newskip\i@nxi +\newskip\i@nxii + +\newskip\b@xx \newskip\b@zx +\newskip\b@xxi \newskip\b@zxi +\newskip\b@xxii\newskip\b@zxii + +\newskip\c@xx \newskip\c@zx +\newskip\c@xxi \newskip\c@zxi +\newskip\c@xxii\newskip\c@zxii + +\newskip\d@xx \newskip\d@zx +\newskip\d@xxi \newskip\d@zxi +\newskip\d@xxii\newskip\d@zxii + +\newskip\e@xx \newskip\e@zx +\newskip\e@xxi \newskip\e@zxi +\newskip\e@xxii\newskip\e@zxii + +\newcount\b@px \newcount\b@nx +\newcount\b@pxi \newcount\b@nxi +\newcount\b@pxii\newcount\b@nxii + +\newcount\n@px \n@px\@ne +\newcount\n@pxi \n@pxi\@ne +\newcount\n@pxii\n@pxii\@ne + +\newskip\s@xx +\newskip\s@xxi +\newskip\s@xxii +\newskip\s@Yx +\newskip\s@Yxi +\newskip\s@Yxii +\newskip\s@ax +\newskip\s@axi +\newskip\s@axii +\newtoks\s@sx \s@sx={x} +\newtoks\s@sxi \s@sxi={x} +\newtoks\s@sxii\s@sxii={x} +\newcount\s@yx +\newcount\s@yxi +\newcount\s@yxii +\newcount\s@Nx +\newcount\s@Nxi +\newcount\s@Nxii +\newcount\s@zx \s@zx\maxdimen +\newcount\s@zxi \s@zxi\maxdimen +\newcount\s@zxii\s@zxii\maxdimen +\newtoks\s@dx +\newtoks\s@dxi +\newtoks\s@dxii + +\newcount\a@sx \newcount\o@sx +\newcount\a@sxi \newcount\o@sxi +\newcount\a@sxii\newcount\o@sxii + +\newtoks\a@cx \a@cx={{\z@}{\z@}{\z@}{\z@}} +\newtoks\a@cxi \a@cxi={{\z@}{\z@}{\z@}{\z@}} +\newtoks\a@cxii \a@cxii={{\z@}{\z@}{\z@}{\z@}} + +\newtoks\o@cx +\newtoks\o@cxi +\newtoks\o@cxii + +\newtoks\m@tx +\newtoks\m@txi +\newtoks\m@txii + +\def\resetlayout{\let\interfacteur\nin@ + \stafftopmarg\thr@@\Interligne \staffbotmarg\thr@@\Interligne + \let\n@li\fiv@ \let\n@lii\fiv@ \let\n@liii\fiv@ + \let\n@liv\fiv@ \let\n@lv\fiv@ \let\n@lvi\fiv@ + \let\n@lvii\fiv@ \let\n@lviii\fiv@ \let\n@lix\fiv@ + \let\n@lx\fiv@ \let\n@lxi\fiv@ \let\n@lxii\fiv@ + \resetclefsymbols} + +\def\resetclefsymbols{% + \let\treblec@si\z@ \let\treblec@sii\z@ \let\treblec@siii\z@ \let\treblec@siv\z@ + \let\treblec@sv\z@ \let\treblec@svi\z@ \let\treblec@svii\z@ \let\treblec@sviii\z@ \let\treblec@six\z@ + \let\treblec@sx\z@ \let\treblec@sxi\z@ \let\treblec@sxii\z@ + \let\altoc@si\z@ \let\altoc@sii\z@ \let\altoc@siii\z@ \let\altoc@siv\z@ + \let\altoc@sv\z@ \let\altoc@svi\z@ \let\altoc@svii\z@ \let\altoc@sviii\z@ \let\altoc@six\z@ + \let\altoc@sx\z@ \let\altoc@sxi\z@ \let\altoc@sxii\z@ + \let\bassc@si\z@ \let\bassc@sii\z@ \let\bassc@siii\z@ \let\bassc@siv\z@ + \let\bassc@sv\z@ \let\bassc@svi\z@ \let\bassc@svii\z@ \let\bassc@sviii\z@ \let\bassc@six\z@ + \let\bassc@sx\z@ \let\bassc@sxi\z@ \let\bassc@sxii\z@ +} + +\let\nbinstruments\maxinstruments +\normalnotesize\resetlayout +\let\nbinstruments\@ne + +\let\wlog\@wloG + +\catcode`\@=\catcodeat +\endinput |