mode_setup; input txmfont; input texmuse; instr_no(2); key_ := -1; 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(e2); regular_stem; add_flag(1); righthand; add_noteheads(b5); end_of_char; new_char(16); righthand; add_noteheads(c4); end_of_char; new_char(16); lefthand; add_rest(1,0); righthand; add_noteheads(d4); end_of_char; new_char(16); righthand; add_noteheads(e4); end_of_char; new_char(16); lefthand; add_rest(1,0); righthand; add_noteheads(f4); end_of_char; new_char(16); righthand; add_noteheads(g4); beam(1,2,1,b5,2,2,1,c4,3,2,1,d4,4,2,1,e4,5,2,1,f4,6,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(f2); righthand; add_noteheads(a5); end_of_char; new_char(16); righthand; add_noteheads(b5); add_natural(b5); end_of_char; new_char(16); lefthand; add_noteheads(f3); righthand; add_noteheads(c5); end_of_char; new_char(16); righthand; add_noteheads(d5); end_of_char; new_char(16); lefthand; add_noteheads(d3); beam(8,1,1,f2,10,1,1,f3,12,1,1,d3); righthand; add_noteheads(e5); end_of_char; new_char(16); righthand; add_noteheads(f5); beam(8,2,1,a5,9,2,1,b5,10,2,1,c5,11,2,1,d5,12,2,1,e5,13,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(b3); add_natural(b3); 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(g2); add_sharp(g2); righthand; add_noteheads(e5); end_of_char; new_char(16); righthand; add_noteheads(d5); end_of_char; new_char(16); lefthand; add_noteheads(e2); beam(15,1,1,b3,17,1,1,g2,19,1,1,e2); righthand; add_noteheads(c5); end_of_char; new_char(16); righthand; add_noteheads(b5); add_natural(b5); beam(15,2,1,g4,16,2,1,f5,17,2,1,e5,18,2,1,d5,19,2,1,c5,20,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(a3); righthand; add_noteheads(c5); end_of_char; new_char(16); lefthand; add_noteheads(g2); add_sharp(g2); righthand; add_noteheads(b5); add_natural(b5); end_of_char; new_char(16); lefthand; add_noteheads(a3); righthand; add_noteheads(d5); end_of_char; new_char(16); lefthand; add_noteheads(b3); add_natural(b3); righthand; add_noteheads(c5); end_of_char; new_char(16); lefthand; add_noteheads(c3); righthand; add_noteheads(b5); end_of_char; new_char(16); lefthand; add_noteheads(d3); beam(22,2,1,a3,23,2,1,g2,24,2,1,a3,25,2,1,b3,26,2,1,c3,27,2,1,d3); righthand; add_noteheads(a5); beam(22,2,1,c5,23,2,1,b5,24,2,1,d5,25,2,1,c5,26,2,1,b5,27,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); regular_stem; add_dot(e3); add_tie(e3); 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(g4); end_of_char; new_char(16); righthand; add_noteheads(f4); add_sharp(f4); end_of_char; new_char(16); righthand; add_noteheads(e4); end_of_char; new_char(16); righthand; add_noteheads(d4); beam(29,2,1,g4,30,2,1,a5,31,2,1,g4,32,2,1,f4,33,2,1,e4,34,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; close_tie(e3); add_noteheads(e3); regular_stem; add_dot(e3); add_tie(e3); righthand; add_noteheads(c4); end_of_char; new_char(16); righthand; add_noteheads(d4); end_of_char; new_char(16); righthand; add_noteheads(e4); end_of_char; new_char(16); righthand; add_noteheads(f4); add_sharp(f4); end_of_char; new_char(16); righthand; add_noteheads(g4); add_sharp(g4); end_of_char; new_char(16); righthand; add_noteheads(a5); beam(36,2,1,c4,37,2,1,d4,38,2,1,e4,39,2,1,f4,40,2,1,g4,41,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(e3); add_noteheads(e3); regular_stem; add_dot(e3); add_tie(e3); righthand; add_noteheads(d4); end_of_char; new_char(16); righthand; add_noteheads(c5); end_of_char; new_char(16); righthand; add_noteheads(b5); add_natural(b5); end_of_char; new_char(16); righthand; add_noteheads(a5); end_of_char; new_char(16); righthand; add_noteheads(g4); add_sharp(g4); end_of_char; new_char(16); righthand; add_noteheads(f4); add_sharp(f4); beam(43,2,1,d4,44,2,1,c5,45,2,1,b5,46,2,1,a5,47,2,1,g4,48,2,1,f4); 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(e3); add_noteheads(e3); regular_stem; add_dot(e3); add_tie(e3); righthand; add_noteheads(e4); end_of_char; new_char(16); righthand; add_noteheads(f4); add_sharp(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); add_natural(b5); end_of_char; new_char(16); righthand; add_noteheads(c5); beam(50,2,1,e4,51,2,1,f4,52,2,1,g4,53,2,1,a5,54,2,1,b5,55,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(e3); add_noteheads(e3); regular_stem; add_dot(e3); add_tie(e3); righthand; add_noteheads(f4); add_sharp(f4); 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); righthand; add_noteheads(c5); end_of_char; new_char(16); righthand; add_noteheads(b5); add_natural(b5); end_of_char; new_char(16); righthand; add_noteheads(a5); beam(57,2,1,f4,58,2,1,e5,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; close_tie(e3); add_noteheads(e3); righthand; add_noteheads(g4); add_sharp(g4); end_of_char; new_char(16); righthand; add_noteheads(a5); end_of_char; new_char(16); lefthand; add_noteheads(e4); righthand; add_noteheads(b5); add_natural(b5); end_of_char; new_char(16); righthand; add_noteheads(c5); end_of_char; new_char(16); lefthand; add_noteheads(d4); beam(64,1,1,e3,66,1,1,e4,68,1,1,d4); righthand; add_noteheads(d5); end_of_char; new_char(16); righthand; add_noteheads(e5); beam(64,2,1,g4,65,2,1,a5,66,2,1,b5,67,2,1,c5,68,2,1,d5,69,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(c4); righthand; add_noteheads(a5); end_of_char; new_char(16); righthand; add_noteheads(f5); end_of_char; new_char(16); lefthand; add_noteheads(b4); add_natural(b4); righthand; add_noteheads(e5); end_of_char; new_char(16); righthand; add_noteheads(d5); end_of_char; new_char(16); lefthand; add_noteheads(a4); beam(71,1,1,c4,73,1,1,b4,75,1,1,a4); righthand; add_noteheads(c5); end_of_char; new_char(16); righthand; add_noteheads(b5); add_natural(b5); beam(71,2,1,a5,72,2,1,f5,73,2,1,e5,74,2,1,d5,75,2,1,c5,76,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(d4); righthand; add_noteheads(a6); end_of_char; new_char(16); righthand; add_noteheads(g5); add_sharp(g5); end_of_char; new_char(16); lefthand; add_noteheads(e4); righthand; add_noteheads(f5); add_sharp(f5); end_of_char; new_char(16); righthand; add_noteheads(e5); end_of_char; new_char(32); lefthand; add_noteheads(f4); add_natural(f4); beam(78,1,1,d4,80,1,1,e4,82,1,1,f4); righthand; add_noteheads(a6); add_tie(a6); beam(78,2,1,a6,79,2,1,g5,80,2,1,f5,81,2,1,e5,82,1,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(d4); righthand; close_tie(a6); add_noteheads(a6); end_of_char; new_char(16); righthand; add_noteheads(d5); end_of_char; new_char(32); lefthand; add_noteheads(e4); righthand; add_noteheads(b5); add_natural(b5); add_dot(b5); end_of_char; new_char(16); lefthand; add_noteheads(e3); beam(84,1,1,d4,86,1,1,e4,87,1,1,e3); end_of_char; new_char(16); righthand; add_noteheads(a5); beam(84,2,1,a6,85,2,1,d5,86,1,1,b5,88,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); add_dot(a5); end_of_char; new_char(16); lefthand; add_noteheads(a3); end_of_char; new_char(16); lefthand; add_noteheads(b3); add_flat(b3); end_of_char; new_char(16); lefthand; add_noteheads(c3); righthand; add_noteheads(a5); end_of_char; new_char(16); lefthand; add_noteheads(d3); righthand; add_noteheads(b5); add_flat(b5); end_of_char; new_char(16); lefthand; add_noteheads(e3); add_flat(e3); beam(90,2,1,a4,91,2,1,a3,92,2,1,b3,93,2,1,c3,94,2,1,d3,95,2,1,e3); righthand; add_noteheads(c5); beam(90,1,1,a5,93,2,1,a5,94,2,1,b5,95,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(f2); add_sharp(f2); righthand; add_noteheads(d4); end_of_char; new_char(16); lefthand; add_noteheads(e3); add_flat(e3); end_of_char; new_char(16); lefthand; add_noteheads(d3); righthand; add_noteheads(f4); add_sharp(f4); end_of_char; new_char(16); lefthand; add_noteheads(c3); end_of_char; new_char(16); lefthand; add_noteheads(b3); righthand; add_noteheads(a5); beam(97,1,1,d4,99,1,1,f4,101,1,1,a5); end_of_char; new_char(16); lefthand; add_noteheads(a3); beam(97,2,1,f2,98,2,1,e3,99,2,1,d3,100,2,1,c3,101,2,1,b3,102,2,1,a3); 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(g2); add_dot(g2); righthand; add_noteheads(b5); end_of_char; new_char(16); righthand; add_noteheads(g4); end_of_char; new_char(16); righthand; add_noteheads(a5); end_of_char; new_char(16); lefthand; add_noteheads(g2); righthand; add_noteheads(b5); end_of_char; new_char(16); lefthand; add_noteheads(a3); righthand; add_noteheads(c5); end_of_char; new_char(16); lefthand; add_noteheads(b3); beam(104,1,1,g2,107,2,1,g2,108,2,1,a3,109,2,1,b3); righthand; add_noteheads(d5); beam(104,2,1,b5,105,2,1,g4,106,2,1,a5,107,2,1,b5,108,2,1,c5,109,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(c2); righthand; add_noteheads(e4); end_of_char; new_char(16); righthand; add_noteheads(d5); end_of_char; new_char(16); lefthand; add_noteheads(g2); righthand; add_noteheads(c5); end_of_char; new_char(16); righthand; add_noteheads(b5); end_of_char; new_char(16); lefthand; add_noteheads(c3); beam(111,1,1,c2,113,1,1,g2,115,1,1,c3); righthand; add_noteheads(a5); end_of_char; new_char(16); righthand; add_noteheads(g4); beam(111,2,1,e4,112,2,1,d5,113,2,1,c5,114,2,1,b5,115,2,1,a5,116,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(f3); righthand; add_noteheads(a5); end_of_char; new_char(16); lefthand; add_noteheads(g3); end_of_char; new_char(16); lefthand; add_noteheads(a4); righthand; add_noteheads(f5); end_of_char; new_char(16); lefthand; add_noteheads(b4); add_natural(b4); righthand; add_noteheads(e5); end_of_char; new_char(16); lefthand; add_noteheads(c4); add_sharp(c4); righthand; add_noteheads(f5); beam(118,1,1,a5,120,2,1,f5,121,2,1,e5,122,1,1,f5); end_of_char; new_char(16); lefthand; add_noteheads(d4); beam(118,2,1,f3,119,2,1,g3,120,2,1,a4,121,2,1,b4,122,2,1,c4,123,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(e3); righthand; add_noteheads(g4); end_of_char; new_char(16); lefthand; add_noteheads(d4); end_of_char; new_char(16); lefthand; add_noteheads(c4); add_sharp(c4); righthand; add_noteheads(e5); beam(125,1,1,g4,127,1,1,e5); end_of_char; new_char(16); lefthand; add_noteheads(b4); add_natural(b4); end_of_char; new_char(16); lefthand; add_noteheads(a4); righthand; add_rest(1,0); end_of_char; new_char(16); lefthand; add_noteheads(g3); beam(125,2,1,e3,126,2,1,d4,127,2,1,c4,128,2,1,b4,129,2,1,a4,130,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(f3); righthand; add_noteheads(d5); end_of_char; new_char(16); righthand; add_noteheads(e5); end_of_char; 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(d4); beam(132,1,1,f3,134,1,1,a4,136,1,1,d4); righthand; add_noteheads(a6); end_of_char; new_char(16); righthand; add_noteheads(b6); beam(132,2,1,d5,133,2,1,e5,134,2,1,f5,135,2,1,g5,136,2,1,a6,137,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(e3); righthand; add_noteheads(c5); add_sharp(c5); end_of_char; new_char(16); righthand; add_noteheads(b6); end_of_char; new_char(16); lefthand; add_noteheads(g3); righthand; add_noteheads(a6); end_of_char; new_char(16); righthand; add_noteheads(g5); end_of_char; new_char(16); lefthand; add_noteheads(c4); add_sharp(c4); beam(139,1,1,e3,141,1,1,g3,143,1,1,c4); righthand; add_noteheads(f5); end_of_char; new_char(16); righthand; add_noteheads(e5); beam(139,2,1,c5,140,2,1,b6,141,2,1,a6,142,2,1,g5,143,2,1,f5,144,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(d3); righthand; add_noteheads(f5); 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(g3); end_of_char; new_char(16); lefthand; add_noteheads(a4); righthand; add_noteheads(g4); add_tie(g4); beam(146,1,1,f5,148,1,1,d5,150,1,1,g4); end_of_char; new_char(16); lefthand; add_noteheads(b4); beam(146,2,1,d3,147,2,1,e3,148,2,1,f3,149,2,1,g3,150,2,1,a4,151,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(c3); add_sharp(c3); righthand; close_tie(g4); add_noteheads(g4); 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); add_sharp(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(a5); end_of_char; new_char(16); lefthand; add_noteheads(e3); beam(153,2,1,c3,154,2,1,b4,155,2,1,a4,156,2,1,g3,157,2,1,f3,158,2,1,e3); righthand; add_noteheads(c5); beam(153,2,1,g4,154,2,1,d5,155,2,1,c5,156,2,1,e5,157,2,1,a5,158,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(f3); righthand; add_noteheads(d5); end_of_char; new_char(16); lefthand; add_noteheads(g3); righthand; add_noteheads(b5); add_natural(b5); end_of_char; new_char(32); lefthand; add_noteheads(a4); righthand; add_noteheads(c5); add_sharp(c5); add_dot(c5); end_of_char; new_char(16); lefthand; add_noteheads(a3); beam(160,2,1,f3,161,2,1,g3,162,1,1,a4,163,1,1,a3); end_of_char; new_char(16); righthand; add_noteheads(d5); beam(160,2,1,d5,161,2,1,b5,162,1,1,c5,164,2,1,d5); 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.