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_ := -1; 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(32); lefthand; add_noteheads(g3); righthand; add_noteheads(b5); end_of_char; new_char(16); lefthand; add_noteheads(f3); add_natural(f3); righthand; add_noteheads(g4); end_of_char; new_char(16); lefthand; add_noteheads(e3); add_flat(e3); beam(1,1,1,g3,2,2,1,f3,3,2,1,e3); end_of_char; new_char(16); lefthand; add_noteheads(d3); righthand; add_noteheads(b5); end_of_char; new_char(16); lefthand; add_noteheads(e3); end_of_char; new_char(16); lefthand; add_noteheads(d3); righthand; add_noteheads(g4); end_of_char; new_char(16); lefthand; add_noteheads(c3); beam(4,2,1,d3,5,2,1,e3,6,2,1,d3,7,2,1,c3); end_of_char; new_char(16); lefthand; add_noteheads(b3); righthand; add_noteheads(d5); end_of_char; new_char(16); lefthand; add_noteheads(c3); end_of_char; new_char(16); lefthand; add_noteheads(b3); righthand; add_noteheads(g4); beam(1,1,1,b5,2,1,1,g4,4,1,1,b5,6,1,1,g4,8,1,1,d5,10,1,1,g4); end_of_char; new_char(16); lefthand; add_noteheads(a3); beam(8,2,1,b3,9,2,1,c3,10,2,1,b3,11,2,1,a3); end_of_char; new_char(-least_spaced); lefthand; barline_(10); righthand; barline_(10); end_of_char; end_of_block; new_char(32); lefthand; add_noteheads(g2); righthand; add_noteheads(g5); end_of_char; new_char(16); lefthand; add_noteheads(g3); righthand; add_noteheads(f5); end_of_char; new_char(16); righthand; add_noteheads(e5); add_flat(e5); beam(13,1,1,g5,14,2,1,f5,15,2,1,e5); end_of_char; new_char(16); lefthand; add_noteheads(b4); righthand; add_noteheads(d5); end_of_char; new_char(16); righthand; add_noteheads(e5); end_of_char; new_char(16); lefthand; add_noteheads(g3); righthand; add_noteheads(d5); end_of_char; new_char(16); righthand; add_noteheads(c5); beam(16,2,1,d5,17,2,1,e5,18,2,1,d5,19,2,1,c5); end_of_char; new_char(16); lefthand; add_noteheads(d4); righthand; add_noteheads(b5); end_of_char; new_char(16); righthand; add_noteheads(c5); end_of_char; new_char(16); lefthand; add_noteheads(g3); beam(13,1,1,g2,14,1,1,g3,16,1,1,b4,18,1,1,g3,20,1,1,d4,22,1,1,g3); righthand; add_noteheads(b5); end_of_char; new_char(16); righthand; add_noteheads(a5); beam(20,2,1,b5,21,2,1,c5,22,2,1,b5,23,2,1,a5); end_of_char; new_char(-least_spaced); lefthand; barline_(10); righthand; barline_(10); end_of_char; end_of_block; new_char(32); lefthand; add_noteheads(g4); righthand; add_noteheads(g4); end_of_char; new_char(16); lefthand; add_noteheads(f4); righthand; add_noteheads(b5); end_of_char; new_char(16); lefthand; add_noteheads(e4); add_flat(e4); beam(25,1,1,g4,26,2,1,f4,27,2,1,e4); end_of_char; new_char(16); lefthand; add_noteheads(d4); righthand; add_noteheads(d5); end_of_char; new_char(16); lefthand; add_noteheads(e4); end_of_char; new_char(16); lefthand; add_noteheads(d4); righthand; add_noteheads(b5); end_of_char; new_char(16); lefthand; add_noteheads(c4); beam(28,2,1,d4,29,2,1,e4,30,2,1,d4,31,2,1,c4); end_of_char; new_char(16); lefthand; add_noteheads(b4); righthand; add_noteheads(g5); end_of_char; new_char(16); lefthand; add_noteheads(c4); end_of_char; new_char(16); lefthand; add_noteheads(b4); righthand; add_noteheads(d5); beam(25,1,1,g4,26,1,1,b5,28,1,1,d5,30,1,1,b5,32,1,1,g5,34,1,1,d5); end_of_char; new_char(16); lefthand; add_noteheads(a4); beam(32,2,1,b4,33,2,1,c4,34,2,1,b4,35,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(g3); righthand; add_noteheads(b6); end_of_char; new_char(16); lefthand; add_noteheads(f3); end_of_char; new_char(16); lefthand; add_noteheads(g3); righthand; add_noteheads(c5); add_sharp(c5); beam(37,1,1,b6,39,1,1,c5); end_of_char; new_char(16); lefthand; add_noteheads(e4); add_natural(e4); beam(37,2,1,g3,38,2,1,f3,39,2,1,g3,40,2,1,e4); end_of_char; new_char(16); lefthand; add_noteheads(g3); righthand; add_noteheads(b6); end_of_char; new_char(16); lefthand; add_noteheads(e4); end_of_char; new_char(16); lefthand; add_noteheads(f3); righthand; add_noteheads(c5); beam(41,1,1,b6,43,1,1,c5); end_of_char; new_char(16); lefthand; add_noteheads(e4); beam(41,2,1,g3,42,2,1,e4,43,2,1,f3,44,2,1,e4); end_of_char; new_char(16); lefthand; add_noteheads(g3); righthand; add_noteheads(b6); end_of_char; new_char(16); lefthand; add_noteheads(e4); end_of_char; new_char(16); lefthand; add_noteheads(e3); righthand; add_noteheads(c5); beam(45,1,1,b6,47,1,1,c5); end_of_char; new_char(16); lefthand; add_noteheads(e4); beam(45,2,1,g3,46,2,1,e4,47,2,1,e3,48,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(f3); righthand; add_noteheads(d5); end_of_char; new_char(16); lefthand; add_noteheads(e3); end_of_char; new_char(16); lefthand; add_noteheads(f3); righthand; add_noteheads(a5); end_of_char; new_char(16); lefthand; add_noteheads(d4); beam(50,2,1,f3,51,2,1,e3,52,2,1,f3,53,2,1,d4); end_of_char; new_char(16); lefthand; add_noteheads(f3); righthand; add_noteheads(f5); end_of_char; new_char(16); lefthand; add_noteheads(d4); end_of_char; new_char(16); lefthand; add_noteheads(e3); righthand; add_noteheads(d5); end_of_char; new_char(16); lefthand; add_noteheads(d4); beam(54,2,1,f3,55,2,1,d4,56,2,1,e3,57,2,1,d4); end_of_char; new_char(16); lefthand; add_noteheads(f3); righthand; add_noteheads(a6); end_of_char; new_char(16); lefthand; add_noteheads(d4); end_of_char; new_char(16); lefthand; add_noteheads(d3); righthand; add_noteheads(f5); beam(50,1,1,d5,52,1,1,a5,54,1,1,f5,56,1,1,d5,58,1,1,a6,60,1,1,f5); end_of_char; new_char(16); lefthand; add_noteheads(d4); beam(58,2,1,f3,59,2,1,d4,60,2,1,d3,61,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_noteheads(g5); end_of_char; new_char(16); righthand; add_noteheads(f5); end_of_char; new_char(16); lefthand; add_noteheads(g3); beam(63,1,1,b4,65,1,1,g3); righthand; add_noteheads(g5); end_of_char; new_char(16); righthand; add_noteheads(b6); beam(63,2,1,g5,64,2,1,f5,65,2,1,g5,66,2,1,b6); end_of_char; new_char(16); lefthand; add_noteheads(e3); righthand; add_noteheads(c5); end_of_char; new_char(16); righthand; add_noteheads(b6); end_of_char; new_char(16); lefthand; add_noteheads(g3); beam(67,1,1,e3,69,1,1,g3); righthand; add_noteheads(d5); end_of_char; new_char(16); righthand; add_noteheads(b6); beam(67,2,1,c5,68,2,1,b6,69,2,1,d5,70,2,1,b6); end_of_char; new_char(16); lefthand; add_noteheads(c3); righthand; add_noteheads(e5); end_of_char; new_char(16); righthand; add_noteheads(b6); end_of_char; new_char(16); lefthand; add_noteheads(e3); beam(71,1,1,c3,73,1,1,e3); righthand; add_noteheads(c5); end_of_char; new_char(16); righthand; add_noteheads(b6); beam(71,2,1,e5,72,2,1,b6,73,2,1,c5,74,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(a4); righthand; add_noteheads(f5); end_of_char; new_char(16); righthand; add_noteheads(e5); end_of_char; new_char(16); lefthand; add_noteheads(f3); beam(76,1,1,a4,78,1,1,f3); righthand; add_noteheads(f5); end_of_char; new_char(16); righthand; add_noteheads(a6); beam(76,2,1,f5,77,2,1,e5,78,2,1,f5,79,2,1,a6); end_of_char; new_char(16); lefthand; add_noteheads(d3); righthand; add_noteheads(b5); add_natural(b5); end_of_char; new_char(16); righthand; add_noteheads(a6); end_of_char; new_char(16); lefthand; add_noteheads(f3); beam(80,1,1,d3,82,1,1,f3); righthand; add_noteheads(c5); add_sharp(c5); end_of_char; new_char(16); righthand; add_noteheads(a6); beam(80,2,1,b5,81,2,1,a6,82,2,1,c5,83,2,1,a6); end_of_char; new_char(16); lefthand; add_noteheads(b3); add_natural(b3); righthand; add_noteheads(d5); end_of_char; new_char(16); righthand; add_noteheads(a6); end_of_char; new_char(16); lefthand; add_noteheads(d3); beam(84,1,1,b3,86,1,1,d3); righthand; add_noteheads(b5); end_of_char; new_char(16); righthand; add_noteheads(a6); beam(84,2,1,d5,85,2,1,a6,86,2,1,b5,87,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(g3); righthand; add_noteheads(e5); end_of_char; new_char(16); righthand; add_noteheads(d5); end_of_char; new_char(16); lefthand; add_noteheads(e3); beam(89,1,1,g3,91,1,1,e3); righthand; add_noteheads(e5); end_of_char; new_char(16); righthand; add_noteheads(g5); beam(89,2,1,e5,90,2,1,d5,91,2,1,e5,92,2,1,g5); end_of_char; new_char(16); lefthand; add_noteheads(c3); add_sharp(c3); righthand; add_noteheads(a5); end_of_char; new_char(16); righthand; add_noteheads(g5); end_of_char; new_char(16); lefthand; add_noteheads(e3); beam(93,1,1,c3,95,1,1,e3); righthand; add_noteheads(b5); add_natural(b5); end_of_char; new_char(16); righthand; add_noteheads(g5); beam(93,2,1,a5,94,2,1,g5,95,2,1,b5,96,2,1,g5); end_of_char; new_char(16); lefthand; add_noteheads(a3); righthand; add_noteheads(c5); add_sharp(c5); end_of_char; new_char(16); righthand; add_noteheads(g5); end_of_char; new_char(16); lefthand; add_noteheads(c3); beam(97,1,1,a3,99,1,1,c3); righthand; add_noteheads(a5); end_of_char; new_char(16); righthand; add_noteheads(g5); beam(97,2,1,c5,98,2,1,g5,99,2,1,a5,100,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(d2); righthand; add_noteheads(f5); end_of_char; new_char(16); lefthand; add_noteheads(d3); end_of_char; new_char(16); lefthand; add_noteheads(c3); add_natural(c3); righthand; add_noteheads(d5); beam(102,1,1,f5,104,1,1,d5); end_of_char; new_char(16); lefthand; add_noteheads(d3); beam(102,2,1,d2,103,2,1,d3,104,2,1,c3,105,2,1,d3); end_of_char; new_char(16); lefthand; add_noteheads(g2); righthand; add_noteheads(b5); add_flat(b5); end_of_char; new_char(16); lefthand; add_noteheads(d3); end_of_char; new_char(16); lefthand; add_noteheads(a3); righthand; add_noteheads(d5); beam(106,1,1,b5,108,1,1,d5); end_of_char; new_char(16); lefthand; add_noteheads(d3); beam(106,2,1,g2,107,2,1,d3,108,2,1,a3,109,2,1,d3); end_of_char; new_char(16); lefthand; add_noteheads(b3); righthand; add_noteheads(g4); end_of_char; new_char(16); lefthand; add_noteheads(d3); end_of_char; new_char(16); lefthand; add_noteheads(g2); righthand; add_noteheads(f5); beam(110,1,1,g4,112,1,1,f5); end_of_char; new_char(16); lefthand; add_noteheads(d3); beam(110,2,1,b3,111,2,1,d3,112,2,1,g2,113,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(c2); righthand; add_noteheads(e5); end_of_char; new_char(16); lefthand; add_noteheads(c3); end_of_char; new_char(16); lefthand; add_noteheads(b3); righthand; add_noteheads(c5); end_of_char; new_char(16); lefthand; add_noteheads(c3); beam(115,2,1,c2,116,2,1,c3,117,2,1,b3,118,2,1,c3); end_of_char; new_char(16); lefthand; add_noteheads(f2); righthand; add_noteheads(a5); end_of_char; new_char(16); lefthand; add_noteheads(c3); end_of_char; new_char(16); lefthand; add_noteheads(g2); righthand; add_noteheads(c5); end_of_char; new_char(16); lefthand; add_noteheads(c3); beam(119,2,1,f2,120,2,1,c3,121,2,1,g2,122,2,1,c3); end_of_char; new_char(16); lefthand; add_noteheads(a3); righthand; add_noteheads(f4); end_of_char; new_char(16); lefthand; add_noteheads(c3); end_of_char; new_char(16); lefthand; add_noteheads(f2); righthand; add_noteheads(e5); add_flat(e5); beam(115,1,1,e5,117,1,1,c5,119,1,1,a5,121,1,1,c5,123,1,1,f4,125,1,1,e5); end_of_char; new_char(16); lefthand; add_noteheads(c3); beam(123,2,1,a3,124,2,1,c3,125,2,1,f2,126,2,1,c3); 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(b3); righthand; add_noteheads(d5); end_of_char; new_char(16); righthand; add_noteheads(f5); end_of_char; new_char(16); lefthand; add_noteheads(d3); righthand; add_noteheads(e5); add_flat(e5); end_of_char; new_char(16); righthand; add_noteheads(f5); beam(128,2,1,d5,129,2,1,f5,130,2,1,e5,131,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(d3); righthand; add_noteheads(e5); end_of_char; new_char(16); righthand; add_noteheads(f5); beam(132,2,1,d5,133,2,1,f5,134,2,1,e5,135,2,1,f5); end_of_char; new_char(16); lefthand; add_noteheads(b4); righthand; add_noteheads(d5); end_of_char; new_char(16); righthand; add_noteheads(f5); end_of_char; new_char(16); lefthand; add_noteheads(f3); beam(128,1,1,b3,130,1,1,d3,132,1,1,f3,134,1,1,d3,136,1,1,b4,138,1,1,f3); righthand; add_noteheads(e5); end_of_char; new_char(16); righthand; add_noteheads(f5); beam(136,2,1,d5,137,2,1,f5,138,2,1,e5,139,2,1,f5); 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_noteheads(b5); end_of_char; new_char(16); lefthand; add_noteheads(f4); righthand; add_noteheads(d5); end_of_char; new_char(16); lefthand; add_noteheads(e4); add_flat(e4); righthand; add_noteheads(c5); end_of_char; new_char(16); lefthand; add_noteheads(f4); beam(141,2,1,d4,142,2,1,f4,143,2,1,e4,144,2,1,f4); righthand; add_noteheads(d5); beam(141,2,1,b5,142,2,1,d5,143,2,1,c5,144,2,1,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); righthand; add_noteheads(d5); end_of_char; new_char(16); lefthand; add_noteheads(e4); righthand; add_noteheads(c5); end_of_char; new_char(16); lefthand; add_noteheads(f4); beam(145,2,1,d4,146,2,1,f4,147,2,1,e4,148,2,1,f4); righthand; add_noteheads(d5); beam(145,2,1,b5,146,2,1,d5,147,2,1,c5,148,2,1,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); righthand; add_noteheads(d5); end_of_char; new_char(16); lefthand; add_noteheads(e4); righthand; add_noteheads(c5); end_of_char; new_char(16); lefthand; add_noteheads(f4); beam(149,2,1,d4,150,2,1,f4,151,2,1,e4,152,2,1,f4); righthand; add_noteheads(d5); beam(149,2,1,b5,150,2,1,d5,151,2,1,c5,152,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(b4); righthand; add_noteheads(g4); end_of_char; new_char(16); lefthand; add_noteheads(d4); righthand; add_noteheads(b5); end_of_char; new_char(16); lefthand; add_noteheads(c4); righthand; add_noteheads(a5); end_of_char; new_char(16); lefthand; add_noteheads(d4); beam(154,2,1,b4,155,2,1,d4,156,2,1,c4,157,2,1,d4); righthand; add_noteheads(b5); beam(154,2,1,g4,155,2,1,b5,156,2,1,a5,157,2,1,b5); end_of_char; new_char(16); lefthand; add_noteheads(b4); righthand; add_noteheads(g4); end_of_char; new_char(16); lefthand; add_noteheads(d4); righthand; add_noteheads(b5); end_of_char; new_char(16); lefthand; add_noteheads(c4); righthand; add_noteheads(a5); end_of_char; new_char(16); lefthand; add_noteheads(d4); beam(158,2,1,b4,159,2,1,d4,160,2,1,c4,161,2,1,d4); righthand; add_noteheads(b5); beam(158,2,1,g4,159,2,1,b5,160,2,1,a5,161,2,1,b5); end_of_char; new_char(16); lefthand; add_noteheads(b4); righthand; add_noteheads(g4); end_of_char; new_char(16); lefthand; add_noteheads(d4); righthand; add_noteheads(b5); end_of_char; new_char(16); lefthand; add_noteheads(c4); righthand; add_noteheads(a5); end_of_char; new_char(16); lefthand; add_noteheads(d4); beam(162,2,1,b4,163,2,1,d4,164,2,1,c4,165,2,1,d4); righthand; add_noteheads(b5); beam(162,2,1,g4,163,2,1,b5,164,2,1,a5,165,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(g3); righthand; add_noteheads(e4); end_of_char; new_char(16); lefthand; add_noteheads(b4); end_of_char; new_char(16); lefthand; add_noteheads(a4); righthand; add_noteheads(c4); beam(167,1,1,e4,169,1,1,c4); end_of_char; new_char(16); lefthand; add_noteheads(b4); beam(167,2,1,g3,168,2,1,b4,169,2,1,a4,170,2,1,b4); end_of_char; new_char(16); lefthand; add_noteheads(g3); righthand; add_noteheads(g4); end_of_char; new_char(16); lefthand; add_noteheads(b4); end_of_char; new_char(16); lefthand; add_noteheads(a4); righthand; add_noteheads(e4); beam(171,1,1,g4,173,1,1,e4); end_of_char; new_char(16); lefthand; add_noteheads(b4); beam(171,2,1,g3,172,2,1,b4,173,2,1,a4,174,2,1,b4); end_of_char; new_char(16); lefthand; add_noteheads(g3); righthand; add_noteheads(b5); end_of_char; new_char(16); lefthand; add_noteheads(b4); end_of_char; new_char(16); lefthand; add_noteheads(a4); righthand; add_noteheads(g4); beam(175,1,1,b5,177,1,1,g4); end_of_char; new_char(16); lefthand; add_noteheads(b4); beam(175,2,1,g3,176,2,1,b4,177,2,1,a4,178,2,1,b4); 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.