64 lines
2 KiB
TeX
64 lines
2 KiB
TeX
%
|
|
% 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.
|
|
%
|
|
|
|
\immediate\write16{MusiXTRIplepoint 1.05\space<30 April 2002>}
|
|
|
|
\ifx\undefined\hlppp \else \endinput \fi
|
|
|
|
\edef\catcodeat{\the\catcode`\@}\catcode`\@=11
|
|
|
|
\def\lppt{\g@pt\m@ne\tw@}
|
|
|
|
\def\whppp{\def\w@h{\musixfont\nin@\roffset\qu@rt{\C@Point\tw@\raise}}%
|
|
\y@v\wn@width \g@w}
|
|
\def\zwppp{\advancefalse\whppp}
|
|
|
|
\def\@quppp{\let\st@m\upst@m \g@qppp}
|
|
\def\@qlppp{\let\st@m\downst@m \g@qppp}
|
|
\def\@zqppp{\let\st@m\setst@m \advancefalse\g@qppp}
|
|
\def\@nqppp{\let\st@m\resetst@m \g@qppp}
|
|
|
|
\def\q@uppp{\q@u\C@Point\tw@\raise}
|
|
\def\g@qppp#1{\getn@i#1\relax \let\n@fon\g@qppp \let\n@sym\q@uppp
|
|
\y@v\qn@width \writ@note}
|
|
|
|
\def\@qbppp#1{\s@l@ctbeam#1\relax \let\st@m\beamst@m \g@qppp}
|
|
|
|
\def\@cuppp{\n@vii\@xl \let\st@m\up@flag \g@qppp}
|
|
\def\@clppp{\n@vii45\let\st@m\down@flag \g@qppp}
|
|
|
|
\def\huppp{\h@symbol\@quppp}
|
|
\def\hlppp{\h@symbol\@qlppp}
|
|
\def\zhppp{\h@symbol\@zqppp}
|
|
\def\zhuppp{\advancefalse\huppp}
|
|
\def\zhlppp{\advancefalse\hlppp}
|
|
\def\quppp{\q@symbol\@quppp}
|
|
\def\qlppp{\q@symbol\@qlppp}
|
|
\def\zquppp{\advancefalse\quppp}
|
|
\def\zqlppp{\advancefalse\qlppp}
|
|
\def\zqppp{\q@symbol\@zqppp}
|
|
\def\cuppp{\q@symbol\@cuppp}
|
|
\def\zcuppp{\advancefalse\cuppp}
|
|
\def\clppp{\q@symbol\@clppp}
|
|
\def\zclppp{\advancefalse\clppp}
|
|
\def\qbppp{\q@symbol\@qbppp}
|
|
\def\zqbppp{\advancefalse\qbppp}
|
|
|
|
\catcode`\@=\catcodeat
|
|
\endinput
|