mode_setup; input txmfont; input texmuse; instr_no(2); staff_1="-1,0,1,2,3"; staff_2="-1,0,1,2,3"; bar_type1=10; bar_type2=10; desired_width := 469.75499pt/pt; key_ := -3; instr_clef1:= 6; def lefthand = curr_instr:="lefthand;"; note_[index][instr_]:=currentpicture; instr_:=1; currentpicture:=note_[index][instr_]; enddef; instr_clef2:= 0; def righthand = curr_instr:="righthand;"; note_[index][instr_]:=currentpicture; instr_:=2; currentpicture:=note_[index][instr_]; enddef; new_char(32); righthand; add_noteheads(e4); end_of_char; new_char(32); righthand; add_noteheads(f5); end_of_char; new_char(32); righthand; add_noteheads(e5); end_of_char; new_char(32); righthand; add_noteheads(d5); add_flat(d5); beam(1,1,1,e4,2,1,1,f5,3,1,1,e5,4,1,1,d5); 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(d5); beam(5,2,1,c5,6,2,1,d5,7,2,1,e5,8,2,1,d5); end_of_char; new_char(32); righthand; add_noteheads(c5); end_of_char; new_char(32); righthand; add_noteheads(b5); beam(9,1,1,c5,10,1,1,b5); end_of_char; new_char(-least_spaced); lefthand; righthand; barline_(10); end_of_char; end_of_block; new_char(32); righthand; add_noteheads(a5); end_of_char; new_char(32); righthand; add_noteheads(c5); end_of_char; new_char(32); righthand; add_noteheads(e5); end_of_char; new_char(32); righthand; add_noteheads(a6); add_tie(a6); beam(12,1,1,a5,13,1,1,c5,14,1,1,e5,15,1,1,a6); end_of_char; new_char(16); righthand; close_tie(a6); 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(a6); beam(16,2,1,a6,17,2,1,f5,18,2,1,g5,19,2,1,a6); end_of_char; new_char(32); righthand; add_noteheads(b6); end_of_char; new_char(32); righthand; add_noteheads(a6); beam(20,1,1,b6,21,1,1,a6); end_of_char; new_char(-least_spaced); lefthand; righthand; barline_(10); end_of_char; end_of_block; new_char(48); righthand; add_noteheads(g5); add_dot(g5); end_of_char; new_char(8); righthand; add_noteheads(f5); end_of_char; new_char(8); righthand; add_noteheads(e5); end_of_char; new_char(8); righthand; add_noteheads(f5); beam(23,1,1,g5,24,3,1,f5,25,3,1,e5,26,3,1,f5); end_of_char; new_char(64); righthand; add_noteheads(f5); regular_stem; end_of_char; new_char(120); righthand; add_halfheads(e5); regular_stem; end_of_char; new_char(-least_spaced); lefthand; barline_(20); righthand; barline_(20); end_of_char; numeric desired_width; end_of_block; make_line(next_char); end.