function west_africa_map
x=imread('west_africa_map.tif');

x=x>128;

image(x);
set(gcf,'colormap',gray(2));
grid on

dc(100,50,str2mat('West','Africa'));
dc(200,175,'Mauretania');
dc(110,260,'Senegal');
dc(40,220,'Gambia');
dc(50,375,str2mat('Guinea','Bissau'));
dc(175,360,'Guinea');
dc(150,520,str2mat('Sierra','Leone'));
dc(200,450,'Liberia');
dc(400,200,'Mali');
dc(285,450,str2mat('Ivory','Coast'));
dc(385,335,str2mat('Burkina','Faso'));
dc(375,400,'Ghana');
dc(425,525,'Togo');
dc(460,375,'Benin');
dc(625,225,'Niger');
dc(575,375,'Nigeria');
dc(650,510,'Cameroon');

dl(156,414,'Temne');
dl(196,481,'Bassa');
dl(271,327,'Bambara');
dl(379,476,'Akan');
dl(363,374,'Dagara');
dl(409,446,'Ewe');
dl(506,420,'Yoruba');
dl(515,453,'Edo');
dl(510,540,'Isoko');
dl(549,491,'Ijo');
dl(566,560,'Ibibio');
dl(576,323,'Hausa');
dl(643,348,'Ngizim');
dl(665,368,'Bura');
dl(615,397,'Eggon');
dl(632,425,'Margi');
dl(585,448,'Idoma');
dl(569,466,'Igbo');
dl(641,491,'Ngwo');


%cities
cities=str2mat('Abidjan','Lagos','Niamey');

cityposx=[313.4981 476.0163 466.9875];


cityposy=[492.9574 460.7798 311.0839];

hlcity=line(cityposx',cityposy','linestyle','none','marker','o','markersize',6);
htcity=text(cityposx',cityposy',cities,'fontsize',9,'color','m','vertical','top','horizontal','center');


%details

hh=findobj('tag','country','string',str2mat('West','Africa'));
set(hh,'fontsize',12,'fontweight','bold');



%various arrows




return;

grid off
set(gca,'visible','off')


print -depsc2 west_africa_map.ps


function dc(x,y,t);
text(x,y,t,'tag','country','color','g','fontsize',9,'horizontalalignment','center');
function dl(x,y,t);
text(x,y,t,'tag','language','color','r','fontsize',10,'fontweight','bold','horizontalalignment','center');
