beginchar(oct"027",.6em#,6cap#/7,1.5dth#); "Upper Ni Diatoniki Martiria"; save ww,hh; ww = w/6; hh = h/6; z0 = (5.7ww,5.7hh); z1 = (5.2ww,5.2hh); pickup pencircle scaled .5ww; draw z0--z1; addto currentpicture also NH shifted(.3w,.35h); addto currentpicture also BEL shifted(.15w,-.35h); endchar;