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