diff options
author | Norbert Preining <norbert@preining.info> | 2019-09-02 13:46:59 +0900 |
---|---|---|
committer | Norbert Preining <norbert@preining.info> | 2019-09-02 13:46:59 +0900 |
commit | e0c6872cf40896c7be36b11dcc744620f10adf1d (patch) | |
tree | 60335e10d2f4354b0674ec22d7b53f0f8abee672 /macros/texmuse/Samples/tex/ebmajor2.mf |
Initial commit
Diffstat (limited to 'macros/texmuse/Samples/tex/ebmajor2.mf')
-rw-r--r-- | macros/texmuse/Samples/tex/ebmajor2.mf | 796 |
1 files changed, 796 insertions, 0 deletions
diff --git a/macros/texmuse/Samples/tex/ebmajor2.mf b/macros/texmuse/Samples/tex/ebmajor2.mf new file mode 100644 index 0000000000..a93ff2f888 --- /dev/null +++ b/macros/texmuse/Samples/tex/ebmajor2.mf @@ -0,0 +1,796 @@ +mode_setup;
+input txmfont;
+input texmuse;
+instr_no(2);
+staff_1="-1,0,1,2,3"; staff_2="-1,0,1,2,3";
+bar_type1=10; bar_type2=10;
+desired_width := 469.75499pt/pt;
+key_ := -3;
+instr_clef1:= 6;
+def lefthand =
+ curr_instr:="lefthand;";
+ note_[index][instr_]:=currentpicture;
+ instr_:=1;
+ currentpicture:=note_[index][instr_];
+ enddef;
+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(g3);
+righthand;
+ add_noteheads(e5);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(a4);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(g3);
+righthand;
+ add_noteheads(b5);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(f3);
+ beam(1,2,1,g3,2,2,1,a4,3,2,1,g3,4,2,1,f3);
+righthand;
+ add_noteheads(a5);
+ beam(1,1,1,e5,3,2,1,b5,4,2,1,a5);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(f3);
+righthand;
+ add_noteheads(b5);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(a4);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(f3);
+righthand;
+ add_noteheads(c5);
+ beam(5,1,1,b5,7,1,1,c5);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(g3);
+ beam(5,2,1,f3,6,2,1,a4,7,2,1,f3,8,2,1,g3);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(e3);
+righthand;
+ add_noteheads(d5);
+ add_flat(d5);
+ regular_stem;
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(e4);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(d4);
+ add_flat(d4);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(e4);
+ beam(9,2,1,e3,10,2,1,e4,11,2,1,d4,12,2,1,e4);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(c4);
+righthand;
+ add_noteheads(e5);
+ regular_stem;
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(d4);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(b4);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(c4);
+ beam(13,2,1,c4,14,2,1,d4,15,2,1,b4,16,2,1,c4);
+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(1,0);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(b4);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(a4);
+righthand;
+ add_noteheads(c5);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(g3);
+ beam(18,2,1,a4,19,2,1,b4,20,2,1,a4,21,2,1,g3);
+righthand;
+ add_noteheads(b5);
+ beam(20,2,1,c5,21,2,1,b5);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(a4);
+righthand;
+ add_noteheads(c5);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(b4);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(g3);
+righthand;
+ add_noteheads(d5);
+ add_natural(d5);
+ beam(22,1,1,c5,24,1,1,d5);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(a4);
+ beam(22,2,1,a4,23,2,1,b4,24,2,1,g3,25,2,1,a4);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(f3);
+righthand;
+ add_noteheads(e5);
+ regular_stem;
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(f4);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(e4);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(f4);
+ beam(26,2,1,f3,27,2,1,f4,28,2,1,e4,29,2,1,f4);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(d4);
+righthand;
+ add_noteheads(f5);
+ regular_stem;
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(e4);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(c4);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(d4);
+ beam(30,2,1,d4,31,2,1,e4,32,2,1,c4,33,2,1,d4);
+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(b4);
+righthand;
+ add_rest(1,0);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(c4);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(c3);
+righthand;
+ add_noteheads(d5);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(a4);
+ add_natural(a4);
+ beam(35,2,1,b4,36,2,1,c4,37,2,1,c3,38,2,1,a4);
+righthand;
+ add_noteheads(c5);
+ beam(37,2,1,d5,38,2,1,c5);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(b4);
+righthand;
+ add_noteheads(d5);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(c4);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(a4);
+ add_natural(a4);
+righthand;
+ add_noteheads(e5);
+ beam(39,1,1,d5,41,1,1,e5);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(b4);
+ beam(39,2,1,b4,40,2,1,c4,41,2,1,a4,42,2,1,b4);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(g3);
+righthand;
+ add_noteheads(f5);
+ regular_stem;
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(a4);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(f3);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(g3);
+ beam(43,2,1,g3,44,2,1,a4,45,2,1,f3,46,2,1,g3);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(e3);
+righthand;
+ add_noteheads(g5);
+ regular_stem;
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(f3);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(e3);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(d3);
+ beam(47,2,1,e3,48,2,1,f3,49,2,1,e3,50,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(c3);
+righthand;
+ add_noteheads(e5);
+end_of_char;
+new_char(16);
+righthand;
+ add_noteheads(f5);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(c3);
+righthand;
+ add_noteheads(e5);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(b3);
+ add_natural(b3);
+ beam(52,1,1,c3,54,2,1,c3,55,2,1,b3);
+righthand;
+ add_noteheads(d5);
+ beam(52,2,1,e5,53,2,1,f5,54,2,1,e5,55,2,1,d5);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(c3);
+righthand;
+ add_noteheads(e5);
+end_of_char;
+new_char(16);
+righthand;
+ add_noteheads(f5);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(d3);
+ beam(56,1,1,c3,58,1,1,d3);
+righthand;
+ add_noteheads(d5);
+end_of_char;
+new_char(16);
+righthand;
+ add_noteheads(e5);
+ beam(56,2,1,e5,57,2,1,f5,58,2,1,d5,59,2,1,e5);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(e3);
+ regular_stem;
+righthand;
+ add_noteheads(c5);
+end_of_char;
+new_char(16);
+righthand;
+ add_noteheads(c6);
+end_of_char;
+new_char(16);
+righthand;
+ add_noteheads(b6);
+end_of_char;
+new_char(16);
+righthand;
+ add_noteheads(c6);
+ beam(60,2,1,c5,61,2,1,c6,62,2,1,b6,63,2,1,c6);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(f3);
+ regular_stem;
+righthand;
+ add_noteheads(a6);
+end_of_char;
+new_char(16);
+righthand;
+ add_noteheads(b6);
+end_of_char;
+new_char(16);
+righthand;
+ add_noteheads(g5);
+end_of_char;
+new_char(16);
+righthand;
+ add_noteheads(a6);
+ beam(64,2,1,a6,65,2,1,b6,66,2,1,g5,67,2,1,a6);
+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(1,0);
+righthand;
+ add_noteheads(f5);
+end_of_char;
+new_char(16);
+righthand;
+ add_noteheads(a6);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(d3);
+righthand;
+ add_noteheads(g5);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(c3);
+ beam(71,2,1,d3,72,2,1,c3);
+righthand;
+ add_noteheads(a6);
+ beam(69,2,1,f5,70,2,1,a6,71,2,1,g5,72,2,1,a6);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(d3);
+righthand;
+ add_noteheads(f5);
+end_of_char;
+new_char(16);
+righthand;
+ add_noteheads(g5);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(e3);
+ beam(73,1,1,d3,75,1,1,e3);
+righthand;
+ add_noteheads(e5);
+end_of_char;
+new_char(16);
+righthand;
+ add_noteheads(f5);
+ beam(73,2,1,f5,74,2,1,g5,75,2,1,e5,76,2,1,f5);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(f3);
+ regular_stem;
+righthand;
+ add_noteheads(d5);
+end_of_char;
+new_char(16);
+righthand;
+ add_noteheads(c6);
+end_of_char;
+new_char(16);
+righthand;
+ add_noteheads(b6);
+ add_natural(b6);
+end_of_char;
+new_char(16);
+righthand;
+ add_noteheads(a6);
+ add_natural(a6);
+ beam(77,2,1,d5,78,2,1,c6,79,2,1,b6,80,2,1,a6);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(g3);
+ regular_stem;
+righthand;
+ add_noteheads(b6);
+end_of_char;
+new_char(16);
+righthand;
+ add_noteheads(c6);
+end_of_char;
+new_char(16);
+righthand;
+ add_noteheads(a6);
+end_of_char;
+new_char(16);
+righthand;
+ add_noteheads(b6);
+ beam(81,2,1,b6,82,2,1,c6,83,2,1,a6,84,2,1,b6);
+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(e5);
+end_of_char;
+new_char(16);
+righthand;
+ add_noteheads(c6);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(a4);
+righthand;
+ add_noteheads(b6);
+ add_flat(b6);
+end_of_char;
+new_char(16);
+righthand;
+ add_noteheads(a6);
+ add_flat(a6);
+ beam(86,2,1,e5,87,2,1,c6,88,2,1,b6,89,2,1,a6);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(g3);
+righthand;
+ add_noteheads(b6);
+end_of_char;
+new_char(16);
+righthand;
+ add_noteheads(c6);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(f3);
+ beam(86,1,1,e3,88,1,1,a4,90,1,1,g3,92,1,1,f3);
+righthand;
+ add_noteheads(a6);
+end_of_char;
+new_char(16);
+righthand;
+ add_noteheads(b6);
+ beam(90,2,1,b6,91,2,1,c6,92,2,1,a6,93,2,1,b6);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(e3);
+ add_natural(e3);
+righthand;
+ add_noteheads(g5);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(f3);
+righthand;
+ add_noteheads(c6);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(g3);
+righthand;
+ add_noteheads(b6);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(f3);
+ beam(94,2,1,e3,95,2,1,f3,96,2,1,g3,97,2,1,f3);
+righthand;
+ add_noteheads(a6);
+ beam(94,2,1,g5,95,2,1,c6,96,2,1,b6,97,2,1,a6);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(e3);
+righthand;
+ add_noteheads(g5);
+end_of_char;
+new_char(16);
+righthand;
+ add_noteheads(a6);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(d3);
+ beam(98,1,1,e3,100,1,1,d3);
+righthand;
+ add_noteheads(f5);
+end_of_char;
+new_char(16);
+righthand;
+ add_noteheads(g5);
+ beam(98,2,1,g5,99,2,1,a6,100,2,1,f5,101,2,1,g5);
+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(e5);
+ add_natural(e5);
+end_of_char;
+new_char(16);
+righthand;
+ add_noteheads(a6);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(e3);
+ add_natural(e3);
+righthand;
+ add_noteheads(g5);
+end_of_char;
+new_char(16);
+righthand;
+ add_noteheads(f5);
+ beam(103,2,1,e5,104,2,1,a6,105,2,1,g5,106,2,1,f5);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(g3);
+righthand;
+ add_noteheads(e5);
+end_of_char;
+new_char(16);
+righthand;
+ add_noteheads(f5);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(b4);
+ add_tie(b4);
+ beam(103,1,1,c3,105,1,1,e3,107,1,1,g3,109,1,1,b4);
+righthand;
+ add_noteheads(d5);
+end_of_char;
+new_char(16);
+righthand;
+ add_noteheads(e5);
+ beam(107,2,1,e5,108,2,1,f5,109,2,1,d5,110,2,1,e5);
+end_of_char;
+new_char(16);
+lefthand;
+ close_tie(b4);
+ add_noteheads(b4);
+righthand;
+ add_noteheads(g4);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(g3);
+righthand;
+ add_noteheads(f5);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(a4);
+righthand;
+ add_noteheads(e5);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(b4);
+ beam(111,2,1,b4,112,2,1,g3,113,2,1,a4,114,2,1,b4);
+righthand;
+ add_noteheads(d5);
+ beam(111,2,1,g4,112,2,1,f5,113,2,1,e5,114,2,1,d5);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(c4);
+righthand;
+ add_noteheads(e5);
+end_of_char;
+new_char(16);
+righthand;
+ add_noteheads(f5);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(b4);
+ beam(115,1,1,c4,117,1,1,b4);
+righthand;
+ add_noteheads(d5);
+end_of_char;
+new_char(16);
+righthand;
+ add_noteheads(e5);
+ beam(115,2,1,e5,116,2,1,f5,117,2,1,d5,118,2,1,e5);
+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_noteheads(f5);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(b4);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(a4);
+righthand;
+ add_noteheads(f4);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(g3);
+ beam(120,2,1,a4,121,2,1,b4,122,2,1,a4,123,2,1,g3);
+righthand;
+ add_noteheads(e4);
+ add_natural(e4);
+ beam(120,1,1,f5,122,2,1,f4,123,2,1,e4);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(a4);
+righthand;
+ add_noteheads(f4);
+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(124,1,1,f4,126,1,1,g4);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(a4);
+ beam(124,2,1,a4,125,2,1,b4,126,2,1,g3,127,2,1,a4);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(f3);
+righthand;
+ add_noteheads(a5);
+ regular_stem;
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(f4);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(e4);
+ add_flat(e4);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(f4);
+ beam(128,2,1,f3,129,2,1,f4,130,2,1,e4,131,2,1,f4);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(d4);
+ add_flat(d4);
+righthand;
+ add_noteheads(b5);
+ regular_stem;
+ beam(124,1,1,f4,126,1,1,g4);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(e4);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(c4);
+end_of_char;
+new_char(16);
+lefthand;
+ add_noteheads(e4);
+ beam(132,2,1,d4,133,2,1,e4,134,2,1,c4,135,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.
|