function [out]=Carrier_gen_plcp(data,guard,ploit,length_symbol);
for i=1:length_symbol
    temp((i-1)*128+1)=0;
    temp((i-1)*128+2)=0;
    temp((i-1)*128+3)=0;
    temp((i-1)*128+4)=0;
    temp((i-1)*128+5)=0;
    temp((i-1)*128+67)=0;
   
    
    temp((i-1)*128+6)=guard((i-1)*10+1);
    temp((i-1)*128+7)=guard((i-1)*10+2);
    temp((i-1)*128+8)=guard((i-1)*10+3);
    temp((i-1)*128+9)=guard((i-1)*10+4);
    temp((i-1)*128+10)=guard((i-1)*10+5);
    temp((i-1)*128+124)=guard((i-1)*10+6);
    temp((i-1)*128+125)=guard((i-1)*10+7);
    temp((i-1)*128+126)=guard((i-1)*10+8);
    temp((i-1)*128+127)=guard((i-1)*10+9);
    temp((i-1)*128+128)=guard((i-1)*10+10);
    
    for k=1:12
        temp((i-1)*128+12+(k-1)*10)=ploit((i-1)*12+k);
    end
    
    temp((i-1)*128+11)=data((i-1)*100+1);
    temp((i-1)*128+123)=data((i-1)*100+100);
    
    for k=1:9  % 從1到9  
        temp((i-1)*128+12+k)=data((i-1)*100+k+1);
    end
    
    for k=10:18  % 從10到18
        temp((i-1)*128+13+k)=data((i-1)*100+k+1);
    end
    
    for k=19:27  % 從19到27
        temp((i-1)*128+14+k)=data((i-1)*100+k+1);
    end
    
    for k=28:36  % 從28到36
        temp((i-1)*128+15+k)=data((i-1)*100+k+1);
    end
    
    for k=37:45  % 從37到45
        temp((i-1)*128+16+k)=data((i-1)*100+k+1);
    end
    
    for k=46:49  % 從46到49
        temp((i-1)*128+17+k)=data((i-1)*100+k+1);
    end
    
    for k=50:53  % 從50到53
        temp((i-1)*128+18+k)=data((i-1)*100+k+1);
    end
    
    for k=54:62  % 從54到62
        temp((i-1)*128+19+k)=data((i-1)*100+k+1);
    end
    
    for k=63:71  % 從63到71
        temp((i-1)*128+20+k)=data((i-1)*100+k+1);
    end
    
    for k=72:80  % 從72到80
        temp((i-1)*128+21+k)=data((i-1)*100+k+1);
    end
    
    for k=81:89  % 從81到89
        temp((i-1)*128+22+k)=data((i-1)*100+k+1);
    end
    
    for k=90:98  % 從90到98
        temp((i-1)*128+23+k)=data((i-1)*100+k+1);
    end
end
for i=1:length_symbol
    for k=1:62
        switch_data((i-1)*128+k)=temp((i-1)*128+k+66);
    end
    for k=63:128
        switch_data((i-1)*128+k)=temp((i-1)*128+k-62);
    end
end
out=switch_data;