insertatrama.m

来自「Matlab实现SONET/SDH光通信系统simulink仿真程序源代码」· M 代码 · 共 111 行

function tyy = insertatrama(u)

if isempty(find_system(gcs,'Name','ADD'))~=1
   blk2cccc=([gcs,'/','ADD']);
   hcccc=get_param(blk2cccc,'adddrop');
   [a b]=size(u);
   tycccc=zeros(a,2160);

   switch (hcccc)

       case '1'
           tycccc(:,1:720)=u(:,1441:2160);
           tycccc(:,721:2160)=u(:,1:1440);
       case '2'
           tycccc(:,1:720)=u(:,1:720);
           tycccc(:,721:1440)=u(:,1441:2160);
           tycccc(:,1441:2160)=u(:,721:1440);
       case '3'
           tycccc=u;
       otherwise
           tycccc(:,1:720)=u(:,1441:2160);
           tycccc(:,721:2160)=u(:,1:1440);
   end
tyy=tycccc;
else
end

if isempty(find_system(gcs,'Name','ADD1'))~=1
   blk21c=([gcs,'/','ADD1']);
   h1c=get_param(blk21c,'adddrop');
   [a b]=size(u);
   ty1c=zeros(a,2160);

   switch (h1c)

       case '1'
           ty1c(:,1:720)=u(:,1441:2160);
           ty1c(:,721:2160)=u(:,1:1440);
       case '2'
           ty1c(:,1:720)=u(:,1:720);
           ty1c(:,721:1440)=u(:,1441:2160);
           ty1c(:,1441:2160)=u(:,721:1440);
       case '3'
           ty1c=u;
       otherwise
           ty1c(:,1:720)=u(:,1441:2160);
           ty1c(:,721:2160)=u(:,1:1440);
   end
tyy=ty1c;
else
end
end

% if isempty(find_system(gcs,'Name','ADD_DROP_(STS3)2'))~=1
%    blk22c=([gcs,'/','ADD_DROP_(STS3)2']);
%    h2c=get_param(blk22c,'drop');
% [a b]=size(u);
% ty2c=zeros(a,2160);
% switch (h2c)
% case '1'
%     ty2c(:,1:720)=u(:,1441:2160);
%     ty2c(:,721:2160)=u(:,1:1440);
% case '2'
%     ty2c(:,1:720)=u(:,1:720);
%     ty2c(:,721:1440)=u(:,1441:2160);
%     ty2c(:,1441:2160)=u(:,721:1440);
% case '3'
%     ty2c=u;
% end
% tyy=ty2c;
% end
% 
% if isempty(find_system(gcs,'Name','ADD_DROP_(STS3)3'))~=1
%    blk23c=([gcs,'/','ADD_DROP_(STS3)3']);
%    h3c=get_param(blk23c,'drop');
% [a b]=size(u);
% ty3c=zeros(a,2160);
% switch (h3c)
% case '1'
%     ty3c(:,1:720)=u(:,1441:2160);
%     ty3c(:,721:2160)=u(:,1:1440);
% case '2'
%     ty3c(:,1:720)=u(:,1:720);
%     ty3c(:,721:1440)=u(:,1441:2160);
%     ty3c(:,1441:2160)=u(:,721:1440);
% case '3'
%     ty3c=u;
% end
% tyy=ty3c;
% end
% 
% if isempty(find_system(gcs,'Name','ADD_DROP_(STS3)4'))~=1
%    blk24c=([gcs,'/','ADD_DROP_(STS3)4']);
%    h4c=get_param(blk24c,'drop');
% [a b]=size(u);
% ty4c=zeros(a,2160);
% switch (h4c)
% case '1'
%     ty4c(:,1:720)=u(:,1441:2160);
%     ty4c(:,721:2160)=u(:,1:1440);
% case '2'
%     ty4c(:,1:720)=u(:,1:720);
%     ty4c(:,721:1440)=u(:,1441:2160);
%     ty4c(:,1441:2160)=u(:,721:1440);
% case '3'
%     ty4c=u;
% end
% tyy=ty4c;
% end
% end