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(b3); add_dot(b3); righthand; add_noteheads(d5); end_of_char; new_char(16); righthand; add_noteheads(c5); add_natural(c5); end_of_char; new_char(16); righthand; add_noteheads(b5); add_flat(b5); end_of_char; new_char(16); lefthand; add_noteheads(c3); righthand; add_noteheads(a5); end_of_char; new_char(16); lefthand; add_noteheads(b3); righthand; add_noteheads(g4); end_of_char; new_char(16); lefthand; add_noteheads(a3); beam(1,1,1,b3,4,2,1,c3,5,2,1,b3,6,2,1,a3); righthand; add_noteheads(f4); beam(1,2,1,d5,2,2,1,c5,3,2,1,b5,4,2,1,a5,5,2,1,g4,6,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; add_noteheads(g2); righthand; add_noteheads(b5); end_of_char; new_char(16); lefthand; add_noteheads(b4); righthand; add_noteheads(c4); add_sharp(c4); end_of_char; new_char(16); lefthand; add_noteheads(a4); righthand; add_noteheads(d4); end_of_char; new_char(16); lefthand; add_noteheads(g3); righthand; add_noteheads(e4); end_of_char; new_char(16); lefthand; add_noteheads(f3); righthand; add_noteheads(f4); end_of_char; new_char(16); lefthand; add_noteheads(e3); beam(8,2,1,g2,9,2,1,b4,10,2,1,a4,11,2,1,g3,12,2,1,f3,13,2,1,e3); righthand; add_noteheads(g4); beam(8,2,1,b5,9,2,1,c4,10,2,1,d4,11,2,1,e4,12,2,1,f4,13,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); righthand; add_noteheads(d5); end_of_char; new_char(32); lefthand; add_noteheads(a4); righthand; add_noteheads(f4); end_of_char; new_char(16); lefthand; add_noteheads(a3); beam(15,2,1,f3,16,2,1,g3,17,1,1,a4,18,1,1,a3); righthand; add_noteheads(e4); end_of_char; new_char(16); righthand; add_noteheads(d4); beam(15,2,1,a5,16,2,1,d5,17,1,1,f4,18,2,1,e4,19,2,1,d4); end_of_char; new_char(-least_spaced); lefthand; barline_(10); righthand; barline_(10); end_of_char; end_of_block; new_char(96); lefthand; add_noteheads(d3); regular_stem; add_dot(d3); righthand; add_noteheads(d4); regular_stem; add_dot(d4); 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); showstats; end.