clear all;
threeD=1;
load ctd;
time=epochsec-min(epochsec);
gvars = ['gT';'gS';'gO';'gP';'gF';'gB'];
vars = [' T ';' S ';'O2 ';' pH';' F ';'OBS'];
CAX=[10 14];
%%--------------------------------------------------
%% Color Dot plots
%%--------------------------------------------------
figure(1); giffig_wide; cmp=jet(256);
for V=1:1; %length(vars);
   eval(['cvar = ' vars(V,:) ';']); 
   cax=CAX(V,:); rng=linspace(cax(1),cax(2),256); 
   % pstr=['axes(' '''' 'position' '''' ',P' int2str(V) ');']; eval(pstr);
   for p=1:length(cvar);
      [min k]=min(abs(rng-cvar(p)));
      g=plot3(Xpos(p),Ypos(p),-1*depth(p),'ko'); hold on;
      set(g,'markerfacecolor',cmp(k,:),'markeredgecolor',cmp(k,:),'markersize',5);
	end   
end
