avw_poi.html

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

0540             <span class="keyword">end</span>
0541          <span class="keyword">end</span>
0542          <span class="comment">%%% End of Remove ... %%%</span>
0543          h3=line(x+1,y);
0544          pix=image(pos(1,2),pos(1,1)+1);
0545          color=round(((pix+Jmax)./(2.*Jmax)).*128);
0546          <span class="keyword">if</span> color&gt;128,
0547             color=128;
0548          <span class="keyword">elseif</span> color&lt;1,
0549             color=1;
0550          <span class="keyword">end</span>
0551          set(h3,<span class="string">'color'</span>,doublemap(color,:));
0552          <span class="comment">%%% Remove a pixel from ROI list %%%</span>
0553          a=find(pos(1,1)+1==ROI_1(:,2));
0554          b=find(pos(1,2)==ROI_1(:,3));
0555          <span class="keyword">if</span> ~isempty(a) &amp; ~isempty(b),
0556             c=0;
0557             <span class="keyword">for</span> n=1:length(a),
0558                <span class="keyword">if</span> find(a(n)==b(:)),
0559                   c=a(n);
0560                <span class="keyword">end</span>
0561             <span class="keyword">end</span>
0562             <span class="keyword">if</span> c,
0563                d=size(ROI_1);
0564                ROI_1(c,1:3)=ROI_1(d(1),1:3);
0565                ROI_1=ROI_1(1:(d(1)-1),:);
0566             <span class="keyword">end</span>
0567          <span class="keyword">end</span>
0568          <span class="comment">%%% End of Remove ... %%%</span>
0569          h3=line(x-1,y+1);
0570          pix=image(pos(1,2)+1,pos(1,1)-1);
0571          color=round(((pix+Jmax)./(2.*Jmax)).*128);
0572          <span class="keyword">if</span> color&gt;128,
0573             color=128;
0574          <span class="keyword">elseif</span> color&lt;1,
0575             color=1;
0576          <span class="keyword">end</span>
0577          set(h3,<span class="string">'color'</span>,doublemap(color,:));
0578          <span class="comment">%%% Remove a pixel from ROI list %%%</span>
0579          a=find(pos(1,1)-1==ROI_1(:,2));
0580          b=find(pos(1,2)+1==ROI_1(:,3));
0581          <span class="keyword">if</span> ~isempty(a) &amp; ~isempty(b),
0582             c=0;
0583             <span class="keyword">for</span> n=1:length(a),
0584                <span class="keyword">if</span> find(a(n)==b(:)),
0585                   c=a(n);
0586                <span class="keyword">end</span>
0587             <span class="keyword">end</span>
0588             <span class="keyword">if</span> c,
0589                d=size(ROI_1);
0590                ROI_1(c,1:3)=ROI_1(d(1),1:3);
0591                ROI_1=ROI_1(1:(d(1)-1),:);
0592             <span class="keyword">end</span>
0593          <span class="keyword">end</span>
0594          <span class="comment">%%% End of Remove ... %%%</span>
0595          h3=line(x,y+1);
0596          pix=image(pos(1,2)+1,pos(1,1));
0597          color=round(((pix+Jmax)./(2.*Jmax)).*128);
0598          <span class="keyword">if</span> color&gt;128,
0599             color=128;
0600          <span class="keyword">elseif</span> color&lt;1,
0601             color=1;
0602          <span class="keyword">end</span>
0603          set(h3,<span class="string">'color'</span>,doublemap(color,:));
0604          <span class="comment">%%% Remove a pixel from ROI list %%%</span>
0605          a=find(pos(1,1)==ROI_1(:,2));
0606          b=find(pos(1,2)+1==ROI_1(:,3));
0607          <span class="keyword">if</span> ~isempty(a) &amp; ~isempty(b),
0608             c=0;
0609             <span class="keyword">for</span> n=1:length(a),
0610                <span class="keyword">if</span> find(a(n)==b(:)),
0611                   c=a(n);
0612                <span class="keyword">end</span>
0613             <span class="keyword">end</span>
0614             <span class="keyword">if</span> c,
0615                d=size(ROI_1);
0616                ROI_1(c,1:3)=ROI_1(d(1),1:3);
0617                ROI_1=ROI_1(1:(d(1)-1),:);
0618             <span class="keyword">end</span>
0619          <span class="keyword">end</span>
0620          <span class="comment">%%% End of Remove ... %%%</span>
0621          h3=line(x+1,y+1);
0622          pix=image(pos(1,2)+1,pos(1,1)+1);
0623          color=round(((pix+Jmax)./(2.*Jmax)).*128);
0624          <span class="keyword">if</span> color&gt;128,
0625             color=128;
0626          <span class="keyword">elseif</span> color&lt;1,
0627             color=1;
0628          <span class="keyword">end</span>
0629          set(h3,<span class="string">'color'</span>,doublemap(color,:));
0630          <span class="comment">%%% Remove a pixel from ROI list %%%</span>
0631          a=find(pos(1,1)+1==ROI_1(:,2));
0632          b=find(pos(1,2)+1==ROI_1(:,3));
0633          <span class="keyword">if</span> ~isempty(a) &amp; ~isempty(b),
0634             c=0;
0635             <span class="keyword">for</span> n=1:length(a),
0636                <span class="keyword">if</span> find(a(n)==b(:)),
0637                   c=a(n);
0638                <span class="keyword">end</span>
0639             <span class="keyword">end</span>
0640             <span class="keyword">if</span> c,
0641                d=size(ROI_1);
0642                ROI_1(c,1:3)=ROI_1(d(1),1:3);
0643                ROI_1=ROI_1(1:(d(1)-1),:);
0644             <span class="keyword">end</span>
0645          <span class="keyword">end</span>
0646          <span class="comment">%%% End of Remove ... %%%</span>
0647          h3=line(x-1,y-1);
0648          pix=image(pos(1,2)-1,pos(1,1)-1);
0649          color=round(((pix+Jmax)./(2.*Jmax)).*128);
0650          <span class="keyword">if</span> color&gt;128,
0651             color=128;
0652          <span class="keyword">elseif</span> color&lt;1,
0653             color=1;
0654          <span class="keyword">end</span>
0655          set(h3,<span class="string">'color'</span>,doublemap(color,:));
0656          <span class="comment">%%% Remove a pixel from ROI list %%%</span>
0657          a=find(pos(1,1)-1==ROI_1(:,2));
0658          b=find(pos(1,2)-1==ROI_1(:,3));
0659          <span class="keyword">if</span> ~isempty(a) &amp; ~isempty(b),
0660             c=0;
0661             <span class="keyword">for</span> n=1:length(a),
0662                <span class="keyword">if</span> find(a(n)==b(:)),
0663                   c=a(n);
0664                <span class="keyword">end</span>
0665             <span class="keyword">end</span>
0666             <span class="keyword">if</span> c,
0667                d=size(ROI_1);
0668                ROI_1(c,1:3)=ROI_1(d(1),1:3);
0669                ROI_1=ROI_1(1:(d(1)-1),:);
0670             <span class="keyword">end</span>
0671          <span class="keyword">end</span>
0672          <span class="comment">%%% End of Remove ... %%%</span>
0673          ROI_1mean=mean(ROI_1(:,1));
0674          ROI_1std=std(ROI_1(:,1));
0675          ROI_1min=min(ROI_1(:,1));
0676          ROI_1max=max(ROI_1(:,1));
0677          ROI_1sum=sum(ROI_1(:,1));
0678          [ROI_1no,n]=size(ROI_1);
0679          ROI_1percent=(ROI_1sum./Jtotal).*100;
0680          set(editbox1,<span class="string">'string'</span>,num2str(ROI_1mean));
0681          set(editbox2,<span class="string">'string'</span>,num2str(ROI_1std));
0682          set(editbox3,<span class="string">'string'</span>,num2str(image(pos(1,2),pos(1,1))));
0683          set(editbox4,<span class="string">'string'</span>,num2str(ROI_1min));
0684          set(editbox5,<span class="string">'string'</span>,num2str(ROI_1max));
0685          set(editbox6,<span class="string">'string'</span>,num2str(ROI_1sum));
0686          set(editbox7,<span class="string">'string'</span>,num2str(ROI_1no));
0687          set(editbox8,<span class="string">'string'</span>,num2str(ROI_1percent));
0688       <span class="keyword">else</span>  <span class="comment">% Clear single pixel</span>
0689          h2=line(x,y);
0690          set(h2,<span class="string">'color'</span>,doublemap(color,:));
0691          <span class="comment">%%% Remove a pixel from ROI list %%%</span>
0692          a=find(pos(1,1)==ROI_1(:,2));
0693          b=find(pos(1,2)==ROI_1(:,3));
0694          <span class="keyword">if</span> ~isempty(a) &amp; ~isempty(b),
0695             c=0;
0696             <span class="keyword">for</span> n=1:length(a),
0697                <span class="keyword">if</span> find(a(n)==b(:)),
0698                   c=a(n);
0699                <span class="keyword">end</span>
0700             <span class="keyword">end</span>
0701             <span class="keyword">if</span> c,
0702                d=size(ROI_1);
0703                ROI_1(c,1:3)=ROI_1(d(1),1:3);
0704                ROI_1=ROI_1(1:(d(1)-1),:);
0705             <span class="keyword">end</span>
0706          <span class="keyword">end</span>
0707          <span class="comment">%%% End of Remove ... %%%</span>
0708          ROI_1mean=mean(ROI_1(:,1));
0709          ROI_1std=std(ROI_1(:,1));
0710          ROI_1min=min(ROI_1(:,1));
0711          ROI_1max=max(ROI_1(:,1));
0712          ROI_1sum=sum(ROI_1(:,1));
0713          [ROI_1no,n]=size(ROI_1);
0714          ROI_1percent=(ROI_1sum./Jtotal).*100;
0715          set(editbox1,<span class="string">'string'</span>,num2str(ROI_1mean));
0716          set(editbox2,<span class="string">'string'</span>,num2str(ROI_1std));
0717          set(editbox3,<span class="string">'string'</span>,num2str(image(pos(1,2),pos(1,1))));
0718          set(editbox4,<span class="string">'string'</span>,num2str(ROI_1min));
0719          set(editbox5,<span class="string">'string'</span>,num2str(ROI_1max));
0720          set(editbox6,<span class="string">'string'</span>,num2str(ROI_1sum));
0721          set(editbox7,<span class="string">'string'</span>,num2str(ROI_1no));
0722          set(editbox8,<span class="string">'string'</span>,num2str(ROI_1percent));
0723       <span class="keyword">end</span>
0724    <span class="keyword">end</span>
0725 <span class="keyword">elseif</span> selection==2,
0726    <span class="keyword">if</span>(get(rad3,<span class="string">'value'</span>)),
0727       zoom
0728    <span class="keyword">else</span>
0729       zoom off
0730    <span class="keyword">end</span>
0731 <span class="keyword">end</span></pre></div>
<hr><address>Generated on Fri 21-May-2004 12:38:21 by <strong><a href="http://www.artefact.tk/software/matlab/m2html/">m2html</a></strong> &copy; 2003</address>
</body>
</html>