problem with Type1 font

I have problem with typesetting six symbols from Type1 font with metapost
which refuse to read the corresponding line in given curr.map
containing just one line
bor  <bor.pfb
(the same problem arises with mp1.999 also with virtual fonts, but in 
that case helps to give the corresponding line as fontmapline directly, 
which does not help here:

%q.mp
path s;

fontmapfile "curr.map";
% fontmapline "bor  <bor.pfb";

verbatimtex
\font\astro     bor scaled 1095
\astro
etex

beginfig(4);
w:=30u; h:=24u;
s:=fullcircle xscaled w yscaled h;
a:=.5;
z0=origin;
z1=point a of s;
z2=point 2 of s;
z1=point 4-a of s;
for k=4 upto 6: z[k]=z[k-3] rotated180; endfor
i:=-1;
label(btex C  etex,z[incr i]);
label(btex \i etex,z[incr i]);
label(btex A  etex,z[incr i]);
label(btex D  etex,z[incr i]);
label(btex I  etex,z[incr i]);
label(btex U  etex,z[incr i]);
label(btex E  etex,z[incr i]);
endfig;

end

The resulting mpx file seems to be OK, but mpost or stops completely, or 
gives the following log:

This is MetaPost, version 1.999 (TeX Live 2014/W32TeX) (kpathsea version 
6.2.0)  9 MAY 2015 15:32
**\nonstopmode; input q
(c:/texlive/2013/texmf-dist/metapost/base/mpost.mp
(c:/texlive/2013/texmf-dist/metapost/base/plain.mp
Preloading the plain mem file, version 1.004) )
(./q.mp{curr.map
! Emergency stop.
l.4 fontmapfile "curr.map";
                          
buffer overflow: (1025,1024) at file ./psout.w, line 1216

Thanks for help,
Karel horak

--
http://tug.org/metapost/