clf
surf(lons_zoom,lats_zoom,dem_zoom); shading interp;
hold on
contour(lons_zoom,lats_zoom,dem_zoom);
contour3(lons_zoom,lats_zoom,dem_zoom,'k');


positions=load('tungu3.txt');
hold on
plot3(positions(1,1),positions(1,2),positions(1,3)+200,'ko', 'MarkerFaceColor','k','MarkerSize',13);
text(positions(1,1)-0.03,positions(1,2),positions(1,3)+400,'ARRAY','FontSize',18) 

%plot(positions(2,1),positions(2,2),'b^', 'MarkerFaceColor','b','MarkerSize',10);
%text(positions(2,1)+0.0002,positions(2,2)-0.0001,'TREX') 

%plot(positions(3,1),positions(3,2),'b^', 'MarkerFaceColor','b','MarkerSize',10);
%text(positions(3,1)-0.001,positions(3,2)-0.0001,'TMAR') 

%plot(positions(4,1),positions(4,2),'b^', 'MarkerFaceColor','b','MarkerSize',10);
%text(positions(4,1)-0.001,positions(4,2)-0.0001,'TGRS') 

%plot(positions(5,1),positions(5,2),'b^', 'MarkerFaceColor','b','MarkerSize',10);
%text(positions(5,1)-0.001,positions(5,2)-0.0001,'TLEF') 

%plot(positions(6,1),positions(6,2),'b^', 'MarkerFaceColor','b','MarkerSize',10);
%text(positions(6,1)+0.0001,positions(6,2)-0.0001,'TBAC') 

plot3(positions(7,1),positions(7,2),positions(7,3)+200,'ko', 'MarkerFaceColor','k','MarkerSize',13);
text(positions(7,1),positions(7,2),positions(7,3)+300,'TINF','FontSize',18) 

%plot(positions(8,1),positions(8,2),'b^', 'MarkerFaceColor','b','MarkerSize',10);
%text(positions(8,1)-0.001,positions(8,2)-0.0001,'TBUG')