filfile.m

德国人开发的地震处理分析软件

function filfile

global filnombre;
global filruta;
global directorio;

cd (directorio);

[filnombre,filruta]=uigetfile('*.*','Lectura de archivos',100,100);