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(f3); add_sharp(f3); righthand; add_noteheads(a6); end_of_char; new_char(16); righthand; add_noteheads(f5); add_sharp(f5); end_of_char; new_char(16); lefthand; add_noteheads(a4); righthand; add_noteheads(d5); add_sharp(d5); end_of_char; new_char(16); righthand; add_noteheads(f5); beam(1,2,1,a6,2,2,1,f5,3,2,1,d5,4,2,1,f5); end_of_char; new_char(16); lefthand; add_noteheads(b4); righthand; add_noteheads(b5); end_of_char; new_char(16); righthand; add_noteheads(d5); end_of_char; new_char(16); lefthand; add_noteheads(d4); add_sharp(d4); beam(1,1,1,f3,3,1,1,a4,5,1,1,b4,7,1,1,d4); righthand; add_noteheads(f4); add_sharp(f4); end_of_char; new_char(16); righthand; add_noteheads(a5); beam(5,2,1,b5,6,2,1,d5,7,2,1,f4,8,2,1,a5); end_of_char; new_char(16); lefthand; add_rest(2,0); righthand; add_noteheads(g4); end_of_char; new_char(16); lefthand; add_noteheads(e4); end_of_char; new_char(16); lefthand; add_noteheads(c4); righthand; add_noteheads(g5); add_tie(g5); beam(9,1,1,g4,11,1,1,g5); end_of_char; new_char(16); lefthand; add_noteheads(e4); beam(10,2,1,e4,11,2,1,c4,12,2,1,e4); end_of_char; new_char(16); lefthand; add_noteheads(a4); righthand; close_tie(g5); add_noteheads(g5); end_of_char; new_char(16); lefthand; add_noteheads(c4); righthand; add_noteheads(e5); end_of_char; new_char(16); lefthand; add_noteheads(e4); righthand; add_noteheads(c5); end_of_char; new_char(16); lefthand; add_noteheads(g4); beam(13,2,1,a4,14,2,1,c4,15,2,1,e4,16,2,1,g4); righthand; add_noteheads(e5); beam(13,2,1,g5,14,2,1,e5,15,2,1,c5,16,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(f4); add_sharp(f4); righthand; add_noteheads(a5); end_of_char; new_char(16); lefthand; add_noteheads(d4); end_of_char; new_char(16); lefthand; add_noteheads(b4); righthand; add_noteheads(f5); add_sharp(f5); add_tie(f5); beam(18,1,1,a5,20,1,1,f5); end_of_char; new_char(16); lefthand; add_noteheads(d4); beam(18,2,1,f4,19,2,1,d4,20,2,1,b4,21,2,1,d4); end_of_char; new_char(16); lefthand; add_noteheads(g3); righthand; close_tie(f5); add_noteheads(f5); end_of_char; new_char(16); lefthand; add_noteheads(b4); righthand; add_noteheads(d5); end_of_char; new_char(16); lefthand; add_noteheads(d4); righthand; add_noteheads(b5); end_of_char; new_char(16); lefthand; add_noteheads(f4); beam(22,2,1,g3,23,2,1,b4,24,2,1,d4,25,2,1,f4); righthand; add_noteheads(d5); beam(22,2,1,f5,23,2,1,d5,24,2,1,b5,25,2,1,d5); end_of_char; new_char(16); lefthand; add_noteheads(e4); righthand; add_noteheads(g4); end_of_char; new_char(16); lefthand; add_noteheads(c4); end_of_char; new_char(16); lefthand; add_noteheads(a4); righthand; add_noteheads(e5); add_tie(e5); beam(26,1,1,g4,28,1,1,e5); end_of_char; new_char(16); lefthand; add_noteheads(c4); beam(26,2,1,e4,27,2,1,c4,28,2,1,a4,29,2,1,c4); end_of_char; new_char(16); lefthand; add_noteheads(f3); add_sharp(f3); righthand; close_tie(e5); add_noteheads(e5); end_of_char; new_char(16); lefthand; add_noteheads(a4); righthand; add_noteheads(c5); end_of_char; new_char(16); lefthand; add_noteheads(c4); add_tie(c4); beam(30,2,1,f3,31,2,1,a4,32,1,1,c4); righthand; add_noteheads(a5); end_of_char; new_char(16); righthand; add_noteheads(c5); beam(30,2,1,e5,31,2,1,c5,32,2,1,a5,33,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; close_tie(c4); add_noteheads(c4); righthand; add_noteheads(f4); add_sharp(f4); end_of_char; new_char(16); lefthand; add_noteheads(b4); righthand; add_noteheads(g5); end_of_char; new_char(16); lefthand; add_noteheads(c4); righthand; add_noteheads(f5); add_sharp(f5); end_of_char; new_char(16); lefthand; add_noteheads(a4); beam(35,2,1,c4,36,2,1,b4,37,2,1,c4,38,2,1,a4); righthand; add_noteheads(e5); beam(35,2,1,f4,36,2,1,g5,37,2,1,f5,38,2,1,e5); end_of_char; new_char(16); lefthand; add_noteheads(b4); righthand; add_noteheads(d5); add_sharp(d5); end_of_char; new_char(16); righthand; add_noteheads(f5); end_of_char; new_char(16); lefthand; add_noteheads(b3); beam(39,1,1,b4,41,1,1,b3); righthand; add_noteheads(b5); end_of_char; new_char(16); righthand; add_noteheads(d5); beam(39,2,1,d5,40,2,1,f5,41,2,1,b5,42,2,1,d5); end_of_char; new_char(16); lefthand; add_noteheads(e3); righthand; add_noteheads(e5); regular_stem; add_flag(1); end_of_char; new_char(16); lefthand; add_noteheads(e4); end_of_char; new_char(16); lefthand; add_noteheads(b4); righthand; add_rest(1,0); end_of_char; new_char(16); lefthand; add_noteheads(g3); beam(43,2,1,e3,44,2,1,e4,45,2,1,b4,46,2,1,g3); end_of_char; new_char(16); lefthand; add_noteheads(e3); righthand; add_rest(0,0); end_of_char; new_char(16); lefthand; add_noteheads(b3); end_of_char; new_char(16); lefthand; add_noteheads(g2); end_of_char; new_char(16); lefthand; add_noteheads(b3); beam(47,2,1,e3,48,2,1,b3,49,2,1,g2,50,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); righthand; add_rest(2,0); end_of_char; new_char(16); righthand; add_noteheads(g5); end_of_char; new_char(16); lefthand; add_noteheads(e3); beam(52,1,1,e2,54,1,1,e3); righthand; add_noteheads(b6); add_flat(b6); end_of_char; new_char(16); righthand; add_noteheads(g5); beam(53,2,1,g5,54,2,1,b6,55,2,1,g5); end_of_char; new_char(16); lefthand; add_noteheads(g3); righthand; add_noteheads(e5); end_of_char; new_char(16); righthand; add_noteheads(g5); end_of_char; new_char(16); lefthand; add_noteheads(b4); add_flat(b4); beam(56,1,1,g3,58,1,1,b4); righthand; add_noteheads(c5); add_sharp(c5); end_of_char; new_char(16); righthand; add_noteheads(e5); beam(56,2,1,e5,57,2,1,g5,58,2,1,c5,59,2,1,e5); end_of_char; new_char(16); lefthand; add_noteheads(c4); add_sharp(c4); regular_stem; add_flag(1); righthand; add_noteheads(g5); end_of_char; new_char(16); righthand; add_noteheads(e5); end_of_char; new_char(16); lefthand; add_rest(1,0); righthand; add_noteheads(c5); end_of_char; new_char(16); righthand; add_noteheads(e5); beam(60,2,1,g5,61,2,1,e5,62,2,1,c5,63,2,1,e5); end_of_char; new_char(16); lefthand; add_rest(2,0); righthand; add_noteheads(a5); regular_stem; add_flag(2); end_of_char; new_char(16); lefthand; add_noteheads(g4); righthand; add_rest(2,0); end_of_char; new_char(16); lefthand; add_noteheads(f4); righthand; add_rest(1,0); end_of_char; new_char(16); lefthand; add_noteheads(e4); beam(65,2,1,g4,66,2,1,f4,67,2,1,e4); 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_rest(2,0); end_of_char; new_char(16); righthand; add_noteheads(f5); end_of_char; new_char(16); lefthand; add_noteheads(d3); righthand; add_noteheads(a6); end_of_char; new_char(16); righthand; add_noteheads(f5); beam(70,2,1,f5,71,2,1,a6,72,2,1,f5); end_of_char; new_char(16); lefthand; add_noteheads(f3); righthand; add_noteheads(d5); end_of_char; new_char(16); righthand; add_noteheads(f5); end_of_char; new_char(16); lefthand; add_noteheads(a4); add_flat(a4); beam(69,1,1,d4,71,1,1,d3,73,1,1,f3,75,1,1,a4); righthand; add_noteheads(b5); end_of_char; new_char(16); righthand; add_noteheads(d5); beam(73,2,1,d5,74,2,1,f5,75,2,1,b5,76,2,1,d5); end_of_char; new_char(16); lefthand; add_noteheads(b4); regular_stem; add_flag(1); righthand; add_noteheads(f5); end_of_char; new_char(16); righthand; add_noteheads(d5); end_of_char; new_char(16); lefthand; add_rest(1,0); righthand; add_noteheads(b5); end_of_char; new_char(16); righthand; add_noteheads(d5); beam(77,2,1,f5,78,2,1,d5,79,2,1,b5,80,2,1,d5); end_of_char; new_char(16); lefthand; add_rest(2,0); righthand; add_noteheads(g4); regular_stem; add_flag(2); end_of_char; new_char(16); lefthand; add_noteheads(f4); righthand; add_rest(2,0); end_of_char; new_char(16); lefthand; add_noteheads(e4); righthand; add_rest(1,0); end_of_char; new_char(16); lefthand; add_noteheads(d4); beam(82,2,1,f4,83,2,1,e4,84,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(c4); righthand; add_rest(2,0); end_of_char; new_char(16); righthand; add_noteheads(e5); end_of_char; new_char(16); lefthand; add_noteheads(c3); righthand; add_noteheads(g5); end_of_char; new_char(16); righthand; add_noteheads(e5); beam(87,2,1,e5,88,2,1,g5,89,2,1,e5); end_of_char; new_char(16); lefthand; add_noteheads(e3); righthand; add_noteheads(c5); end_of_char; new_char(16); righthand; add_noteheads(e5); end_of_char; new_char(16); lefthand; add_noteheads(f3); add_sharp(f3); beam(86,1,1,c4,88,1,1,c3,90,1,1,e3,92,1,1,f3); righthand; add_noteheads(a5); end_of_char; new_char(16); righthand; add_noteheads(c5); beam(90,2,1,c5,91,2,1,e5,92,2,1,a5,93,2,1,c5); end_of_char; new_char(16); lefthand; add_noteheads(a4); regular_stem; add_flag(1); righthand; add_noteheads(d5); add_sharp(d5); end_of_char; new_char(16); righthand; add_noteheads(c5); end_of_char; new_char(16); lefthand; add_rest(1,0); righthand; add_noteheads(a5); end_of_char; new_char(16); righthand; add_noteheads(c5); beam(94,2,1,d5,95,2,1,c5,96,2,1,a5,97,2,1,c5); end_of_char; new_char(16); lefthand; add_rest(2,0); righthand; add_noteheads(f4); add_sharp(f4); regular_stem; add_flag(2); end_of_char; new_char(16); lefthand; add_noteheads(e4); righthand; add_rest(2,0); end_of_char; new_char(16); lefthand; add_noteheads(d4); add_sharp(d4); righthand; add_rest(1,0); end_of_char; new_char(16); lefthand; add_noteheads(c4); add_sharp(c4); beam(99,2,1,e4,100,2,1,d4,101,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(b4); righthand; add_rest(2,0); end_of_char; new_char(16); righthand; add_noteheads(d5); end_of_char; new_char(16); lefthand; add_noteheads(b3); righthand; add_noteheads(f5); end_of_char; new_char(16); righthand; add_noteheads(d5); beam(104,2,1,d5,105,2,1,f5,106,2,1,d5); end_of_char; new_char(16); lefthand; add_noteheads(d3); righthand; add_noteheads(b5); end_of_char; new_char(16); righthand; add_noteheads(d5); end_of_char; new_char(16); lefthand; add_noteheads(f3); beam(103,1,1,b4,105,1,1,b3,107,1,1,d3,109,1,1,f3); righthand; add_noteheads(g4); add_sharp(g4); end_of_char; new_char(16); righthand; add_noteheads(b5); beam(107,2,1,b5,108,2,1,d5,109,2,1,g4,110,2,1,b5); end_of_char; new_char(16); lefthand; add_noteheads(g2); add_sharp(g2); regular_stem; add_flag(1); righthand; add_noteheads(d5); end_of_char; new_char(16); righthand; add_noteheads(b5); end_of_char; new_char(16); lefthand; add_rest(1,0); righthand; add_noteheads(g4); end_of_char; new_char(16); righthand; add_noteheads(b5); beam(111,2,1,d5,112,2,1,b5,113,2,1,g4,114,2,1,b5); end_of_char; new_char(16); lefthand; add_rest(2,0); righthand; add_noteheads(e4); regular_stem; add_flag(2); end_of_char; new_char(16); lefthand; add_noteheads(d4); righthand; add_rest(2,0); end_of_char; new_char(16); lefthand; add_noteheads(c4); righthand; add_rest(1,0); end_of_char; new_char(16); lefthand; add_noteheads(b4); beam(116,2,1,d4,117,2,1,c4,118,2,1,b4); 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_rest(2,0); end_of_char; new_char(16); righthand; add_noteheads(e4); end_of_char; new_char(16); lefthand; add_noteheads(a4); righthand; add_noteheads(a5); end_of_char; new_char(16); righthand; add_noteheads(c5); beam(121,2,1,e4,122,2,1,a5,123,2,1,c5); end_of_char; new_char(16); lefthand; add_noteheads(g3); add_sharp(g3); 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(120,1,1,c4,122,1,1,a4,124,1,1,g3,126,1,1,e3); righthand; add_noteheads(b5); end_of_char; new_char(16); righthand; add_noteheads(d5); beam(124,2,1,b5,125,2,1,e4,126,2,1,b5,127,2,1,d5); end_of_char; new_char(16); lefthand; add_noteheads(a4); righthand; add_noteheads(c5); end_of_char; new_char(16); lefthand; add_noteheads(e3); end_of_char; new_char(16); lefthand; add_noteheads(a4); righthand; add_noteheads(a5); beam(128,1,1,c5,130,1,1,a5); end_of_char; new_char(16); lefthand; add_noteheads(c4); beam(128,2,1,a4,129,2,1,e3,130,2,1,a4,131,2,1,c4); end_of_char; new_char(16); lefthand; add_noteheads(b4); righthand; add_noteheads(g4); add_sharp(g4); end_of_char; new_char(16); lefthand; add_noteheads(e3); end_of_char; new_char(16); lefthand; add_noteheads(b4); righthand; add_noteheads(e4); beam(132,1,1,g4,134,1,1,e4); end_of_char; new_char(16); lefthand; add_noteheads(d4); beam(132,2,1,b4,133,2,1,e3,134,2,1,b4,135,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(c4); righthand; add_noteheads(a5); end_of_char; new_char(16); lefthand; add_noteheads(e4); righthand; add_noteheads(c5); end_of_char; new_char(16); lefthand; add_noteheads(a5); righthand; add_noteheads(e5); end_of_char; new_char(16); lefthand; add_noteheads(e4); beam(137,2,1,c4,138,2,1,e4,139,2,1,a5,140,2,1,e4); righthand; add_noteheads(c5); beam(137,2,1,a5,138,2,1,c5,139,2,1,e5,140,2,1,c5); end_of_char; new_char(16); lefthand; add_noteheads(c4); righthand; add_noteheads(a5); end_of_char; new_char(16); lefthand; add_noteheads(e4); righthand; add_noteheads(c5); end_of_char; new_char(16); lefthand; add_noteheads(a4); righthand; add_noteheads(f4); add_sharp(f4); end_of_char; new_char(16); lefthand; add_noteheads(c4); beam(141,2,1,c4,142,2,1,e4,143,2,1,a4,144,2,1,c4); righthand; add_noteheads(a5); beam(141,2,1,a5,142,2,1,c5,143,2,1,f4,144,2,1,a5); end_of_char; new_char(16); lefthand; add_noteheads(f3); add_sharp(f3); righthand; add_noteheads(c5); end_of_char; new_char(16); lefthand; add_noteheads(a4); righthand; add_noteheads(a5); end_of_char; new_char(16); lefthand; add_noteheads(c4); righthand; add_noteheads(f4); end_of_char; new_char(16); lefthand; add_noteheads(a4); beam(145,2,1,f3,146,2,1,a4,147,2,1,c4,148,2,1,a4); righthand; add_noteheads(a5); beam(145,2,1,c5,146,2,1,a5,147,2,1,f4,148,2,1,a5); end_of_char; new_char(16); lefthand; add_noteheads(f3); righthand; add_noteheads(d4); add_sharp(d4); end_of_char; new_char(16); lefthand; add_noteheads(a4); righthand; add_noteheads(c5); end_of_char; new_char(16); lefthand; add_noteheads(d3); add_sharp(d3); righthand; add_noteheads(b5); end_of_char; new_char(16); lefthand; add_noteheads(f3); beam(149,2,1,f3,150,2,1,a4,151,2,1,d3,152,2,1,f3); righthand; add_noteheads(a5); beam(149,2,1,d4,150,2,1,c5,151,2,1,b5,152,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(e3); 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(g3); add_sharp(g3); righthand; add_noteheads(d5); end_of_char; new_char(16); righthand; add_noteheads(b5); beam(154,2,1,g4,155,2,1,b5,156,2,1,d5,157,2,1,b5); end_of_char; new_char(16); lefthand; add_noteheads(b4); righthand; add_noteheads(g4); end_of_char; new_char(16); righthand; add_noteheads(b5); end_of_char; new_char(16); lefthand; add_noteheads(g3); beam(154,1,1,e3,156,1,1,g3,158,1,1,b4,160,1,1,g3); righthand; add_noteheads(d4); end_of_char; new_char(16); righthand; add_noteheads(f4); beam(158,2,1,g4,159,2,1,b5,160,2,1,d4,161,2,1,f4); end_of_char; new_char(16); lefthand; add_noteheads(e3); righthand; add_noteheads(g4); end_of_char; new_char(16); righthand; add_noteheads(f4); end_of_char; new_char(16); lefthand; add_noteheads(b3); righthand; add_noteheads(d4); end_of_char; new_char(16); righthand; add_noteheads(f4); beam(162,2,1,g4,163,2,1,f4,164,2,1,d4,165,2,1,f4); end_of_char; new_char(16); lefthand; add_noteheads(g2); add_sharp(g2); righthand; add_noteheads(b4); end_of_char; new_char(16); righthand; add_noteheads(f4); end_of_char; new_char(16); lefthand; add_noteheads(e2); beam(162,1,1,e3,164,1,1,b3,166,1,1,g2,168,1,1,e2); righthand; add_noteheads(e4); end_of_char; new_char(16); righthand; add_noteheads(d4); beam(166,2,1,b4,167,2,1,f4,168,2,1,e4,169,2,1,d4); 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.