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