beginchar(oct"376",em#,5cap#/7,2dth#); 
"Gorgon*Iporrois*Diplis";
z0 = (.25w,-.2h);
addto currentpicture also YPORROH shifted (.4w,0);
addto currentpicture also GOPGON shifted (.55w,.3h);
addto currentpicture also ENDOFWNON shifted (.1w,-h);
pickup pencircle scaled pt;
%drawdot z0;
%drawdot z0 shifted (.3w,0);
endchar;