a1_a2_sdh.m

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

function [h]=A1_A2_SDH(u)

[a b]=size(u);
m1=0;

for xx=1:a/9
    m1=(xx-1)*9;
    
    %A1, A2
    u((1+m1),1:48)= [1 1 1 1 0 1 1 0  1 1 1 1 0 1 1 0  1 1 1 1 0 1 1 0  0 0 1 0 1 0 0 0   0 0 1 0 1 0 0 0   0 0 1 0 1 0 0 0];
    
    %J0
    u((1+m1),49:56)= [0 0 0 0 0 0 0 0];
    
    %E1
    u((2+m1),25:32) = [0 0 0 0 0 0 0 0];
    
    %F1
    u((2+m1),49:56) = [0 0 0 0 0 0 0 0];
    
    %D1 - D3
    u((3+m1),1:8)= [0 0 0 0 0 0 0 1];
    u((3+m1),25:32)= [0 0 0 0 0 0 0 1];
    u((3+m1),49:56)= [0 0 0 0 0 0 0 1];               
    
end

   %Salida
   h=u(:,:);