diff options
Diffstat (limited to 'macros/mtex/macros/mtexdemo.tex')
-rw-r--r-- | macros/mtex/macros/mtexdemo.tex | 299 |
1 files changed, 299 insertions, 0 deletions
diff --git a/macros/mtex/macros/mtexdemo.tex b/macros/mtex/macros/mtexdemo.tex new file mode 100644 index 0000000000..e1c8402c6e --- /dev/null +++ b/macros/mtex/macros/mtexdemo.tex @@ -0,0 +1,299 @@ +%format plain +%--------------------------------------------------- +\input german.sty +%\input verbatim +% macros for verbatim scanning +% im wesentlichen dem file MANHDR TEX von DEK entnommen +\catcode`@=11 +\def\tt{\fam\ttfam\tentt}% +\newskip\ttglue \ttglue=.5em plus .25em minus .15em +\chardef\other=12 +\def\ttverbatim{\begingroup + \catcode`\\=\other + \catcode`\{=\other + \catcode`\}=\other + \catcode`\$=\other + \catcode`\&=\other + \catcode`\#=\other + \catcode`\%=\other + \catcode`\~=\other + \catcode`\_=\other + \catcode`\^=\other + \catcode`\"=\other + \parskip \z@ + \obeyspaces \obeylines \tt} + +\def\begintt{$$\let\par=\endgraf \ttverbatim + \catcode`\|=0 \rightskip-5pc \ttfinish} +{\catcode`\|=0 |catcode`|\=\other % | is temporary escape character + |obeylines % end of line is active + |gdef|ttfinish#1^^M#2\endtt{|vbox{#2}|endgroup$$}} + +\catcode`\|=\active +{\obeylines \gdef|{\ttverbatim \spaceskip\ttglue \let^^M=\ \let|=\endgroup}} +%\def\ttspace{{\tt\hskip\ttglue}} + +\def\vrt{\hbox{\tt\char`\|}} % vertical line +\def\dn{\hbox{\tt\char'14}} % downward arrow +\def\up{\hbox{\tt\char'13}} % upward arrow +\def\]{\hbox{\tt\char`\ }} % visible space + +\catcode`@=12 % at signs are no longer letters +\def\verbatimon{\catcode`\|=\active} +\def\verbatimoff{\catcode`\|=\other} +\verbatimoff +%--------------------------------------------------- end of verbatim.tex +\nopagenumbers +\headline{\eightrm \hfill Beispiele f"ur den Notensatz mit \TeX +\hfill\hbox to 0pt{\hss Schofer/Steinbach 1987}} +%--------------------------------------------------- +\input mtex +%--------------------------------------------------- +\let\os=\^ +\let\us=\_ +\def\ks#1{\noindent\hbox{{\tt \char\hex5C}\bf#1}} +\def\bs{\noindent\hbox{{\tt \char\hex5C}}}%Backslash +\def\lk{\hbox{{\tt\char\hex7B}}}%linke Klammer auf +\def\strich{{\hbox{\tt \char\hex7C}}} +\def\dpkt{{\hbox{\tt \char\hex3A}}}%Doppelpunkt +\def\gleich{{\hbox{\tt \char\hex3D}}}% +\def\slash{\noindent{\hbox{\tt \char\hex2F}}} +\def\blank{{\hbox{\tt \char\hex20}}} +% +\let\leftbrace=\{ +\def\{{\ifmmode\leftbrace\else{$\leftbrace$}\fi} +\let\rightbrace=\} +\def\}{\ifmmode\rightbrace\else{$\rightbrace$}\fi} +% +% +\verbatimon +\normalbaselines +\openup\jot +% +%\universal %ist f"ur MTEX etwas zu breit +\small %so gehts vielleicht besser +% +\title{\vbox{\hbox to 0pt{\hss 6 Suiten f"ur Cello Solo\hss} + \hbox to 0pt{\hss Suite II Menuet I\hss}}} +\poet{\vtop{\hbox to 0pt{F"ur Viola "ubertragen \hss} + \hbox to 0pt{von Franz Schmidtner\hss}}} +\composer{Johann Sebastian Bach} +\parindent 20pt +\beginsong\alto\F\meter3/4% +\rchord \h5\h7\h9\endchord\v{10}\|% +\two{\group{\\{\a{10}}\\{\a9}\\{\a{10}}\\{\a8}}{\\{10}\\{9}\\{10}\\{8}}% +\ubeam14\uslur12\go}{\rchord \a4\a6\endchord}% +\v9\|\rchord\v3\v5\endchord\v8% +\group{\\{\a7}\\{\a6}}{\\{7}\\{6}}\lbeam12\go\|% +\two{\group{\\{\a7}\\{\a6}\\{\a5}\\{\x4\a4}\\{\n3\a3}\\{\a2}} +{\\{7}\\{6}\\{5}\\{4}\\{3}\\{2}}\ubeam16\uslur13\go}% +{\a2}\|\rchord \h5\h7\h9\endchord\v{10}\|% +\two{\group{\\{\a{10}}\\{\a9}\\{\tenuto\a{10}}\\{\tenuto\a8\noaccent}} +{\\{10}\\{9}\\{10}\\{8}}\ubeam14\uslur12\go}{\a6}% +\v{11}\|\rchord\v7\v9\endchord\rchord\v3\v7\v{12}\endchord +\rchord\v1\v8\v{13}\endchord\|\rchord\h2\.1\h6\.1\x{11}\h{11}\.1\endchord +\leftrightrepeat +\rchord\h9\h{13}\endchord +{\def\beamlist{\\{1-3,}\\{2-3,}}% +\group{\\{\a{12}}\\{\s{13}}\\{\s{14}}}{\\{12}\\{13}\\{14}}\lbeam13% +\uslur13\go}\| +\two{\group{\\{\a{13}}\\{\a{12}}\\{\x{11}\a{11}}\\{\a{13}}\\{\a9}\\{\a8}} +{\\{13}\\{12}\\{11}\\{13}\\{9}\\{8}}\ubeam16\uslur15\go}{\a8}\|% +\two{\group{\\{\v9}\\{\v{12}}}{\\{9}\\{12}}\uslur12\go}{\h7}% +\x{11}\two{\v{11}}{\v6}\|% +\two{\group{\\{\a{15}}\\{\a{14}}\\{\a{13}}\\{\a{14}}\\{\a{12}}% +\\{\n{11}\a{11}}} +{\\{15}\\{14}\\{13}\\{14}\\{12}\\{11}}\ubeam16\uslur15\go}{\a5}\|% +\two{\h{10}}{\group{\\{\v8}\\{\v7}}{\\{8}\\{7}}\lslur12\go}% +\two{\v{11}}{\v6}\|% +\two{\group{\\{\a9}\\{\a8}\\{\a9}\\{\a7}}{\\{9}\\{8}\\{9}\\{7}}\ubeam14% +\go}{\a7}% +\rchord\v{12}\v6\v3\endchord\|\rchord\v{11}\v7\v2\endchord +\group{\\{\a{10}}\\{\a9}\\{\a8}\\{\a9}}{\\{10}\\{9}\\{8}\\{9}}\lbeam14\go +\|\group{\\{\a7}\\{\a6}\\{\a7}\\{\a9}\\{\a8}\\{\a{10}}} +{\\{7}\\{6}\\{7}\\{9}\\{8}\\{10}}\lbeam16\go\|% +\x7\two{\tr\h9\noaccent}{\h7}% +\two{\v{10}}{\pv}\|\b6% +\two{\group{\\{\a8}\\{\a7}\\{\a8}\\{\a6}} +{\\{8}\\{7}\\{8}\\{6}}\ubeam14\uslur12\go}{\a6}% +\x7\tr\v7\noaccent\|\rchord\v{12}\v8\v3\endchord\rchord\v{11}\v8\v4\endchord +\two{\group{\\{\a{10}}\\{\a9}}{\\{10}\\{9}}\ubeam12\uslur12\go}{\v5}\|% +\group{\\{\rchord\a{11}\a5\a1\endchord +}\\{\a{10}}\\{\a9}\\{\a{10}}\\{\a8}\\{\a{10}}} +{\\{1}\\{10}\\{9}\\{10}\\{8}\\{10}}\lbeam16\go\|% +\two{\group{\\{\v{12}}\\{\x{11}\v{11}}} +{\\{12}\\{11}}\uslur12\go}{\v8\pv}\n7% +\two{\v{12}}{\v7}\|\x4% +\two{\group{\\{\a8}\\{\a7}\\{\a8}\\{\a6}} +{\\{8}\\{7}\\{8}\\{6}}\ubeam14\uslur12\go}{\a4}% +\two{\v7}{\v5}\|% +\group{\\{\a1}\\{\a8}}{\\{1}\\{8}}\lbeam12\go\two{\tr\v6\.1}{\v2\.1}% +\two{\a5}{\raise-1.5\nhh\hbox{\pa}}\|\lchord\h5\.1\h2\.1\h{-2}\.1\endchord +\rightrepeat +\endsong +\parindent0pt +{\eightrm +Aus: Johann Sebastian Bach, Sechs Suiten, f"ur Viola bearbeitet von +Franz Schmidtner, Musikverlag Hans Sikorski, Hamburg. +} +\vskip0.5cm +F"ur dieses Musikst"uck lautet die Eingabe: +\vskip0.5cm +%%%%%%%%%%%%%%%%%% +%%%%% bach %%%%%%% +%%%%%%%%%%%%%%%%%% +{\bf !!} +\ks{title}\{6 Suiten f"ur Cello Solo +\bs{atop} Suite II Menuet I\}\par +\ks{composer}\{Johann Sebastian Bach\} +\ks{poet}\{F"ur Viola "ubertragen \bs{atop} von Franz Schmidtner\}\par +\ks{alto}\ks{F}\ks{meter}\{{\bf3}\slash {\bf4}\}\ks{two} +\par{\bf \{\ \ \ \ks{chord}\{2`d f a\} 4h\strich +\ks{chord}\{'8c `e\}\slash\ \slash\ \slash\ 4a\strich +\par +\ks{chord}\{4,h `d\} g\ks{beam}\{8f e\}\strich +,8a \slash\ \slash\ \slash\ \slash\ \slash\ \strich +\ks{chord}\{`2d f a\} 4h\strich 8e +\slash\ \slash\ \slash\ +{`}{`}4c \strich\par +\ks{chord}\{4`f a\}\ks{chord}\{,h `f {`}{`}d\} +\ks{chord}\{,g `g {`}{`}e\}\strich +\par\ks{chord}\{2.,a ,`e ,x{`}{`}c\} +\dpkt\strich\strich\dpkt +\par\ks{chord}\{2`a {`}{`}e\}\ks{slur}\{\ks{beam}\{8d 6e f\}\}\strich +8`g\slash\ \slash\ \slash\ \slash\ \slash\ \strich +2f \slash\ 4e\strich 8d \slash\ \slash\ \slash\ \slash\ \slash\strich +\ks{slur}\{4g f\}e\strich\par + 8f\slash\ \slash\ \slash\ +\ks{chord}\{4,h `e {`}{`}d\}\strich\ks{chord}\{4,a `f {`}{`}c\} +\ks{beam}\{8`h a g a\}\strich\par \ks{beam}\{8f e f a g h\}\strich +2xf 4p \strich b8e \slash\ \slash\ \slash\ +4xf \ks{tr}\strich\ks{chord}\{4,h `g {`}{`}d\} +\ks{chord}\{4`c g {`}{`}c\} `d\slash\ \strich +\par\ks{beam}\{\ks{chord}\{,8g `d {`}{`}c\} 8`h a h g h\}\strich +4g p nf\strich 8xc \slash\ \slash\ \slash\ 4d\strich +\par\ks{beam}\{8,g `g\} 4.,a 8p\strich \ \slash\ +\dpkt\strich\strich\ \ \}\par +\{\ \ \slash\ \slash\ \strich +\ks{beam}\{\ks{slur}\{8{`}h a\} h g\}\slash\ \strich +\slash\ \slash\ \slash\ \slash\ \strich +\ks{beam}\{\ks{slur}\{'8f e d\}xc ,nh a\}\strich +\slash\ \slash\ \strich\par\ks{beam}\{\ks{slur}\{8h a\}\ks{tenuto} h +f \ks{noaccent}\ \slash\ \}\strich +\slash\ \slash\ \slash\ \strich +\slash\ \dpkt\strich\strich\dpkt\par +\slash\ \slash\ \slash\ \slash\ \strich +\ks{beam}\{\ks{slur}\{8{`}{`}e d xc e `a\}g\}\strich +\ks{slur}\{`4a {`}{`}d\}xc\strich +\ks{beam}\{\ks{slur}\{8{`}{`}g f e f d \}nc\}\strich\par +`2h\slash\ {`}{`}4c\strich \ks{beam}\{8`a g a f\}\slash\ \strich +\slash\ \slash\ \slash\ \slash\ \slash\strich +\slash\ \slash\ \slash\ \slash\ \slash\ \slash\strich\par +2`a \ks{tr} 4h\strich +\ks{beam}\{\ks{slur}\{8g f\} g e\}\slash\strich +\slash\ \slash\ \ks{beam}\{\ks{slur}\{8h a\}\}\strich +\slash\ \slash\ \slash\ \slash\ \slash\ \slash\ \strich\par +\ks{slur}\{{`}{`}4d `a\} {`}{`}d\strich +\ks{beam}\{\ks{slur}\{8`g f\} g e\} 4f\strich +\slash\ \slash\ 4.e \ks{tr} 8d\strich +\ks{chord}\{2.,d .a `.d\} + \dpkt\strich\strich +\ \ \} }{\bf!!} + +\vfill\eject +\vskip2cm +\title{Lobe den Herren} +\composer{Hugo Distler} +\def\@#1#2{{$\hbox{#1\hfill}\atop\hbox{#2\hfill}$}} +\def\lv{{\leaders\hrule \hskip1cm plus 1fill}} +\parindent 40pt +\voice{Sopran}% +\universal +\beginsong\vio\G\^r{{\rm Schnell}}{\vrule height 7\nhh width0pt% +\gluebrule}\meter3/4% +\^{\mezzoforte}\_{\@{Lo-}{Mei-}}{\v2}% +\_{\@{be}{ne}}{\v2}% +\_{\@{den}{ge - }}{\v6}\|% +\_{\@{Her-}{lie - }}{\v4\.1}\_{\@{ren, }{be - }}{\a3}% +\_l{\@{den}{te }}{\v2}\|% +\_l{\@{m"ach - }{See - }}{\v1}\_{\@{ti - }{le, }}{\v0}% +\_{\@{gen }{das }}{\v{-1}}\|% +\_{\@{K"o - }{ist }}{\h0}% +\group{\\{\_n{\@{nig \lv }{mein \lv }}{\v1}}\\{\|\meter2/4}\\{\v1}} +{\\{1}\\{0}\\{1}}\lslur13\go\_{\@{der }{Be- }}{\v2}\|\meter4/4% +\_{\@{Eh - }{geh - }}{\h3}\_{\@{ren!}{ren.}}{\h2}\rightrepeat\meter3/4% +%Ende Wiederholung +\_{Kom-}\^{\forte}{\v6}\_{met}{\v6}\_{zu}{\v6}\|% +\_{Hauf!}{\h7\.1}\caesura\|\_l{Psal - }{\v4}\_{ter}{\a5}% +\_l{und }{\a5}% +\group{\\{\_n{Har\hskip40pt - \hskip40pt -\hskip 40pt - \hskip40pt +}{\v6}}\\{\|}\\{\a6}\\{\a7}\\{\a6}\\{\a4}\\{\v6}% +\\{\|}\\{\a6}\\{\a7}\\{\v6\.1}\\{\a7}\\{\|}\\{\v6\.1}} +{\\{6}\\{8}\\{6}\\{7}\\{6}\\{4}\\{6}\\{8}\\{6}\\{7}\\{6}\\{7}\\{8}\\{6}}% +\lbeam36\lbeam9{10}\uslur13\uslur79\uslur1{14}\go +\_{fe,}{\a5}\_l{wacht}{\v4}\|% +\^{\piano}\_{auf, }{\h3}\group{\\{\_n{wacht}{\caesura\a4}}\\{\a2}} +{\\{4}\\{2}}\ubeam12\go\|\^{\dec}\_{auf,}{\h3}% +\group{\\{\_n{wacht}\^{zart}{\caesura\a4}}\\{\a2}} +{\\{4}\\{2}}\ubeam12\go\|\^{\dec}\_{auf,}{\h6\.1}\caesura\|% +\^{\forte}\_{las-}{\v{-1}}\_{set}{\v0\.1}\_{den}{\a1}\|% +\meter4/4\_{Lob - }{\h2}\_{ge - }{\v3}\_{sang}{\v4}\|\meter7/4% +\group{\\{\_n{h"o \hskip20pt - \hskip20pt - \hskip20pt +- }{\h5}}\\{\v4\.1}\\{\a3}\\{\v2}\\{\h3}} +{\\{5}\\{4}\\{3}\\{2}\\{9}}\uslur15\go +\|\meter3/4\_{ren!}{\h2\.1}\=\endsong +\parindent=0pt \eightrm +Aus: R. Baum,``Geselliges Chorbuch I'' B"arenreiter-Verlag, Kassel und +Basel. +\vskip1cm \rm Auch zu diesem St"uck sei die Eingabe aufgef"uhrt: +\vskip1cm +%%%%%%%%%%%%%%%% +%%%%%% distler% +%%%%%%%%%%%%%%%% +{\bf !!}\ks{title}\{Lobe den Herren\} +\ks{composer}\{Hugo Distler\} +\par +\ks{voice}\{Sopran\} +\ks{treble}\ks{signature}\{{`}{`}xf\} +\ks{text}\{\ks{\os{ }l} Schnell\} +\ks{meter}\{{\bf3}\slash {\bf4}\}\ks{vocal} +\par {\bf\{\ \ \ +4g\ks{mezzoforte} g {`}{`}d\strich `h. 8a 4g\strich f e d \strich 2e +\ks{slur}\{4f\strich\ks{meter}\{2\slash 4\} f\} 4g\strich +\par\ks{meter}\{4\slash 4\} 2a 2g\dpkt\strich\strich +\ks{meter}\{3\slash 4\} 4{`}{`}d d d \strich 2.e 0p\strich +\par `4h 8{`}{`}c c +\ks{group}\{4d\strich 8d e d `h 4{`}{`}d\strich 8d e 4.d 8e\strich 4.d\} +\ks{gslur}\{1-3, 1-13\}\par +\ks{gbeam}\{3-6, 9-10\} 8c 4`h\strich 2a +\ks{piano} 0p\ks{beam}\{8h g\}\strich\par 2a \ks{decr} 0p +%ks{beam}\{8h g\}\strich\par 2a \ks{decr} 0p +\ks{beam}\{8h \ks{text}\{{\rm zart}\}g\}\strich + {`}{`}2.d\ks{decr} 0p\strich +\par `4d\ks{forte} .e 8f\strich \ks{meter}\{4\slash 4\} 2g 4a h\strich +\par +\ks{meter}\{7\slash 4\}\ks{slur}\{`{}`2c `4.h 8a 4g 2a\}\strich +\ks{meter}\{3\slash 4\} 2.g \gleich\ \ \ \} } +\par +\{\ \ \ \{Lo-\bs{atop} Mei-\} \{be\bs{atop} ne\} \{den\bs{atop} ge-\} +\{Her-\bs{atop} lie-\} \{ren,\bs{atop} be-\}\par + \{den \bs{atop} te\} \{m"ach-\bs{atop} See-\} + \{ti-\bs{atop} le,\} \{gen\bs{atop} das\} \par + \{K"o-\bs{atop} ist\} + \{nig--\bs{atop} mein--\} \slash\ + \{der\bs{atop} Be-\} \{Eh-\bs{atop} geh-\} + \{ren!\bs{atop} ren.\} +\par Kom- met zu Hauf! Psal- ter und Har- +\slash\ \slash\ \slash\ +\slash\ \slash\ \slash\ +\slash\ \slash\ \slash\ \slash\ +fe, \par +wacht auf, wacht \slash\ auf, wacht\ \slash\ auf, \par +las- set +den Lob- ge- sang h"o- +\slash\ \slash\ \slash\ \slash\ +ren!\ \ \ \}{\bf!!} +\vfill\eject +% +% +\bye |