clc;
clear?all;

%-------------------mat文件轉換為txt文件------------------------
[filename?pathname]?=?uigetfile（?{‘*.mat‘?...
‘數據文件（*.mat）‘;?‘*.*‘?‘所有文件?（*.*）‘}?‘選擇數據文件‘）;
try
S=load（[pathname?filename]）;
fieldName?=?fieldnames（S）;
str?=?cell2mat（fieldName）;
B?=?getfield（Sstr）;
[mn]?=?size（B）;
[filename?pathname]?=?uiputfile（{‘*.txt;*.dat‘?‘