beginchar(oct"137",.6em#,6cap#/7,1.5dth#); 
"Upper Bou 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 BHTA shifted(.25w,.25h);
addto currentpicture also SI shifted(.15w,-.5h);
endchar;