blob: 52375e170df9df6ec125e62188f1a523ddf892ac (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
|
%
% 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
|
