drop12a.m

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

function wq = drop12a(u)
if isempty(find_system(gcs,'Name','ADD_DROP_(STS12)'))~=1
   Blk2=([gcs,'/','ADD_DROP_(STS12)']);
   n=get_param(Blk2,'s');
       
[a b]=size(u);
re=zeros(a,688);
switch (n)
    case '1'
    re=u(:,1:688);
    case '2'
    re=u(:,689:1376);
    case '3'
    re=u(:,1377:2064);
    case '4'
    re=u(:,2065:2752);
    case '5'
    re=u(:,2753:3440);
    case '6'
    re=u(:,3441:4128);
    case '7'
    re=u(:,4129:4816);
    case '8'
    re=u(:,4817:5504);
    case '9'
    re=u(:,5505:6192);
    case '10'
    re=u(:,6193:6880);
    case '11'
    re=u(:,6881:7568);
    case '12'
    re=u(:,7569:8256);
end
wq=re;
end
if isempty(find_system(gcs,'Name','ADD_DROP_(STS12)1'))~=1
   Blk21=([gcs,'/','ADD_DROP_(STS12)1']);
   n1=get_param(Blk21,'s');
       
[a b]=size(u);
re1=zeros(a,688);
switch (n1)
    case '1'
    re1=u(:,1:688);
    case '2'
    re1=u(:,689:1376);
    case '3'
    re1=u(:,1377:2064);
    case '4'
    re1=u(:,2065:2752);
    case '5'
    re1=u(:,2753:3440);
    case '6'
    re1=u(:,3441:4128);
    case '7'
    re1=u(:,4129:4816);
    case '8'
    re1=u(:,4817:5504);
    case '9'
    re1=u(:,5505:6192);
    case '10'
    re1=u(:,6193:6880);
    case '11'
    re1=u(:,6881:7568);
    case '12'
    re1=u(:,7569:8256);
end
wq=re1;
end
if isempty(find_system(gcs,'Name','ADD_DROP_(STS12)2'))~=1
   Blk22=([gcs,'/','ADD_DROP_(STS12)2']);
   n2=get_param(Blk22,'s');
       
[a b]=size(u);
re2=zeros(a,688);
switch (n2)
    case '1'
    re2=u(:,1:688);
    case '2'
    re2=u(:,689:1376);
    case '3'
    re2=u(:,1377:2064);
    case '4'
    re2=u(:,2065:2752);
    case '5'
    re2=u(:,2753:3440);
    case '6'
    re2=u(:,3441:4128);
    case '7'
    re2=u(:,4129:4816);
    case '8'
    re2=u(:,4817:5504);
    case '9'
    re2=u(:,5505:6192);
    case '10'
    re2=u(:,6193:6880);
    case '11'
    re2=u(:,6881:7568);
    case '12'
    re2=u(:,7569:8256);
end
wq=re2;
end
end