home *** CD-ROM | disk | FTP | other *** search
/ Whiteline: Alpha / Whiteline Alpha.iso / tex / tools / mutex / mtexdemo.tex (.txt) < prev    next >
Encoding:
Texinfo Document  |  1994-09-22  |  11.3 KB  |  279 lines
  1. %format plain
  2. %---------------------------------------------------
  3. %\input verbatim
  4. % macros for verbatim scanning
  5. % im wesentlichen dem file MANHDR TEX von DEK entnommen
  6. \catcode`@=11
  7. \def\tt{\fam\ttfam\tentt}%
  8. \newskip\ttglue  \ttglue=.5em plus .25em minus .15em
  9. \chardef\other=12
  10. \def\ttverbatim{\begingroup
  11.   \catcode`\\=\other
  12.   \catcode`\{=\other
  13.   \catcode`\}=\other
  14.   \catcode`\$=\other
  15.   \catcode`\&=\other
  16.   \catcode`\#=\other
  17.   \catcode`\%=\other
  18.   \catcode`\~=\other
  19.   \catcode`\_=\other
  20.   \catcode`\^=\other
  21.   \catcode`\"=\other
  22.   \parskip \z@
  23.   \obeyspaces \obeylines \tt}
  24. \def\begintt{$$\let\par=\endgraf \ttverbatim
  25.   \catcode`\|=0 \rightskip-5pc \ttfinish}
  26. {\catcode`\|=0 |catcode`|\=\other % | is temporary escape character
  27.   |obeylines % end of line is active
  28.   |gdef|ttfinish#1^^M#2\endtt{|vbox{#2}|endgroup$$}}
  29. \catcode`\|=\active
  30. {\obeylines \gdef|{\ttverbatim \spaceskip\ttglue \let^^M=\  \let|=\endgroup}}
  31. %\def\ttspace{{\tt\hskip\ttglue}}
  32. \def\vrt{\hbox{\tt\char`\|}} % vertical line
  33. \def\dn{\hbox{\tt\char'14}} % downward arrow
  34. \def\up{\hbox{\tt\char'13}} % upward arrow
  35. \def\]{\hbox{\tt\char`\ }} % visible space
  36. \catcode`@=12 % at signs are no longer letters
  37. \def\verbatimon{\catcode`\|=\active}
  38. \def\verbatimoff{\catcode`\|=\other}
  39. \verbatimoff
  40. %--------------------------------------------------- end of verbatim.tex
  41. \nopagenumbers
  42. \headline{\eightrm \hfill Beispiele f"ur den Notensatz mit \TeX
  43. \hfill\hbox to 0pt{\hss Schofer/Steinbach 1987}}
  44. %---------------------------------------------------
  45. \input mtex
  46. %---------------------------------------------------
  47. \def\ks#1{\noindent\hbox{{\tt \char\hex5C}\bf#1}}
  48. \def\bs{\noindent\hbox{{\tt \char\hex5C}}}%Backslash
  49. \def\lk{\hbox{{\tt\char\hex7B}}}%linke Klammer auf
  50. \def\strich{{\hbox{\tt \char\hex7C}}}
  51. \def\dpkt{{\hbox{\tt \char\hex3A}}}%Doppelpunkt
  52. \def\gleich{{\hbox{\tt \char\hex3D}}}%
  53. \def\slash{\noindent{\hbox{\tt \char\hex2F}}}
  54. \def\blank{{\hbox{\tt \char\hex20}}}
  55. \let\leftbrace=\{
  56. \def\{{\ifmmode\leftbrace\else{$\leftbrace$}\fi}
  57. \let\rightbrace=\}
  58. \def\}{\ifmmode\rightbrace\else{$\rightbrace$}\fi}
  59. \verbatimon
  60. \normalbaselines
  61. \openup\jot
  62. %\universal %ist f"ur MTEX  etwas zu breit
  63. \small      %so gehts vielleicht besser
  64. \title{\vbox{\hbox to 0pt{\hss 6 Suiten f"ur Cello Solo\hss}
  65.              \hbox to 0pt{\hss Suite II Menuet I\hss}}}
  66. \poet{\vtop{\hbox to 0pt{F"ur Viola "ubertragen \hss}
  67.             \hbox to 0pt{von Franz Schmidtner\hss}}}
  68. \composer{Johann Sebastian Bach}
  69. \parindent 20pt
  70. \beginsong\alto\F\meter3/4%
  71. \rchord \h5\h7\h9\endchord\v{10}\|%
  72. \two{\group{\\{\a{10}}\\{\a9}\\{\a{10}}\\{\a8}}{\\{10}\\{9}\\{10}\\{8}}%
  73. \ubeam14\uslur12\go}{\rchord \a4\a6\endchord}%
  74. \v9\|\rchord\v3\v5\endchord\v8%
  75. \group{\\{\a7}\\{\a6}}{\\{7}\\{6}}\lbeam12\go\|%
  76. \two{\group{\\{\a7}\\{\a6}\\{\a5}\\{\x4\a4}\\{\n3\a3}\\{\a2}}
  77. {\\{7}\\{6}\\{5}\\{4}\\{3}\\{2}}\ubeam16\uslur13\go}%
  78. {\a2}\|\rchord \h5\h7\h9\endchord\v{10}\|%
  79. \two{\group{\\{\a{10}}\\{\a9}\\{\tenuto\a{10}}\\{\tenuto\a8\noaccent}}
  80. {\\{10}\\{9}\\{10}\\{8}}\ubeam14\uslur12\go}{\a6}%
  81. \v{11}\|\rchord\v7\v9\endchord\rchord\v3\v7\v{12}\endchord
  82. \rchord\v1\v8\v{13}\endchord\|\rchord\h2\.1\h6\.1\x{11}\h{11}\.1\endchord
  83. \leftrightrepeat
  84. \rchord\h9\h{13}\endchord
  85. {\def\beamlist{\\{1-3,}\\{2-3,}}%
  86. \group{\\{\a{12}}\\{\s{13}}\\{\s{14}}}{\\{12}\\{13}\\{14}}\lbeam13%
  87. \uslur13\go}\|
  88. \two{\group{\\{\a{13}}\\{\a{12}}\\{\x{11}\a{11}}\\{\a{13}}\\{\a9}\\{\a8}}
  89. {\\{13}\\{12}\\{11}\\{13}\\{9}\\{8}}\ubeam16\uslur15\go}{\a8}\|%
  90. \two{\group{\\{\v9}\\{\v{12}}}{\\{9}\\{12}}\uslur12\go}{\h7}%
  91. \x{11}\two{\v{11}}{\v6}\|%
  92. \two{\group{\\{\a{15}}\\{\a{14}}\\{\a{13}}\\{\a{14}}\\{\a{12}}%
  93. \\{\n{11}\a{11}}}
  94. {\\{15}\\{14}\\{13}\\{14}\\{12}\\{11}}\ubeam16\uslur15\go}{\a5}\|%
  95. \two{\h{10}}{\group{\\{\v8}\\{\v7}}{\\{8}\\{7}}\lslur12\go}%
  96. \two{\v{11}}{\v6}\|%
  97. \two{\group{\\{\a9}\\{\a8}\\{\a9}\\{\a7}}{\\{9}\\{8}\\{9}\\{7}}\ubeam14%
  98. \go}{\a7}%
  99. \rchord\v{12}\v6\v3\endchord\|\rchord\v{11}\v7\v2\endchord
  100. \group{\\{\a{10}}\\{\a9}\\{\a8}\\{\a9}}{\\{10}\\{9}\\{8}\\{9}}\lbeam14\go
  101. \|\group{\\{\a7}\\{\a6}\\{\a7}\\{\a9}\\{\a8}\\{\a{10}}}
  102. {\\{7}\\{6}\\{7}\\{9}\\{8}\\{10}}\lbeam16\go\|%
  103. \x7\two{\tr\h9\noaccent}{\h7}%
  104. \two{\v{10}}{\pv}\|\b6%
  105. \two{\group{\\{\a8}\\{\a7}\\{\a8}\\{\a6}}
  106. {\\{8}\\{7}\\{8}\\{6}}\ubeam14\uslur12\go}{\a6}%
  107. \x7\tr\v7\noaccent\|\rchord\v{12}\v8\v3\endchord\rchord\v{11}\v8\v4\endchord
  108. \two{\group{\\{\a{10}}\\{\a9}}{\\{10}\\{9}}\ubeam12\uslur12\go}{\v5}\|%
  109. \group{\\{\rchord\a{11}\a5\a1\endchord
  110. }\\{\a{10}}\\{\a9}\\{\a{10}}\\{\a8}\\{\a{10}}}
  111. {\\{1}\\{10}\\{9}\\{10}\\{8}\\{10}}\lbeam16\go\|%
  112. \two{\group{\\{\v{12}}\\{\x{11}\v{11}}}
  113. {\\{12}\\{11}}\uslur12\go}{\v8\pv}\n7%
  114. \two{\v{12}}{\v7}\|\x4%
  115. \two{\group{\\{\a8}\\{\a7}\\{\a8}\\{\a6}}
  116. {\\{8}\\{7}\\{8}\\{6}}\ubeam14\uslur12\go}{\a4}%
  117. \two{\v7}{\v5}\|%
  118. \group{\\{\a1}\\{\a8}}{\\{1}\\{8}}\lbeam12\go\two{\tr\v6\.1}{\v2\.1}%
  119. \two{\a5}{\raise-1.5\nhh\hbox{\pa}}\|\lchord\h5\.1\h2\.1\h{-2}\.1\endchord
  120. \rightrepeat
  121. \endsong
  122. \parindent0pt
  123. {\eightrm
  124. Aus: Johann Sebastian Bach, Sechs Suiten, f"ur Viola bearbeitet von
  125. Franz Schmidtner, Musikverlag Hans Sikorski, Hamburg.
  126. \vskip0.5cm
  127. F"ur dieses Musikst"uck lautet die Eingabe:
  128. \vskip0.5cm
  129. %%%%%%%%%%%%%%%%%%
  130. %%%%% bach %%%%%%%
  131. %%%%%%%%%%%%%%%%%%
  132. {\bf !!}
  133. \ks{title}\{6 Suiten f"ur Cello Solo
  134. \bs{atop} Suite II Menuet I\}\par
  135. \ks{composer}\{Johann Sebastian Bach\}
  136. \ks{poet}\{F"ur Viola "ubertragen \bs{atop} von Franz Schmidtner\}\par
  137. \ks{alto}\ks{F}\ks{meter}\{{\bf3}\slash {\bf4}\}\ks{two}
  138. \par{\bf \{\ \ \ \ks{chord}\{2`d f a\} 4h\strich
  139. \ks{chord}\{'8c `e\}\slash\ \slash\ \slash\ 4a\strich
  140. \ks{chord}\{4,h `d\} g\ks{beam}\{8f e\}\strich
  141. ,8a \slash\ \slash\ \slash\ \slash\ \slash\ \strich
  142. \ks{chord}\{`2d f a\} 4h\strich  8e
  143. \slash\ \slash\ \slash\
  144. {`}{`}4c \strich\par
  145. \ks{chord}\{4`f a\}\ks{chord}\{,h `f {`}{`}d\}
  146. \ks{chord}\{,g `g {`}{`}e\}\strich
  147. \par\ks{chord}\{2.,a ,`e ,x{`}{`}c\}
  148. \dpkt\strich\strich\dpkt
  149. \par\ks{chord}\{2`a {`}{`}e\}\ks{slur}\{\ks{beam}\{8d 6e f\}\}\strich
  150. 8`g\slash\ \slash\ \slash\ \slash\ \slash\ \strich
  151. 2f \slash\ 4e\strich 8d \slash\ \slash\ \slash\ \slash\ \slash\strich
  152. \ks{slur}\{4g f\}e\strich\par
  153.  8f\slash\ \slash\ \slash\
  154. \ks{chord}\{4,h `e {`}{`}d\}\strich\ks{chord}\{4,a `f {`}{`}c\}
  155. \ks{beam}\{8`h a g a\}\strich\par \ks{beam}\{8f e f a g h\}\strich
  156. 2xf 4p \strich b8e \slash\ \slash\ \slash\
  157. 4xf \ks{tr}\strich\ks{chord}\{4,h `g {`}{`}d\}
  158. \ks{chord}\{4`c g {`}{`}c\} `d\slash\ \strich
  159. \par\ks{beam}\{\ks{chord}\{,8g `d {`}{`}c\} 8`h a h g h\}\strich
  160. 4g p nf\strich 8xc \slash\ \slash\ \slash\ 4d\strich
  161. \par\ks{beam}\{8,g `g\} 4.,a 8p\strich \ \slash\
  162. \dpkt\strich\strich\ \ \}\par
  163. \{\ \ \slash\ \slash\ \strich
  164. \ks{beam}\{\ks{slur}\{8{`}h a\} h g\}\slash\ \strich
  165. \slash\ \slash\ \slash\ \slash\ \strich
  166. \ks{beam}\{\ks{slur}\{'8f e d\}xc ,nh a\}\strich
  167. \slash\ \slash\ \strich\par\ks{beam}\{\ks{slur}\{8h a\}\ks{tenuto} h
  168. f \ks{noaccent}\ \slash\ \}\strich
  169. \slash\ \slash\ \slash\ \strich
  170. \slash\ \dpkt\strich\strich\dpkt\par
  171. \slash\ \slash\ \slash\ \slash\ \strich
  172. \ks{beam}\{\ks{slur}\{8{`}{`}e d xc e `a\}g\}\strich
  173. \ks{slur}\{`4a {`}{`}d\}xc\strich
  174. \ks{beam}\{\ks{slur}\{8{`}{`}g f e f d \}nc\}\strich\par
  175. `2h\slash\ {`}{`}4c\strich \ks{beam}\{8`a g a f\}\slash\ \strich
  176. \slash\ \slash\ \slash\ \slash\ \slash\strich
  177. \slash\ \slash\ \slash\ \slash\ \slash\ \slash\strich\par
  178. 2`a \ks{tr} 4h\strich
  179. \ks{beam}\{\ks{slur}\{8g f\} g e\}\slash\strich
  180. \slash\ \slash\ \ks{beam}\{\ks{slur}\{8h a\}\}\strich
  181. \slash\ \slash\ \slash\ \slash\ \slash\ \slash\ \strich\par
  182. \ks{slur}\{{`}{`}4d `a\} {`}{`}d\strich
  183. \ks{beam}\{\ks{slur}\{8`g f\} g e\} 4f\strich
  184. \slash\ \slash\ 4.e \ks{tr} 8d\strich
  185. \ks{chord}\{2.,d .a `.d\}
  186.  \dpkt\strich\strich
  187. \ \ \}     }{\bf!!}
  188. \vfill\eject
  189. \vskip2cm
  190. \title{Lobe den Herren}
  191. \composer{Hugo Distler}
  192. \def\@#1#2{{$\hbox{#1\hfill}\atop\hbox{#2\hfill}$}}
  193. \def\lv{{\leaders\hrule \hskip1cm plus 1fill}}
  194. \parindent 40pt
  195. \voice{Sopran}%
  196. \universal
  197. \beginsong\vio\G\^r{{\rm Schnell}}{\vrule height 7\nhh width0pt%
  198. \gluebrule}\meter3/4%
  199. \^{\mezzoforte}\_{\@{Lo-}{Mei-}}{\v2}%
  200. \_{\@{be}{ne}}{\v2}%
  201. \_{\@{den}{ge - }}{\v6}\|%
  202. \_{\@{Her-}{lie - }}{\v4\.1}\_{\@{ren, }{be - }}{\a3}%
  203. \_l{\@{den}{te }}{\v2}\|%
  204. \_l{\@{m"ach - }{See - }}{\v1}\_{\@{ti - }{le, }}{\v0}%
  205. \_{\@{gen }{das }}{\v{-1}}\|%
  206. \_{\@{K"o - }{ist }}{\h0}%
  207. \group{\\{\_n{\@{nig \lv }{mein \lv }}{\v1}}\\{\|\meter2/4}\\{\v1}}
  208. {\\{1}\\{0}\\{1}}\lslur13\go\_{\@{der }{Be- }}{\v2}\|\meter4/4%
  209. \_{\@{Eh - }{geh - }}{\h3}\_{\@{ren!}{ren.}}{\h2}\rightrepeat\meter3/4%
  210. %Ende Wiederholung
  211. \_{Kom-}\^{\forte}{\v6}\_{met}{\v6}\_{zu}{\v6}\|%
  212. \_{Hauf!}{\h7\.1}\caesura\|\_l{Psal - }{\v4}\_{ter}{\a5}%
  213. \_l{und }{\a5}%
  214. \group{\\{\_n{Har\hskip40pt - \hskip40pt -\hskip 40pt - \hskip40pt
  215. }{\v6}}\\{\|}\\{\a6}\\{\a7}\\{\a6}\\{\a4}\\{\v6}%
  216. \\{\|}\\{\a6}\\{\a7}\\{\v6\.1}\\{\a7}\\{\|}\\{\v6\.1}}
  217. {\\{6}\\{8}\\{6}\\{7}\\{6}\\{4}\\{6}\\{8}\\{6}\\{7}\\{6}\\{7}\\{8}\\{6}}%
  218. \lbeam36\lbeam9{10}\uslur13\uslur79\uslur1{14}\go
  219. \_{fe,}{\a5}\_l{wacht}{\v4}\|%
  220. \^{\piano}\_{auf, }{\h3}\group{\\{\_n{wacht}{\caesura\a4}}\\{\a2}}
  221. {\\{4}\\{2}}\ubeam12\go\|\^{\dec}\_{auf,}{\h3}%
  222. \group{\\{\_n{wacht}\^{zart}{\caesura\a4}}\\{\a2}}
  223. {\\{4}\\{2}}\ubeam12\go\|\^{\dec}\_{auf,}{\h6\.1}\caesura\|%
  224. \^{\forte}\_{las-}{\v{-1}}\_{set}{\v0\.1}\_{den}{\a1}\|%
  225. \meter4/4\_{Lob - }{\h2}\_{ge - }{\v3}\_{sang}{\v4}\|\meter7/4%
  226. \group{\\{\_n{h"o \hskip20pt - \hskip20pt - \hskip20pt
  227. - }{\h5}}\\{\v4\.1}\\{\a3}\\{\v2}\\{\h3}}
  228. {\\{5}\\{4}\\{3}\\{2}\\{9}}\uslur15\go
  229. \|\meter3/4\_{ren!}{\h2\.1}\=\endsong
  230. \parindent=0pt \eightrm
  231. Aus: R. Baum,``Geselliges Chorbuch I'' B"arenreiter-Verlag, Kassel und
  232. Basel.
  233. \vskip1cm \rm Auch zu diesem St"uck sei die Eingabe aufgef"uhrt:
  234. \vskip1cm
  235. %%%%%%%%%%%%%%%%
  236. %%%%%% distler%
  237. %%%%%%%%%%%%%%%%
  238. {\bf !!}\ks{title}\{Lobe den Herren\}
  239. \ks{composer}\{Hugo Distler\}
  240. \ks{voice}\{Sopran\}
  241. \ks{treble}\ks{signature}\{{`}{`}xf\}
  242. \ks{text}\{Schnell\}
  243. \ks{meter}\{{\bf3}\slash {\bf4}\}\ks{vocal}
  244. \par  {\bf\{\ \ \
  245. 4g\ks{mezzoforte} g {`}{`}d\strich `h. 8a 4g\strich f e d \strich 2e
  246. \ks{slur}\{4f\strich\ks{meter}\{2\slash 4\} f\} 4g\strich
  247. \par\ks{meter}\{4\slash 4\} 2a 2g\dpkt\strich\strich
  248. \ks{meter}\{3\slash 4\} 4{`}{`}d d d \strich 2.e 0p\strich
  249. \par `4h 8{`}{`}c c
  250. \ks{group}\{4d\strich 8d e d `h 4{`}{`}d\strich 8d e 4.d 8e\strich 4.d\}
  251. \ks{gslur}\{1-3, 1-13\}\par
  252. \ks{gbeam}\{3-6, 9-10\} 8c 4`h\strich 2a
  253. \ks{piano} 0p\ks{beam}\{8h g\}\strich\par 2a \ks{decr} 0p
  254. %ks{beam}\{8h g\}\strich\par 2a \ks{decr} 0p
  255. \ks{beam}\{8h \ks{text}\{{\rm zart}\}g\}\strich
  256.  {`}{`}2.d\ks{decr} 0p\strich
  257. \par `4d\ks{forte} .e 8f\strich \ks{meter}\{4\slash 4\} 2g 4a h\strich
  258. \ks{meter}\{7\slash 4\}\ks{slur}\{`{}`2c `4.h 8a 4g 2a\}\strich
  259. \ks{meter}\{3\slash 4\} 2.g \gleich\ \ \ \} }
  260. \{\ \ \ \{Lo-\bs{atop} Mei-\} \{be\bs{atop} ne\} \{den\bs{atop} ge-\}
  261. \{Her-\bs{atop} lie-\} \{ren,\bs{atop} be-\}\par
  262.  \{den \bs{atop} te\} \{m"ach-\bs{atop} See-\}
  263.  \{ti-\bs{atop} le,\} \{gen\bs{atop} das\} \par
  264.  \{K"o-\bs{atop} ist\}
  265.  \{nig--\bs{atop} mein--\} \slash\
  266.  \{der\bs{atop} Be-\} \{Eh-\bs{atop} geh-\}
  267.  \{ren!\bs{atop} ren.\}
  268. \par Kom- met zu Hauf! Psal- ter und Har-
  269. \slash\ \slash\ \slash\
  270. \slash\ \slash\ \slash\
  271. \slash\ \slash\ \slash\ \slash\
  272. fe, \par
  273. wacht auf, wacht \slash\ auf, wacht\ \slash\ auf, \par
  274. las- set
  275. den Lob- ge- sang h"o-
  276. \slash\ \slash\ \slash\ \slash\
  277. ren!\ \ \ \}{\bf!!}
  278. \vfill\eject
  279.