% routine to plot ads argos fixes
%fn=input('filename? ','s');
fn='ads.dat'
fid=fopen(fn);
for k=1:100;
  lin=fgetl(fid);
  if lin~=-1;
    if str2num(lin(1:2))==22|str2num(lin(1:2))==24;
      if lin(4:5)=='55';m='+';sn=1;
      elseif lin(4:5)=='93';m='*';sn=4;
      elseif lin(4:5)=='95';m='o';sn=6;
      elseif lin(4:5)=='92';m='x';sn=5;
      end;
      plot(str2num(lin(34:40))-360,str2num(lin(27:32)),m,'markersize',10,'color',['c',num2str(sn)]);
    end;
  end;
end;