基于matlab开发的LTE中随机接入信道的源代码分析，包括发送端和接收端.rar

function [tx_frame]=bbpreamble(rx_preamble,rx_pf,rx_nRAPRBoffset,rx_Rach,rx_UDcon,rx_bandwidth) %*************************************************************** % Function description:(v.1.0_20090531_ChenYi) % This function is used for RACH/PRACH baseband signal generation in TDD-LTE; % Input parameter: % "rx_pf" is the preamble format which value is 0,1,2,3,4; % "rx_preamble" is the output of Preamble generation, a shifted ZC sequence; % "rx_nRAPRBoffset" is the PRACH Frequency Offset; % "rx_Rach" is configuration of PRACH; % "rx_UDcon" is the up/down configuration (0-6); % "rx_bandwidth" is the bandwidth with the value of 1.4 3 5 10 15 20 MHz; % Output parameter: % "tx_bbdata" is the output of PRACH baseband signal. %*************************************************************** %***********************************************DFT********************************************** zcf=fft(rx_preamble); %*****************************************mapping to PRB***************************************** %**************************define parameters********************** DRAset=[0.5 0.5 0.5 1 1 1 2 2 2 3 3 3 4 4 4 5 5 5 6 6 0.5 0.5 0.5 1 1 2 3 4 5 6 0.5 0.5 0.5 1 1 2 3 4 5 6 0.5 0.5 0.5 1 1 2 3 4 0.5 0.5 0.5 1 1 2 3 4 5 6]; rRAset=[0 1 2 0 1 2 0 1 2 0 1 2 0 1 2 0 1 2 0 1 0 1 2 0 1 0 1 2 0 1 0 0 0 0 0 0 1 2 0 1 0 0 0 0 0 0 1 2 0 1 0 0 0 0 1 2 0 1 0 0 0 0 0]; fRAset=[0 0 0 0 0 0 0 0 0 0 0 7 0 0 0 0 0 0 0 7 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0;0 0 0 0 0 0 0 0 7 0 0 0 0 7 7 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 7 7 7 7 7 7 7 7 0 0 0 0 0 0 0 0 0 0;0 0 0 0 0 7 0 7 7 0 0 7 0 7 7 0 0 7 0 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 0 0 0 0 0 0 0 0 0 0;0 0 0 0 0 0 0 0 0 0 7 7 0 0 0 0 0 0 0 7 0 0 7 0 7 0 0 0 0 0 0 0 7 0 7 0 0 0 0 0 0 0 7 0 7 0 0 0 0 0 7 0 7 0 0 0 0 0;0 0 0 0 0 7 0 7 7 0 0 7 0 7 7 0 0 7 0 7 0 0 7 0 7 0 0 0 0 0 0 0 7 0 7 0 0 0 0 0 7 7 7 7 7 7 7 7 0 0 7 0 7 0 0 0 0 0;0 0 7 0 7 7 0 7 7 0 7 7 0 7 7 0 7 7 0 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 0 0 7 0 7 0 0 0 0 0;0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 7 7 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 7 0 7 0 0 0 0 0 0 0 0 0 0 0 0 0]; t0RAset=[1 2 1 0 0 0 0 0 0 0 0 7 0 0 0 0 0 0 0 7 1 2 1 0 0 0 0 0 0 0 1 2 1 0 0 0 0 0 0 0 1 2 1 0 0 0 0 0 1 2 1 0 0 0 0 0 0 0;1 2 1 0 0 0 0 0 7 0 0 0 0 7 7 0 0 0 0 0 1 2 1 0 0 0 0 0 0 0 1 2 1 0 0 0 0 0 0 0 7 7 7 7 7 7 7 7 1 2 1 0 0 0 0 0 0 0;1 2 1 0 0 7 0 7 7 0 0 7 0 7 7 0 0 7 0 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 1 2 1 0 0 0 0 0 0 0;1 2 1 0 0 0 0 0 0 0 7 7 0 0 0 0 0 0 0 7 1 2 7 0 7 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 1 2 7 0 7 0 0 0 1 2 7 0 7 0 0 0 0 0;1 2 1 0 0 7 0 7 7 0 0 7 0 7 7 0 0 7 0 7 1 2 7 0 7 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 7 7 7 7 7 7 7 7 1 2 7 0 7 0 0 0 0 0;1 2 7 0 7 7 0 7 7 0 7 7 0 7 7 0 7 7 0 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 1 2 7 0 7 0 0 0 0 0;1 2 1 0 0 0 0 0 0 0 0 0 0 0 0 0 7 7 0 0 1 2 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 1 2 7 0 7 0 0 0 1 2 1 0 0 0 0 0 0 0]; t1RAset=[0 0 1 0 1 0 0 0 0 0 0 7 0 0 0 0 0 0 0 7 0 0 1 0 1 0 0 0 0 0 0 0 1 0 1 0 0 0 0 0 0 0 1 0 1 0 0 0 0 0 1 0 1 0 0 0 0 0;0 0 1 0 1 7 0 0 0 0 0 0 0 7 7 0 0 0 0 0 0 0 1 0 1 0 0 0 0 0 0 0 1 0 1 0 0 0 0 0 7 7 7 7 7 7 7 7 0 0 1 0 1 0 0 0 0 0;0 0 1 0 1 7 0 7 7 0 0 7 0 7 7 0 0 7 0 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 0 0 1 0 1 0 0 0 0 0;0 0 0 0 0 0 0 0 0 0 7 7 0 0 0 0 0 0 0 7 0 0 7 0 7 0 0 0 0 0 0 0 7 0 7 0 0 0 0 0 0 0 7 0 7 0 0 0 0 0 7 0 7 0 0 0 0 0;0 0 0 0 0 7 0 7 7 0 0 7 0 7 7 0 0 7 0 7 0 0 7 0 7 0 0 0 0 0 0 0 7 0 7 0 0 0 0 0 7 7 7 7 7 7 7 7 0 0 7 0 7 0 0 0 0 0;0 0 7 0 7 7 0 7 7 0 7 7 0 7 7 0 7 7 0 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 0 0 7 0 7 0 0 0 0 0;0 0 1 0 1 0 0 0 0 0 0 0 0 0 0 0 7 7 0 0 0 0 1 0 1 0 0 0 0 0 0 0 1 0 1 0 0 0 0 0 0 0 7 0 7 0 0 0 0 0 1 0 1 0 0 0 0 0]; t2RAset=[2 2 2 2 2 1 2 1 0 1 0 7 1 0 0 0 1 0 0 7 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 0 0 0 0 0 0 0 0 8 8 8 8 8 8 8 8 8 8;1 1 1 1 1 0 1 0 7 0 1 0 0 7 7 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 7 7 7 7 7 7 7 7 8 8 8 8 8 8 8 8 8 8;0 0 0 0 0 7 0 7 7 0 0 7 0 7 7 0 0 7 0 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 8 8 8 8 8 8 8 8 8 8;2 2 1 2 1 0 1 0 0 0 7 7 0 0 0 0 0 0 0 7 1 1 7 1 7 1 1 1 1 1 1 1 7 1 7 1 1 1 1 1 0 0 7 0 7 0 0 0 8 8 7 8 7 8 8 8 8 8;1 1 0 1 0 7 0 7 7 0 0 7 0 7 7 0 0 7 0 7 0 0 7 0 7 0 0 0 0 0 0 0 7 0 7 0 0 0 0 0 7 7 7 7 7 7 7 7 8 8 7 8 7 8 8 8 8 8;0 0 7 0 7 7 0 7 7 0 7 7 0 7 7 0 7 7 0 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 8 8 7 8 7 8 8 8 8 8;2 2 1 2 1 1 2 1 0 1 0 1 1 0 0 0 7 7 0 0 1 1 0 1 0 1 1 1 1 1 1 1 0 1 0 1 1 1 1 1 0 0 7 0 7 0 0 0 8 8 8 8 8 8 8 8 8 8]; %7 is euqal to 'N/A' and 8 equals to '*' in the table 5.7.1-4 DRA=DRAset(rx_Rach+1); rRA=rRAset(rx_Rach+1); fRA=fRAset(rx_UDcon+1,rx_Rach+1); t0RA=t0RAset(rx_UDcon+1,rx_Rach+1); t1RA=t1RAset(rx_UDcon+1,rx_Rach+1); t2RA=t2RAset(rx_UDcon+1,rx_Rach+1); switch DRA case 2 fRAset2=[0 0 0 0 0;0 0 7 0 7;0 7 7 7 7;0 0 0 1 1;0 7 7 1 7;1 7 7 7 7;0 0 0 0 1]; t0RAset2=[0 0 0 0 0;0 0 7 0 7;0 7 7 7 7;0 0 0 0 0;0 7 7 0 7;0 7 7 7 7;0 0 0 0 0]; t1RAset2=[1 1 1 1 1;1 1 7 1 7;1 7 7 7 7;0 0 0 0 0;0 7 7 0 7;0 7 7 7 7;1 1 1 1 0]; t2RAset2=[2 1 0 1 0;1 0 7 0 7;0 7 7 7 7;2 2 1 1 0;1 7 7 0 7;0 7 7 7 7;1 0 1 0 0]; case 3 fRAset3(:,:,1)=[0 0 7 0 0;0 0 0 0 7;0 0 7 7 7;0 7 7 1 1;0 0 7 1 7;1 7 7 7 7;0 0 0 0 1]; t0RAset3(:,:,1)=[0 0 7 0 0; 0 0 0 0 7;0 0 7 7 7;0 7 7 0 0;0 0 7 0 7;0 7 7 7 7;0 0 0 0 0]; t1RAset3(:,:,1)=[0 1 7 1 1; 0 1 0 1 7;1 1 7 7 7;0 7 7 0 7;0 0 7 0 7;0 7 7 7 7;0 0 1 1 0]; t2RAset3(:,:,1)=[2 0 7 1 0; 1 0 1 0 7;0 0 7 7 7;1 7 7 1 0;1 1 7 0 7;0 7 7 7 7;2 2 0 0 0]; fRAset3(:,:,2)=[0 0 7 1 1;0 0 0 1 7;1 1 7 7 7 ;0 7 7 2 2;1 1 7 2 7;2 7 7 7 7;0 0 0 1 2]; t0RAset3(:,:,2)=[0 0 7 0 0;0 0 0 0 7;0 0 7 7 7;0 7 7 0 0;0 0 7 0 7;0 7 7 7 7;0 0 0 0 0]; t1RAset3(:,:,2)=[1 1 7 0 0;1 1 1 0 7;0 1 7 7 7;0 7 7 0 0;0 0 7 0 7;0 7 7 7 7;1 1 1 0 0]; t2RAset3(:,:,2)=[2 1 7 1 0;1 1 0 0 7;0 0 7 7 7;2 7 7 1 0;1 0 7 0 7;0 7 7 7 7;1 0 1 1 0]; case 4 fRAset3(:,:,1)=[0 0 0 0 0;0 7 7 0 7;0 7 7 7 7;0 0 0 1 1;0 7 7 1 7;1 7 7 7 7;0 0 0 0 1]; t0RAset3(:,:,1)=[0 0 0 0 0;0 7 7 0 7;0 7 7 7 7;0 0 0 0 0;0 7 7 0 7;0 7 7 7 7;0 0 0 0 0]; t1RAset3(:,:,1)=[0 0 0 1 1;0 7 7 1 7;1 7 7 7 7;0 0 0 0 0;0 7 7 0 7;0 7 7 7 7;0 0 0 1 0]; t2RAset3(:,:,1)=[2 2 1 1 0;1 7 7 0 7;0 7 7 7 7;1 1 1 1 0;1 7 7 0 7;0 7 7 7 7;2 1 2 0 0]; fRAset3(:,:,2)=[0 0 0 1 1;0 7 7 1 7;1 7 7 7 7;0 0 1 2 2;1 7 7 2 7;2 7 7 7 7;0 0 0 1 2]; t0RAset3(:,:,2)=[0 0 0 0 0;0 7 7 0 7;0 7 7 7 7;0 0 0 0 0;0 7 7 0 7;0 7 7 7 7;0 0 0 0 0]; t1RAset3(:,:,2)=[1 1 1 0 0;1 7 7 0 7;0 7 7 7 7;0 0 0 0 0;0 7 7 0 7;0 7 7 7 7;1 0 1 0 0]; t2RAset3(:,:,2)=[1 0 0 1 0;0 7 7 0 7;0 7 7 7 7;2 2 0 1 0;0 7 7 0 7;0 7 7 7 7;0 2 2 1 0]; fRAset3(:,:,3)=[0 0 0 1 1;0 7 7 1 7;1 7 7 7 7;1 1 1 3 3;1 7 7 3 7;3 7 7 7 7;0 0 0 1 3]; t0RAset3(:,:,3)=[0 0 0 0 0;0 7 7 0 7;0 7 7 7 7;0 0 0 0 0;0 7 7 0 7;0 7 7 7 7;0 0 0 0 0]; t1RAset3(:,:,3)=[1 1 1 1 1;1 7 7 1 7;0 7 7 7 7;0 0 0 0 0;0 7 7 0 7;0 7 7 7 7;1 1 1 1 0]; t2RAset3(:,:,3)=[2 2 1 1 0;1 7 7 0 7;0 7 7 7 7;2 1 1 1 0;1 7 7 0 7;0 7 7 7 7;1 1 1 0 0]; case 5 fRAset3(:,:,1)= [0 0 0 0;0 0 0 0;0 0 7 7;0 0 0 1;0 0 7 1;1 7 7 7;0 7 7 0]; t0RAset3(:,:,1)=[0 0 0 0;0 0 0 0;0 0 7 7;0 0 0 0;0 0 7 0;0 7 7 7;0 7 7 0]; t1RAset3(:,:,1)=[0 0 0 1;0 0 0 1;1 1 7 7;0 0 0 0;0 0 7 0;0 7 7 7;0 7 7 1]; t2RAset3(:,:,1)=[1 2 1 1;1 1 1 0;0 0 7 7;1 1 1 1;1 1 7 0;0 7 7 7;1 7 7 0]; fRAset3(:,:,2)= [0 0 0 1;0 0 0 1;1 1 7 7;0 0 0 2;1 1 7 2;2 7 7 7;0 7 7 1]; t0RAset3(:,:,2)=[0 0 0 0;0 0 0 0;0 0 7 7;0 0 0 0;0 0 7 0;0 7 7 7;0 7 7 0]; t1RAset3(:,:,2)=[0 1 0 0;1 1 1 0;0 0 7 7;0 0 0 0;0 0 7 0;0 7 7 7;0 7 7 1]; t2RAset3(:,:,2)=[2 0 2 1;0 0 0 0;0 0 7 7;1 1 1 1;1 1 7