mode_setup; input txmfont; input texmuse; instr_no(2); key_ := -3; desired_width := 469.75499pt/pt; staff_1="-1,0,1,2,3"; bar_type1=10; instr_clef1:= 0; 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(e4); righthand; add_noteheads(g5); end_of_char; new_char(16); lefthand; add_noteheads(b4); righthand; add_noteheads(b6); end_of_char; new_char(16); lefthand; add_noteheads(c4); righthand; add_noteheads(a6); end_of_char; new_char(16); lefthand; add_noteheads(b4); beam(1,2,1,e4,2,2,1,b4,3,2,1,c4,4,2,1,b4); righthand; add_noteheads(b6); beam(1,2,1,g5,2,2,1,b6,3,2,1,a6,4,2,1,b6); end_of_char; new_char(16); lefthand; add_noteheads(g4); regular_stem; add_tie(g4); righthand; add_noteheads(e5); end_of_char; new_char(16); righthand; add_noteheads(g5); end_of_char; new_char(16); righthand; add_noteheads(f5); end_of_char; new_char(16); righthand; add_noteheads(g5); beam(5,2,1,e5,6,2,1,g5,7,2,1,f5,8,2,1,g5); end_of_char; new_char(16); lefthand; close_tie(g4); add_noteheads(g4); righthand; add_noteheads(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); righthand; add_noteheads(e5); end_of_char; new_char(16); lefthand; add_noteheads(b4); beam(9,2,1,g4,10,2,1,b4,11,2,1,c4,12,2,1,b4); righthand; add_noteheads(f5); beam(9,2,1,c5,10,2,1,d5,11,2,1,e5,12,2,1,f5); end_of_char; new_char(16); lefthand; add_noteheads(a5); regular_stem; add_tie(a5); righthand; add_noteheads(d5); end_of_char; new_char(16); righthand; add_noteheads(e5); end_of_char; new_char(16); righthand; add_noteheads(f5); end_of_char; new_char(16); righthand; add_noteheads(g5); beam(13,2,1,d5,14,2,1,e5,15,2,1,f5,16,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; close_tie(a5); add_noteheads(a5); righthand; add_noteheads(e5); end_of_char; new_char(16); lefthand; add_noteheads(b4); righthand; add_noteheads(f5); end_of_char; new_char(16); lefthand; add_noteheads(e4); righthand; add_noteheads(g5); end_of_char; new_char(16); lefthand; add_noteheads(d4); beam(18,2,1,a5,19,2,1,b4,20,2,1,e4,21,2,1,d4); righthand; add_noteheads(a6); beam(18,2,1,e5,19,2,1,f5,20,2,1,g5,21,2,1,a6); end_of_char; new_char(16); lefthand; add_noteheads(g4); righthand; add_noteheads(b6); end_of_char; new_char(16); lefthand; add_noteheads(f4); righthand; add_noteheads(a6); end_of_char; new_char(16); lefthand; add_noteheads(a5); righthand; add_noteheads(c6); end_of_char; new_char(16); lefthand; add_noteheads(g4); beam(22,2,1,g4,23,2,1,f4,24,2,1,a5,25,2,1,g4); righthand; add_noteheads(b6); beam(22,2,1,b6,23,2,1,a6,24,2,1,c6,25,2,1,b6); end_of_char; new_char(16); lefthand; add_noteheads(c5); righthand; add_noteheads(a6); end_of_char; new_char(16); lefthand; add_noteheads(b5); righthand; add_noteheads(g5); end_of_char; new_char(16); lefthand; add_noteheads(a5); righthand; add_noteheads(f5); end_of_char; new_char(16); lefthand; add_noteheads(g4); beam(26,2,1,c5,27,2,1,b5,28,2,1,a5,29,2,1,g4); righthand; add_noteheads(a6); beam(26,2,1,a6,27,2,1,g5,28,2,1,f5,29,2,1,a6); end_of_char; new_char(16); lefthand; add_noteheads(f4); righthand; add_noteheads(d5); regular_stem; add_tie(d5); end_of_char; new_char(16); lefthand; add_noteheads(b5); end_of_char; new_char(16); lefthand; add_noteheads(a5); end_of_char; new_char(16); lefthand; add_noteheads(b5); beam(30,2,1,f4,31,2,1,b5,32,2,1,a5,33,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(g4); righthand; close_tie(d5); add_noteheads(d5); end_of_char; new_char(16); righthand; add_noteheads(d5); end_of_char; new_char(16); lefthand; clef_(6); add_noteheads(e3); righthand; add_noteheads(g5); end_of_char; new_char(16); lefthand; add_noteheads(f3); beam(35,1,1,g4,37,2,1,e3,38,2,1,f3); righthand; add_noteheads(d5); beam(35,2,1,d5,36,2,1,d5,37,2,1,g5,38,2,1,d5); end_of_char; new_char(16); lefthand; add_noteheads(g3); righthand; add_noteheads(e5); end_of_char; new_char(16); lefthand; add_noteheads(a4); add_natural(a4); righthand; add_noteheads(c5); end_of_char; new_char(16); lefthand; add_noteheads(b4); righthand; add_noteheads(d5); end_of_char; new_char(16); lefthand; add_noteheads(d3); beam(39,2,1,g3,40,2,1,a4,41,2,1,b4,42,2,1,d3); righthand; add_noteheads(b5); beam(39,2,1,e5,40,2,1,c5,41,2,1,d5,42,2,1,b5); end_of_char; new_char(16); lefthand; add_noteheads(e3); righthand; add_noteheads(c5); regular_stem; add_tie(c5); 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(c3); beam(43,2,1,e3,44,2,1,f3,45,2,1,e3,46,2,1,c3); end_of_char; new_char(16); lefthand; add_noteheads(c4); righthand; close_tie(c5); add_noteheads(c5); end_of_char; new_char(16); lefthand; add_noteheads(b4); righthand; add_noteheads(g5); end_of_char; new_char(16); lefthand; add_noteheads(a4); righthand; add_noteheads(f5); add_sharp(f5); end_of_char; new_char(16); lefthand; add_noteheads(g3); beam(47,2,1,c4,48,2,1,b4,49,2,1,a4,50,2,1,g3); righthand; add_noteheads(a6); add_natural(a6); beam(47,2,1,c5,48,2,1,g5,49,2,1,f5,50,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_noteheads(f3); add_sharp(f3); righthand; add_noteheads(c5); end_of_char; new_char(16); lefthand; add_noteheads(e4); righthand; add_noteheads(b5); end_of_char; new_char(16); lefthand; add_noteheads(d4); righthand; add_noteheads(c5); add_tie(c5); beam(52,2,1,c5,53,2,1,b5,54,1,1,c5); end_of_char; new_char(16); lefthand; add_noteheads(c4); beam(52,2,1,f3,53,2,1,e4,54,2,1,d4,55,2,1,c4); end_of_char; new_char(16); lefthand; add_noteheads(b4); righthand; close_tie(c5); add_noteheads(c5); end_of_char; new_char(16); lefthand; add_noteheads(a4); add_natural(a4); righthand; add_noteheads(f5); add_sharp(f5); end_of_char; new_char(16); lefthand; add_noteheads(g3); righthand; add_noteheads(e5); add_natural(e5); end_of_char; new_char(16); lefthand; add_noteheads(f3); beam(56,2,1,b4,57,2,1,a4,58,2,1,g3,59,2,1,f3); righthand; add_noteheads(d5); beam(56,2,1,c5,57,2,1,f5,58,2,1,e5,59,2,1,d5); end_of_char; new_char(16); lefthand; add_noteheads(g3); righthand; add_noteheads(b6); add_dot(b6); end_of_char; new_char(16); lefthand; add_noteheads(a4); end_of_char; new_char(16); lefthand; add_noteheads(g3); end_of_char; new_char(16); lefthand; add_noteheads(a4); beam(60,2,1,g3,61,2,1,a4,62,2,1,g3,63,2,1,a4); beam(60,2,1,g3,61,2,1,a4,62,2,1,g3,63,2,1,a4); righthand; add_noteheads(e5); beam(60,1,1,b6,63,2,1,e5); end_of_char; new_char(48); lefthand; add_noteheads(a4); regular_stem; add_flag(1); add_dot(a4); righthand; add_noteheads(f5); add_dot(f5); end_of_char; new_char(8); lefthand; add_noteheads(g3); regular_stem; add_flag(3); righthand; add_noteheads(g5); beam(64,1,1,f5,65,2,1,g5); end_of_char; new_char(8); lefthand; add_noteheads(a4); regular_stem; add_flag(3); beam(60,2,1,g3,61,2,1,a4,62,2,1,g3,63,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(b4); righthand; add_noteheads(g5); end_of_char; new_char(16); lefthand; add_noteheads(a4); add_natural(a4); end_of_char; new_char(16); lefthand; add_noteheads(g3); righthand; add_noteheads(g4); end_of_char; new_char(16); lefthand; add_noteheads(a4); beam(68,2,1,b4,69,2,1,a4,70,2,1,g3,71,2,1,a4); righthand; add_noteheads(f4); add_sharp(f4); beam(68,1,1,g5,70,2,1,g4,71,2,1,f4); end_of_char; new_char(16); lefthand; add_noteheads(b4); righthand; add_noteheads(g4); end_of_char; new_char(16); lefthand; add_noteheads(c4); righthand; add_noteheads(a5); add_natural(a5); end_of_char; new_char(16); lefthand; add_noteheads(d4); beam(72,2,1,b4,73,2,1,c4,74,1,1,d4); righthand; add_noteheads(b5); end_of_char; new_char(16); righthand; add_noteheads(d4); beam(72,2,1,g4,73,2,1,a5,74,2,1,b5,75,2,1,d4); end_of_char; new_char(16); lefthand; add_noteheads(d4); righthand; add_noteheads(e4); end_of_char; new_char(16); righthand; add_noteheads(f4); end_of_char; new_char(16); lefthand; add_noteheads(c4); beam(76,1,1,d4,78,1,1,c4); righthand; add_noteheads(e4); end_of_char; new_char(16); righthand; add_noteheads(c4); beam(76,2,1,e4,77,2,1,f4,78,2,1,e4,79,2,1,c4); end_of_char; new_char(16); lefthand; add_noteheads(c4); regular_stem; add_flag(1); righthand; add_noteheads(c5); end_of_char; new_char(16); righthand; add_noteheads(b5); end_of_char; new_char(16); lefthand; add_rest(1,0); righthand; add_noteheads(a5); end_of_char; new_char(16); righthand; add_noteheads(g4); beam(80,2,1,c5,81,2,1,b5,82,2,1,a5,83,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(c4); righthand; add_noteheads(f4); add_sharp(f4); end_of_char; new_char(16); righthand; add_noteheads(e5); end_of_char; new_char(16); lefthand; add_noteheads(b4); beam(85,1,1,c4,87,1,1,b4); righthand; add_noteheads(d5); end_of_char; new_char(16); righthand; add_noteheads(c5); beam(85,2,1,f4,86,2,1,e5,87,2,1,d5,88,2,1,c5); end_of_char; new_char(16); lefthand; add_rest(1,0); righthand; add_noteheads(b5); end_of_char; new_char(16); righthand; add_noteheads(a5); add_natural(a5); end_of_char; new_char(16); lefthand; add_noteheads(a4); add_natural(a4); regular_stem; add_flag(1); righthand; add_noteheads(g4); end_of_char; new_char(16); righthand; add_noteheads(f4); beam(89,2,1,b5,90,2,1,a5,91,2,1,g4,92,2,1,f4); end_of_char; new_char(16); lefthand; add_noteheads(b4); righthand; add_noteheads(g4); end_of_char; new_char(16); righthand; add_noteheads(a5); end_of_char; new_char(16); lefthand; add_noteheads(e3); add_tie(e3); beam(93,1,1,b4,95,1,1,e3); righthand; add_noteheads(g4); end_of_char; new_char(16); righthand; add_noteheads(a5); beam(93,2,1,g4,94,2,1,a5,95,2,1,g4,96,2,1,a5); end_of_char; new_char(16); lefthand; close_tie(e3); add_noteheads(e3); righthand; add_noteheads(a5); add_dot(a5); end_of_char; new_char(16); lefthand; add_noteheads(c3); end_of_char; new_char(16); lefthand; add_noteheads(f3); add_natural(f3); end_of_char; new_char(8); lefthand; add_noteheads(c3); beam(97,2,1,e3,98,2,1,c3,99,2,1,f3,100,2,1,c3); righthand; add_noteheads(g4); end_of_char; new_char(8); righthand; add_noteheads(a5); beam(97,1,1,a5,100,3,1,g4,101,3,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(d3); righthand; add_noteheads(b5); end_of_char; new_char(16); righthand; add_noteheads(a5); add_natural(a5); end_of_char; new_char(16); lefthand; add_noteheads(b4); beam(103,1,1,d3,105,1,1,b4); righthand; add_noteheads(g4); end_of_char; new_char(16); righthand; add_noteheads(a5); beam(103,2,1,b5,104,2,1,a5,105,2,1,g4,106,2,1,a5); end_of_char; new_char(16); lefthand; add_noteheads(b4); righthand; add_noteheads(b5); end_of_char; new_char(16); lefthand; add_noteheads(a4); add_natural(a4); righthand; add_noteheads(c5); end_of_char; new_char(16); lefthand; add_noteheads(b4); righthand; add_noteheads(d5); beam(107,2,1,b5,108,2,1,c5,109,1,1,d5); end_of_char; new_char(16); lefthand; add_noteheads(f3); beam(107,2,1,b4,108,2,1,a4,109,2,1,b4,110,2,1,f3); end_of_char; new_char(16); lefthand; add_noteheads(g3); righthand; add_noteheads(d5); end_of_char; new_char(16); lefthand; add_noteheads(b4); end_of_char; new_char(16); lefthand; add_noteheads(e4); righthand; add_noteheads(c5); beam(111,1,1,d5,113,1,1,c5); end_of_char; new_char(16); lefthand; add_noteheads(d4); beam(111,2,1,g3,112,2,1,b4,113,2,1,e4,114,2,1,d4); end_of_char; new_char(16); lefthand; add_noteheads(c4); righthand; add_noteheads(c5); regular_stem; add_flag(1); end_of_char; new_char(16); lefthand; add_noteheads(b4); end_of_char; new_char(16); lefthand; add_noteheads(a4); righthand; add_rest(1,0); end_of_char; new_char(16); lefthand; add_noteheads(g3); beam(115,2,1,c4,116,2,1,b4,117,2,1,a4,118,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(f3); righthand; add_noteheads(c5); end_of_char; new_char(16); lefthand; add_noteheads(a4); add_natural(a4); end_of_char; new_char(16); lefthand; add_noteheads(c4); righthand; add_noteheads(b5); beam(120,1,1,c5,122,1,1,b5); end_of_char; new_char(16); lefthand; add_noteheads(d4); beam(120,2,1,f3,121,2,1,a4,122,2,1,c4,123,2,1,d4); end_of_char; new_char(16); lefthand; add_noteheads(b4); righthand; add_rest(1,0); end_of_char; new_char(16); lefthand; add_noteheads(a4); end_of_char; new_char(16); lefthand; add_noteheads(g3); righthand; add_noteheads(a5); add_natural(a5); regular_stem; add_flag(1); end_of_char; new_char(16); lefthand; add_noteheads(a4); beam(124,2,1,b4,125,2,1,a4,126,2,1,g3,127,2,1,a4); end_of_char; new_char(16); lefthand; add_noteheads(e3); righthand; add_noteheads(b5); end_of_char; new_char(16); lefthand; add_noteheads(g3); end_of_char; new_char(16); lefthand; add_noteheads(c4); righthand; add_noteheads(e4); add_tie(e4); beam(128,1,1,b5,130,1,1,e4); end_of_char; new_char(16); lefthand; add_noteheads(g3); beam(128,2,1,e3,129,2,1,g3,130,2,1,c4,131,2,1,g3); end_of_char; new_char(16); lefthand; add_noteheads(a4); add_dot(a4); righthand; close_tie(e4); add_noteheads(e4); end_of_char; new_char(16); righthand; add_noteheads(c4); end_of_char; new_char(16); righthand; add_noteheads(f4); add_natural(f4); end_of_char; new_char(16); lefthand; add_noteheads(a4); beam(132,1,1,a4,135,2,1,a4); righthand; add_noteheads(c4); beam(132,2,1,e4,133,2,1,c4,134,2,1,f4,135,2,1,c4); 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.