y1pread.m

利用matlab控制3维仿真软件sonnet的工具箱

function Y=y1pRead(filename)

% This function reads y1p files, assuming "GHZ Y RI R 1.0".

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% Author: Serhend Arvas, [e-mail]    %
% Part of Patch Antenna Design Code        %
% August 2007                              %
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%


[FID, MESSAGE] = fopen(filename,'r'); %open File

% Read data in, ignoring ! and # lines
n=1;
while 1
    tline = fgetl(FID);
    if ~ischar(tline), break, end
    if ~strcmp(tline(1),'!') & ~strcmp(tline(1),'#')
        Ytext{n}=tline;
        n=n+1;
    end
end
fclose(FID); % Close file
   
% Convert Text to Numbers.
for n=1:length(Ytext)
    Y(n,:)=str2num(Ytext{n});
end

% Change Freq data to GHz.
Y(:,1)=Y(:,1)*1e9;