mode_setup; input txmfont; input texmuse; instr_no(2); key_ := 0; desired_width := 345.0pt/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_rest(1,0); righthand; add_noteheads(d4); end_of_char; new_char(16); righthand; add_noteheads(e4); beam(1,2,1,d4,2,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_rest(0,0); righthand; add_noteheads(f4); end_of_char; new_char(16); righthand; add_noteheads(e4); end_of_char; new_char(16); righthand; add_noteheads(g4); end_of_char; new_char(16); righthand; add_noteheads(f4); end_of_char; new_char(16); lefthand; add_rest(1,0); righthand; add_noteheads(e4); end_of_char; new_char(16); righthand; add_noteheads(d4); beam(4,2,1,f4,5,2,1,e4,6,2,1,g4,7,2,1,f4,8,2,1,e4,9,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_rest(1,0); righthand; add_noteheads(a5); end_of_char; new_char(16); righthand; add_noteheads(g4); end_of_char; new_char(16); lefthand; add_rest(1,0); righthand; add_noteheads(f4); end_of_char; new_char(16); righthand; add_noteheads(e4); end_of_char; new_char(16); lefthand; add_noteheads(d3); righthand; add_noteheads(f4); end_of_char; new_char(16); lefthand; add_noteheads(e3); beam(15,2,1,d3,16,2,1,e3); righthand; add_noteheads(d4); beam(11,2,1,a5,12,2,1,g4,13,2,1,f4,14,2,1,e4,15,2,1,f4,16,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(f3); righthand; add_noteheads(a5); end_of_char; new_char(16); lefthand; add_noteheads(e3); end_of_char; new_char(16); lefthand; add_noteheads(g3); righthand; add_noteheads(b5); end_of_char; new_char(16); lefthand; add_noteheads(f3); end_of_char; new_char(16); lefthand; add_noteheads(e3); righthand; add_noteheads(c5); end_of_char; new_char(16); lefthand; add_noteheads(d3); beam(18,2,1,f3,19,2,1,e3,20,2,1,g3,21,2,1,f3,22,2,1,e3,23,2,1,d3); righthand; add_noteheads(d5); beam(18,1,1,a5,20,1,1,b5,22,2,1,c5,23,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(g3); end_of_char; new_char(16); lefthand; add_noteheads(f3); righthand; add_noteheads(a5); end_of_char; new_char(16); lefthand; add_noteheads(e3); end_of_char; new_char(16); lefthand; add_noteheads(f3); righthand; add_noteheads(c5); end_of_char; new_char(16); lefthand; add_noteheads(d3); beam(25,2,1,a4,26,2,1,g3,27,2,1,f3,28,2,1,e3,29,2,1,f3,30,2,1,d3); righthand; add_noteheads(d5); beam(25,1,1,c5,27,1,1,a5,29,2,1,c5,30,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(e5); end_of_char; new_char(16); righthand; add_noteheads(c5); end_of_char; new_char(16); lefthand; add_noteheads(a3); righthand; add_noteheads(f5); end_of_char; new_char(16); righthand; add_noteheads(d5); end_of_char; new_char(16); lefthand; add_noteheads(a4); beam(32,1,1,a4,34,1,1,a3,36,1,1,a4); righthand; add_noteheads(c5); end_of_char; new_char(16); righthand; add_noteheads(b5); beam(32,2,1,e5,33,2,1,c5,34,2,1,f5,35,2,1,d5,36,2,1,c5,37,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(a4); righthand; add_noteheads(e5); end_of_char; new_char(16); righthand; add_noteheads(c5); end_of_char; new_char(16); lefthand; add_noteheads(a3); righthand; add_noteheads(d5); end_of_char; new_char(16); righthand; add_noteheads(b5); end_of_char; new_char(16); lefthand; add_noteheads(a4); beam(39,1,1,a4,41,1,1,a3,43,1,1,a4); righthand; add_noteheads(a5); end_of_char; new_char(16); righthand; add_noteheads(g4); add_sharp(g4); beam(39,2,1,e5,40,2,1,c5,41,2,1,d5,42,2,1,b5,43,2,1,a5,44,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(a4); righthand; add_noteheads(e5); end_of_char; new_char(16); righthand; add_noteheads(c5); end_of_char; new_char(16); lefthand; add_noteheads(a3); righthand; add_noteheads(f5); end_of_char; new_char(16); righthand; add_noteheads(d5); end_of_char; new_char(16); lefthand; add_noteheads(a4); beam(46,1,1,a4,48,1,1,a3,50,1,1,a4); righthand; add_noteheads(c5); end_of_char; new_char(16); righthand; add_noteheads(b5); beam(46,2,1,e5,47,2,1,c5,48,2,1,f5,49,2,1,d5,50,2,1,c5,51,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(a4); righthand; add_noteheads(e5); end_of_char; new_char(16); righthand; add_noteheads(c5); end_of_char; new_char(16); lefthand; add_noteheads(a3); righthand; add_noteheads(d5); end_of_char; new_char(16); righthand; add_noteheads(b5); end_of_char; new_char(16); lefthand; add_noteheads(a4); beam(53,1,1,a4,55,1,1,a3,57,1,1,a4); righthand; add_noteheads(a5); end_of_char; new_char(16); righthand; add_noteheads(g4); add_sharp(g4); beam(53,2,1,e5,54,2,1,c5,55,2,1,d5,56,2,1,b5,57,2,1,a5,58,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(a4); righthand; add_noteheads(c5); end_of_char; new_char(16); righthand; add_noteheads(b5); end_of_char; new_char(16); lefthand; add_noteheads(b4); righthand; add_noteheads(d5); end_of_char; new_char(16); righthand; add_noteheads(c5); end_of_char; new_char(16); lefthand; add_noteheads(c4); beam(60,1,1,a4,62,1,1,b4,64,1,1,c4); righthand; add_noteheads(b5); end_of_char; new_char(16); righthand; add_noteheads(a5); beam(60,2,1,c5,61,2,1,b5,62,2,1,d5,63,2,1,c5,64,2,1,b5,65,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(d4); righthand; add_noteheads(f5); end_of_char; new_char(16); lefthand; add_noteheads(c4); end_of_char; new_char(16); lefthand; add_noteheads(e4); 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); add_tie(a5); beam(67,1,1,f5,69,1,1,g4,71,1,1,a5); end_of_char; new_char(16); lefthand; add_noteheads(b4); beam(67,2,1,d4,68,2,1,c4,69,2,1,e4,70,2,1,d4,71,2,1,c4,72,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; close_tie(a5); add_noteheads(a5); end_of_char; new_char(16); lefthand; add_noteheads(d4); beam(74,2,1,c4,75,2,1,d4); righthand; add_noteheads(b5); beam(74,2,1,a5,75,2,1,b5); end_of_char; new_char(32); lefthand; add_noteheads(e4); righthand; add_noteheads(b5); add_dot(b5); end_of_char; new_char(16); lefthand; add_noteheads(e3); beam(76,1,1,e4,77,1,1,e3); end_of_char; new_char(16); righthand; add_noteheads(a5); beam(76,1,1,b5,78,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); regular_stem; end_of_char; new_char(16); lefthand; add_noteheads(e3); end_of_char; new_char(16); lefthand; add_noteheads(f3); end_of_char; new_char(16); lefthand; add_noteheads(g3); add_sharp(g3); end_of_char; new_char(16); lefthand; add_noteheads(a4); righthand; add_rest(1,0); end_of_char; new_char(16); lefthand; add_noteheads(b4); beam(80,2,1,a4,81,2,1,e3,82,2,1,f3,83,2,1,g3,84,2,1,a4,85,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(1,0); end_of_char; new_char(16); lefthand; add_noteheads(b4); end_of_char; new_char(16); lefthand; add_noteheads(d4); righthand; add_noteheads(e5); end_of_char; new_char(16); lefthand; add_noteheads(c4); end_of_char; new_char(16); lefthand; add_noteheads(b4); righthand; add_noteheads(a6); add_tie(a6); beam(89,1,1,e5,91,1,1,a6); end_of_char; new_char(16); lefthand; add_noteheads(a4); beam(87,2,1,c4,88,2,1,b4,89,2,1,d4,90,2,1,c4,91,2,1,b4,92,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(e4); righthand; close_tie(a6); add_noteheads(a6); end_of_char; new_char(16); righthand; add_noteheads(b5); end_of_char; new_char(16); lefthand; add_noteheads(e3); beam(94,1,1,e4,96,1,1,e3); righthand; add_noteheads(c5); end_of_char; new_char(16); righthand; add_noteheads(d5); add_sharp(d5); end_of_char; new_char(16); lefthand; add_rest(1,0); righthand; add_noteheads(e5); end_of_char; new_char(16); righthand; add_noteheads(f5); beam(94,2,1,a6,95,2,1,b5,96,2,1,c5,97,2,1,d5,98,2,1,e5,99,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_rest(1,0); righthand; add_noteheads(g5); end_of_char; new_char(16); righthand; add_noteheads(f5); end_of_char; new_char(16); lefthand; add_noteheads(b4); righthand; add_noteheads(a6); end_of_char; new_char(16); righthand; add_noteheads(g5); end_of_char; new_char(16); lefthand; add_noteheads(e4); add_tie(e4); beam(103,1,1,b4,105,1,1,e4); righthand; add_noteheads(f5); end_of_char; new_char(16); righthand; add_noteheads(e5); beam(101,2,1,g5,102,2,1,f5,103,2,1,a6,104,2,1,g5,105,2,1,f5,106,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; close_tie(e4); add_noteheads(e4); righthand; add_noteheads(b6); end_of_char; new_char(16); lefthand; add_noteheads(f3); end_of_char; new_char(16); lefthand; add_noteheads(g3); add_sharp(g3); righthand; add_noteheads(b5); beam(108,1,1,b6,110,1,1,b5); end_of_char; new_char(16); lefthand; add_noteheads(a4); add_sharp(a4); end_of_char; new_char(16); lefthand; add_noteheads(b4); righthand; add_rest(1,0); end_of_char; new_char(16); lefthand; add_noteheads(c4); beam(108,2,1,e4,109,2,1,f3,110,2,1,g3,111,2,1,a4,112,2,1,b4,113,2,1,c4); end_of_char; new_char(-least_spaced); lefthand; clef_(0); barline_(10); righthand; barline_(10); end_of_char; end_of_block; new_char(16); lefthand; add_noteheads(d4); righthand; add_rest(1,0); end_of_char; new_char(16); lefthand; add_noteheads(c4); end_of_char; new_char(16); lefthand; add_noteheads(e4); righthand; add_noteheads(f4); end_of_char; new_char(16); lefthand; add_noteheads(d4); end_of_char; new_char(16); lefthand; add_noteheads(c4); righthand; add_noteheads(b5); add_tie(b5); beam(117,1,1,f4,119,1,1,b5); end_of_char; new_char(16); lefthand; add_noteheads(b4); beam(115,2,1,d4,116,2,1,c4,117,2,1,e4,118,2,1,d4,119,2,1,c4,120,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(f4); righthand; close_tie(b5); add_noteheads(b5); end_of_char; new_char(16); righthand; add_noteheads(a5); add_sharp(a5); end_of_char; new_char(16); lefthand; add_noteheads(f3); righthand; add_noteheads(b5); end_of_char; new_char(16); righthand; add_noteheads(c5); end_of_char; new_char(16); lefthand; add_noteheads(f4); beam(122,1,1,f4,124,1,1,f3,126,1,1,f4); righthand; add_noteheads(d5); end_of_char; new_char(16); righthand; add_noteheads(e5); beam(122,2,1,b5,123,2,1,a5,124,2,1,b5,125,2,1,c5,126,2,1,d5,127,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(d4); righthand; add_noteheads(f5); end_of_char; new_char(16); righthand; add_noteheads(e5); end_of_char; new_char(16); lefthand; add_noteheads(b5); righthand; add_noteheads(g5); end_of_char; new_char(16); lefthand; add_noteheads(a5); add_sharp(a5); righthand; add_noteheads(f5); end_of_char; new_char(16); lefthand; add_noteheads(b5); beam(129,1,1,d4,131,2,1,b5,132,2,1,a5,133,1,1,b5); righthand; add_noteheads(e5); end_of_char; new_char(16); righthand; add_noteheads(d5); beam(129,2,1,f5,130,2,1,e5,131,2,1,g5,132,2,1,f5,133,2,1,e5,134,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(c4); righthand; add_noteheads(e5); end_of_char; new_char(16); righthand; add_noteheads(d5); end_of_char; new_char(16); lefthand; add_noteheads(a5); add_sharp(a5); righthand; add_noteheads(f5); end_of_char; new_char(16); lefthand; add_noteheads(g4); add_sharp(g4); righthand; add_noteheads(e5); end_of_char; new_char(16); lefthand; add_noteheads(a5); beam(136,1,1,c4,138,2,1,a5,139,2,1,g4,140,1,1,a5); righthand; add_noteheads(d5); end_of_char; new_char(16); righthand; add_noteheads(c5); beam(136,2,1,e5,137,2,1,d5,138,2,1,f5,139,2,1,e5,140,2,1,d5,141,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; add_noteheads(b5); righthand; add_noteheads(d5); end_of_char; new_char(16); lefthand; add_noteheads(a5); add_natural(a5); righthand; add_noteheads(c5); end_of_char; new_char(16); lefthand; add_noteheads(g4); add_natural(g4); righthand; add_noteheads(e5); 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(d4); beam(143,2,1,b5,144,2,1,a5,145,2,1,g4,146,2,1,f4,147,2,1,e4,148,2,1,d4); righthand; add_noteheads(b5); beam(143,2,1,d5,144,2,1,c5,145,2,1,e5,146,2,1,d5,147,2,1,c5,148,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(e4); righthand; add_noteheads(c5); end_of_char; new_char(16); lefthand; add_noteheads(d4); end_of_char; new_char(16); lefthand; add_noteheads(f4); righthand; add_noteheads(a5); add_sharp(a5); end_of_char; new_char(16); lefthand; add_noteheads(e4); end_of_char; new_char(16); lefthand; add_noteheads(d4); righthand; add_noteheads(b5); add_tie(b5); beam(150,1,1,c5,152,1,1,a5,154,1,1,b5); end_of_char; new_char(16); lefthand; add_noteheads(c4); beam(150,2,1,e4,151,2,1,d4,152,2,1,f4,153,2,1,e4,154,2,1,d4,155,2,1,c4); end_of_char; new_char(-least_spaced); lefthand; clef_(6); barline_(10); righthand; barline_(10); end_of_char; end_of_block; new_char(16); lefthand; add_noteheads(d4); righthand; close_tie(b5); add_noteheads(b5); end_of_char; new_char(16); lefthand; add_noteheads(e4); righthand; add_noteheads(c5); end_of_char; new_char(32); lefthand; add_noteheads(f4); righthand; add_noteheads(c5); add_dot(c5); end_of_char; new_char(16); lefthand; add_noteheads(f3); beam(157,2,1,d4,158,2,1,e4,159,1,1,f4,160,1,1,f3); end_of_char; new_char(16); righthand; add_noteheads(b5); beam(157,2,1,b5,158,2,1,c5,159,1,1,c5,161,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(b4); righthand; add_noteheads(b5); end_of_char; new_char(16); righthand; add_noteheads(f4); end_of_char; new_char(16); lefthand; add_noteheads(f3); righthand; add_noteheads(g4); add_sharp(g4); end_of_char; new_char(16); righthand; add_noteheads(a5); add_sharp(a5); end_of_char; new_char(16); lefthand; add_noteheads(d3); beam(163,1,1,b4,165,1,1,f3,167,1,1,d3); righthand; add_noteheads(b5); end_of_char; new_char(16); righthand; add_noteheads(c5); beam(163,2,1,b5,164,2,1,f4,165,2,1,g4,166,2,1,a5,167,2,1,b5,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.