summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/tex/generic/musictex/musicsty.tex
diff options
context:
space:
mode:
Diffstat (limited to 'Master/texmf-dist/tex/generic/musictex/musicsty.tex')
-rw-r--r--Master/texmf-dist/tex/generic/musictex/musicsty.tex368
1 files changed, 368 insertions, 0 deletions
diff --git a/Master/texmf-dist/tex/generic/musictex/musicsty.tex b/Master/texmf-dist/tex/generic/musictex/musicsty.tex
new file mode 100644
index 00000000000..9149e37d49b
--- /dev/null
+++ b/Master/texmf-dist/tex/generic/musictex/musicsty.tex
@@ -0,0 +1,368 @@
+%
+% This is Musicsty from MusicTeX
+\message{Version 5.14 -- September 20th, 1995}%
+%
+\edef\catcodeat{\the\catcode`\@}\catcode`\@=11
+\edef\catcode@gt{\the\catcode`\>}\catcode`\>=12
+\edef\catcode@lt{\the\catcode`\<}\catcode`\<=12
+\def\makeatletter{\catcode`\@=11}
+\def\makeatother{\catcode`\@=12}
+%
+% non musical procedures used in typesetting the non-musical
+% texts together with musictex
+%
+\def\fontid{\fonthdg\fonthdge}
+%
+% eight point fonts
+%
+\font\eightrm=\fontid r8
+\font\eighti=cmmi8 \skewchar\eighti='177
+\font\eightsy=cmsy8 \skewchar\eightsy='60
+\font\eightbf=\fontid bx8
+\font\eightsl=\fontid sl8
+\font\eightit=\fontid ti8
+\font\eighttt=\fontid tt8
+%
+% nine point fonts
+%
+\font\ninerm=\fontid r9
+\font\ninei=cmmi10 scaled 900 \skewchar\ninei='177
+\font\ninesy=cmsy10 scaled 900 \skewchar\ninesy='60
+\font\ninebf=\fontid bx9
+\font\ninesl=\fontid sl9
+\font\nineit=\fontid ti9
+\font\ninett=\fontid tt9
+%
+% twelve point fonts
+%
+\font\twlrm=\fontid r12
+\font\twli=cmmi12 \skewchar\twli='177
+\font\twlsy=cmsy10 scaled \magstep1 \skewchar\twlsy='60
+\font\twlbf=\fontid bx12
+\font\twlsl=\fontid sl12
+\font\twlit=\fontid ti12
+\font\twltt=\fontid tt12
+%
+% fourteen point fonts
+%
+\font\frtrm=\fontid r12 scaled \magstep1
+\font\frti=cmmi12 scaled \magstep1 \skewchar\frti='177
+\font\frtsy=cmsy10 scaled \magstep2 \skewchar\frtsy='60
+\font\frtbf=\fontid bx12 scaled \magstep1
+\font\frtsl=\fontid sl12 scaled \magstep1
+\font\frtit=\fontid ti12 scaled \magstep1
+\font\frttt=\fontid tt12 scaled \magstep1
+%
+% seventeen point fonts
+%
+\font\svtrm=\fontid r17
+\font\svti=cmmi12 scaled \magstep2 \skewchar\svti='177
+\font\svtsy=cmsy10 scaled \magstep3 \skewchar\svtsy='60
+\font\svtbf=\fontid bx12 scaled \magstep2
+\font\svtsl=\fontid sl12 scaled \magstep2
+\font\svtit=\fontid ti12 scaled \magstep2
+\font\svttt=\fontid tt12 scaled \magstep2
+%
+% twenty point fonts
+%
+\font\twtyrm=\fontid r17 scaled \magstep1
+\font\twtyi=cmmi12 scaled \magstep3 \skewchar\twtyi='177
+\font\twtysy=cmsy10 scaled \magstep4\skewchar\twtysy='60
+\font\twtybf=\fontid bx12 scaled \magstep3
+\font\twtysl=\fontid sl12 scaled \magstep3
+\font\twtyit=\fontid ti12 scaled \magstep3
+\font\twtytt=\fontid tt12 scaled \magstep3
+%
+% twenty five point fonts
+%
+\font\twfvrm=\fontid r17 scaled \magstep2
+\font\twfvi=cmmi12 scaled \magstep4 \skewchar\twfvi='177
+\font\twfvsy=cmsy10 scaled \magstep5 \skewchar\twfvsy='60
+\font\twfvbf=\fontid bx12 scaled \magstep4
+\font\twfvsl=\fontid sl12 scaled \magstep4
+\font\twfvit=\fontid ti12 scaled \magstep4
+\font\twfvtt=\fontid tt12 scaled \magstep4
+%
+% SEVERAL DIFFERENT POINT SIZES
+%
+\def\twfvpoint{\Twfvpoint}
+\def\Twfvpoint{\normalbaselineskip=30pt
+\def\rm{\fam0\twfvrm}%
+\def\it{\fam\itfam\twfvit}%
+\def\sl{\fam\slfam\twfvsl}%
+\def\bf{\fam\bffam\twfvbf}%
+\def\smc{\twfvrm}%
+\def\mit{\fam 1}%
+\def\cal{\fam 2}%
+\textfont0=\twfvrm \scriptfont0=\twtyrm \scriptscriptfont0=\svtrm
+\textfont1=\twfvi \scriptfont1=\twtyi \scriptscriptfont1=\svti
+\textfont2=\twfvsy \scriptfont2=\twtysy \scriptscriptfont2=\svtsy
+\textfont3=\tenex \scriptfont3=\tenex \scriptscriptfont3=\tenex
+\textfont\itfam=\twfvit \scriptfont\itfam=\twtyit
+\textfont\slfam=\twfvsl \scriptfont\slfam=\twtysl
+\textfont\bffam=\twfvbf \scriptfont\bffam=\twtybf
+\scriptscriptfont\bffam=\twtybf
+\setbox\strutbox=\hbox{\vrule height 22pt depth 8pt width 0pt}%
+\def\tt{\twfvtt}\normalbaselines\rm}
+%
+\def\twtypoint{\Twtypoint}
+\def\Twtypoint{\normalbaselineskip=25pt
+\def\rm{\fam0\twtyrm}%
+\def\it{\fam\itfam\twtyit}%
+\def\sl{\fam\slfam\twtysl}%
+\def\bf{\fam\bffam\twtybf}%
+\def\smc{\twtyrm}%
+\def\mit{\fam 1}%
+\def\cal{\fam 2}%
+\textfont0=\twtyrm \scriptfont0=\svtrm \scriptscriptfont0=\frtrm
+\textfont1=\twtyi \scriptfont1=\svti \scriptscriptfont1=\frti
+\textfont2=\twtysy \scriptfont2=\svtsy \scriptscriptfont2=\frtsy
+\textfont3=\tenex \scriptfont3=\tenex \scriptscriptfont3=\tenex
+\textfont\itfam=\twtyit \scriptfont\itfam=\svtit
+\textfont\slfam=\twtysl \scriptfont\slfam=\svtsl
+\textfont\bffam=\twtybf \scriptfont\bffam=\svtbf
+\scriptscriptfont\bffam=\svtbf
+\setbox\strutbox=\hbox{\vrule height 18pt depth 7pt width 0pt}%
+\def\tt{\twtytt}\normalbaselines\rm}
+%
+\def\svtpoint{\Svtpoint}
+\def\Svtpoint{\normalbaselineskip=21pt
+\def\rm{\fam0\svtrm}%
+\def\it{\fam\itfam\svtit}%
+\def\sl{\fam\slfam\svtsl}%
+\def\bf{\fam\bffam\svtbf}%
+\def\smc{\svtrm}%
+\def\mit{\fam 1}%
+\def\cal{\fam 2}%
+\textfont0=\svtrm \scriptfont0=\frtrm \scriptscriptfont0=\twlrm
+\textfont1=\svti \scriptfont1=\frti \scriptscriptfont1=\twli
+\textfont2=\svtsy \scriptfont2=\frtsy \scriptscriptfont2=\twlsy
+\textfont3=\tenex \scriptfont3=\tenex \scriptscriptfont3=\tenex
+\textfont\itfam=\svtit \scriptfont\itfam=\frtit
+\textfont\slfam=\svtsl \scriptfont\slfam=\frtsl
+\textfont\bffam=\svtbf \scriptfont\bffam=\frtbf
+\scriptscriptfont\bffam=\frtbf
+\setbox\strutbox=\hbox{\vrule height 14.5pt depth 6.5pt width 0pt}%
+\def\tt{\svttt}\normalbaselines\rm}
+%
+\def\frtpoint{\Frtpoint}
+\def\Frtpoint{\normalbaselineskip=17pt
+\def\rm{\fam0\frtrm}%
+\def\it{\fam\itfam\frtit}%
+\def\sl{\fam\slfam\frtsl}%
+\def\bf{\fam\bffam\frtbf}%
+\def\smc{\frtrm}%
+\def\mit{\fam 1}%
+\def\cal{\fam 2}%
+\textfont0=\frtrm \scriptfont0=\twlrm \scriptscriptfont0=\eightrm
+\textfont1=\frti \scriptfont1=\twli \scriptscriptfont1=\eighti
+\textfont2=\frtsy \scriptfont2=\twlsy \scriptscriptfont2=\eightsy
+\textfont3=\tenex \scriptfont3=\tenex \scriptscriptfont3=\tenex
+\textfont\itfam=\frtit \scriptfont\itfam=\twlit
+\textfont\slfam=\frtsl \scriptfont\slfam=\twlsl
+\textfont\bffam=\frtbf \scriptfont\bffam=\twlbf
+\scriptscriptfont\bffam=\twlbf
+\setbox\strutbox=\hbox{\vrule height 12pt depth 5pt width 0pt}%
+\def\tt{\frttt}\normalbaselines\rm}
+%
+\def\twlpoint{\Twlpoint}
+\def\Twlpoint{\normalbaselineskip=14pt
+\def\rm{\fam0\twlrm}%
+\def\it{\fam\itfam\twlit}%
+\def\sl{\fam\slfam\twlsl}%
+\def\bf{\fam\bffam\twlbf}%
+\def\smc{\twlrm}%
+\def\mit{\fam 1}%
+\def\cal{\fam 2}%
+\textfont0=\twlrm \scriptfont0=\tenrm \scriptscriptfont0=\eightrm
+\textfont1=\twli \scriptfont1=\teni \scriptscriptfont1=\eighti
+\textfont2=\twlsy \scriptfont2=\tensy \scriptscriptfont2=\eightsy
+\textfont3=\tenex \scriptfont3=\tenex \scriptscriptfont3=\tenex
+\textfont\itfam=\twlit \scriptfont\itfam=\tenit
+\textfont\slfam=\twlsl \scriptfont\slfam=\tensl
+\textfont\bffam=\twlbf \scriptfont\bffam=\tenbf
+\scriptscriptfont\bffam=\tenbf
+\setbox\strutbox=\hbox{\vrule height 10pt depth 4pt width 0pt}%
+\def\tt{\twltt}\normalbaselines\rm}
+%
+%
+\def\tenpoint{\Tenpoint}
+\def\Tenpoint{\normalbaselineskip=12pt
+\def\rm{\fam0\tenrm}%
+\def\it{\fam\itfam\tenit}%
+\def\sl{\fam\slfam\tensl}%
+\def\bf{\fam\bffam\tenbf}%
+\def\smc{\tenrm}%
+\def\mit{\fam 1}%
+\def\cal{\fam 2}%
+\textfont0=\tenrm \scriptfont0=\eightrm \scriptscriptfont0=\eightrm
+\textfont1=\teni \scriptfont1=\eighti \scriptscriptfont1=\eighti
+\textfont2=\tensy \scriptfont2=\eightsy \scriptscriptfont2=\eightsy
+\textfont3=\tenex \scriptfont3=\tenex \scriptscriptfont3=\tenex
+\textfont\itfam=\tenit \scriptfont\itfam=\eightit
+\textfont\slfam=\tensl \scriptfont\slfam=\eightsl
+\textfont\bffam=\tenbf \scriptfont\bffam=\eightbf
+\scriptscriptfont\bffam=\eightbf
+\setbox\strutbox=\hbox{\vrule height 8.5pt depth 3.5pt width 0pt}%
+\def\tt{\tentt}\normalbaselines\rm}
+%
+\def\eightpoint{\Eightpoint}
+\def\Eightpoint{\normalbaselineskip=10pt
+\def\rm{\fam0\eightrm}%
+\def\it{\fam\itfam\eightit}%
+\def\sl{\fam\slfam\eightsl}%
+\def\bf{\fam\bffam\eightbf}%
+\def\mit{\fam 1}%
+\def\cal{\fam 2}%
+\textfont0=\eightrm \scriptfont0=\eightrm \scriptscriptfont0=\eightrm
+\textfont1=\eighti \scriptfont1=\eighti \scriptscriptfont1=\eighti
+\textfont2=\eightsy \scriptfont2=\eightsy \scriptscriptfont2=\eightsy
+\textfont3=\tenex \scriptfont3=\tenex \scriptscriptfont3=\tenex
+\textfont\itfam=\eightit \scriptfont\itfam=\eightit
+\textfont\slfam=\eightsl \scriptfont\slfam=\eightsl
+\textfont\bffam=\eightbf \scriptfont\bffam=\eightbf
+\scriptscriptfont\bffam=\eightbf
+\setbox\strutbox=\hbox{\vrule height 7pt depth 3pt width 0pt}%
+\def\tt{\eighttt}\normalbaselines\rm}
+%
+\def\ninepoint{\Ninepoint}
+\def\Ninepoint{\normalbaselineskip=10pt
+\def\rm{\fam0\ninerm}%
+\def\it{\fam\itfam\nineit}%
+\def\sl{\fam\slfam\ninesl}%
+\def\bf{\fam\bffam\ninebf}%
+\def\mit{\fam 1}%
+\def\cal{\fam 2}%
+\textfont0=\ninerm \scriptfont0=\ninerm \scriptscriptfont0=\ninerm
+\textfont1=\ninei \scriptfont1=\ninei \scriptscriptfont1=\ninei
+\textfont2=\ninesy \scriptfont2=\ninesy \scriptscriptfont2=\ninesy
+\textfont3=\tenex \scriptfont3=\tenex \scriptscriptfont3=\tenex
+\textfont\itfam=\nineit \scriptfont\itfam=\nineit
+\textfont\slfam=\ninesl \scriptfont\slfam=\ninesl
+\textfont\bffam=\ninebf \scriptfont\bffam=\ninebf
+\scriptscriptfont\bffam=\ninebf
+\setbox\strutbox=\hbox{\vrule height 7pt depth 3pt width 0pt}%
+\def\tt{\ninett}\normalbaselines\rm}
+%
+% GENERAL FOOTNOTES
+%
+\newcount\footmarkcount
+\footmarkcount=0\relax
+\def\resetfootnote{\global\footmarkcount=0\relax}
+%
+\def\footmarknumber{\raise 0.8ex\hbox{\eightpoint\rm\the\footmarkcount}}
+%
+\def\Footnote#1{\global\advance\footmarkcount by 1\relax
+\footnote{\footmarknumber}{#1}}%
+%\check
+% \TeX book footnote
+%
+% En cas de panique: couper en deux (une seule note autorisee)
+%
+\def\markfootnote{{\advance\footmarkcount by 1\relax\footmarknumber}}
+%
+\def\realfootnote#1{\global\advance\footmarkcount by 1\relax
+\vfootnote{{\footmarknumber}#1}}%
+%
+\def\footnotehsize{}% to enable inserting different \hsize (two columns case)
+\def\vfootnote#1{\insert\footins\bgroup\parskip \z@\eightpoint
+ \interlinepenalty=\interfootnotelinepenalty
+ \splittopskip=\ht\strutbox \advance\splittopskip by 1pt
+ \splitmaxdepth=\dp\strutbox \floatingpenalty=20000
+ \leftskip=\z@ \rightskip=\z@
+ \spaceskip \z@ \xspaceskip \z@
+ \eightpoint\footnotehsize\noindent{#1}\footstrut\futurelet\next\fo@t}
+%
+%\check
+%
+\def\footnoterule{\vskip-3pt
+ \hrule width 2truein \vskip 2.6pt } % the \hrule is .4pt high
+%
+%
+\def\aujourdhui{\space\number\day\space\ifcase\month\or
+janvier\or f\'evrier\or mars\or avril\or
+mai\or juin\or juillet\or ao\^ut\or septembre\or
+octobre\or novembre\or d\'ecembre\fi
+\space\number\year}
+\def\today{\space\ifcase\month\or
+January\or February\or March\or April\or
+May\or June\or July\or August\or September\or
+October\or November\or December\fi
+\space\number\day,\space\number\year}
+\def\boxit#1{\vbox{\hrule\hbox{\vrule\kern3pt
+ \vbox{\kern3pt#1\kern3pt}\kern3pt\vrule}\hrule}}
+\def\cenboxit#1{\centerline{\hbox{\boxit{#1}}}}
+\def\Item{\medskip\item}
+%
+\def\nologo{}
+%
+\def\umero{\raise 0.8ex\hbox{\kern-0.05em\the\scriptfont\fam o}}
+
+\let\titremorceau\empty
+\def\shorttitle#1{\def\titremorceau{#1}}
+\def\title{\shorttitle}
+\def\subtitle#1{\def\subt@itremorceau{#1}}
+\let\headt@itremorceau\undefined
+\def\headtitle#1{\def\headt@itremorceau{#1}}
+\def\fulltitle{\headtitle}
+\let\othert@itremorceau\empty
+\def\othermention#1{\def\othert@itremorceau{#1}}
+
+\let\s@hortauthor\empty
+\def\shortauthor#1{\def\s@hortauthor{#1}}
+
+\def\fullauthor#1{\def\f@ullauthor{#1}}
+\def\author{\fullauthor}
+
+\newif\ifcopyright
+
+\def\outmorceau{\shipout\vbox to 270mm{\tenpoint\vss\pagecontents\vss\line{%
+\ifodd\pageno\sl \titremorceau\ \ifx\s@hortauthor\empty
+ \else(\s@hortauthor)
+ \fi
+\ifcopyright
+\rm$\copyright$\fi \hss
+\number\pageno
+\else\rm\number\pageno\hss\sl \titremorceau\
+ \ifx\s@hortauthor\empty
+ \else(\s@hortauthor)
+ \fi
+\ifcopyright\rm$\copyright$\fi\fi}}%
+ \global\advance\count0 by 1\relax
+ \ifnum\outputpenalty>-20000 \else\dosupereject\fi}%
+
+\output{\outmorceau}
+
+\def\maketitle{\centerline{\enorme \ifx\headt@itremorceau\undefined
+ \titremorceau\else\headt@itremorceau\fi}
+\medskip
+\ifx\subt@itremorceau\undefined\else
+ \centerline{\tenpoint\sl \subt@itremorceau}
+\medskip
+\fi
+
+
+\hbox to \hsize{\tenpoint
+ \vtop{\def\\{\hss\egroup\hbox to 0.5\hsize\bgroup\relax}\relax
+ \hbox to 0.5\hsize
+ \bgroup\othert@itremorceau\hss
+ \egroup
+ }\hss
+ \vtop{\def\\{\egroup\hbox to 0.5\hsize\bgroup\relax\hss}\relax
+ \hbox to 0.5\hsize
+ \bgroup\hss\f@ullauthor
+ \egroup
+ }}
+\bigskip
+}
+
+\catcode`\>=\catcode@gt
+\catcode`\<=\catcode@lt
+\catcode`\@=\catcodeat
+
+\hsize=185mm
+\vsize=264mm
+\hoffset=-1.79cm
+\voffset=-1.54cm
+
+\endinput