~ubuntu-branches/ubuntu/raring/texlive-extra/raring

« back to all changes in this revision

Viewing changes to texmf-dist/tex/generic/m-tx/mtx.tex

  • Committer: Package Import Robot
  • Author(s): Norbert Preining
  • Date: 2012-05-16 08:22:07 UTC
  • mfrom: (1.1.12) (3.1.20 sid)
  • Revision ID: package-import@ubuntu.com-20120516082207-41ox35jj1qsu46a7
Tags: 2012.20120516-1
* new upstream snapshot based on TL2012 tlpretest
* switch to xz compression for orig and deb (Closes: #672428)

Show diffs side-by-side

added added

removed removed

Lines of Context:
 
1
% mtx.tex   Dirk Laurie 2001-3-11  Corrections: see mtxtexdate, below.
 
2
 
 
3
% All TeX commands put directly into PMX files by M-Tx are defined below,
 
4
%   except the following:
 
5
% 1. \input mtx
 
6
% 2. code to achieve a multi-bar rest
 
7
% 3. User's own inline TeX
 
8
% 4. \mtxversion and \mtxdate are defined in prepmx itself
 
9
% 5. Utterly basic TeX commands like "\ " and "%"
 
10
% It is therefore possible for a TeXpert to tune the performance
 
11
%   of M-Tx without touching the preprocessor.
 
12
 
 
13
% The commands all start with the letters "\mtx" except one:
 
14
%  "\:" is a short alias for "\relax" to save space on input line length
 
15
 
 
16
\ifx\mtxtexversion\undefined\else\endinput\fi 
 
17
 
 
18
\def\mtxtexversion{0.60}
 
19
\def\mtxtexdate{16 March 2005}
 
20
\let\:=\relax
 
21
\message{mtx.tex \mtxtexversion\space<\mtxtexdate>} 
 
22
\message{M-Tx \mtxversion\space(Music from TeXt) <\mtxdate>} 
 
23
 
 
24
\input musixtex
 
25
\ifx\akkoladen\undefined\message{Your musixtex.tex is too old}\fi
 
26
 
 
27
\input pmx
 
28
\def\pmxneeded{2.5}
 
29
\ifdim\pmxversion pt<\pmxneeded  pt\message{Requires PMX Version
 
30
\pmxneeded. Please upgrade.}\fi
 
31
 
 
32
\input musixlyr
 
33
\ifx\assignlyricshere\undefined\message{Your musixlyr.tex is too old}\fi
 
34
 
 
35
% M-Tx font definitions
 
36
% Three macros are associated with each lyrics font, e.g.
 
37
%   \mtxmyfont defines \myfont but does not select it
 
38
%   \myfont selects it later
 
39
%   \mtxMyfont (note capital) defines and selects \myfont
 
40
 
 
41
\def\mtxInstrfont{\twelvebf}
 
42
 
 
43
\def\mtxeightsf{\font\eightsf=cmss8}
 
44
\def\mtxEightsf{\mtxeightsf\eightsf}
 
45
 
 
46
\def\mtxtensf{\font\tensf=cmss10}
 
47
\def\mtxTensf{\mtxtensf\tensf}
 
48
 
 
49
\def\mtxelevensf{\font\elevensf=cmss10 scaled \magstephalf}
 
50
\def\mtxElevensf{\mtxelevensf\elevensf}
 
51
 
 
52
\def\mtxtwelvesf{\font\twelvesf=cmss12}
 
53
\def\mtxTwelvesf{\mtxtwelvesf\twelvesf}
 
54
 
 
55
% Title fonts are immediately selected
 
56
 
 
57
\def\mtxBigsf{\font\Bigtype=cmss9 scaled \magstep2}
 
58
\def\mtxBIGsf{\font\BIGtype=cmss9 scaled \magstep4}
 
59
 
 
60
\def\mtxAllsf{\mtxElevensf\mtxBigsf\mtxBIGsf}
 
61
 
 
62
% M-Tx music sizes
 
63
 
 
64
\def\mtxTinySize{\tinyvalue}
 
65
\def\mtxSmallSize{\smallvalue}
 
66
\def\mtxNormalSize{\normalvalue}
 
67
\def\mtxLargeSize{\largevalue}
 
68
\def\mtxHugeSize{\Largevalue}
 
69
 
 
70
% musixlyr interface
 
71
 
 
72
\def\mtxSetLyrics#1#2{\setlyrics{#1}{#2}}
 
73
\def\mtxCopyLyrics#1#2{\copylyrics{#1}{#2}}
 
74
\def\mtxAssignLyrics#1#2{\assignlyrics{#1}{#2}}
 
75
\def\mtxAuxLyr#1{\auxlyr{#1}}
 
76
\def\mtxLyrlink{\lyrlink}
 
77
%
 
78
% 2003-08-05, scancm@biobase.dk: corrected definition of \mtxLowLyrlink
 
79
%
 
80
\def\mtxLowLyrlink{\lowlyrlink}
 
81
\def\mtxLyricsAdjust#1#2{\setsongraise{#1}{#2\internote}}
 
82
\def\mtxAuxLyricsAdjust#1#2{\auxsetsongraise{#1}{#2\internote}}
 
83
\def\mtxLyrModeAlter#1{\lyrmodealter{#1}}
 
84
\def\mtxLyrModeNormal#1{\lyrmodenormal{#1}}
 
85
\def\mtxBM{\beginmel}
 
86
\def\mtxEM{\endmel}
 
87
\def\mtxAuxBM{\auxlyr\mtxBM}
 
88
\def\mtxAuxEM{\auxlyr\mtxEM}
 
89
 
 
90
% Other macros
 
91
 
 
92
\def\mtxTenorClef#1{\settrebleclefsymbol{#1}\treblelowoct}
 
93
\def\mtxVerseNumber#1{#1 }
 
94
\def\mtxInterInstrument#1#2{\setinterinstrument{#1}{#2\Interligne}}
 
95
\def\mtxStaffBottom#1{\gdef\atnextline{\stafftopmarg #1\Interligne}}
 
96
\def\mtxGroup#1#2#3{\grouptop{#1}{#2}\groupbottom{#1}{#3}}
 
97
\def\mtxPageHeight#1{\vsize #1}
 
98
\def\mtxTwoInstruments#1#2{\vbox{\hbox{#1}\hbox{#2}}}
 
99
\def\mtxTitleLine#1{\gdef\mtxTitle{#1}}
 
100
\def\mtxComposerLine#1#2{\gdef\mtxPoetComposer{#1\hfill #2}}
 
101
\def\mtxInstrName#1{{\mtxInstrfont #1}}
 
102
\def\mtxSetSize#1#2{\setsize{#1}{#2}}
 
103
\def\mtxDotted{\dotted}
 
104
\let\mathflat\flat
 
105
\let\mathsharp\sharp
 
106
\def\flat{\musixfont\char'062}
 
107
\def\sharp{\musixfont\char'064}
 
108
%\def\mtxSharp{\raise1ex\hbox{\musicsmallfont\char'064}}
 
109
%\def\mtxFlat{\raise1ex\hbox{\musicsmallfont\char'062}}
 
110
\def\mtxSharp{\raise1ex\hbox{\sharp}}
 
111
\def\mtxFlat{\raise1ex\hbox{\flat}}
 
112
\def\mtxIcresc{\icresc}
 
113
\def\mtxTcresc{\tcresc}
 
114
\def\mtxCresc#1{\crescendo{#1\elemskip}}
 
115
\def\mtxIdecresc{\icresc}
 
116
\def\mtxTdecresc{\tdecresc}
 
117
\def\mtxDecresc#1{\decrescendo{#1\elemskip}}
 
118
\def\mtxPF{\ppff}
 
119
\def\mtxLchar#1#2{\lchar{#1}{#2}}
 
120
\def\mtxCchar#1#2{\cchar{#1}{#2}}
 
121
\def\mtxZchar#1#2{\zchar{#1}{#2}}
 
122
\def\mtxVerseNumberOffset{3}
 
123
\def\mtxVerse{\loffset{\mtxVerseNumberOffset}\lyr}
 
124
\makeatletter
 
125
\def\comma#1{\check@staff\raise1.2\internote\llap{\BIGfont'\kern#1\noteskip}\fi}
 
126
\makeatother
 
127
 
 
128
%\def\mtxVerse{%
 
129
%  \znotes\minlyrspace=-10cm%     to inhibit right-shifting of the numbers
 
130
%         \llyr\lyroffset{-2}%    make the numbers stand off to the left
 
131
%         \lyr%                   post the numbers
 
132
%  \en}
 
133
 
 
134
% M-Tx default settings
 
135
 
 
136
\sepbarrules
 
137
 
 
138
\immediate\write10{=== end of mtx.tex ===}
 
139
\endinput