sac文件读取函数matlab代码

matlab读取sac地震数据的代码，文件夹下的函数是相互关联的 要放在一起使用

function [tdataSAChdr] = fget_sac（filename）
%[tdataSAChdr] = fget_sac（filename）

% read sac into matlab 
% written by Zhigang Peng
% program called
% [head1 head2 head3 data]=sac（filename）;
% [SAChdr]=sachdr（head1 head2 head3）;

% Updated Mon Jul 30 11:21:24 PDT 2001

if nargin <1 error（‘ERROR!! No input file name‘）; end

[head1 head2 head3 data]=sac（filename）;
[SAChdr]=sachdr（head1 head2 head3）;
t = [SAChdr.times.b:SAChdr.times.delta:（SAChdr.data.trcLen-1）*SAChdr.times.delta+SAChdr.times.b]‘;

 属性            大小     日期    时间   名称
----------- ---------  ---------- -----  ----
     文件         514  2014-01-23 19:09  readsac\fget_sac.m
     文件        3424  2014-01-23 10:31  readsac\rsac.m
     文件         861  2014-01-23 19:09  readsac\sac.m
     文件        4785  2014-01-23 19:09  readsac\sachdr.m