pi_plotimagebrighten.m

基于matlab的反演程序,用于地球物理勘探中射线追踪及偏移成像程序.

function PlotImageBrighten();
h=get(gcf,'userdata');
hlabel=h(11);
hslider=h(12);
currlvl=get(hlabel,'userdata');
newlvl=get(hslider,'value');
if(currlvl>newlvl)
    nsteps=currlvl-newlvl;
    for k=1:nsteps
        brighten(-.25);
    end
elseif(currlvl<newlvl)
    nsteps=newlvl-currlvl;
    for k=1:nsteps
        brighten(.25);
    end
end
set(hlabel,'string',['Bright ' int2str(newlvl)])
set(hlabel,'userdata',newlvl);
plotimage('limboxrescale');