Squashed initial commit
This commit is contained in:
612
qhtcp-workflow/apps/matlab/ezview/EZvDatatip.m
Executable file
612
qhtcp-workflow/apps/matlab/ezview/EZvDatatip.m
Executable file
@@ -0,0 +1,612 @@
|
||||
% EZvDatatip 230802 attempting to fix for R2023a
|
||||
% Calls to EZdestComp.m EZmDayTrend.m
|
||||
|
||||
global ghandles
|
||||
global Exp
|
||||
global zonePB
|
||||
|
||||
RFcmpGFlg=0; %Test 180105 as it goes to EZmDayTrend.m
|
||||
lstBoxCmpFlg=0;
|
||||
curKey=get(gcf,'currentkey')
|
||||
htMapFg=0;
|
||||
|
||||
if ghandles.Iaxes1==get(htargetAxes,'Parent'),expN=1;
|
||||
elseif ghandles.Iaxes2==get(htargetAxes,'Parent'),expN=2;
|
||||
elseif ghandles.Iaxes3==get(htargetAxes,'Parent'),expN=3;
|
||||
elseif ghandles.OLaxes1==get(htargetAxes,'Parent'),OLay=1; expN=1; %zone=1; datacursormode off;
|
||||
elseif ghandles.OLaxes2==get(htargetAxes,'Parent'),OLay=2; expN=2; %zone=2; datacursormode off;
|
||||
elseif ghandles.OLaxes3==get(htargetAxes,'Parent'),OLay=3; expN=3; %zone=3; datacursormode off;
|
||||
elseif ghandles.HtMap1==get(htargetAxes,'Parent'),expN=1; htMapFg=1;
|
||||
elseif ghandles.HtMap2==get(htargetAxes,'Parent'),expN=2; htMapFg=1;
|
||||
elseif ghandles.HtMap3==get(htargetAxes,'Parent'),expN=3; htMapFg=1;
|
||||
else
|
||||
return
|
||||
end
|
||||
|
||||
if expN==1,DexpN=(get(ghandles.DN1,'value')); end
|
||||
if expN==2,DexpN=(get(ghandles.DN2,'value')); end
|
||||
if expN==3,DexpN=(get(ghandles.DN3,'value')); end
|
||||
|
||||
% Exp(expN).DexpN=DexpN;
|
||||
if strcmp(Exp(expN).DexpType,'single'), DexpN=1; end
|
||||
if exist('OLay','var'), clear ExpN; end
|
||||
if ~exist('OLay','var')
|
||||
try
|
||||
ImageSel=expN<4
|
||||
destPerMP=Exp(expN).Dexp(DexpN).destPerMP; %length(gS.DM1.drug);
|
||||
MPsel=Exp(expN).Dexp(DexpN).MPsel; %floor(get(handles.MPsldr1,'value'));
|
||||
pertSel=Exp(expN).Dexp(DexpN).pertSel; %floor(get(handles.DMsldr1,'value'));
|
||||
tPtSel=Exp(expN).Dexp(DexpN).tPtSel; %floor(get(handles.Tptsldr1,'value'));
|
||||
plateNum=Exp(expN).Dexp(DexpN).plateNum; %(MPsel1-1)*destPerMP1 + pertSel1;
|
||||
scan=Exp(expN).Dexp(DexpN).scan;
|
||||
MP=Exp(expN).Dexp(DexpN).MP;
|
||||
ptrPos=[cpos(1),cpos(2)]; %for VerticleImage
|
||||
if htMapFg==0 %Comes from spot image Iaxes
|
||||
try
|
||||
for m=1:24
|
||||
for n=1:16
|
||||
coord=Exp(expN).Dexp(DexpN).FexpScanSpots{plateNum}{m,n,tPtSel}; %replace {1} with {plateNum}
|
||||
if ptrPos(2)> coord(1) && ptrPos(2)< coord(3)
|
||||
if ptrPos(1)> coord(2) && ptrPos(1)<coord(4)
|
||||
picLoc1=[n,m];
|
||||
spotFrm=Exp(expN).Dexp(DexpN).FexpScanSpots{plateNum}{m,n,tPtSel}; %20160108
|
||||
end
|
||||
end
|
||||
end
|
||||
end
|
||||
destcompMsg='GoodDataTip';
|
||||
catch
|
||||
destcompMsg='BadDataTip';
|
||||
m
|
||||
n
|
||||
end
|
||||
plateLoc=[(17-picLoc1(1)) picLoc1(2)];
|
||||
indx=(plateLoc(1)-1)*24+plateLoc(2);
|
||||
elseif htMapFg==1 %Comes from HeatMap image Haxes
|
||||
plateLoc=ptrPos;
|
||||
indx=(plateLoc(1)-1)*24+plateLoc(2);
|
||||
end
|
||||
Exp(expN).Dexp(DexpN).spotIndx=indx;
|
||||
K=scan(1,plateNum).plate(1).CFout(indx,3); Ks=num2str(K);
|
||||
r=scan(1,plateNum).plate(1).CFout(indx,4); rs=num2str(r);
|
||||
l=scan(1,plateNum).plate(1).CFout(indx,5); Ls=num2str(l);
|
||||
try Kstr=Ks(1:5); catch, Kstr=Ks(1:length(Ks)); end
|
||||
try rstr=rs(1:5); catch, rstr=rs(1:length(rs)); end
|
||||
try Lstr=Ls(1:5); catch, Lstr=Ls(1:length(Ls)); end
|
||||
Kl=scan(1,plateNum).plate(1).CFout(indx,7);
|
||||
Ku=scan(1,plateNum).plate(1).CFout(indx,8);
|
||||
rl=scan(1,plateNum).plate(1).CFout(indx,9);
|
||||
ru=scan(1,plateNum).plate(1).CFout(indx,10);
|
||||
lfast=scan(1,plateNum).plate(1).CFout(indx,11);
|
||||
lslow=scan(1,plateNum).plate(1).CFout(indx,12);
|
||||
t=1:200;
|
||||
clear g;
|
||||
|
||||
try
|
||||
g=K ./ (1 + exp(-r.* (t - l )));
|
||||
gSlow=Kl ./ (1 + exp(-rl.* (t - lslow )));
|
||||
gFast=Ku ./ (1 + exp(-ru.* (t - lfast )));
|
||||
if K==0||r==0||l==0, g(1:200)=1;gSlow(1:200)=1;gFast(1:200)=1;end
|
||||
tser=(scan(1,plateNum).plate(1).t0Series(:));
|
||||
rawData=scan(1,plateNum).plate(1).intens(indx,:)/scan(1,plateNum).plate(1).Ag(indx);
|
||||
if expN==1, plotAxes=ghandles.Paxes1; OLaxes=ghandles.OLaxes1;
|
||||
Exp(1).traceN=Exp(1).traceN+1;
|
||||
traceN=Exp(1).traceN;
|
||||
end
|
||||
if expN==2, plotAxes=ghandles.Paxes2; OLaxes=ghandles.OLaxes2;
|
||||
Exp(2).traceN=Exp(2).traceN+1;
|
||||
traceN=Exp(2).traceN;
|
||||
end
|
||||
if expN==3, plotAxes=ghandles.Paxes3; OLaxes=ghandles.OLaxes3;
|
||||
Exp(3).traceN=Exp(3).traceN+1;
|
||||
traceN=Exp(3).traceN;
|
||||
end
|
||||
plot(plotAxes,t,g);hold(plotAxes,'on');
|
||||
plot(plotAxes,tser,rawData,'g*');
|
||||
plot(plotAxes,t,gSlow,'y');plot(plotAxes,t,gFast,'r');
|
||||
hold(plotAxes,'off');
|
||||
try
|
||||
for i=1:length(Exp(expN).hOL(:)),set(Exp(expN).hOL(i),'color',[0 0 1]); end, catch, end %ZoneRelated
|
||||
if verLessThan('matlab','8.4')
|
||||
else % accomodate new matlab changes after 2014a fix 23_0807
|
||||
tempFig=figure;
|
||||
end
|
||||
|
||||
Exp(expN).hOL(traceN)=plot(OLaxes,t,g);hold on;
|
||||
set(Exp(expN).hOL(traceN),'color',[1 0 0])
|
||||
Exp(expN).hOLb(traceN)=plot(OLaxes,tser,rawData,'g*');
|
||||
% Added for Composite Plot utility [C] 170419
|
||||
Exp(expN).ll(traceN)=l; Exp(expN).rr(traceN)=r; Exp(expN).kk(traceN)=K;
|
||||
|
||||
if verLessThan('matlab','8.4')
|
||||
else % accomodate new matlab changes after 2014a fix update 23_0807
|
||||
close(tempFig)
|
||||
end
|
||||
catch
|
||||
%{
|
||||
g=K ./ (1 + exp(-r.* (t - l )));
|
||||
if K==0||r==0||l==0, g(1:200)=1;end
|
||||
tser=(scan(1,plateNum).plate(1).t0Series(:));
|
||||
rawData=scan(1,plateNum).plate(1).intens(indx,:)/scan(1,plateNum).plate(1).Ag(indx);
|
||||
plot(plotAxes, plot(t,g),hold on,plot(tser,rawData,'g*'),hold off);
|
||||
plot(OLaxes, plot(t,g),hold on,plot(tser,rawData,'g*');
|
||||
%}
|
||||
end
|
||||
% Get the DM agar description
|
||||
if expN==1,DMstr=char(get(ghandles.DM1,'string'));end
|
||||
if expN==2,DMstr=char(get(ghandles.DM2,'string'));end
|
||||
if expN==3,DMstr=char(get(ghandles.DM3,'string'));end
|
||||
|
||||
gene=MP(1,MPsel).genename{1,1}(indx); orf=MP(1,MPsel).orf{1,1}(indx);
|
||||
spec=MP(1,MPsel).specifics{1,1}(indx); % orfrep=MP(1,plateNum).orfRep{1,1}(indx);
|
||||
tPtStr=strcat('T=', num2str(scan(1,plateNum).plate(1).t0Series(tPtSel)));
|
||||
geneOrfstr=strcat(gene,'_',orf,'_','r',num2str(plateLoc(1)),'c',num2str(plateLoc(2)),'_',tPtStr);
|
||||
grfgenestr=strcat(gene,'_',orf,'_','r',num2str(plateLoc(1)),'c',num2str(plateLoc(2)));
|
||||
selGnOrf=grfgenestr; % added for EZdestComp.m and EZmDayTrend.m
|
||||
graphStr=strcat(grfgenestr,'_','L=',Lstr,'_','r=',rstr,'_','K=',Kstr);
|
||||
spotDescrip=strcat(graphStr,'->',DMstr);
|
||||
xp=char(Exp(expN).Dexp(DexpN).resDir);
|
||||
if ispc,
|
||||
slashPos=strfind(char(Exp(expN).Dexp(DexpN).resDir),'\');
|
||||
else
|
||||
slashPos=strfind(char(Exp(expN).Dexp(DexpN).resDir),'/');
|
||||
end
|
||||
|
||||
startPos=slashPos(length(slashPos)-2) +1;
|
||||
endPos=(slashPos(length(slashPos)) -1);
|
||||
expStr={xp(startPos:endPos)};
|
||||
|
||||
Exp(expN).hOLname(traceN)=spotDescrip; % ZoneRelated %graphStr; %ghandles.Exp(expN).hOLname(traceN)=graphStr;
|
||||
Exp(expN).hOLexpNm(traceN)=expStr; % ghandles.Exp(expN).hOLexpNm(traceN)=expStr;
|
||||
Exp(expN).hOLresDir(traceN)={Exp(expN).Dexp(DexpN).resDir};
|
||||
Exp(expN).hOLplateNum(traceN)=plateNum;
|
||||
|
||||
% traceData=vertcat(get(Exp(OLay).hOL(traceN),'XData'),get(ghandles.Exp(OLay).hOL(traceN),'YData'));
|
||||
if expN==1,set(ghandles.GeneOrfLoc1,'string',geneOrfstr);end % Displays the value.
|
||||
if expN==2,set(ghandles.GeneOrfLoc2,'string',geneOrfstr);end
|
||||
if expN==3,set(ghandles.GeneOrfLoc3,'string',geneOrfstr);end
|
||||
if expN==1,set(ghandles.graphStrLoc1,'string',spotDescrip);end % graphStr);end % Displays the value.
|
||||
if expN==2,set(ghandles.graphStrLoc2,'string',spotDescrip);end % graphStr);end
|
||||
if expN==3,set(ghandles.graphStrLoc3,'string',spotDescrip);end % graphStr);end
|
||||
|
||||
try
|
||||
if expN==1, %&& get(ghandles.rotPB1,'value')~=1
|
||||
try if length(char(Exp(expN).hOLname(traceN)))>40,set(ghandles.OLay1,'FontSize',8);end, catch end
|
||||
set(ghandles.OLay1,'string', Exp(expN).hOLname(traceN));
|
||||
try if length(char(Exp(expN).hOLexpNm(traceN)))>40,set(ghandles.OLexp1,'FontSize',8);end, catch end
|
||||
set(ghandles.OLexp1,'string',Exp(expN).hOLexpNm(traceN));
|
||||
end
|
||||
if expN==2 %&& get(ghandles.rotPB2,'value') ~=1
|
||||
try if length(char(Exp(expN).hOLname(traceN)))>40,set(ghandles.OLay2,'FontSize',8);end, catch end
|
||||
set(ghandles.OLay2,'string', Exp(expN).hOLname(traceN));
|
||||
try if length(char(Exp(expN).hOLexpNm(traceN)))>40,set(ghandles.OLexp2,'FontSize',8);end, catch end
|
||||
set(ghandles.OLexp2,'string',Exp(expN).hOLexpNm(traceN));
|
||||
end
|
||||
if expN==3 %&& get(ghandles.rotPB3,'value') ~=1
|
||||
try if length(char(Exp(expN).hOLname(traceN)))>40,set(ghandles.OLay3,'FontSize',8);end, catch end
|
||||
set(ghandles.OLay3,'string', Exp(expN).hOLname(traceN));
|
||||
try if length(char(Exp(expN).hOLexpNm(traceN)))>40,set(ghandles.OLexp3,'FontSize',8);end, catch end
|
||||
set(ghandles.OLexp3,'string',Exp(expN).hOLexpNm(traceN));
|
||||
end
|
||||
catch
|
||||
end
|
||||
|
||||
%{
|
||||
if expN==1
|
||||
zonesel=1;
|
||||
set(ghandles.zoneRad1,'value',1)
|
||||
set(ghandles.zoneRad2,'value',0)
|
||||
set(ghandles.zoneRad3,'value',0)
|
||||
orfLstSel=get(ghandles.GeneOrfTog,'value');
|
||||
if orfLstSel==1
|
||||
set(ghandles.listboxGnOrf,'string',Exp(1).Dexp(DexpN).srtOrfLst)
|
||||
else
|
||||
set(ghandles.listboxGnOrf,'string',Exp(1).Dexp(DexpN).srtGnLst)
|
||||
end
|
||||
end
|
||||
|
||||
if expN==2
|
||||
zonesel=2;
|
||||
set(ghandles.zoneRad2,'value',1)
|
||||
set(ghandles.zoneRad1,'value',0)
|
||||
set(ghandles.zoneRad3,'value',0)
|
||||
orfLstSel=get(ghandles.GeneOrfTog,'value');
|
||||
if orfLstSel==1
|
||||
set(ghandles.listboxGnOrf,'string',Exp(2).Dexp(DexpN).srtOrfLst)
|
||||
else
|
||||
set(ghandles.listboxGnOrf,'string',Exp(2).Dexp(DexpN).srtGnLst)
|
||||
end
|
||||
end
|
||||
|
||||
if expN==3
|
||||
zonesel=3;
|
||||
set(ghandles.zoneRad3,'value',1)
|
||||
set(ghandles.zoneRad2,'value',0)
|
||||
set(ghandles.zoneRad1,'value',0)
|
||||
orfLstSel=get(ghandles.GeneOrfTog,'value');
|
||||
if orfLstSel==1
|
||||
set(ghandles.listboxGnOrf,'string',Exp(3).Dexp(DexpN).srtOrfLst)
|
||||
else
|
||||
set(ghandles.listboxGnOrf,'string',Exp(3).Dexp(DexpN).srtGnLst)
|
||||
end
|
||||
end
|
||||
%}
|
||||
|
||||
% Zone PB set here as replacement for zonePB radio buttons 230815
|
||||
if expN==1
|
||||
zonesel=1;
|
||||
zonePB=expN;
|
||||
set(ghandles. zonePB1,'value',1)
|
||||
set(ghandles. zonePB2,'value',0)
|
||||
set(ghandles. zonePB3,'value',0)
|
||||
set(ghandles.zonePB1,'BackgroundColor',[1.0 0.6 0.6])
|
||||
set(ghandles.zonePB2,'BackgroundColor',[1.0 1.0 1.0])
|
||||
set(ghandles.zonePB3,'BackgroundColor',[1.0 1.0 1.0])
|
||||
orfLstSel=get(ghandles.GeneOrfTog,'value');
|
||||
if orfLstSel==1
|
||||
set(ghandles.listboxGnOrf,'string',Exp(1).Dexp(DexpN).srtOrfLst)
|
||||
else
|
||||
set(ghandles.listboxGnOrf,'string',Exp(1).Dexp(DexpN).srtGnLst)
|
||||
end
|
||||
end
|
||||
|
||||
if expN==2
|
||||
zonesel=2;
|
||||
zonePB=expN;
|
||||
set(ghandles. zonePB2,'value',1)
|
||||
set(ghandles. zonePB1,'value',0)
|
||||
set(ghandles. zonePB3,'value',0)
|
||||
set(ghandles.zonePB2,'BackgroundColor',[1.0 0.6 0.6])
|
||||
set(ghandles.zonePB1,'BackgroundColor',[1.0 1.0 1.0])
|
||||
set(ghandles.zonePB3,'BackgroundColor',[1.0 1.0 1.0])
|
||||
orfLstSel=get(ghandles.GeneOrfTog,'value');
|
||||
if orfLstSel==1
|
||||
set(ghandles.listboxGnOrf,'string',Exp(2).Dexp(DexpN).srtOrfLst)
|
||||
else
|
||||
set(ghandles.listboxGnOrf,'string',Exp(2).Dexp(DexpN).srtGnLst)
|
||||
end
|
||||
end
|
||||
|
||||
if expN==3
|
||||
zonesel=3;
|
||||
zonePB=expN;
|
||||
set(ghandles. zonePB3,'value',1)
|
||||
set(ghandles. zonePB2,'value',0)
|
||||
set(ghandles. zonePB1,'value',0)
|
||||
set(ghandles.zonePB3,'BackgroundColor',[1.0 0.6 0.6])
|
||||
set(ghandles.zonePB1,'BackgroundColor',[1.0 1.0 1.0])
|
||||
set(ghandles.zonePB2,'BackgroundColor',[1.0 1.0 1.0])
|
||||
orfLstSel=get(ghandles.GeneOrfTog,'value');
|
||||
if orfLstSel==1
|
||||
set(ghandles.listboxGnOrf,'string',Exp(3).Dexp(DexpN).srtOrfLst)
|
||||
else
|
||||
set(ghandles.listboxGnOrf,'string',Exp(3).Dexp(DexpN).srtGnLst)
|
||||
end
|
||||
end
|
||||
|
||||
Exp(expN).Trace(traceN).UsrGLB=geneOrfstr;
|
||||
Exp(expN).Trace(traceN).dmSel=pertSel;
|
||||
Exp(expN).Trace(traceN).DexpN=DexpN;
|
||||
Exp(expN).Trace(traceN).Dexp(DexpN).DM(pertSel).UsrLvals=l;
|
||||
Exp(expN).Trace(traceN).Dexp(DexpN).DM(pertSel).UsrKvals=K;
|
||||
Exp(expN).Trace(traceN).Dexp(DexpN).DM(pertSel).Usrrvals=r;
|
||||
catch
|
||||
msg='NotImage'
|
||||
end
|
||||
end
|
||||
% Write Selected Trace Info to OLAY header
|
||||
try
|
||||
OLayTest=OLay<4
|
||||
msg='OLay'
|
||||
% make all traces blue
|
||||
for i=1:length(Exp(OLay).hOL(:))
|
||||
try set(Exp(OLay).hOL(i),'color',[0 0 1]), catch end
|
||||
end
|
||||
|
||||
% if get(ghandles.rotPB1,'value')~=1,
|
||||
for i=1:length(Exp(OLay).hOL(:))
|
||||
htargetAxes
|
||||
Exp(OLay).hOL(i)
|
||||
if htargetAxes==Exp(OLay).hOL(i)
|
||||
if OLay==1 && get(ghandles.rotPB1,'value')~=1,
|
||||
set(htargetAxes,'color',[1 0 0])
|
||||
try if length(char(Exp(OLay).hOLname(i)))>40,set(ghandles.OLay1,'FontSize',8);end, catch, end
|
||||
set(ghandles.OLay1,'string', Exp(OLay).hOLname(i));
|
||||
traceLab=char(Exp(OLay).hOLname(i));
|
||||
try if length(char(Exp(OLay).hOLexpNm(i)))>40,set(ghandles.OLexp1,'FontSize',8);end, catch, end
|
||||
set(ghandles.OLexp1,'string',Exp(OLay).hOLexpNm(i));
|
||||
OLresDir=Exp(OLay).hOLresDir(i);
|
||||
Exp(OLay).hOLplateNum(i)=Exp(expN).Dexp(DexpN).plateNum %bug fix for OLay "chrono' RF_cmp( ) trend
|
||||
plateNum=Exp(expN).Dexp(DexpN).plateNum
|
||||
OLplateNum=Exp(OLay).hOLplateNum(i);
|
||||
seltraceN=i;
|
||||
end
|
||||
if OLay==2 && get(ghandles.rotPB2,'value') ~=1
|
||||
set(htargetAxes,'color',[1 0 0])
|
||||
try if length(char(Exp(OLay).hOLname(i)))>40,set(ghandles.OLay2,'FontSize',8);end, catch, end
|
||||
set(ghandles.OLay2,'string', Exp(OLay).hOLname(i));
|
||||
traceLab=char(Exp(OLay).hOLname(i));
|
||||
try if length(char(Exp(OLay).hOLexpNm(i)))>40,set(ghandles.OLexp2,'FontSize',8);end, catch, end
|
||||
set(ghandles.OLexp2,'string',Exp(OLay).hOLexpNm(i));
|
||||
OLresDir=Exp(OLay).hOLresDir(i);
|
||||
Exp(OLay).hOLplateNum(i)=Exp(expN).Dexp(DexpN).plateNum %bug fix for OLay "chrono' RF_cmp( ) trend
|
||||
plateNum=Exp(expN).Dexp(DexpN).plateNum
|
||||
OLplateNum=Exp(OLay).hOLplateNum(i);
|
||||
seltraceN=i;
|
||||
end
|
||||
if OLay==3 && get(ghandles.rotPB3,'value') ~=1
|
||||
set(htargetAxes,'color',[1 0 0])
|
||||
try if length(char(Exp(OLay).hOLname(i)))>40,set(ghandles.OLay3,'FontSize',8);end, catch, end
|
||||
set(ghandles.OLay3,'string', Exp(OLay).hOLname(i));
|
||||
traceLab=char(Exp(OLay).hOLname(i));
|
||||
try if length(char(Exp(OLay).hOLexpNm(i)))>40,set(ghandles.OLexp3,'FontSize',8);end, catch, end
|
||||
set(ghandles.OLexp3,'string',Exp(OLay).hOLexpNm(i));
|
||||
OLresDir=Exp(OLay).hOLresDir(i);
|
||||
Exp(OLay).hOLplateNum(i)=Exp(expN).Dexp(DexpN).plateNum %bug fix for OLay "chrono' RF_cmp( ) trend
|
||||
plateNum=Exp(expN).Dexp(DexpN).plateNum
|
||||
OLplateNum=Exp(OLay).hOLplateNum(i);
|
||||
seltraceN=i;
|
||||
end
|
||||
Exp(OLay).seltraceN=seltraceN;
|
||||
else
|
||||
msg='Cant Find trace'
|
||||
end
|
||||
end
|
||||
|
||||
% Extract row and col values from stored trace label for dest compare plots(EZdestComp)
|
||||
% if a RFcmp_ is selected Need alternate method.
|
||||
% if the Composite button is active, Need yet another method.
|
||||
try
|
||||
tracename=char(Exp(OLay).hOLname(seltraceN))
|
||||
pos_=strfind(tracename,'_')
|
||||
rxcy=tracename(pos_(2):pos_(3))
|
||||
cindx=strfind(rxcy,'c')
|
||||
rindx=strfind(rxcy,'r')
|
||||
LBr=str2num(rxcy((rindx+1):cindx-1))
|
||||
LBc=str2num(tracename((pos_(2)+cindx): pos_(3)-1))
|
||||
indx=((LBr-1)*24) +LBc
|
||||
grfgenestr=tracename(1:pos_(3)-1)
|
||||
scan=Exp(OLay).Dexp(DexpN).scan;
|
||||
EZdatatip=2;
|
||||
try
|
||||
tracename=char(Exp(OLay).hOLname(seltraceN))
|
||||
EZdatatip=2;
|
||||
catch
|
||||
end
|
||||
catch
|
||||
msg='Not from an OLay selected trace'
|
||||
end
|
||||
catch
|
||||
msg='Not in OLay frame-axis 0'
|
||||
end
|
||||
% Hide selected plot trace: rotPBx used for 'Hide'
|
||||
try
|
||||
OLayTest=OLay<4
|
||||
msg='OLay'
|
||||
OLay
|
||||
if get(ghandles.rotPB1,'value') ==1 && OLay==1,
|
||||
% make all traces blue
|
||||
for i=1:length(Exp(OLay).hOL(:))
|
||||
set(Exp(OLay).hOL(i),'color',[0 0 1])
|
||||
end
|
||||
for i=1:length(Exp(OLay).hOL(:))
|
||||
if htargetAxes==Exp(OLay).hOL(i)
|
||||
hidAx1traceN=i
|
||||
set(Exp(OLay).hOL(i),'Visible','off')
|
||||
set(Exp(OLay).hOLb(i),'Visible','off')
|
||||
for j=1:length(Exp(OLay).hOL(:))
|
||||
if isequal(get(Exp(OLay).hOL(j),'Visible'),'on'), maxhN=j; end
|
||||
end
|
||||
end
|
||||
if htargetAxes==Exp(OLay).hOL(i), break;end
|
||||
end
|
||||
set(Exp(OLay).hOL(maxhN),'color',[1 0 0]) %Set latest trace red
|
||||
set(Exp(OLay).hOLb(maxhN),'color',[0 1 0])
|
||||
if OLay==1
|
||||
try if length(char(Exp(OLay).hOLname(maxhN)))>40,set(ghandles.OLay1,'FontSize',8);end, catch, end
|
||||
set(ghandles.OLay1,'string', Exp(OLay).hOLname(maxhN));
|
||||
traceLab=char(Exp(OLay).hOLname(maxhN));
|
||||
try if length(char(Exp(OLay).hOLexpNm(maxhN)))>40,set(ghandles.OLexp1,'FontSize',8);end, catch, end
|
||||
set(ghandles.OLexp1,'string',Exp(OLay).hOLexpNm(maxhN));
|
||||
OLresDir=Exp(OLay).hOLresDir(maxhN);
|
||||
OLplateNum=Exp(OLay).hOLplateNum(maxhN);
|
||||
end
|
||||
end
|
||||
|
||||
% Hide
|
||||
if get(ghandles.rotPB2,'value')==1 && OLay==2, %
|
||||
for j=1:length(Exp(OLay).hOL(:)) %Set all traces blue
|
||||
try set(Exp(OLay).hOL(i),'color',[0 0 1]), catch, end
|
||||
end
|
||||
|
||||
for i=1:length(Exp(OLay).hOL(:))
|
||||
if htargetAxes==Exp(OLay).hOL(i)
|
||||
hidAx2traceN=i
|
||||
set(Exp(OLay).hOL(i),'Visible','off')
|
||||
set(Exp(OLay).hOLb(i),'Visible','off')
|
||||
for j=1:length(Exp(OLay).hOL(:))
|
||||
try if isequal(get(Exp(OLay).hOL(j),'Visible'),'on'), maxhN=j; end, catch end
|
||||
end
|
||||
end
|
||||
if htargetAxes==Exp(OLay).hOL(i), break;end
|
||||
end
|
||||
set(Exp(OLay).hOL(maxhN),'color',[1 0 0]) %Set latest trace red
|
||||
set(Exp(OLay).hOLb(maxhN),'color',[0 1 0])
|
||||
if OLay==2
|
||||
try if length(char(Exp(OLay).hOLname(maxhN)))>40,set(ghandles.OLay2,'FontSize',8);end, catch, end
|
||||
set(ghandles.OLay2,'string', Exp(OLay).hOLname(maxhN));
|
||||
traceLab=char(Exp(OLay).hOLname(maxhN));
|
||||
try if length(char(Exp(OLay).hOLexpNm(maxhN)))>40,set(ghandles.OLexp2,'FontSize',8);end, catch, end
|
||||
set(ghandles.OLexp2,'string',Exp(OLay).hOLexpNm(maxhN));
|
||||
OLresDir=Exp(OLay).hOLresDir(maxhN);
|
||||
OLplateNum=Exp(OLay).hOLplateNum(maxhN);
|
||||
end
|
||||
end
|
||||
|
||||
% Hide 3
|
||||
if get(ghandles.rotPB3,'value') ==1 && OLay==3,
|
||||
% make all traces blue
|
||||
for i=1:length(Exp(OLay).hOL(:))
|
||||
try set(Exp(OLay).hOL(i),'color',[0 0 1]), catch, end
|
||||
end
|
||||
for i=1:length(Exp(OLay).hOL(:))
|
||||
if htargetAxes==Exp(OLay).hOL(i)
|
||||
hidAx3traceN=i
|
||||
set(Exp(OLay).hOL(i),'Visible','off')
|
||||
set(Exp(OLay).hOLb(i),'Visible','off')
|
||||
for j=1:length(Exp(OLay).hOL(:))
|
||||
try if isequal(get(Exp(OLay).hOL(j),'Visible'),'on'), maxhN=j; end, catch, end
|
||||
end
|
||||
end
|
||||
if htargetAxes==Exp(OLay).hOL(i), break;end
|
||||
end
|
||||
set(Exp(OLay).hOL(maxhN),'color',[1 0 0]) %Set latest trace red
|
||||
set(Exp(OLay).hOLb(maxhN),'color',[0 1 0])
|
||||
if OLay==3
|
||||
try if length(char(Exp(OLay).hOLname(maxhN)))>40,set(ghandles.OLay3,'FontSize',8);end, catch, end
|
||||
set(ghandles.OLay3,'string', Exp(OLay).hOLname(maxhN));
|
||||
traceLab=char(Exp(OLay).hOLname(maxhN));
|
||||
try if length(char(Exp(OLay).hOLexpNm(maxhN)))>40,set(ghandles.OLexp3,'FontSize',8);end, catch, end
|
||||
set(ghandles.OLexp3,'string',Exp(OLay).hOLexpNm(maxhN));
|
||||
OLresDir=Exp(OLay).hOLresDir(maxhN);
|
||||
OLplateNum=Exp(OLay).hOLplateNum(maxhN);
|
||||
end
|
||||
end
|
||||
destcompMsg='Olay';
|
||||
catch
|
||||
msg='Not in OLay frame-axis 1'
|
||||
end
|
||||
|
||||
NoOLay=0;
|
||||
try
|
||||
OLay
|
||||
expN=OLay
|
||||
EZdatatip=2
|
||||
catch
|
||||
NoOLay=1;
|
||||
EZdatatip=1;
|
||||
end
|
||||
|
||||
if get(ghandles.spotTog,'value')==1 && NoOLay
|
||||
OLresDir=Exp(expN).Dexp(DexpN).resDir;
|
||||
OLplateNum=plateNum;
|
||||
imLoc=[picLoc1(2), picLoc1(1)];
|
||||
EZspotview(expN,DexpN, imLoc,OLresDir,OLplateNum,NoOLay)
|
||||
end
|
||||
|
||||
% GraphicPertibationComparison**15_821*OR Chrono Day Comparison
|
||||
if strcmpi(Exp(expN).DexpType,'single') ...
|
||||
|| strcmpi(Exp(expN).DexpType,'multi')
|
||||
EZdestComp
|
||||
elseif strcmpi(Exp(expN).DexpType,'chrono') ...
|
||||
&& length(Exp(expN).Dexp)>1
|
||||
EZmDayTrend
|
||||
end
|
||||
|
||||
% spotTog && ~Hide && Olay Capture spot location for spotview May need to
|
||||
% add DexpN BUT the OLresDir likely get spotview to where it needs to go.
|
||||
try
|
||||
if exist('OLay') %User clicked on an Overlay
|
||||
if get(ghandles.spotTog,'value')==1 && get(ghandles.rotPB1,'value') ~=1 && OLay<4
|
||||
msg='OLay with SpotTog On and Hide off'
|
||||
pos_=strfind(traceLab,'_')
|
||||
rcStr=traceLab(pos_(2)+1:pos_(3)-1)
|
||||
cPos=findstr(rcStr,'c');
|
||||
rUsr=str2num(rcStr(2:cPos-1));
|
||||
cUsr=str2num(rcStr(cPos+1:end));
|
||||
imLoc=[cUsr, (17-rUsr)]; %picLoc1 %transform horz user data to vert image for picLocation data
|
||||
OLresDir %=Exp(expN).hOLresDir(traceN);
|
||||
OLplateNum %=Exp(expN).hOLplateNum(traceN);
|
||||
EZspotview(expN, imLoc,OLresDir,OLplateNum,NoOLay)
|
||||
end
|
||||
end
|
||||
catch
|
||||
end
|
||||
[output_txt]=datatipp(obj,event_obj);
|
||||
|
||||
% HeatMap Text Field
|
||||
try
|
||||
ll=num2str(l);
|
||||
if length(ll)>5,htl=ll(1:5);else htl=ll;end
|
||||
catch
|
||||
htl=' ';
|
||||
end
|
||||
try
|
||||
kk=num2str(K);
|
||||
if length(kk)>5,htk=kk(1:5);else htk=kk;end
|
||||
catch
|
||||
htk=' ';
|
||||
end
|
||||
try
|
||||
rr=num2str(r);
|
||||
if length(rr)>5,htr=rr(1:5);else htr=rr;end
|
||||
catch
|
||||
htr=' ';
|
||||
end
|
||||
try
|
||||
n1=num2str(Exp(expN).HtMpIntN1(indx)); %num2str(Exp(expN).Dexp(DexpN).HtMpIntN1(indx));
|
||||
if length(n1)>5,N1=n1(1:5);else N1=n1; end
|
||||
htN1=strcat('_N1=',N1);
|
||||
catch
|
||||
htN1=' ';
|
||||
end
|
||||
|
||||
try
|
||||
n2=num2str(Exp(expN).HtMpIntN2(indx)); %num2str(Exp(expN).Dexp(DexpN).HtMpIntN2(indx));
|
||||
if length(n2)>5,N2=n2(1:5);else N2=n2; end
|
||||
htN2=strcat('_N2=',N2);
|
||||
catch
|
||||
htN2=' ';
|
||||
end
|
||||
if Exp(expN).htmapPBsel==1, htmapStr=strcat('K=',htk); end
|
||||
if Exp(expN).htmapPBsel==2, htmapStr=strcat('r=',htr); end
|
||||
|
||||
try
|
||||
if Exp(expN).htmapPBsel==0 || Exp(expN).htmapPBsel>2
|
||||
htmapStr=strcat('L=',htl, htN1,htN2)
|
||||
if expN==1,set(ghandles.HtMapVals1,'string',htmapStr);end
|
||||
if expN==2,set(ghandles.HtMapVals2,'string',htmapStr);end
|
||||
if expN==3,set(ghandles.HtMapVals3,'string',htmapStr);end
|
||||
end
|
||||
catch
|
||||
end
|
||||
|
||||
try
|
||||
if Exp(expN).htmapPBsel==1 || Exp(expN).htmapPBsel==2
|
||||
if expN==1,set(ghandles.HtMapVals1,'string',htmapStr);end
|
||||
if expN==2,set(ghandles.HtMapVals2,'string',htmapStr);end
|
||||
if expN==3,set(ghandles.HtMapVals3,'string',htmapStr);end
|
||||
end
|
||||
catch
|
||||
end
|
||||
|
||||
% datacursormode(gcf)
|
||||
% Test Area
|
||||
% Added 18_0105 to define RFcmpGFlg for EZmDayTrend.m when an Image spot
|
||||
% is clicked
|
||||
|
||||
tempLB=str2mat(selGnOrf)
|
||||
RFcmpGFlg=0;
|
||||
if isequal(tempLB(4:6),'cmp'), RFnum=str2double(tempLB(3));
|
||||
elseif isequal(tempLB(3:6),'cmpG'), RFcmpGFlg=1;
|
||||
elseif isequal(tempLB(3:6),'cmpP'), RFcmpGFlg=1; %I beleive handling will be the same as RFcmpG
|
||||
end
|
||||
|
||||
|
||||
%attemp to accomodate problems in newer Matlab which pops an unneccessay
|
||||
|
||||
%{
|
||||
if verLessThan('matlab','8.4') %)
|
||||
|
||||
else %accomodate new matlab changes after 2014a fix 2nd update 23_0227
|
||||
close(1)
|
||||
end
|
||||
%blank figure that the user has to minimize
|
||||
if verLessThan('matlab','8.4') %original work 23_0227 updated 23_0525 (8.4 changed to 8.3)
|
||||
|
||||
else %accomodate new matlab changes after 2014a fix 2nd update 23_0227
|
||||
clf
|
||||
end
|
||||
|
||||
%}
|
||||
|
||||
Reference in New Issue
Block a user