summaryrefslogtreecommitdiff
path: root/obsolete/macros/texmuse/Samples/tex/fmajor.tex
diff options
context:
space:
mode:
Diffstat (limited to 'obsolete/macros/texmuse/Samples/tex/fmajor.tex')
-rw-r--r--obsolete/macros/texmuse/Samples/tex/fmajor.tex56
1 files changed, 56 insertions, 0 deletions
diff --git a/obsolete/macros/texmuse/Samples/tex/fmajor.tex b/obsolete/macros/texmuse/Samples/tex/fmajor.tex
new file mode 100644
index 0000000000..55041ed31d
--- /dev/null
+++ b/obsolete/macros/texmuse/Samples/tex/fmajor.tex
@@ -0,0 +1,56 @@
+%public\mandate
+\documentclass[draft]{cfart}
+\input texmuse.tex
+\begin{document}
+\makeatletter
+\newinstrument{righthand}
+\newinstrument[\bassclef]{lefthand}
+\parindent0pt
+
+
+\title{Invention in F}
+\author{J. S. Bach}
+\maketitle
+\thispagestyle{empty}
+\begin{figure}[b]
+\flushright\small Typeset by \TeXmuse
+\end{figure}
+\begin{texmuse}
+\meter34\key{-1}
+\righthand{\rangefrom{F4}
+ 4R[FAFCF] [F+3ED] [CDCB] [ABAG]
+ 4[FACAF+C] \rangefrom{D5}3[ACBC][ACBC][ACBC]
+ [FAGA][FAGA][FAGA] [DFEF][DFEF][DFEF]
+ \rangefrom{A4}4[\nBG] [DB] [FD] 3[GA+GF] [EFED] [CDC\bB]
+ 4[A3DC] \rangefrom{D4}[\nBCBA] [GAGF] [EFED] [4C-3C\nB]
+ [4CE] [FC] [EC] [D\nB] 5CRR
+ \rangefrom{C5}4R[CECGC] [C+3\nBA] [GAGF] [EFED] [C\bB-CA][CAB-A][CAA-A]
+ 4\rangefrom{G4}[BGBGDG] [G+3F\bE][DEDC][BCBA] 4[GBDBG+D]
+ [B+\#C][B+C][B+C] [DAFDA+F] \rangefrom{C5}3[GFGB][CBDB][EBCB]
+ [FEFA][\nB-A\#CA][DAB-A] [EDEG][A-G\nB-G][\#CGA-G] 4[FD][\bB-D][G-F]
+ [ECA-CF-\bE] [3DF\bEF][DFEF][DFEF] [B-DCD][B-DCD][B-DCD]
+ \rangefrom{E4}[GBAB][GBAB][GBAB] 4[EC-][GE][BG] 3[CDCB][ABAG][FGF\bE]
+ 4[D-3GF][\nEFED-]\rangefrom{G3}[CDCB] [ABAG][4F-3FE]4[FA] [BF][AF][GE]
+ 5FRR
+ }
+\lefthand{\rangefrom{F3}
+ 5RRR
+ 4R[FAFCF] [F+3ED] [CDCB] [ABAG]
+ 4[FACAF+C] \trebleclef\rangefrom{D4}3[ACBC][ACBC][ACBC]
+ [FAGA][FAGA][FAGA] [DFEF][DFEF][DFEF]
+ \rangefrom{G3}4[\nBG] [CG] [EC] 3[FG+FE] [DEDC] [\nBCBA]
+ 4[G\bassclef3C\nB] [ABAG] \rangefrom{G2}[FG+FE] [DEDC] [G+FEF] 4[G+G] 4R[CECG+C]
+ \rangefrom{C3}[C+3\nBA] [GAGF] [EFED] 4[CEGEC+G] [\bE+\#F][E+F][E+F]
+ [G3\nF\bE][DEDC][B-CB-A-] 4[G-GBGD+G] [G+3F+\bE+][D+E+D+C+][BC+BA]
+ [GFG\nE+][GE+FE+][GE+EE+] [FEFD+][FD+ED+][FD+DD+] 4[BG][EG][CE]
+ [AF][DF][\nB-D] [GE][\#CE][A-C] \rangefrom{F2}3[D-D\nCD][GDAD][BDGD]
+ [C-CBC][FCGC][ACFC] 4[BDF+DB+F+] \rangefrom{G3}3[DF\bEF][DFEF][DFEF]
+ [BDCD][BDCD][BDCD] [GBAB][GBAB][GBAB] \rangefrom{C3}4[EC][FC][AF]
+ 3[BCBA][GAGF][EFED] 4[C3FE][DEDC][B-DB-A-] [G-A-G-F-][CB-A-B-]4[CC-]
+ 5F-RR
+ }
+\end{texmuse}
+
+\music{lefthand,righthand}
+
+\end{document} \ No newline at end of file