1
% mtx.tex Dirk Laurie 2001-3-11 Corrections: see mtxtexdate, below.
3
% All TeX commands put directly into PMX files by M-Tx are defined below,
4
% except the following:
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.
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
16
\ifx\mtxtexversion\undefined\else\endinput\fi
18
\def\mtxtexversion{0.60}
19
\def\mtxtexdate{16 March 2005}
21
\message{mtx.tex \mtxtexversion\space<\mtxtexdate>}
22
\message{M-Tx \mtxversion\space(Music from TeXt) <\mtxdate>}
25
\ifx\akkoladen\undefined\message{Your musixtex.tex is too old}\fi
29
\ifdim\pmxversion pt<\pmxneeded pt\message{Requires PMX Version
30
\pmxneeded. Please upgrade.}\fi
33
\ifx\assignlyricshere\undefined\message{Your musixlyr.tex is too old}\fi
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
41
\def\mtxInstrfont{\twelvebf}
43
\def\mtxeightsf{\font\eightsf=cmss8}
44
\def\mtxEightsf{\mtxeightsf\eightsf}
46
\def\mtxtensf{\font\tensf=cmss10}
47
\def\mtxTensf{\mtxtensf\tensf}
49
\def\mtxelevensf{\font\elevensf=cmss10 scaled \magstephalf}
50
\def\mtxElevensf{\mtxelevensf\elevensf}
52
\def\mtxtwelvesf{\font\twelvesf=cmss12}
53
\def\mtxTwelvesf{\mtxtwelvesf\twelvesf}
55
% Title fonts are immediately selected
57
\def\mtxBigsf{\font\Bigtype=cmss9 scaled \magstep2}
58
\def\mtxBIGsf{\font\BIGtype=cmss9 scaled \magstep4}
60
\def\mtxAllsf{\mtxElevensf\mtxBigsf\mtxBIGsf}
64
\def\mtxTinySize{\tinyvalue}
65
\def\mtxSmallSize{\smallvalue}
66
\def\mtxNormalSize{\normalvalue}
67
\def\mtxLargeSize{\largevalue}
68
\def\mtxHugeSize{\Largevalue}
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}
78
% 2003-08-05, scancm@biobase.dk: corrected definition of \mtxLowLyrlink
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}}
87
\def\mtxAuxBM{\auxlyr\mtxBM}
88
\def\mtxAuxEM{\auxlyr\mtxEM}
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}
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}}
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}
125
\def\comma#1{\check@staff\raise1.2\internote\llap{\BIGfont'\kern#1\noteskip}\fi}
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
134
% M-Tx default settings
138
\immediate\write10{=== end of mtx.tex ===}