summaryrefslogtreecommitdiff
path: root/obsolete/macros/texmuse/Samples/tex/bbmajor3.mf
diff options
context:
space:
mode:
Diffstat (limited to 'obsolete/macros/texmuse/Samples/tex/bbmajor3.mf')
-rw-r--r--obsolete/macros/texmuse/Samples/tex/bbmajor3.mf768
1 files changed, 768 insertions, 0 deletions
diff --git a/obsolete/macros/texmuse/Samples/tex/bbmajor3.mf b/obsolete/macros/texmuse/Samples/tex/bbmajor3.mf
new file mode 100644
index 0000000000..98fe5c15d0
--- /dev/null
+++ b/obsolete/macros/texmuse/Samples/tex/bbmajor3.mf
@@ -0,0 +1,768 @@
+mode_setup;
+input txmfont;
+input texmuse;
+instr_no(2);
+key_ := -2;
+desired_width := 469.75499pt/pt;
+staff_1="-1,0,1,2,3";
+bar_type1=10;
+instr_clef1:= 6;
+def lefthand =
+ curr_instr:="lefthand;";
+ note_[index][instr_]:=currentpicture;
+ instr_:=1;
+ currentpicture:=note_[index][instr_];
+ enddef;
+staff_2="-1,0,1,2,3";
+bar_type2=10;
+instr_clef2:= 0;
+def righthand =
+ curr_instr:="righthand;";
+ note_[index][instr_]:=currentpicture;
+ instr_:=2;
+ currentpicture:=note_[index][instr_];
+ enddef;
+new_char(16);
+lefthand;
+ add_noteheads(d3);
+righthand;
+ add_noteheads(f4);
+ add_dot(f4);
+end_of_char;
+new_char(8);
+lefthand;
+ add_noteheads(b3);
+end_of_char;
+new_char(8);
+lefthand;
+ add_noteheads(c3);
+end_of_char;
+new_char(8);
+lefthand;
+ add_noteheads(d3);
+end_of_char;
+new_char(8);
+lefthand;
+ add_noteheads(c3);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(b3);
+ beam(1,2,1,d3,2,3,1,b3,3,3,1,c3,4,3,1,d3,5,3,1,c3,6,2,1,b3);
+righthand;
+ add_noteheads(e4);
+ beam(1,1,1,f4,6,2,1,e4);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(b4);
+ add_dot(b4);
+righthand;
+ add_noteheads(d4);
+end_of_char;
+new_char(8);
+righthand;
+ add_noteheads(b4);
+end_of_char;
+new_char(8);
+righthand;
+ add_noteheads(c4);
+end_of_char;
+new_char(8);
+righthand;
+ add_noteheads(d4);
+end_of_char;
+new_char(8);
+righthand;
+ add_noteheads(c4);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(a4);
+ add_flat(a4);
+ beam(7,1,1,b4,12,2,1,a4);
+righthand;
+ add_noteheads(b4);
+ beam(7,2,1,d4,8,3,1,b4,9,3,1,c4,10,3,1,d4,11,3,1,c4,12,2,1,b4);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(g3);
+righthand;
+ add_noteheads(b5);
+ add_dot(b5);
+end_of_char;
+new_char(8);
+lefthand;
+ add_noteheads(e3);
+end_of_char;
+new_char(8);
+lefthand;
+ add_noteheads(f3);
+end_of_char;
+new_char(8);
+lefthand;
+ add_noteheads(g3);
+end_of_char;
+new_char(8);
+lefthand;
+ add_noteheads(f3);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(e3);
+ beam(13,2,1,g3,14,3,1,e3,15,3,1,f3,16,3,1,g3,17,3,1,f3,18,2,1,e3);
+righthand;
+ add_noteheads(a5);
+ add_flat(a5);
+ beam(13,1,1,b5,18,2,1,a5);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(e4);
+ add_dot(e4);
+righthand;
+ add_noteheads(g4);
+end_of_char;
+new_char(8);
+righthand;
+ add_noteheads(b5);
+end_of_char;
+new_char(8);
+righthand;
+ add_noteheads(a5);
+end_of_char;
+new_char(8);
+righthand;
+ add_noteheads(g4);
+end_of_char;
+new_char(8);
+righthand;
+ add_noteheads(a5);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(d4);
+ beam(19,1,1,e4,24,2,1,d4);
+righthand;
+ add_noteheads(b5);
+ beam(19,2,1,g4,20,3,1,b5,21,3,1,a5,22,3,1,g4,23,3,1,a5,24,2,1,b5);
+end_of_char;
+new_char(-least_spaced);
+lefthand;
+ barline_(10);
+righthand;
+ barline_(10);
+end_of_char;
+end_of_block;
+new_char(16);
+lefthand;
+ add_noteheads(c4);
+righthand;
+ add_noteheads(e4);
+end_of_char;
+new_char(8);
+lefthand;
+ add_noteheads(e4);
+righthand;
+ add_noteheads(g4);
+end_of_char;
+new_char(8);
+lefthand;
+ add_noteheads(d4);
+righthand;
+ add_noteheads(f4);
+end_of_char;
+new_char(8);
+lefthand;
+ add_noteheads(c4);
+righthand;
+ add_noteheads(e4);
+end_of_char;
+new_char(8);
+lefthand;
+ add_noteheads(d4);
+righthand;
+ add_noteheads(f4);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(e4);
+ beam(26,2,1,c4,27,3,1,e4,28,3,1,d4,29,3,1,c4,30,3,1,d4,31,2,1,e4);
+righthand;
+ add_noteheads(g4);
+ beam(26,2,1,e4,27,3,1,g4,28,3,1,f4,29,3,1,e4,30,3,1,f4,31,2,1,g4);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(a4);
+righthand;
+ add_noteheads(c4);
+end_of_char;
+new_char(8);
+lefthand;
+ add_noteheads(c4);
+righthand;
+ add_noteheads(e4);
+end_of_char;
+new_char(8);
+lefthand;
+ add_noteheads(b4);
+righthand;
+ add_noteheads(d4);
+end_of_char;
+new_char(8);
+lefthand;
+ add_noteheads(a4);
+righthand;
+ add_noteheads(c4);
+end_of_char;
+new_char(8);
+lefthand;
+ add_noteheads(b4);
+righthand;
+ add_noteheads(d4);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(c4);
+ beam(32,2,1,a4,33,3,1,c4,34,3,1,b4,35,3,1,a4,36,3,1,b4,37,2,1,c4);
+righthand;
+ add_noteheads(e4);
+ beam(32,2,1,c4,33,3,1,e4,34,3,1,d4,35,3,1,c4,36,3,1,d4,37,2,1,e4);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(f3);
+righthand;
+ add_noteheads(a4);
+end_of_char;
+new_char(8);
+lefthand;
+ add_noteheads(a4);
+righthand;
+ add_noteheads(c4);
+end_of_char;
+new_char(8);
+lefthand;
+ add_noteheads(b4);
+righthand;
+ add_noteheads(d4);
+end_of_char;
+new_char(8);
+lefthand;
+ add_noteheads(c4);
+righthand;
+ add_noteheads(e4);
+end_of_char;
+new_char(8);
+lefthand;
+ add_noteheads(b4);
+righthand;
+ add_noteheads(d4);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(a4);
+ beam(38,2,1,f3,39,3,1,a4,40,3,1,b4,41,3,1,c4,42,3,1,b4,43,2,1,a4);
+righthand;
+ add_noteheads(c4);
+ beam(38,2,1,a4,39,3,1,c4,40,3,1,d4,41,3,1,e4,42,3,1,d4,43,2,1,c4);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(d4);
+righthand;
+ add_noteheads(f4);
+end_of_char;
+new_char(8);
+lefthand;
+ add_noteheads(f3);
+righthand;
+ add_noteheads(a4);
+ add_flat(a4);
+end_of_char;
+new_char(8);
+lefthand;
+ add_noteheads(e3);
+righthand;
+ add_noteheads(g3);
+end_of_char;
+new_char(8);
+lefthand;
+ add_noteheads(d3);
+righthand;
+ add_noteheads(f3);
+end_of_char;
+new_char(8);
+lefthand;
+ add_noteheads(e3);
+righthand;
+ add_noteheads(g3);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(f3);
+ beam(44,2,1,d4,45,3,1,f3,46,3,1,e3,47,3,1,d3,48,3,1,e3,49,2,1,f3);
+righthand;
+ add_noteheads(a4);
+ beam(44,2,1,f4,45,3,1,a4,46,3,1,g3,47,3,1,f3,48,3,1,g3,49,2,1,a4);
+end_of_char;
+new_char(-least_spaced);
+lefthand;
+ barline_(10);
+righthand;
+ barline_(10);
+end_of_char;
+end_of_block;
+new_char(16);
+lefthand;
+ add_noteheads(e3);
+righthand;
+ add_noteheads(g4);
+end_of_char;
+new_char(8);
+lefthand;
+ add_noteheads(g3);
+righthand;
+ add_noteheads(b5);
+end_of_char;
+new_char(8);
+lefthand;
+ add_noteheads(a4);
+righthand;
+ add_noteheads(c5);
+end_of_char;
+new_char(8);
+lefthand;
+ add_noteheads(b4);
+righthand;
+ add_noteheads(d5);
+end_of_char;
+new_char(8);
+lefthand;
+ add_noteheads(a4);
+righthand;
+ add_noteheads(c5);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(g3);
+ beam(51,2,1,e3,52,3,1,g3,53,3,1,a4,54,3,1,b4,55,3,1,a4,56,2,1,g3);
+righthand;
+ add_noteheads(b5);
+ beam(51,2,1,g4,52,3,1,b5,53,3,1,c5,54,3,1,d5,55,3,1,c5,56,2,1,b5);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(c4);
+righthand;
+ add_noteheads(e5);
+end_of_char;
+new_char(8);
+lefthand;
+ add_noteheads(e3);
+righthand;
+ add_noteheads(g4);
+end_of_char;
+new_char(8);
+lefthand;
+ add_noteheads(d3);
+righthand;
+ add_noteheads(f4);
+end_of_char;
+new_char(8);
+lefthand;
+ add_noteheads(c4);
+righthand;
+ add_noteheads(e4);
+end_of_char;
+new_char(8);
+lefthand;
+ add_noteheads(d3);
+righthand;
+ add_noteheads(f4);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(e3);
+ beam(57,2,1,c4,58,3,1,e3,59,3,1,d3,60,3,1,c4,61,3,1,d3,62,2,1,e3);
+righthand;
+ add_noteheads(g4);
+ beam(57,2,1,e5,58,3,1,g4,59,3,1,f4,60,3,1,e4,61,3,1,f4,62,2,1,g4);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(d3);
+righthand;
+ add_noteheads(f4);
+end_of_char;
+new_char(8);
+lefthand;
+ add_noteheads(f3);
+righthand;
+ add_noteheads(a5);
+end_of_char;
+new_char(8);
+lefthand;
+ add_noteheads(g3);
+righthand;
+ add_noteheads(b5);
+end_of_char;
+new_char(8);
+lefthand;
+ add_noteheads(a4);
+righthand;
+ add_noteheads(c5);
+end_of_char;
+new_char(8);
+lefthand;
+ add_noteheads(g3);
+righthand;
+ add_noteheads(b5);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(f3);
+ beam(63,2,1,d3,64,3,1,f3,65,3,1,g3,66,3,1,a4,67,3,1,g3,68,2,1,f3);
+righthand;
+ add_noteheads(a5);
+ beam(63,2,1,f4,64,3,1,a5,65,3,1,b5,66,3,1,c5,67,3,1,b5,68,2,1,a5);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(b4);
+righthand;
+ add_noteheads(d5);
+end_of_char;
+new_char(8);
+lefthand;
+ add_noteheads(d3);
+righthand;
+ add_noteheads(f4);
+end_of_char;
+new_char(8);
+lefthand;
+ add_noteheads(c3);
+righthand;
+ add_noteheads(e4);
+end_of_char;
+new_char(8);
+lefthand;
+ add_noteheads(b3);
+righthand;
+ add_noteheads(d4);
+end_of_char;
+new_char(8);
+lefthand;
+ add_noteheads(c3);
+righthand;
+ add_noteheads(e4);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(d3);
+ beam(69,2,1,b4,70,3,1,d3,71,3,1,c3,72,3,1,b3,73,3,1,c3,74,2,1,d3);
+righthand;
+ add_noteheads(f4);
+ beam(69,2,1,d5,70,3,1,f4,71,3,1,e4,72,3,1,d4,73,3,1,e4,74,2,1,f4);
+end_of_char;
+new_char(-least_spaced);
+lefthand;
+ barline_(10);
+righthand;
+ barline_(10);
+end_of_char;
+end_of_block;
+new_char(16);
+lefthand;
+ add_noteheads(c3);
+righthand;
+ add_noteheads(e4);
+end_of_char;
+new_char(8);
+lefthand;
+ add_noteheads(e3);
+righthand;
+ add_noteheads(g4);
+end_of_char;
+new_char(8);
+lefthand;
+ add_noteheads(f3);
+righthand;
+ add_noteheads(a5);
+end_of_char;
+new_char(8);
+lefthand;
+ add_noteheads(g3);
+righthand;
+ add_noteheads(b5);
+end_of_char;
+new_char(8);
+lefthand;
+ add_noteheads(f3);
+righthand;
+ add_noteheads(a5);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(e3);
+ beam(76,2,1,c3,77,3,1,e3,78,3,1,f3,79,3,1,g3,80,3,1,f3,81,2,1,e3);
+righthand;
+ add_noteheads(g4);
+ beam(76,2,1,e4,77,3,1,g4,78,3,1,a5,79,3,1,b5,80,3,1,a5,81,2,1,g4);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(a4);
+righthand;
+ add_noteheads(c5);
+end_of_char;
+new_char(8);
+lefthand;
+ add_noteheads(c3);
+righthand;
+ add_noteheads(e4);
+end_of_char;
+new_char(8);
+lefthand;
+ add_noteheads(b3);
+righthand;
+ add_noteheads(d4);
+end_of_char;
+new_char(8);
+lefthand;
+ add_noteheads(a3);
+righthand;
+ add_noteheads(c4);
+end_of_char;
+new_char(8);
+lefthand;
+ add_noteheads(b3);
+righthand;
+ add_noteheads(d4);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(c3);
+ beam(82,2,1,a4,83,3,1,c3,84,3,1,b3,85,3,1,a3,86,3,1,b3,87,2,1,c3);
+righthand;
+ add_noteheads(e4);
+ beam(82,2,1,c5,83,3,1,e4,84,3,1,d4,85,3,1,c4,86,3,1,d4,87,2,1,e4);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(b3);
+righthand;
+ add_noteheads(d4);
+ regular_stem;
+end_of_char;
+new_char(8);
+lefthand;
+ add_noteheads(b4);
+end_of_char;
+new_char(8);
+lefthand;
+ add_noteheads(c4);
+end_of_char;
+new_char(8);
+lefthand;
+ add_noteheads(d4);
+end_of_char;
+new_char(8);
+lefthand;
+ add_noteheads(c4);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(d4);
+ beam(88,2,1,b3,89,3,1,b4,90,3,1,c4,91,3,1,d4,92,3,1,c4,93,2,1,d4);
+end_of_char;
+new_char(16);
+lefthand;
+ clef_(0);
+ add_noteheads(f4);
+righthand;
+ add_rest(2,0);
+end_of_char;
+new_char(8);
+lefthand;
+ add_noteheads(d4);
+righthand;
+ add_noteheads(b5);
+end_of_char;
+new_char(8);
+righthand;
+ add_noteheads(c5);
+end_of_char;
+new_char(8);
+lefthand;
+ add_noteheads(b5);
+righthand;
+ add_noteheads(d5);
+end_of_char;
+new_char(8);
+righthand;
+ add_noteheads(c5);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(f4);
+ beam(94,2,1,f4,95,2,1,d4,97,2,1,b5,99,2,1,f4);
+righthand;
+ add_noteheads(b5);
+ beam(95,3,1,b5,96,3,1,c5,97,3,1,d5,98,3,1,c5,99,2,1,b5);
+end_of_char;
+new_char(-least_spaced);
+lefthand;
+ barline_(10);
+righthand;
+ barline_(10);
+end_of_char;
+end_of_block;
+new_char(16);
+lefthand;
+ add_noteheads(d4);
+righthand;
+ add_noteheads(f4);
+end_of_char;
+new_char(8);
+lefthand;
+ add_noteheads(f4);
+righthand;
+ add_noteheads(d4);
+end_of_char;
+new_char(8);
+lefthand;
+ add_noteheads(e4);
+end_of_char;
+new_char(8);
+lefthand;
+ add_noteheads(d4);
+righthand;
+ add_noteheads(b5);
+end_of_char;
+new_char(8);
+lefthand;
+ add_noteheads(e4);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(f4);
+ beam(101,2,1,d4,102,3,1,f4,103,3,1,e4,104,3,1,d4,105,3,1,e4,106,2,1,f4);
+righthand;
+ add_noteheads(f4);
+ beam(101,2,1,f4,102,2,1,d4,104,2,1,b5,106,2,1,f4);
+end_of_char;
+new_char(16);
+lefthand;
+ clef_(6);
+ add_noteheads(b4);
+righthand;
+ add_noteheads(d4);
+end_of_char;
+new_char(8);
+lefthand;
+ add_noteheads(d4);
+righthand;
+ add_noteheads(f4);
+end_of_char;
+new_char(8);
+righthand;
+ add_noteheads(e4);
+end_of_char;
+new_char(8);
+lefthand;
+ add_noteheads(f3);
+righthand;
+ add_noteheads(d4);
+end_of_char;
+new_char(8);
+righthand;
+ add_noteheads(e4);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(a4);
+ add_flat(a4);
+ beam(107,2,1,b4,108,2,1,d4,110,2,1,f3,112,2,1,a4);
+righthand;
+ add_noteheads(f4);
+ beam(107,2,1,d4,108,3,1,f4,109,3,1,e4,110,3,1,d4,111,3,1,e4,112,2,1,f4);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(g3);
+righthand;
+ add_noteheads(b4);
+end_of_char;
+new_char(8);
+lefthand;
+ add_noteheads(e3);
+righthand;
+ add_noteheads(e4);
+end_of_char;
+new_char(8);
+lefthand;
+ add_noteheads(f3);
+end_of_char;
+new_char(8);
+lefthand;
+ add_noteheads(g3);
+righthand;
+ add_noteheads(b4);
+end_of_char;
+new_char(8);
+lefthand;
+ add_noteheads(f3);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(e3);
+ beam(113,2,1,g3,114,3,1,e3,115,3,1,f3,116,3,1,g3,117,3,1,f3,118,2,1,e3);
+righthand;
+ add_noteheads(e4);
+ beam(113,2,1,b4,114,2,1,e4,116,2,1,b4,118,2,1,e4);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(b4);
+righthand;
+ add_noteheads(g4);
+end_of_char;
+new_char(8);
+lefthand;
+ add_noteheads(g3);
+righthand;
+ add_noteheads(e4);
+end_of_char;
+new_char(8);
+righthand;
+ add_noteheads(f4);
+end_of_char;
+new_char(8);
+lefthand;
+ add_noteheads(e4);
+righthand;
+ add_noteheads(g4);
+end_of_char;
+new_char(8);
+righthand;
+ add_noteheads(f4);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(b4);
+ beam(119,2,1,b4,120,2,1,g3,122,2,1,e4,124,2,1,b4);
+righthand;
+ add_noteheads(e4);
+ beam(119,2,1,g4,120,3,1,e4,121,3,1,f4,122,3,1,g4,123,3,1,f4,124,2,1,e4);
+end_of_char;
+new_char(-least_spaced);
+lefthand;
+ barline_(10);
+righthand;
+ barline_(10);
+end_of_char;
+end_of_block;
+make_line(next_char); showstats; end.