drop12a.m

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

function wq = drop12(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)]);
                n=get_param(Blk2,'s');
                break
            end
        else
            Blk2=([gcs,'/','ADD_DROP_(STS12)']);
            n=get_param(Blk2,'s');
            break
        end
        i=i+1;
    end
[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