avw_poi.html

mri_toolbox是一个工具用来MRI. 来自于SourceForge, 我上传这个软件,希望能结识对医疗软件感兴趣的兄弟.

0344                <span class="keyword">end</span>
0345                <span class="keyword">if</span> c==0,
0346                   ROI_1=[ROI_1;image(pos(1,2)+1,pos(1,1)+1) pos(1,1)+1 pos(1,2)+1];
0347                <span class="keyword">end</span>
0348             <span class="keyword">end</span>
0349          <span class="keyword">else</span>
0350             ROI_1=[ROI_1;image(pos(1,2)+1,pos(1,1)+1) pos(1,1)+1 pos(1,2)+1];
0351          <span class="keyword">end</span>
0352          <span class="comment">%%% End of Check ... %%%</span>
0353          
0354          h3=line(x-1,y-1);
0355          set(h3,<span class="string">'color'</span>,<span class="string">'g'</span>);
0356          <span class="comment">%%% Check if pixel is already selected %%%</span>
0357          <span class="keyword">if</span> ~isempty(ROI_1),
0358             a=find(pos(1,1)-1==ROI_1(:,2));
0359             b=find(pos(1,2)-1==ROI_1(:,3));
0360             <span class="keyword">if</span> isempty(a),
0361                ROI_1=[ROI_1;image(pos(1,2)-1,pos(1,1)-1) pos(1,1)-1 pos(1,2)-1];
0362             <span class="keyword">elseif</span> isempty(b),
0363                ROI_1=[ROI_1;image(pos(1,2)-1,pos(1,1)-1) pos(1,1)-1 pos(1,2)-1];
0364             <span class="keyword">else</span>
0365                c=0;
0366                <span class="keyword">for</span> n=1:length(a),
0367                   <span class="keyword">if</span> find(a(n)==b(:)),
0368                      c=a(n);
0369                   <span class="keyword">end</span>
0370                <span class="keyword">end</span>
0371                <span class="keyword">if</span> c==0,
0372                   ROI_1=[ROI_1;image(pos(1,2)-1,pos(1,1)-1) pos(1,1)-1 pos(1,2)-1];
0373                <span class="keyword">end</span>
0374             <span class="keyword">end</span>
0375          <span class="keyword">else</span>
0376             ROI_1=[ROI_1;image(pos(1,2)-1,pos(1,1)-1) pos(1,1)-1 pos(1,2)-1];
0377          <span class="keyword">end</span>
0378          <span class="comment">%%% End of Check ... %%%</span>
0379          
0380          ROI_1mean=mean(ROI_1(:,1));
0381          ROI_1std=std(ROI_1(:,1));
0382          ROI_1min=min(ROI_1(:,1));
0383          ROI_1max=max(ROI_1(:,1));
0384          ROI_1sum=sum(ROI_1(:,1));
0385          [ROI_1no,n]=size(ROI_1);
0386          ROI_1percent=(ROI_1sum./Jtotal).*100;
0387          set(editbox1,<span class="string">'string'</span>,num2str(ROI_1mean));
0388          set(editbox2,<span class="string">'string'</span>,num2str(ROI_1std));
0389          set(editbox3,<span class="string">'string'</span>,num2str(image(pos(1,2),pos(1,1))));
0390          set(editbox4,<span class="string">'string'</span>,num2str(ROI_1min));
0391          set(editbox5,<span class="string">'string'</span>,num2str(ROI_1max));
0392          set(editbox6,<span class="string">'string'</span>,num2str(ROI_1sum));
0393          set(editbox7,<span class="string">'string'</span>,num2str(ROI_1no));
0394          set(editbox8,<span class="string">'string'</span>,num2str(ROI_1percent));
0395       <span class="keyword">else</span>   <span class="comment">% single pixel</span>
0396          h2=line(x,y);
0397          set(h2,<span class="string">'color'</span>,<span class="string">'g'</span>);
0398          <span class="comment">%%% Check if pixel is already selected %%%</span>
0399          <span class="keyword">if</span> ~isempty(ROI_1),
0400             a=find(pos(1,1)==ROI_1(:,2));
0401             b=find(pos(1,2)==ROI_1(:,3));
0402             <span class="keyword">if</span> isempty(a),
0403                ROI_1=[ROI_1;image(pos(1,2),pos(1,1)) pos(1,1) pos(1,2)];
0404             <span class="keyword">elseif</span> isempty(b),
0405                ROI_1=[ROI_1;image(pos(1,2),pos(1,1)) pos(1,1) pos(1,2)];
0406             <span class="keyword">else</span>
0407                c=0;
0408                <span class="keyword">for</span> n=1:length(a),
0409                   <span class="keyword">if</span> find(a(n)==b(:)),
0410                      c=a(n);
0411                   <span class="keyword">end</span>
0412                <span class="keyword">end</span>
0413                <span class="keyword">if</span> c==0,
0414                   ROI_1=[ROI_1;image(pos(1,2),pos(1,1)) pos(1,1) pos(1,2)];
0415                <span class="keyword">end</span>
0416             <span class="keyword">end</span>
0417          <span class="keyword">else</span>
0418             ROI_1=[ROI_1;image(pos(1,2),pos(1,1)) pos(1,1) pos(1,2)];
0419          <span class="keyword">end</span>
0420          <span class="comment">%%% End of Check ... %%%</span>
0421          ROI_1mean=mean(ROI_1(:,1));
0422          ROI_1std=std(ROI_1(:,1));
0423          ROI_1min=min(ROI_1(:,1));
0424          ROI_1max=max(ROI_1(:,1));
0425          ROI_1sum=sum(ROI_1(:,1));
0426          [ROI_1no,n]=size(ROI_1);
0427          ROI_1percent=(ROI_1sum./Jtotal).*100;
0428          set(editbox1,<span class="string">'string'</span>,num2str(ROI_1mean));
0429          set(editbox2,<span class="string">'string'</span>,num2str(ROI_1std));
0430          set(editbox3,<span class="string">'string'</span>,num2str(image(pos(1,2),pos(1,1))));
0431          set(editbox4,<span class="string">'string'</span>,num2str(ROI_1min));
0432          set(editbox5,<span class="string">'string'</span>,num2str(ROI_1max));
0433          set(editbox6,<span class="string">'string'</span>,num2str(ROI_1sum));
0434          set(editbox7,<span class="string">'string'</span>,num2str(ROI_1no));
0435          set(editbox8,<span class="string">'string'</span>,num2str(ROI_1percent));
0436       <span class="keyword">end</span>
0437    <span class="keyword">else</span>   <span class="comment">% Clear</span>
0438       pix=image(pos(1,2),pos(1,1));
0439       color=round(((pix+Jmax)./(2.*Jmax)).*128);
0440       <span class="keyword">if</span> color&gt;128,
0441          color=128;
0442       <span class="keyword">elseif</span> color&lt;1,
0443          color=1;
0444       <span class="keyword">end</span>
0445       <span class="keyword">if</span>(get(rad2,<span class="string">'value'</span>)),  <span class="comment">% Clear Big Block</span>
0446          h3=line(x,y);
0447          set(h3,<span class="string">'color'</span>,doublemap(color,:));
0448          <span class="comment">%%% Remove a pixel from ROI list %%%</span>
0449          a=find(pos(1,1)==ROI_1(:,2));
0450          b=find(pos(1,2)==ROI_1(:,3));
0451          <span class="keyword">if</span> ~isempty(a) &amp; ~isempty(b),
0452             c=0;
0453             <span class="keyword">for</span> n=1:length(a),
0454                <span class="keyword">if</span> find(a(n)==b(:)),
0455                   c=a(n);
0456                <span class="keyword">end</span>
0457             <span class="keyword">end</span>
0458             <span class="keyword">if</span> c,
0459                d=size(ROI_1);
0460                ROI_1(c,1:3)=ROI_1(d(1),1:3);
0461                ROI_1=ROI_1(1:(d(1)-1),:);
0462             <span class="keyword">end</span>
0463          <span class="keyword">end</span>
0464          <span class="comment">%%% End of Remove ... %%%</span>
0465          h3=line(x,y-1);
0466          pix=image(pos(1,2)-1,pos(1,1));
0467          color=round(((pix+Jmax)./(2.*Jmax)).*128);
0468          <span class="keyword">if</span> color&gt;128,
0469             color=128;
0470          <span class="keyword">elseif</span> color&lt;1,
0471             color=1;
0472          <span class="keyword">end</span>
0473          set(h3,<span class="string">'color'</span>,doublemap(color,:));
0474          <span class="comment">%%% Remove a pixel from ROI list %%%</span>
0475          a=find(pos(1,1)==ROI_1(:,2));
0476          b=find(pos(1,2)-1==ROI_1(:,3));
0477          <span class="keyword">if</span> ~isempty(a) &amp; ~isempty(b),
0478             c=0;
0479             <span class="keyword">for</span> n=1:length(a),
0480                <span class="keyword">if</span> find(a(n)==b(:)),
0481                   c=a(n);
0482                <span class="keyword">end</span>
0483             <span class="keyword">end</span>
0484             <span class="keyword">if</span> c,
0485                d=size(ROI_1);
0486                ROI_1(c,1:3)=ROI_1(d(1),1:3);
0487                ROI_1=ROI_1(1:(d(1)-1),:);
0488             <span class="keyword">end</span>
0489          <span class="keyword">end</span>
0490          <span class="comment">%%% End of Remove ... %%%</span>
0491          h3=line(x+1,y-1);
0492          pix=image(pos(1,2)-1,pos(1,1)+1);
0493          color=round(((pix+Jmax)./(2.*Jmax)).*128);
0494          <span class="keyword">if</span> color&gt;128,
0495             color=128;
0496          <span class="keyword">elseif</span> color&lt;1,
0497             color=1;
0498          <span class="keyword">end</span>
0499          set(h3,<span class="string">'color'</span>,doublemap(color,:));
0500          <span class="comment">%%% Remove a pixel from ROI list %%%</span>
0501          a=find(pos(1,1)+1==ROI_1(:,2));
0502          b=find(pos(1,2)-1==ROI_1(:,3));
0503          <span class="keyword">if</span> ~isempty(a) &amp; ~isempty(b),
0504             c=0;
0505             <span class="keyword">for</span> n=1:length(a),
0506                <span class="keyword">if</span> find(a(n)==b(:)),
0507                   c=a(n);
0508                <span class="keyword">end</span>
0509             <span class="keyword">end</span>
0510             <span class="keyword">if</span> c,
0511                d=size(ROI_1);
0512                ROI_1(c,1:3)=ROI_1(d(1),1:3);
0513                ROI_1=ROI_1(1:(d(1)-1),:);
0514             <span class="keyword">end</span>
0515          <span class="keyword">end</span>
0516          <span class="comment">%%% End of Remove ... %%%</span>
0517          h3=line(x-1,y);
0518          pix=image(pos(1,2),pos(1,1)-1);
0519          color=round(((pix+Jmax)./(2.*Jmax)).*128);
0520          <span class="keyword">if</span> color&gt;128,
0521             color=128;
0522          <span class="keyword">elseif</span> color&lt;1,
0523             color=1;
0524          <span class="keyword">end</span>
0525          set(h3,<span class="string">'color'</span>,doublemap(color,:));
0526          <span class="comment">%%% Remove a pixel from ROI list %%%</span>
0527          a=find(pos(1,1)-1==ROI_1(:,2));
0528          b=find(pos(1,2)==ROI_1(:,3));
0529          <span class="keyword">if</span> ~isempty(a) &amp; ~isempty(b),
0530             c=0;
0531             <span class="keyword">for</span> n=1:length(a),
0532                <span class="keyword">if</span> find(a(n)==b(:)),
0533                   c=a(n);
0534                <span class="keyword">end</span>
0535             <span class="keyword">end</span>
0536             <span class="keyword">if</span> c,
0537                d=size(ROI_1);
0538                ROI_1(c,1:3)=ROI_1(d(1),1:3);
0539                ROI_1=ROI_1(1:(d(1)-1),:);