Initial commit

4 files changed, 400 insertions, 0 deletions

diff --git a/macros/musictex/FAQ b/macros/musictex/FAQ
new file mode 100644
index 0000000000..5165463c08
--- /dev/null
+++ b/macros/musictex/FAQ
@@ -0,0 +1,240 @@
+
+FAQ 930127: Frequently Asked Questions pertaining to MusicTeX and MuTeX
+
+-------------------------------------------------------------------------------
+
+NOTE: This is a bare bones beginning of what will constitute a more substantial
+	"Frequently Asked Questions" for MuTeX and MusicTeX.
+
+	Please mail your contributions to this to "mutex@stolaf.edu"
+
+-------------------------------------------------------------------------------
+TABLE OF CONTENTS
+-------------------------------------------------------------------------------
+
+01	What is MuTeX?
+02	Where can I get MuTeX and MusicTeX?
+03	Where are the archives of MuTeX mailing list?
+04	With MusicTeX I get notes and beams, but they are badly aligned,
+	beams and slurs are offset to the right etc.
+05	I obtained easily the .TEX files but the .PK and .TFM are wrong.
+06	There is no documentation with MusicTeX.
+07	I run MusicTeX on SUNOS (or some other big computer) but I have
+        memory problems with MSDOS
+08	Where's the glue?  it's not clear to me when to use or not use \temps
+	or just what it really does.
+09	When and why do you really need to put \relax at the end of a line?
+10	What are the advantages or disadvantages of using ^ instead of \sh?
+	Is one more flexible, or is it just a matter of typing style?
+11	How can I put something somewhere in the MusicTeX staffs.
+12	I cannot print notice.tex with american paper.
+13	How can I make triplets?
+14	How can I offset vertically the rests, in order to avoid collision
+	with beams or other notes in polyphonic music:
+
+-------------------------------------------------------------------------------
+
+This FAQ list is kept up to date by the contributions of the members of the
+mutex mailing list.  To participate in mutex and musictex discussions, you
+can subscribe to (or unsubscribe from) the "mutex" mailing list at the
+address:
+	mutex-request@stolaf.edu
+To send a question to the entire membership of the mutex mailing list, use
+the address:
+	mutex@stolaf.edu
+
+-------------------------------------------------------------------------------
+01 	What is MuTeX?
+
+The MuTeX package is a set of macros allowing TeX to typeset music.  It was
+written by Andrea Steinbach and Angelika Schofer, as a master's thesis at
+Rheinische Friedrich-Wilhelms University.  MuTeX allows you to typeset
+single-staff music and lyrics.
+
+
+01	What is MusicTeX?
+
+Another powerful package which allows the typesetting of orchestral and
+polifonic music is MusicTeX, written by Daniel Taupin.
+
+The main difference between MuTeX and MusicTeX is that
+   - MusicTeX deals with multiple staves (staffs?)
+   - MuTeX produces a nicer output.
+
+The reason that MuteX produces nicer output seems to be that it can
+handle only single-staff music and therefore can easier put glue
+between the notes. A second reason is that it makes "real" slurs and not
+some sort of rotated brackets (braces, ...). But MusicTeX is getting
+better and better because Daniel Taupin maintains it whilst nearly
+nobody continues the development of MuTeX
+
+-------------------------------------------------------------------------------
+02	Where can I get MuTeX and MusicTeX?
+
+Most up to date version of musictex:
+
+	rsovax.ups.circe.fr	directory [anonymous.musictex]
+
+Different versions of MuTeX and MusicTeX are available from many other
+sites, including:
+	ftp.stolaf.edu		/pub/mutex/MuTeX.tar.Z
+	ftp.stolaf.edu		/pub/mutex/MuTeX_doc.tar.Z
+        ftp.gmd.de              /music/mutex/mutex.zip
+	ccadfa.cc.adfa.oz.au	/pub/tex/MuTeX.tar.Z
+	clouso.crim.ca		/pub/MuTeX.tar.Z
+	sol.cs.ruu.nl		/pub/TEX/mtex.tar.Z
+
+MusicTeX
+	ftp.stolaf.edu		/pub/mutex/musictex-4.31.tar.Z
+	ftp.gmd.de		/music/musictex/musictex.zip
+                                /music/musictex/musictex-nnn.tar.Z
+	alfred.ccs.carleton.ca	/pub/tex/MusicTeX.tar.Z
+	aix370.rrz.uni-koeln.de	/tex/musictex.tar.Z
+	bach.cs.umb.edu		/pub/tex/musictex.tar.Z
+	cs.dal.ca		/pub/comp.archives/musictex
+	emx.utexas.edu		/pub/mnt/source/tex/musictex.tar.Z
+	forwiss.uni-passau.de	/pub/tex/macros/musictex.tar.Z
+	iraun1.ira.uka.de	/tex/musictex.tar.Z
+	kth.se			/tex/umb/musictex.tar.Z
+	wraith.cs.uow.edu.au	/cache/ftp.cs.umb.edu/pub/tex/musictex.tar.Z
+	qed.rice.edu		/pub/musictex.tar.Z
+	sol.cs.ruu.nl		/TEX/musictex.tar.Z
+	srawgw.sra.co.jp	/.a/sranha/arch/arch/comp.archives/musictex
+	srawgw.sra.co.jp	/.a/sranha/arch/arch/comp.archives/music/notation/musictex
+
+Other Related Stuff
+	arisia.xerox.com	/pub/musictexdemo.PS
+	athene.uni-paderborn.de	/pcsoft/amiga/tex/fonts/musictex.lzh
+	nz20.rz.uni-karlsruhe.de /pub/pctex/texutl/macros/musictex.lzh
+        ftp.gmd.de              /music/midi2tex/...        midi to MusicTeX
+
+For those without FTP access, you can e-mail to:
+
+        mail-server@cs.ruu.nl   TEX/musictex.tar.Z
+or
+
+(Submitted by: dgold@basso.actrix.gen.nz (Dale Gold))
+
+-------------------------------------------------------------------------------
+03	Where are the archives of the MuTeX mailing list?
+
+Archives for the MuTeX mailing list are available via anonymous FTP from:
+	ftp.stolaf.edu:/pub/mutex/archive         (actual size: 0.5 MB!)
+
+-------------------------------------------------------------------------------
+04	With MusicTeX I get notes and beams, but they are badly aligned,
+	beams and slurs are offset to the right etc.
+
+Remove all unnecessary spaces, i.e. ALL (all, not most of them)
+spaces which do not follow a TeX or MusicTeX control sequence. E.g.:
+do not write \qu h | \ibu0i3 \qu b \qu c \enotes
+but          \qu h|\ibu0i3\qu b\qu c\enotes
+
+\relax at the end of each line not ending with \enotes
+
+Answer thanks to TAUPIN@FRUPS51.bitnet
+
+-------------------------------------------------------------------------------
+
+05	I obtained easily the .TEX files but the .PK and .TFM are wrong.
+
+You probably forgot to say BINARY to your ftp before GETting the binary files.
+As a rule the .TEX and .STY are ASCII, as well as the .MF. But the .PK, .ZIP,
+.TFM and (for VMS) .BCK files must be transferred in BINARY
+
+Answer thanks to TAUPIN@FRUPS51.bitnet
+
+-------------------------------------------------------------------------------
+
+06     There is no documentation with MusicTeX.
+
+There is one, named musicdoc.tex. You may process it by plain TeX after
+installing the tfm-files from the distribution. The result is musicdoc.dvi
+-- which is in the distribution, too. Print it with you favourite dvi-driver.
+If you do not have all fonts, put dummy ones and read the text. It will not
+be beautiful, but still informative...
+
+-------------------------------------------------------------------------------
+
+07      I run MusicTeX on SUNOS (or some other big computer) but I have
+        memory problems with MSDOS
+
+Two solutions:
+	a) insert compulsory line breaks (\alaligne) and page breaks (\alapage)
+	b) use Eberhardt Mattes's bigtex (btex286) (or the beta-test version
+           of tex386 if you have at least a 386-machine)
+
+-------------------------------------------------------------------------------
+
+08	Where's the glue?  it's not clear to me when to use or not use \temps
+	or just what it really does.
+
+Glue occurs each time you say \barre or \temps or \alaligne or \alapage
+\temps is used to put glue between groups of notes. You can disable it
+and look how ugly it looks...
+
+-------------------------------------------------------------------------------
+
+09	When and why do you really need to put \relax at the end of a line?
+
+Put \relax at end of lines whenever the last item is not a control
+sequence. Because in this case the spaces are swallowed by TeX as a
+final part of the control sequence. Thus I use \relax when I need
+a control sequence to swallow end of line spaces (and new line code).
+
+-------------------------------------------------------------------------------
+
+10	What are the advantages or disadvantages of using ^ instead of \sh?
+	Is one more flexible, or is it just a matter of typing style?
+
+The ^ is used within collective coding, \sh is used outside.
+
+   You may write \sh k\qu k
+   or            \qu$^k
+
+-------------------------------------------------------------------------------
+
+11	How can I put something somewhere in the MusicTeX staffs.
+
+Read the musicdoc and use \zcharnote\244<pitch>\207\244<what-you-like>\207
+If you want it spacing use \charnote\244...\207\244...\207
+Within those macros you can put anything, including maths
+below, in the middle of, above the staffs. To be used inside
+tne \notes....\enotes.
+
+-------------------------------------------------------------------------------
+
+12	I cannot print notice.tex with american paper.
+
+        don't print it :-)  you have an old version. New versions of
+        MusicTeX contain  musicdoc.dvi  a LaTeX-document which fits
+        on american paper.
+
+-------------------------------------------------------------------------------
+
+13	How can I make triplets?
+
+It's already in musictex.tex, but without the `slur' you wanted. \xtuplet
+is the routine that puts a number under your beam, and the line:
+
+        \def\triolet{\xtuplet3}%
+
+will provide you with a number under or over your beam and it could be
+adapted for sextuplets or anything else.  This will make you a nice
+triplet:
+
+        \Notes\ibl0j0\triolet M\qb0{jk}\tbl0\qb0j\enotes
+
+-------------------------------------------------------------------------------
+
+14	How can I offset vertically the rests, in order to avoid collision
+	with beams or other notes in polyphonic music:
+
+Write \raise <n>\internote\ds
+      or       \raise <n>\internote\soupir
+
+      All rests are \hbox-es, so you can prefix them with \raise <dimension>
+      The <dimension> (or <n>\internote or <n>\Interligne) can be negative.
+
+-------------------------------------------------------------------------------
+
diff --git a/macros/musictex/README b/macros/musictex/README
new file mode 100644
index 0000000000..55979dfd2d
--- /dev/null
+++ b/macros/musictex/README
@@ -0,0 +1,40 @@
+Here you find Daniel Taupin's  MusicTeX  a TeX-based system to typeset music.
+
+The package consists of three parts.
+
+- the TeX-macros, -font descriptions, -fonts for 300dpi printers, font-
+  definitions and the documentation as zip-file  musictex.zip or as com-
+  pressed tar-file  musictex-nnn.tar.gz  if nnn is the version number.
+  
+  Older versions are available too as zip-files named  musictex.nnn, as well
+  as zip-files containing only the differences between older versions named
+  musictex.iii-nnn.zip (for the step from version iii to version nnn).
+  Because some people don't bother about bandwidth and simply use "mget *"
+  I've moved older versions to the directory older-versions and diff-files
+  to the directory diff-files. I hope that it is not neccessary to put zip-
+  and tar-files into different directories to make it not so easy to fetch
+  more than one needs.
+
+  If you want to use these diff-files you may have to rename them either
+  when ftp'ing them or when unzip'ing them. The diff-files do not contain 
+  the dvi-file of the documention, because this may be produced by yourself
+  from the source musicdoc.tex, which is contained if it has been changed.
+
+- some examples, compositions and arrangements by Daniel Taupin named either
+  musicexa.zip  or  musicexa-nnn.tar.gz
+  Version handling and diff-files follow the same rules as for musictex.
+
+- fonts, font-metrics, ... for (some) other resolutions than 300 dpi
+  in   musicpk.zip  or  musicpk-nnn.tar.gz
+
+The base material (the zip-files) is copied from Daniel Taupins ftp-server
+at hprib.lps.u-psud.fr. The tar- and diff-files are generated by me.
+
+There is a mailing-list for discussions about MusicTeX (and MuTeX). To
+subscribe to this list send a mail to   mutex-request@gmd.de  contain-
+ing the word   subscribe   in the body of the mail.
+
+The directory software (only at ftp.gmd.de) points at some software on 
+top of MusicTeX like  abc2mtex or midi2tex.
+
+Werner.Icking@gmd.de           
diff --git a/macros/musictex/add-ons/harmonics.tex b/macros/musictex/add-ons/harmonics.tex
new file mode 100644
index 0000000000..f3d738c5df
--- /dev/null
+++ b/macros/musictex/add-ons/harmonics.tex
@@ -0,0 +1,120 @@
+%
+% Harmonics in MusicTeX
+% =====================
+%
+%\input musicnft
+%\input musictex
+%\input musicsty
+\input musicvbm
+\def\musictex{Music\TeX}%
+% ________________________________________________________________________
+%
+% Harmonic quaver duplets:-
+%                   _____                   2   3
+%           ypairu  |   |           ypairl  |   |
+%                   |   |                   |   |
+%                   2   3                   -----
+%
+\def\ypairu#1#2#3% #1 is beam number, #2 and #3 are notes
+{\Ibu{#1}{#2}{#3}1\yh{#1}{#2}\tbu{#1}\yh{#1}{#3}}\relax
+%
+\def\ypairl#1#2#3%  #1 is beam number, #2 and #3 are notes
+{\Ibl{#1}{#2}{#3}1\yb{#1}{#2}\tbl{#1}\yb{#1}{#3}}\relax
+%________________________________________________________________________
+\centerline{\enorme Harmonic notes in \musictex}
+\bigskip
+\bigskip
+\def\wbarno{}%
+\def\nbinstruments{1}%
+\cleftoksi={{0}{0}{0}{0}}%
+\staffbotmarg=12\Interligne%
+%
+% Note symbols by name
+%
+\def\bslash{{\tt\char'134}}%
+\def\mcra#1{\zcharnote{13}{\hbox to 1.3\Interligne{\hss\tt\bslash #1\hss}}}%
+\def\mcrb#1{\kern 10pt\mcra {#1}\kern -10pt}
+%
+\parindent 0mm%
+\debutextrait\normal\temps\NOTEs
+\qsk\qsk\hsk%
+\mcra{zd\bslash sk}\zd i\sk\qsk\mcra{du}\du i\qsk
+\mcra{dup}\dup i\qsk\mcra{dupp}\dupp i\qsk
+\mcra{duppp}\duppp i\qsk\mcra{dl}\dl i\qsk
+\mcra{dlp}\dlp i\qsk\mcra{dlpp}\dlpp i\qsk
+\mcra{dlppp}\dlppp i\enotes\finextrait
+\bigskip
+%
+\parindent 0mm%
+\debutextrait\normal\temps\NOTEs
+\qsk\qsk\hsk%
+\mcra{zy\bslash sk}\zy i\sk\qsk\mcra{yu}\yu i\qsk
+\mcra{yup}\yup i\qsk\mcra{yupp}\yupp i\qsk
+\mcra{yuppp}\yuppp i\qsk\mcra{yl}\yl i\qsk
+\mcra{ylp}\ylp i\qsk\mcra{ylpp}\ylpp i\qsk
+\mcra{ylppp}\ylppp i\enotes\finextrait
+%
+\parindent 0mm%
+\debutextrait\normal\temps\NOTEs
+\qsk\qsk\hsk%
+\mcra{ycu}\ycu i\qsk\mcra{yccu}\yccu i\qsk
+\mcra{ycccu}\ycccu i\qsk\mcra{yccccu}\yccccu i\qsk
+\mcra{ycl}\ycl i\qsk\mcra{yccl}\yccl i\qsk
+\mcra{ycccl}\ycccl i\qsk\mcra{yccccl}\yccccl i\qsk
+\enotes\finextrait
+%
+%
+\parindent 0mm%
+\debutextrait\normal\temps\NOTes
+\qsk\qsk\hsk%
+\mcrb{ypairu1cf}\ypairu1cf\sk%
+\mcrb{ypairu1eg}\ypairu1eg\sk%
+\mcrb{ypairl1jm}\ypairl1jm\sk%
+\mcrb{ypairl1ln}\ypairl1ln\sk%
+\enotes
+\finextrait
+%
+% Guitar Harmonics
+%
+\def\guitar#1#2#3% 1=note, 2=string, 3=fret
+{\zd #1\raise-12pt\hbox{\guitarsym#2#3}\sk}
+\def\lguitar#1#2#3% 1=note, 2=string, 3=fret
+{\raise-12pt\hbox{\guitarsym#2#3}\hqsk\zd #1\qsk\sk}
+%
+\centerline{\moyen Guitar harmonics}
+\medskip
+\parindent 0mm%
+%
+%     ---
+%    | A |  B
+%     ---
+%
+% A is the string number (Counting from treble E to bass E)
+% E string = 1, B = 2, G = 3, D = 4, A = 5, E = 6
+%
+% B is the fret number, counting from the nut (or the capot if one is used)
+% Thus 0 indicates an open string, 2 indicates fret 2 etc.
+%
+\font\eightrm=cmr8
+%
+\edef\catcodeat{\the\catcode`\@}\catcode`\@=11
+%
+\def\guitarsym#1#2{%
+% Modified version of \boxtext lifted from gentle.tex - A gentle intro to TeX
+\eightrm\setbox\strutbox=\hbox{\vrule height5.75pt depth0.75pt width\z@}%
+\hbox{\lower 1pt \hbox{\vbox{\hrule%
+\hbox{\strut \vrule #1\vrule}\hrule}}\hskip 0.5pt#2}}%
+%
+\catcode`\@=\catcodeat % Reset catcode of '@' to entry value
+%
+\def\sy#1#2% Inserts #2 as text #1 points to the right of the cursor
+{\kern#1pt\charnote0{#2}\kern-#1pt}%
+%
+\def\gs#1#2{\sy{-0.8}{\guitarsym{#1}{#2}}}\relax % One string
+%
+\debutextrait\normal\temps\NOtes\qsk%
+\lguitar L6{12}\lguitar a5{12}\lguitar b6{7}\lguitar d4{12}%
+\guitar e5{7}\guitar g3{12}\guitar h4{7}\guitar i2{12}%
+\guitar k3{7}\guitar l1{12}\sh m\guitar m2{7}\guitar n3{5}%
+\guitar p1{7}\guitar s1{5}\enotes\finextrait
+\bye
diff --git a/macros/musictex/musicdoc.pdf b/macros/musictex/musicdoc.pdf
new file mode 100644
index 0000000000..4a21c2ef3d
--- /dev/null
+++ b/macros/musictex/musicdoc.pdf