summaryrefslogtreecommitdiff
path: root/obsolete/macros/texmuse/Samples/tex/aminor3.mf
diff options
context:
space:
mode:
Diffstat (limited to 'obsolete/macros/texmuse/Samples/tex/aminor3.mf')
-rw-r--r--obsolete/macros/texmuse/Samples/tex/aminor3.mf496
1 files changed, 496 insertions, 0 deletions
diff --git a/obsolete/macros/texmuse/Samples/tex/aminor3.mf b/obsolete/macros/texmuse/Samples/tex/aminor3.mf
new file mode 100644
index 0000000000..5ccf6c6eff
--- /dev/null
+++ b/obsolete/macros/texmuse/Samples/tex/aminor3.mf
@@ -0,0 +1,496 @@
+mode_setup;
+input txmfont;
+input texmuse;
+instr_no(2);
+key_ := 0;
+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(a3);
+righthand;
+ add_noteheads(c4);
+end_of_char;
+new_char(16);
+righthand;
+ add_noteheads(e4);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(c3);
+righthand;
+ add_noteheads(a5);
+end_of_char;
+new_char(16);
+righthand;
+ add_noteheads(e4);
+ beam(1,2,1,c4,2,2,1,e4,3,2,1,a5,4,2,1,e4);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(e3);
+righthand;
+ add_noteheads(c4);
+end_of_char;
+new_char(16);
+righthand;
+ add_noteheads(e4);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(c3);
+ beam(1,1,1,a3,3,1,1,c3,5,1,1,e3,7,1,1,c3);
+righthand;
+ add_noteheads(a4);
+end_of_char;
+new_char(16);
+righthand;
+ add_noteheads(c4);
+ beam(5,2,1,c4,6,2,1,e4,7,2,1,a4,8,2,1,c4);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(a3);
+righthand;
+ add_noteheads(d4);
+ add_sharp(d4);
+end_of_char;
+new_char(16);
+righthand;
+ add_noteheads(c4);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(c3);
+ beam(9,1,1,a3,11,1,1,c3);
+righthand;
+ add_noteheads(a4);
+end_of_char;
+new_char(16);
+righthand;
+ add_noteheads(c4);
+ beam(9,2,1,d4,10,2,1,c4,11,2,1,a4,12,2,1,c4);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(d2);
+ add_sharp(d2);
+ regular_stem;
+ add_flag(1);
+righthand;
+ add_noteheads(f3);
+ add_sharp(f3);
+end_of_char;
+new_char(16);
+righthand;
+ add_noteheads(c4);
+end_of_char;
+new_char(16);
+lefthand;
+ add_rest(1,0);
+righthand;
+ add_noteheads(b4);
+end_of_char;
+new_char(16);
+righthand;
+ add_noteheads(a4);
+ beam(13,2,1,f3,14,2,1,c4,15,2,1,b4,16,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_rest(2,0);
+righthand;
+ add_noteheads(g3);
+ add_sharp(g3);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(b4);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(g3);
+ add_sharp(g3);
+righthand;
+ add_noteheads(b5);
+ beam(18,1,1,g3,20,1,1,b5);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(e3);
+ beam(19,2,1,b4,20,2,1,g3,21,2,1,e3);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(d3);
+righthand;
+ add_noteheads(g4);
+ add_sharp(g4);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(b4);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(g3);
+righthand;
+ add_noteheads(e4);
+ beam(22,1,1,g4,24,1,1,e4);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(d3);
+ beam(22,2,1,d3,23,2,1,b4,24,2,1,g3,25,2,1,d3);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(c3);
+righthand;
+ add_rest(2,0);
+end_of_char;
+new_char(16);
+righthand;
+ add_noteheads(e4);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(e3);
+ beam(26,1,1,c3,28,1,1,e3);
+righthand;
+ add_noteheads(a5);
+end_of_char;
+new_char(16);
+righthand;
+ add_noteheads(c5);
+ beam(27,2,1,e4,28,2,1,a5,29,2,1,c5);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(g2);
+ add_sharp(g2);
+righthand;
+ add_noteheads(b5);
+end_of_char;
+new_char(16);
+righthand;
+ add_noteheads(e4);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(e3);
+ beam(30,1,1,g2,32,1,1,e3);
+righthand;
+ add_noteheads(b5);
+end_of_char;
+new_char(16);
+righthand;
+ add_noteheads(d5);
+ beam(30,2,1,b5,31,2,1,e4,32,2,1,b5,33,2,1,d5);
+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(a3);
+righthand;
+ add_noteheads(c5);
+end_of_char;
+new_char(16);
+righthand;
+ add_noteheads(a5);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(f3);
+ add_sharp(f3);
+ beam(35,1,1,a3,37,1,1,f3);
+righthand;
+ add_noteheads(c5);
+end_of_char;
+new_char(16);
+righthand;
+ add_noteheads(e5);
+ beam(35,2,1,c5,36,2,1,a5,37,2,1,c5,38,2,1,e5);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(b3);
+righthand;
+ add_noteheads(d5);
+end_of_char;
+new_char(16);
+righthand;
+ add_noteheads(b5);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(g3);
+ add_sharp(g3);
+ beam(39,1,1,b3,41,1,1,g3);
+righthand;
+ add_noteheads(d5);
+end_of_char;
+new_char(16);
+righthand;
+ add_noteheads(f5);
+ beam(39,2,1,d5,40,2,1,b5,41,2,1,d5,42,2,1,f5);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(c3);
+righthand;
+ add_noteheads(e5);
+end_of_char;
+new_char(16);
+righthand;
+ add_noteheads(c5);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(a4);
+ beam(43,1,1,c3,45,1,1,a4);
+righthand;
+ add_noteheads(e5);
+end_of_char;
+new_char(16);
+righthand;
+ add_noteheads(g5);
+ beam(43,2,1,e5,44,2,1,c5,45,2,1,e5,46,2,1,g5);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(d3);
+righthand;
+ add_noteheads(f5);
+end_of_char;
+new_char(16);
+righthand;
+ add_noteheads(e5);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(b4);
+ add_flat(b4);
+ beam(47,1,1,d3,49,1,1,b4);
+righthand;
+ add_noteheads(d5);
+end_of_char;
+new_char(16);
+righthand;
+ add_noteheads(c5);
+ beam(47,2,1,f5,48,2,1,e5,49,2,1,d5,50,2,1,c5);
+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);
+ add_sharp(g3);
+righthand;
+ add_noteheads(b5);
+end_of_char;
+new_char(16);
+righthand;
+ add_noteheads(c5);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(f3);
+ beam(52,1,1,g3,54,1,1,f3);
+righthand;
+ add_noteheads(d5);
+end_of_char;
+new_char(16);
+righthand;
+ add_noteheads(e5);
+ beam(52,2,1,b5,53,2,1,c5,54,2,1,d5,55,2,1,e5);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(d3);
+righthand;
+ add_noteheads(f5);
+end_of_char;
+new_char(16);
+righthand;
+ add_noteheads(d5);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(b3);
+ beam(56,1,1,d3,58,1,1,b3);
+righthand;
+ add_noteheads(g5);
+ add_sharp(g5);
+end_of_char;
+new_char(16);
+righthand;
+ add_noteheads(d5);
+ beam(56,2,1,f5,57,2,1,d5,58,2,1,g5,59,2,1,d5);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(g2);
+ add_sharp(g2);
+righthand;
+ add_noteheads(b6);
+end_of_char;
+new_char(16);
+righthand;
+ add_noteheads(d5);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(a3);
+ beam(60,1,1,g2,62,1,1,a3);
+righthand;
+ add_noteheads(c5);
+end_of_char;
+new_char(16);
+righthand;
+ add_noteheads(a6);
+ beam(60,2,1,b6,61,2,1,d5,62,2,1,c5,63,2,1,a6);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(d2);
+righthand;
+ add_noteheads(f5);
+end_of_char;
+new_char(16);
+righthand;
+ add_noteheads(d5);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(e2);
+ beam(64,1,1,d2,66,1,1,e2);
+righthand;
+ add_noteheads(b5);
+end_of_char;
+new_char(16);
+righthand;
+ add_noteheads(d5);
+ beam(64,2,1,f5,65,2,1,d5,66,2,1,b5,67,2,1,d5);
+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(f2);
+righthand;
+ add_noteheads(g4);
+ add_sharp(g4);
+end_of_char;
+new_char(16);
+righthand;
+ add_noteheads(b5);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(d2);
+ add_sharp(d2);
+ beam(69,1,1,f2,71,1,1,d2);
+righthand;
+ add_noteheads(c5);
+end_of_char;
+new_char(16);
+righthand;
+ add_noteheads(a5);
+ beam(69,2,1,g4,70,2,1,b5,71,2,1,c5,72,2,1,a5);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(e2);
+righthand;
+ add_noteheads(e4);
+end_of_char;
+new_char(16);
+righthand;
+ add_noteheads(a5);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(e3);
+ beam(73,1,1,e2,75,1,1,e3);
+righthand;
+ add_noteheads(b5);
+end_of_char;
+new_char(16);
+righthand;
+ add_noteheads(g4);
+ beam(73,2,1,e4,74,2,1,a5,75,2,1,b5,76,2,1,g4);
+end_of_char;
+new_char(16);
+lefthand;
+ add_halfheads(a3);
+ regular_stem;
+righthand;
+ add_noteheads(a5);
+end_of_char;
+new_char(16);
+righthand;
+ add_noteheads(e4);
+end_of_char;
+new_char(16);
+righthand;
+ add_noteheads(c4);
+end_of_char;
+new_char(16);
+righthand;
+ add_noteheads(e4);
+ beam(77,2,1,a5,78,2,1,e4,79,2,1,c4,80,2,1,e4);
+end_of_char;
+new_char(64);
+righthand;
+ add_noteheads(a5);
+ regular_stem;
+end_of_char;
+new_char(-least_spaced);
+lefthand;
+ barline_(20);
+righthand;
+ barline_(20);
+end_of_char;
+numeric desired_width; end_of_block; make_line(next_char);
+showstats; end.