sigmaset.m

来自「Snake模型源码」· M 代码 · 共 19 行

% call functon for sigma edit uicontrol

function sigmagaset()
global sigma;
global SchangeInFieldType;

v = get(gcbo,'Userdata');
s = get(gcbo,'String');
vv = eval(s,num2str(v));
if vv(1) > 20 | vv(1) < 0 | s~=num2str(vv)
   vv = v; 
   set(gcbo, 'String', num2str(v))
   return
end
set(gcbo,'Userdata',vv,'String',num2str(vv))
sigma=vv;
SchangeInFieldType=1;
menu2;
return