leepar.m

来自「德国人开发的地震处理分析软件」· M 代码 · 共 25 行

function grafpar

%global nombre;
global archant;
global lineas;
global linutilant;
global deltatant;
global factorant;
global decimant;
global delta;
global factor;
global decima;
%global Uigrafnom;
global Uigraflin;
global Uigrafdelt;
global Uigrafgan;
global Uigrafdec;

%nombre = get(Uigrafnom, 'string');archant=nombre;
lineas = str2num(get(Uigraflin, 'string'));linutilant=lineas;
delta  = str2num(get(Uigrafdelt, 'string'));deltatant=delta;
factor = str2num(get(Uigrafgan, 'string'));factorant=factor;
decima = fix(str2num(get(Uigrafdec, 'string')));decimant=decima;