%format plaing        % german plain
%---------------------------------------------------
%\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
%---------------------------------------------------
\def\os{\tt \char\hex5E}%%\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
\hskip\noteskip    %%CS%%
\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\}
%%CS%%\ks{text}\{\ks{\os{ }l} Schnell\}
\ks{text}\{\bs\os r Schnell\}  %%CS%%
\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
