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_noteheads(b3); regular_stem; righthand; add_noteheads(d5); end_of_char; new_char(16); righthand; add_noteheads(c5); end_of_char; new_char(16); righthand; add_noteheads(e5); end_of_char; new_char(16); righthand; add_noteheads(d5); end_of_char; new_char(16); lefthand; add_rest(1,0); righthand; add_noteheads(c5); end_of_char; new_char(16); righthand; add_noteheads(b5); beam(1,2,1,d5,2,2,1,c5,3,2,1,e5,4,2,1,d5,5,2,1,c5,6,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_rest(2,0); righthand; add_noteheads(g5); regular_stem; add_dot(g5); add_tie(g5); end_of_char; new_char(16); lefthand; add_noteheads(b3); end_of_char; new_char(16); lefthand; add_noteheads(c3); end_of_char; new_char(16); lefthand; add_noteheads(d3); add_sharp(d3); end_of_char; new_char(16); lefthand; add_noteheads(e3); end_of_char; new_char(16); lefthand; add_noteheads(f3); beam(9,2,1,b3,10,2,1,c3,11,2,1,d3,12,2,1,e3,13,2,1,f3); 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; close_tie(g5); add_noteheads(g5); regular_stem; add_dot(g5); add_tie(g5); end_of_char; new_char(16); lefthand; add_noteheads(f3); 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(f3); end_of_char; new_char(16); lefthand; add_noteheads(e3); beam(15,2,1,g3,16,2,1,f3,17,2,1,a4,18,2,1,g3,19,2,1,f3,20,2,1,e3); 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); regular_stem; add_dot(a4); add_tie(a4); righthand; close_tie(g5); add_noteheads(g5); end_of_char; new_char(16); righthand; add_noteheads(e4); end_of_char; new_char(16); righthand; add_noteheads(f4); end_of_char; new_char(16); righthand; add_noteheads(g4); add_sharp(g4); end_of_char; new_char(16); righthand; add_noteheads(a5); end_of_char; new_char(16); righthand; add_noteheads(b5); beam(22,2,1,g5,23,2,1,e4,24,2,1,f4,25,2,1,g4,26,2,1,a5,27,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; close_tie(a4); add_noteheads(a4); regular_stem; add_dot(a4); add_tie(a4); righthand; add_noteheads(c5); end_of_char; new_char(16); righthand; add_noteheads(b5); end_of_char; new_char(16); righthand; add_noteheads(d5); end_of_char; new_char(16); righthand; add_noteheads(c5); end_of_char; new_char(16); righthand; add_noteheads(b5); end_of_char; new_char(16); righthand; add_noteheads(a5); beam(29,2,1,c5,30,2,1,b5,31,2,1,d5,32,2,1,c5,33,2,1,b5,34,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; close_tie(a4); add_noteheads(a4); righthand; add_noteheads(f5); regular_stem; add_dot(f5); add_tie(f5); end_of_char; new_char(16); lefthand; add_noteheads(a3); end_of_char; new_char(16); lefthand; add_noteheads(b3); end_of_char; new_char(16); lefthand; add_noteheads(c3); end_of_char; new_char(16); lefthand; add_noteheads(d3); end_of_char; new_char(16); lefthand; add_noteheads(e3); beam(36,2,1,a4,37,2,1,a3,38,2,1,b3,39,2,1,c3,40,2,1,d3,41,2,1,e3); 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; close_tie(f5); add_noteheads(f5); regular_stem; add_dot(f5); add_tie(f5); end_of_char; new_char(16); lefthand; add_noteheads(e3); end_of_char; new_char(16); lefthand; add_noteheads(g3); 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(d3); beam(43,2,1,f3,44,2,1,e3,45,2,1,g3,46,2,1,f3,47,2,1,e3,48,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(g3); add_sharp(g3); add_dot(g3); righthand; close_tie(f5); add_noteheads(f5); end_of_char; new_char(16); righthand; add_noteheads(b5); end_of_char; new_char(16); righthand; add_noteheads(e5); end_of_char; new_char(16); lefthand; add_noteheads(e3); righthand; add_noteheads(d5); end_of_char; new_char(16); lefthand; add_noteheads(f3); righthand; add_noteheads(c5); end_of_char; new_char(16); lefthand; add_noteheads(g3); beam(50,1,1,g3,53,2,1,e3,54,2,1,f3,55,2,1,g3); righthand; add_noteheads(b5); beam(50,2,1,f5,51,2,1,b5,52,2,1,e5,53,2,1,d5,54,2,1,c5,55,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(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(f3); righthand; add_noteheads(d5); end_of_char; new_char(16); lefthand; add_noteheads(e3); righthand; add_noteheads(c5); end_of_char; new_char(16); lefthand; add_noteheads(d3); righthand; add_noteheads(b5); end_of_char; new_char(16); lefthand; add_noteheads(f3); beam(57,2,1,a4,58,2,1,g3,59,2,1,f3,60,2,1,e3,61,2,1,d3,62,2,1,f3); righthand; add_noteheads(a5); beam(57,2,1,c5,58,2,1,b5,59,2,1,d5,60,2,1,c5,61,2,1,b5,62,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); lefthand; add_noteheads(d3); end_of_char; new_char(16); lefthand; add_noteheads(c3); righthand; add_noteheads(e4); end_of_char; new_char(16); lefthand; add_noteheads(b3); end_of_char; new_char(16); lefthand; add_noteheads(c3); righthand; add_noteheads(a5); end_of_char; new_char(16); lefthand; add_noteheads(g2); beam(64,2,1,e3,65,2,1,d3,66,2,1,c3,67,2,1,b3,68,2,1,c3,69,2,1,g2); righthand; add_noteheads(b5); beam(64,1,1,g4,66,1,1,e4,68,2,1,a5,69,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(c5); end_of_char; new_char(16); righthand; add_noteheads(b5); end_of_char; new_char(16); lefthand; add_noteheads(f3); righthand; add_noteheads(d5); end_of_char; new_char(16); righthand; add_noteheads(c5); end_of_char; new_char(16); lefthand; add_noteheads(c3); beam(71,1,1,a4,73,1,1,f3,75,1,1,c3); righthand; add_noteheads(b5); end_of_char; new_char(16); righthand; add_noteheads(a5); beam(71,2,1,c5,72,2,1,b5,73,2,1,d5,74,2,1,c5,75,2,1,b5,76,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(d3); righthand; add_noteheads(f5); add_dot(f5); end_of_char; new_char(16); lefthand; add_noteheads(c3); end_of_char; new_char(16); lefthand; add_noteheads(e3); end_of_char; new_char(16); lefthand; add_noteheads(d3); righthand; add_noteheads(g4); add_sharp(g4); end_of_char; new_char(16); lefthand; add_noteheads(c3); righthand; add_noteheads(a5); end_of_char; new_char(16); lefthand; add_noteheads(b3); beam(78,2,1,d3,79,2,1,c3,80,2,1,e3,81,2,1,d3,82,2,1,c3,83,2,1,b3); righthand; add_noteheads(g4); beam(78,1,1,f5,81,2,1,g4,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(c3); righthand; add_noteheads(a5); end_of_char; new_char(16); lefthand; add_noteheads(d3); beam(85,2,1,c3,86,2,1,d3); righthand; add_noteheads(d5); end_of_char; new_char(32); lefthand; add_noteheads(e3); righthand; add_noteheads(b5); add_dot(b5); end_of_char; new_char(16); lefthand; add_noteheads(e2); beam(87,1,1,e3,88,1,1,e2); end_of_char; new_char(16); righthand; add_noteheads(a5); beam(85,2,1,a5,86,2,1,d5,87,1,1,b5,89,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(a3); 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(d3); end_of_char; new_char(16); lefthand; add_noteheads(e3); righthand; add_noteheads(c5); end_of_char; new_char(16); lefthand; add_noteheads(f3); righthand; add_noteheads(d5); end_of_char; new_char(16); lefthand; add_noteheads(g3); beam(91,2,1,a3,92,2,1,c3,93,2,1,d3,94,2,1,e3,95,2,1,f3,96,2,1,g3); righthand; add_noteheads(e5); beam(91,1,1,a5,94,2,1,c5,95,2,1,d5,96,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(f4); end_of_char; new_char(16); lefthand; add_noteheads(g3); end_of_char; new_char(16); lefthand; add_noteheads(b4); righthand; add_noteheads(g4); end_of_char; new_char(16); lefthand; add_noteheads(a4); end_of_char; new_char(16); lefthand; add_noteheads(g3); righthand; add_noteheads(a5); beam(98,1,1,f4,100,1,1,g4,102,1,1,a5); end_of_char; new_char(16); lefthand; add_noteheads(f3); beam(98,2,1,a4,99,2,1,g3,100,2,1,b4,101,2,1,a4,102,2,1,g3,103,2,1,f3); 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(b5); end_of_char; new_char(16); lefthand; add_noteheads(f3); end_of_char; 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(d5); add_tie(d5); beam(105,1,1,b5,107,1,1,c5,109,1,1,d5); end_of_char; new_char(16); lefthand; add_noteheads(e3); beam(105,2,1,g3,106,2,1,f3,107,2,1,a4,108,2,1,g3,109,2,1,f3,110,2,1,e3); 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; close_tie(d5); add_noteheads(d5); end_of_char; new_char(16); lefthand; add_noteheads(e3); righthand; add_noteheads(c5); end_of_char; new_char(16); lefthand; add_noteheads(g3); righthand; add_noteheads(e5); end_of_char; new_char(16); lefthand; add_noteheads(f3); righthand; add_noteheads(d5); 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(112,2,1,f3,113,2,1,e3,114,2,1,g3,115,2,1,f3,116,2,1,e3,117,2,1,d3); righthand; add_noteheads(d5); beam(112,2,1,d5,113,2,1,c5,114,2,1,e5,115,2,1,d5,116,2,1,c5,117,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(d5); end_of_char; new_char(16); lefthand; add_noteheads(a3); beam(119,1,1,a4,121,1,1,a3); 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(119,2,1,e5,120,2,1,d5,121,2,1,c5,122,2,1,b5,123,2,1,a5,124,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_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(126,2,1,f4,127,2,1,e4,128,2,1,g4,129,2,1,f4,130,2,1,e4,131,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(137,2,1,d3,138,2,1,e3); righthand; add_noteheads(d4); beam(133,2,1,a5,134,2,1,g4,135,2,1,f4,136,2,1,e4,137,2,1,f4,138,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(140,2,1,f3,141,2,1,e3,142,2,1,g3,143,2,1,f3,144,2,1,e3,145,2,1,d3); righthand; add_noteheads(d5); beam(140,1,1,a5,142,1,1,b5,144,2,1,c5,145,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(d5); beam(147,1,1,c5,149,1,1,a5,151,1,1,d5); end_of_char; new_char(16); lefthand; add_noteheads(d3); beam(147,2,1,a4,148,2,1,g3,149,2,1,f3,150,2,1,e3,151,2,1,f3,152,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(a4); righthand; add_noteheads(d5); end_of_char; new_char(16); lefthand; add_noteheads(f3); end_of_char; new_char(16); lefthand; add_noteheads(b4); righthand; add_noteheads(d4); end_of_char; new_char(16); lefthand; add_noteheads(g3); end_of_char; new_char(16); lefthand; add_noteheads(f3); righthand; add_noteheads(d5); beam(154,1,1,d5,156,1,1,d4,158,1,1,d5); end_of_char; new_char(16); lefthand; add_noteheads(e3); beam(154,2,1,a4,155,2,1,f3,156,2,1,b4,157,2,1,g3,158,2,1,f3,159,2,1,e3); 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(d5); end_of_char; new_char(16); lefthand; add_noteheads(f3); end_of_char; new_char(16); lefthand; add_noteheads(g3); righthand; add_noteheads(d4); end_of_char; new_char(16); lefthand; add_noteheads(e3); end_of_char; new_char(16); lefthand; add_noteheads(d3); righthand; add_noteheads(d5); beam(161,1,1,d5,163,1,1,d4,165,1,1,d5); end_of_char; new_char(16); lefthand; add_noteheads(c3); beam(161,2,1,a4,162,2,1,f3,163,2,1,g3,164,2,1,e3,165,2,1,d3,166,2,1,c3); 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.