insertatrama12a.asv

来自「matlab在通信原理中的应用」· ASV 代码 · 共 69 行

function ty = insertatrama12(u)
i=1; 
    while i<=50
        if isempty(find_system(gcs,'Name','ADD_DROP_(STS12)'))==1
            
            if isempty(find_system(gcs,'Name',['ADD_DROP_(STS12)',int2str(i)]))==0
                blk2=([gcs,'/','ADD_DROP_(STS12)',int2str(i)]);
                h=get_param(Blk2,'s');
                break
            end
        else
            Blk2=([gcs,'/','ADD/DROP_(STS-12)']);
            h=get_param(Blk2,'s');
            break
        end
        i=i+1;
    end
[a b]=size(u);
z=zeros(a,8640);
switch (h)
     case '12'
     z=u;
     case '11'
     z(:,1:7200)=u(:,1:7200);
     z(:,7201:7920)=u(:,7921:8640);
     z(:,7921:8640)=u(:,7201:7920);
     case '10'
     z(:,1:6480)=u(:,1:6480);
     z(:,6481:7200)=u(:,7921:8640);
     z(:,7201:8640)=u(:,6481:7920);
     case '9'
     z(:,1:5760)=u(:,1:5760);
     z(:,5761:6480)=u(:,7921:8640);
     z(:,6481:8640)=u(:,5761:7920);
     case '8'
     z(:,1:5040)=u(:,1:5040);
     z(:,5041:5760)=u(:,7921:8640);
     z(:,5761:8640)=u(:,5041:7920);
     case '7'
     z(:,1:4320)=u(:,1:4320);
     z(:,4321:5040)=u(:,7921:8640);
     z(:,5041:8640)=u(:,4321:7920);
     case '6'
     z(:,1:3600)=u(:,1:3600);
     z(:,3601:4320)=u(:,7921:8640);
     z(:,4321:8640)=u(:,3601:7920);
     case '5'
     z(:,1:2880)=u(:,1:2880);
     z(:,2881:3600)=u(:,7921:8640);
     z(:,3601:8640)=u(:,2881:7920);
     case '4'
     z(:,1:2160)=u(:,1:2160);
     z(:,2161:2880)=u(:,7921:8640);
     z(:,2881:8640)=u(:,2161:7920);
     case '3'
     z(:,1:1440)=u(:,1:1440);
     z(:,1441:2160)=u(:,7921:8640);
     z(:,2161:8640)=u(:,1441:7920);
     case '2'
     z(:,1:720)=u(:,1:720);
     z(:,721:1440)=u(:,7921:8640);
     z(:,1441:8640)=u(:,721:7920);
     case '1'     
     z(:,1:720)=u(:,7921:8640);
     z(:,721:8640)=u(:,1:7920);
end
ty=z;
end