mode_setup; input txmfont; input texmuse; instr_no(2); key_ := -3; 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(32); lefthand; add_rest(-2,0); righthand; add_rest(1,0); end_of_char; new_char(16); righthand; add_noteheads(c5); end_of_char; new_char(16); righthand; add_noteheads(b5); add_natural(b5); beam(2,2,1,c5,3,2,1,b5); end_of_char; new_char(16); righthand; add_noteheads(c5); 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(g4); beam(4,2,1,c5,5,2,1,d5,6,2,1,e5,7,2,1,g4); end_of_char; new_char(16); righthand; add_noteheads(a5); end_of_char; new_char(16); righthand; add_noteheads(b5); add_flat(b5); end_of_char; new_char(16); righthand; add_noteheads(a5); end_of_char; new_char(16); righthand; add_noteheads(f4); beam(8,2,1,a5,9,2,1,b5,10,2,1,a5,11,2,1,f4); 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(d5); end_of_char; new_char(16); righthand; add_noteheads(c5); beam(12,2,1,f5,13,2,1,e5,14,2,1,d5,15,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_rest(-2,0); righthand; add_noteheads(b5); add_natural(b5); end_of_char; new_char(16); righthand; add_noteheads(a6); end_of_char; new_char(16); righthand; add_noteheads(g5); end_of_char; new_char(16); righthand; add_noteheads(f5); beam(17,2,1,b5,18,2,1,a6,19,2,1,g5,20,2,1,f5); 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); beam(21,2,1,e5,22,2,1,d5,23,2,1,c5,24,2,1,b5); end_of_char; new_char(16); righthand; add_noteheads(c5); 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(d5); beam(25,2,1,c5,26,2,1,d5,27,2,1,c5,28,2,1,d5); end_of_char; new_char(48); righthand; add_noteheads(d5); add_dot(d5); end_of_char; new_char(8); righthand; add_noteheads(c5); end_of_char; new_char(8); righthand; add_noteheads(d5); beam(29,1,1,d5,30,3,1,c5,31,3,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_rest(1,0); righthand; add_noteheads(e5); end_of_char; new_char(16); righthand; add_noteheads(d5); end_of_char; new_char(16); lefthand; clef_(0); add_noteheads(c4); righthand; add_noteheads(c5); end_of_char; new_char(16); lefthand; add_noteheads(b4); add_natural(b4); beam(35,2,1,c4,36,2,1,b4); righthand; add_noteheads(d5); beam(33,2,1,e5,34,2,1,d5,35,2,1,c5,36,2,1,d5); end_of_char; new_char(16); lefthand; add_noteheads(c4); 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(e4); righthand; add_noteheads(g5); beam(37,2,1,e5,38,2,1,f5,39,1,1,g5); end_of_char; new_char(16); lefthand; add_noteheads(g3); beam(37,2,1,c4,38,2,1,d4,39,2,1,e4,40,2,1,g3); end_of_char; new_char(16); lefthand; add_noteheads(a4); righthand; add_noteheads(g5); end_of_char; new_char(16); lefthand; add_noteheads(b4); add_flat(b4); end_of_char; new_char(16); lefthand; add_noteheads(a4); righthand; add_noteheads(f5); beam(41,1,1,g5,43,1,1,f5); end_of_char; new_char(16); lefthand; add_noteheads(f3); beam(41,2,1,a4,42,2,1,b4,43,2,1,a4,44,2,1,f3); end_of_char; new_char(16); lefthand; add_noteheads(f4); righthand; add_rest(1,0); end_of_char; new_char(16); lefthand; add_noteheads(e4); end_of_char; new_char(16); lefthand; add_noteheads(d4); righthand; add_noteheads(f5); regular_stem; add_flag(1); end_of_char; new_char(16); lefthand; add_noteheads(c4); beam(45,2,1,f4,46,2,1,e4,47,2,1,d4,48,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); add_natural(b4); righthand; add_noteheads(f5); 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(50,1,1,f5,52,1,1,e5); end_of_char; new_char(16); lefthand; add_noteheads(f4); beam(50,2,1,b4,51,2,1,a5,52,2,1,g4,53,2,1,f4); end_of_char; new_char(16); lefthand; add_noteheads(e4); righthand; add_rest(1,0); end_of_char; new_char(16); lefthand; add_noteheads(d4); end_of_char; new_char(16); lefthand; add_noteheads(c4); righthand; add_noteheads(d5); regular_stem; add_flag(1); end_of_char; new_char(16); lefthand; add_noteheads(b4); beam(54,2,1,e4,55,2,1,d4,56,2,1,c4,57,2,1,b4); end_of_char; new_char(16); lefthand; add_noteheads(c4); righthand; add_noteheads(e5); 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(58,1,1,e5,60,1,1,a5); end_of_char; new_char(16); lefthand; add_noteheads(d4); beam(58,2,1,c4,59,2,1,d4,60,2,1,c4,61,2,1,d4); end_of_char; new_char(16); lefthand; add_noteheads(d4); add_dot(d4); righthand; close_tie(a5); add_noteheads(a5); end_of_char; new_char(16); righthand; add_noteheads(f4); end_of_char; new_char(16); righthand; add_noteheads(b5); end_of_char; new_char(8); lefthand; add_noteheads(c4); righthand; add_noteheads(f4); beam(62,2,1,a5,63,2,1,f4,64,2,1,b5,65,2,1,f4); end_of_char; new_char(8); lefthand; add_noteheads(d4); beam(62,1,1,d4,65,3,1,c4,66,3,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(e4); righthand; add_noteheads(g4); end_of_char; new_char(16); lefthand; add_noteheads(d4); end_of_char; new_char(16); lefthand; add_noteheads(c4); righthand; add_noteheads(e5); add_tie(e5); beam(68,1,1,g4,70,1,1,e5); end_of_char; new_char(16); lefthand; add_noteheads(d4); beam(68,2,1,e4,69,2,1,d4,70,2,1,c4,71,2,1,d4); end_of_char; new_char(16); lefthand; add_noteheads(e4); righthand; close_tie(e5); 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(g4); beam(72,2,1,e4,73,2,1,f4,74,1,1,g4); righthand; add_noteheads(e5); end_of_char; new_char(16); righthand; add_noteheads(b5); beam(72,2,1,e5,73,2,1,d5,74,2,1,e5,75,2,1,b5); end_of_char; new_char(16); lefthand; add_noteheads(g4); righthand; add_noteheads(c5); end_of_char; new_char(16); righthand; add_noteheads(e5); end_of_char; new_char(16); lefthand; add_noteheads(f4); beam(76,1,1,g4,78,1,1,f4); righthand; add_noteheads(a6); end_of_char; new_char(16); righthand; add_noteheads(g5); beam(76,2,1,c5,77,2,1,e5,78,2,1,a6,79,2,1,g5); end_of_char; new_char(16); lefthand; add_rest(1,0); righthand; add_noteheads(f5); end_of_char; new_char(16); righthand; add_noteheads(e5); end_of_char; new_char(16); lefthand; add_noteheads(f4); regular_stem; add_flag(1); righthand; add_noteheads(d5); end_of_char; new_char(16); righthand; add_noteheads(c5); beam(80,2,1,f5,81,2,1,e5,82,2,1,d5,83,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(f4); righthand; add_noteheads(b5); end_of_char; new_char(16); righthand; add_noteheads(d5); end_of_char; new_char(16); lefthand; add_noteheads(e4); beam(85,1,1,f4,87,1,1,e4); righthand; add_noteheads(g5); end_of_char; new_char(16); righthand; add_noteheads(f5); beam(85,2,1,b5,86,2,1,d5,87,2,1,g5,88,2,1,f5); end_of_char; new_char(16); lefthand; add_rest(1,0); righthand; add_noteheads(e5); end_of_char; new_char(16); righthand; add_noteheads(d5); end_of_char; new_char(16); lefthand; add_noteheads(d4); regular_stem; add_flag(1); righthand; add_noteheads(c5); end_of_char; new_char(16); righthand; add_noteheads(b5); beam(89,2,1,e5,90,2,1,d5,91,2,1,c5,92,2,1,b5); end_of_char; new_char(16); lefthand; add_noteheads(e4); righthand; add_noteheads(a5); end_of_char; new_char(16); righthand; add_noteheads(c5); end_of_char; new_char(16); lefthand; add_noteheads(a4); add_tie(a4); beam(93,1,1,e4,95,1,1,a4); righthand; add_noteheads(f5); end_of_char; new_char(16); righthand; add_noteheads(c5); beam(93,2,1,a5,94,2,1,c5,95,2,1,f5,96,2,1,c5); end_of_char; new_char(16); lefthand; close_tie(a4); add_noteheads(a4); righthand; add_noteheads(d5); add_dot(d5); end_of_char; new_char(16); lefthand; add_noteheads(f3); end_of_char; new_char(16); lefthand; add_noteheads(b4); end_of_char; new_char(16); lefthand; add_noteheads(f3); beam(97,2,1,a4,98,2,1,f3,99,2,1,b4,100,2,1,f3); righthand; add_noteheads(d5); beam(97,1,1,d5,100,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(g3); righthand; add_noteheads(e5); end_of_char; new_char(16); righthand; add_noteheads(b5); end_of_char; new_char(16); lefthand; add_noteheads(e4); add_tie(e4); beam(102,1,1,g3,104,1,1,e4); righthand; add_noteheads(c5); end_of_char; new_char(16); righthand; add_noteheads(b5); beam(102,2,1,e5,103,2,1,b5,104,2,1,c5,105,2,1,b5); end_of_char; new_char(16); lefthand; close_tie(e4); add_noteheads(e4); righthand; add_noteheads(g5); regular_stem; add_tie(g5); end_of_char; new_char(16); lefthand; add_noteheads(d4); end_of_char; new_char(16); lefthand; add_noteheads(e4); end_of_char; new_char(16); lefthand; add_noteheads(b4); beam(106,2,1,e4,107,2,1,d4,108,2,1,e4,109,2,1,b4); end_of_char; new_char(16); lefthand; add_noteheads(c4); righthand; close_tie(g5); add_noteheads(g5); end_of_char; new_char(16); lefthand; add_noteheads(e4); righthand; add_noteheads(b5); end_of_char; new_char(16); lefthand; add_noteheads(a5); righthand; add_noteheads(c5); end_of_char; new_char(16); lefthand; add_noteheads(g4); beam(110,2,1,c4,111,2,1,e4,112,2,1,a5,113,2,1,g4); righthand; add_noteheads(b5); beam(110,2,1,g5,111,2,1,b5,112,2,1,c5,113,2,1,b5); end_of_char; new_char(16); lefthand; add_noteheads(f4); righthand; add_noteheads(a6); regular_stem; add_tie(a6); 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(114,2,1,f4,115,2,1,e4,116,2,1,d4,117,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(a6); add_noteheads(a6); end_of_char; new_char(16); lefthand; add_noteheads(d4); righthand; add_noteheads(b5); end_of_char; new_char(16); lefthand; add_noteheads(g4); righthand; add_noteheads(e5); end_of_char; new_char(16); lefthand; add_noteheads(f4); beam(119,2,1,b4,120,2,1,d4,121,2,1,g4,122,2,1,f4); righthand; add_noteheads(d5); beam(119,2,1,a6,120,2,1,b5,121,2,1,e5,122,2,1,d5); end_of_char; new_char(16); lefthand; add_noteheads(e4); righthand; add_noteheads(g5); end_of_char; new_char(16); lefthand; add_noteheads(d4); righthand; add_noteheads(f5); end_of_char; new_char(16); lefthand; add_noteheads(c4); righthand; add_noteheads(a6); end_of_char; new_char(16); lefthand; add_noteheads(b4); beam(123,2,1,e4,124,2,1,d4,125,2,1,c4,126,2,1,b4); righthand; add_noteheads(g5); beam(123,2,1,g5,124,2,1,f5,125,2,1,a6,126,2,1,g5); end_of_char; new_char(16); lefthand; add_noteheads(a4); righthand; add_noteheads(c6); end_of_char; new_char(16); lefthand; add_noteheads(c4); righthand; add_noteheads(b6); end_of_char; new_char(16); lefthand; add_noteheads(f4); righthand; add_noteheads(a6); end_of_char; new_char(16); lefthand; add_noteheads(c4); beam(127,2,1,a4,128,2,1,c4,129,2,1,f4,130,2,1,c4); righthand; add_noteheads(g5); beam(127,2,1,c6,128,2,1,b6,129,2,1,a6,130,2,1,g5); end_of_char; new_char(16); lefthand; add_noteheads(d4); add_dot(d4); righthand; add_noteheads(f5); end_of_char; new_char(16); righthand; add_noteheads(b6); end_of_char; new_char(16); righthand; add_noteheads(a6); end_of_char; new_char(16); lefthand; add_noteheads(d4); beam(131,1,1,d4,134,2,1,d4); righthand; add_noteheads(b6); beam(131,2,1,f5,132,2,1,b6,133,2,1,a6,134,2,1,b6); 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.