summaryrefslogtreecommitdiff
path: root/obsolete/macros/texmuse/Samples/tex/bbmajor2.mf
diff options
context:
space:
mode:
Diffstat (limited to 'obsolete/macros/texmuse/Samples/tex/bbmajor2.mf')
-rw-r--r--obsolete/macros/texmuse/Samples/tex/bbmajor2.mf703
1 files changed, 703 insertions, 0 deletions
diff --git a/obsolete/macros/texmuse/Samples/tex/bbmajor2.mf b/obsolete/macros/texmuse/Samples/tex/bbmajor2.mf
new file mode 100644
index 0000000000..1e0b15ce5f
--- /dev/null
+++ b/obsolete/macros/texmuse/Samples/tex/bbmajor2.mf
@@ -0,0 +1,703 @@
+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_rest(1,0);
+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);
+righthand;
+ add_noteheads(f4);
+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);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(f3);
+righthand;
+ add_noteheads(b5);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(d3);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(b4);
+righthand;
+ add_noteheads(d5);
+ beam(4,1,1,f4,7,1,1,b5,9,1,1,d5);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(f3);
+ beam(7,2,1,f3,8,2,1,d3,9,2,1,b4,10,2,1,f3);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(d3);
+righthand;
+ add_noteheads(f5);
+ regular_stem;
+end_of_char;
+new_char(8);
+lefthand;
+ add_noteheads(f3);
+end_of_char;
+new_char(8);
+lefthand;
+ add_noteheads(e3);
+end_of_char;
+new_char(8);
+lefthand;
+ add_noteheads(d3);
+end_of_char;
+new_char(8);
+lefthand;
+ add_noteheads(e3);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(f3);
+ beam(11,2,1,d3,12,3,1,f3,13,3,1,e3,14,3,1,d3,15,3,1,e3,16,2,1,f3);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(b3);
+righthand;
+ add_rest(0,0);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(d3);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(g2);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(b3);
+ beam(17,2,1,b3,18,2,1,d3,19,2,1,g2,20,2,1,b3);
+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(e2);
+ add_natural(e2);
+righthand;
+ add_rest(1,0);
+end_of_char;
+new_char(8);
+lefthand;
+ add_noteheads(g2);
+end_of_char;
+new_char(8);
+lefthand;
+ add_noteheads(a3);
+end_of_char;
+new_char(8);
+lefthand;
+ add_noteheads(b3);
+righthand;
+ add_noteheads(g4);
+end_of_char;
+new_char(8);
+lefthand;
+ add_noteheads(a3);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(g2);
+ beam(22,2,1,e2,23,3,1,g2,24,3,1,a3,25,3,1,b3,26,3,1,a3,27,2,1,g2);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(e3);
+ add_natural(e3);
+righthand;
+ add_noteheads(b5);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(c3);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(g3);
+righthand;
+ add_noteheads(c5);
+ beam(25,1,1,g4,28,1,1,b5,30,1,1,c5);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(e3);
+ beam(28,2,1,e3,29,2,1,c3,30,2,1,g3,31,2,1,e3);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(b4);
+righthand;
+ add_noteheads(e5);
+ add_natural(e5);
+ regular_stem;
+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(e3);
+end_of_char;
+new_char(8);
+lefthand;
+ add_noteheads(d3);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(c3);
+ beam(32,2,1,b4,33,3,1,c3,34,3,1,d3,35,3,1,e3,36,3,1,d3,37,2,1,c3);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(g3);
+righthand;
+ add_rest(0,0);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(e3);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(c4);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(g3);
+ beam(38,2,1,g3,39,2,1,e3,40,2,1,c4,41,2,1,g3);
+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(a4);
+righthand;
+ add_rest(2,0);
+end_of_char;
+new_char(8);
+righthand;
+ add_noteheads(f4);
+end_of_char;
+new_char(8);
+righthand;
+ add_noteheads(g4);
+end_of_char;
+new_char(8);
+lefthand;
+ add_noteheads(c4);
+righthand;
+ add_noteheads(a5);
+end_of_char;
+new_char(8);
+righthand;
+ add_noteheads(g4);
+end_of_char;
+new_char(16);
+righthand;
+ add_noteheads(f4);
+ beam(44,3,1,f4,45,3,1,g4,46,3,1,a5,47,3,1,g4,48,2,1,f4);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(a4);
+righthand;
+ add_noteheads(c5);
+end_of_char;
+new_char(16);
+righthand;
+ add_noteheads(a5);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(f3);
+ beam(43,1,1,a4,46,1,1,c4,49,1,1,a4,51,1,1,f3);
+righthand;
+ add_noteheads(f5);
+end_of_char;
+new_char(16);
+righthand;
+ add_noteheads(c5);
+ beam(49,2,1,c5,50,2,1,a5,51,2,1,f5,52,2,1,c5);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(f3);
+ add_sharp(f3);
+righthand;
+ add_noteheads(a6);
+end_of_char;
+new_char(8);
+righthand;
+ add_noteheads(e5);
+end_of_char;
+new_char(8);
+righthand;
+ add_noteheads(d5);
+end_of_char;
+new_char(8);
+lefthand;
+ add_noteheads(a4);
+righthand;
+ add_noteheads(c5);
+end_of_char;
+new_char(8);
+righthand;
+ add_noteheads(d5);
+end_of_char;
+new_char(16);
+righthand;
+ add_noteheads(e5);
+ beam(53,2,1,a6,54,3,1,e5,55,3,1,d5,56,3,1,c5,57,3,1,d5,58,2,1,e5);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(f3);
+righthand;
+ add_noteheads(a5);
+end_of_char;
+new_char(16);
+righthand;
+ add_noteheads(c5);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(d3);
+ beam(53,1,1,f3,56,1,1,a4,59,1,1,f3,61,1,1,d3);
+righthand;
+ add_noteheads(f4);
+ add_sharp(f4);
+end_of_char;
+new_char(16);
+righthand;
+ add_noteheads(a5);
+ beam(59,2,1,a5,60,2,1,c5,61,2,1,f4,62,2,1,a5);
+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(g3);
+righthand;
+ add_noteheads(b5);
+end_of_char;
+new_char(8);
+lefthand;
+ add_noteheads(g2);
+end_of_char;
+new_char(8);
+lefthand;
+ add_noteheads(a3);
+end_of_char;
+new_char(8);
+lefthand;
+ add_noteheads(b4);
+righthand;
+ add_noteheads(d5);
+end_of_char;
+new_char(8);
+lefthand;
+ add_noteheads(a3);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(g2);
+ beam(64,2,1,g3,65,3,1,g2,66,3,1,a3,67,3,1,b4,68,3,1,a3,69,2,1,g2);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(d3);
+righthand;
+ add_noteheads(b5);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(b4);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(g3);
+righthand;
+ add_noteheads(g4);
+ beam(64,1,1,b5,67,1,1,d5,70,1,1,b5,72,1,1,g4);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(d3);
+ beam(70,2,1,d3,71,2,1,b4,72,2,1,g3,73,2,1,d3);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(b5);
+righthand;
+ add_noteheads(a5);
+ add_flat(a5);
+end_of_char;
+new_char(8);
+lefthand;
+ add_noteheads(a4);
+ add_flat(a4);
+end_of_char;
+new_char(8);
+lefthand;
+ add_noteheads(g3);
+end_of_char;
+new_char(8);
+lefthand;
+ add_noteheads(f3);
+righthand;
+ add_noteheads(f5);
+end_of_char;
+new_char(8);
+lefthand;
+ add_noteheads(g3);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(a4);
+ beam(74,2,1,b5,75,3,1,a4,76,3,1,g3,77,3,1,f3,78,3,1,g3,79,2,1,a4);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(d3);
+righthand;
+ add_noteheads(a5);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(f3);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(b4);
+righthand;
+ add_noteheads(f4);
+ beam(74,1,1,a5,77,1,1,f5,80,1,1,a5,82,1,1,f4);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(d3);
+ beam(80,2,1,d3,81,2,1,f3,82,2,1,b4,83,2,1,d3);
+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);
+righthand;
+ add_noteheads(c4);
+end_of_char;
+new_char(8);
+righthand;
+ add_noteheads(d4);
+end_of_char;
+new_char(8);
+lefthand;
+ add_noteheads(g3);
+righthand;
+ add_noteheads(e4);
+end_of_char;
+new_char(8);
+righthand;
+ add_noteheads(d4);
+end_of_char;
+new_char(16);
+righthand;
+ add_noteheads(c4);
+ beam(85,2,1,g4,86,3,1,c4,87,3,1,d4,88,3,1,e4,89,3,1,d4,90,2,1,c4);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(e3);
+righthand;
+ add_noteheads(g4);
+end_of_char;
+new_char(16);
+righthand;
+ add_noteheads(e4);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(c3);
+ beam(85,1,1,e3,88,1,1,g3,91,1,1,e3,93,1,1,c3);
+righthand;
+ add_noteheads(c5);
+end_of_char;
+new_char(16);
+righthand;
+ add_noteheads(g4);
+ beam(91,2,1,g4,92,2,1,e4,93,2,1,c5,94,2,1,g4);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(b4);
+ add_natural(b4);
+righthand;
+ add_noteheads(d5);
+end_of_char;
+new_char(8);
+righthand;
+ add_noteheads(a5);
+ add_flat(a5);
+end_of_char;
+new_char(8);
+righthand;
+ add_noteheads(g4);
+end_of_char;
+new_char(8);
+lefthand;
+ add_noteheads(d3);
+righthand;
+ add_noteheads(f4);
+end_of_char;
+new_char(8);
+righthand;
+ add_noteheads(g4);
+end_of_char;
+new_char(16);
+righthand;
+ add_noteheads(a5);
+ beam(95,2,1,d5,96,3,1,a5,97,3,1,g4,98,3,1,f4,99,3,1,g4,100,2,1,a5);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(b4);
+righthand;
+ add_noteheads(d4);
+end_of_char;
+new_char(16);
+righthand;
+ add_noteheads(f4);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(g2);
+ beam(95,1,1,b4,98,1,1,d3,101,1,1,b4,103,1,1,g2);
+righthand;
+ add_noteheads(b4);
+ add_natural(b4);
+end_of_char;
+new_char(16);
+righthand;
+ add_noteheads(g4);
+ beam(101,2,1,d4,102,2,1,f4,103,2,1,b4,104,2,1,g4);
+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);
+ regular_stem;
+ add_flag(1);
+end_of_char;
+new_char(8);
+lefthand;
+ add_noteheads(c2);
+end_of_char;
+new_char(8);
+lefthand;
+ add_noteheads(d2);
+end_of_char;
+new_char(8);
+lefthand;
+ add_noteheads(e2);
+righthand;
+ add_rest(1,0);
+end_of_char;
+new_char(8);
+lefthand;
+ add_noteheads(d2);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(c2);
+ beam(106,2,1,c3,107,3,1,c2,108,3,1,d2,109,3,1,e2,110,3,1,d2,111,2,1,c2);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(c3);
+ add_dot(c3);
+righthand;
+ add_rest(2,0);
+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(e4);
+end_of_char;
+new_char(8);
+righthand;
+ add_noteheads(d4);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(b3);
+ beam(112,1,1,c3,117,2,1,b3);
+righthand;
+ add_noteheads(c4);
+ beam(113,3,1,c4,114,3,1,d4,115,3,1,e4,116,3,1,d4,117,2,1,c4);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(a3);
+righthand;
+ add_noteheads(c5);
+ add_dot(c5);
+end_of_char;
+new_char(8);
+lefthand;
+ add_noteheads(f2);
+end_of_char;
+new_char(8);
+lefthand;
+ add_noteheads(g2);
+end_of_char;
+new_char(8);
+lefthand;
+ add_noteheads(a3);
+end_of_char;
+new_char(8);
+lefthand;
+ add_noteheads(g2);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(f2);
+ beam(118,2,1,a3,119,3,1,f2,120,3,1,g2,121,3,1,a3,122,3,1,g2,123,2,1,f2);
+righthand;
+ add_noteheads(b5);
+ beam(118,1,1,c5,123,2,1,b5);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(f3);
+ add_dot(f3);
+righthand;
+ add_noteheads(a5);
+end_of_char;
+new_char(8);
+righthand;
+ add_noteheads(f4);
+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(8);
+righthand;
+ add_noteheads(g4);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(e3);
+ beam(124,1,1,f3,129,2,1,e3);
+righthand;
+ add_noteheads(f4);
+ beam(124,2,1,a5,125,3,1,f4,126,3,1,g4,127,3,1,a5,128,3,1,g4,129,2,1,f4);
+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.