%安装检查WLAN工具箱,有一个有效的许可证如果isempty(版本(“无线局域网”))%检查WLAN工具箱安装错误(“请安装WLAN工具箱运行这个例子。);elseif~许可证(“测试”,“WLAN_System_Toolbox”)%检查存在一个有效的许可证错误(…的一个有效的许可证WLAN工具箱需要运行这个例子。);结束

%设置处理图像的阴谋如果~ (“imFig”,“var”)| | ~ ishandle (imFig) imFig =图;imFig。NumberTitle =“关闭”;imFig。Name =“形象策划”;imFig。可见=“关闭”;其他的clf (imFig);%清晰的图imFig。可见=“关闭”;结束%设置频谱查看器spectrumScope = dsp.SpectrumAnalyzer (…“SpectrumType”,的功率密度,…“SpectralAverages”10…“YLimits”(-130 -40),…“标题”,收到了基带WLAN信号频谱的,…“YLabel”,的功率谱密度);%设置的星座图查看器平衡的WLAN符号星座= comm.ConstellationDiagram (“标题”,“平衡的WLAN符号”,…“ShowReferenceConstellation”、假);

%初始化特别提款权设备deviceNameSDR =“E3xx”;%设置特别提款权设备

txGain = -10;

%的输入图像文件并转换为二进制流fileTx =“peppers.png”;%图像文件的名字fData = imread (fileTx);%从文件读取图像数据规模= 0.2;%图像比例因子origSize =大小(fData);%原始输入图像大小scaledSize = max(地板(规模。* origSize (1:2)), 1);%计算新的图像大小heightIx = min(圆(((1:scaledSize(1)) -0.5)。/规模+ 0.5),origSize (1));widthIx = min(圆(((1:scaledSize(2)) -0.5)。/规模+ 0.5),origSize (2));fData = fData (heightIx、widthIx:);%调整图像imsize =大小(fData);%存储新图像大小txImage = fData (:);

%情节传输图像图(imFig);imFig。可见=“上”;次要情节(211);imshow (fData);标题(“传播形象”);次要情节(212);标题(“收到形象将出现在这里……”);集(gca),“可见”,“关闭”);甘氨胆酸组(findall (,“类型”,“文本”),“可见”,“上”);暂停(1);%停下来情节Tx的形象

msduLength = 2304;% MSDU长度字节numMSDUs =装天花板(长度(txImage) / msduLength);padZeros = msduLength-mod(长度(txImage), msduLength);txData = [txImage;0 (padZeros 1)];txDataBits =双(重塑(de2bi (txData 8)”[], 1));%将输入数据流分成碎片bitsPerOctet = 8;data = 0 (0,1);为印第安纳州= 0:numMSDUs-1%提取图像数据为每个MPDU(八位字节)frameBody = txData(印第安纳州* msduLength + 1: msduLength *(印第安纳州+ 1):);%创建MAC帧配置对象和配置序列号cfgMAC = wlanMACFrameConfig (“FrameType”,“数据”,“SequenceNumber”印第安纳州);%生成MPDU[mpdu, lengthMPDU] = wlanMACFrame (frameBody cfgMAC);% MPDU字节转换为比特流psdu =重塑(de2bi (hex2dec (mpdu), 8)”, [], 1);%连接PSDUs波形生成data =[数据;psdu];% #好< AGROW >结束

nonHTcfg = wlanNonHTConfig;%创建包配置nonHTcfg。MCS = 6;%调制:64 qam率:2/3nonHTcfg。NumTransmitAntennas = 1;%的发送天线数量chanBW = nonHTcfg.ChannelBandwidth;nonHTcfg。PSDULength = lengthMPDU;%设置PSDU长度

sdrTransmitter = sdrtx (deviceNameSDR);%发射机性能%重新取样传输波形30 mhzfs = wlanSampleRate (nonHTcfg);%在MHz传输采样率osf = 1.5;%过采样因子sdrTransmitter。BasebandSampleRate = f * osf;sdrTransmitter。CenterFrequency = 2.432 e9;% 5频道sdrTransmitter。获得= txGain;sdrTransmitter。ChannelMapping = 1;%应用TX通道映射sdrTransmitter。ShowAdvancedProperties = true;sdrTransmitter。BypassUserLogic = true;%初始化每个数据包的扰频器与一个随机整数scramblerInitialization =兰迪([127]numMSDUs 1);%生成基带NonHT数据包由空闲时间txWaveform = wlanWaveformGenerator(数据、nonHTcfg…“NumPackets”numMSDUs,“IdleTime”,20 e-6,…“ScramblerInitialization”,scramblerInitialization);%重新取样传输波形txWaveform =重新取样(txWaveform fs * osf, fs);流(“\ nGenerating WLAN传输波形:\ n”)%规模标准化信号避免射频的饱和阶段powerScaleFactor = 0.8;txWaveform = txWaveform。* (1 / max (abs (txWaveform)) * powerScaleFactor);% int16传输信号,这是特别提款权的原生格式%的硬件txWaveform = int16 (txWaveform * 2 ^ 15);%射频传输波形sdrTransmitter.transmitRepeat (txWaveform);

sdrReceiver = sdrrx (deviceNameSDR);sdrReceiver。BasebandSampleRate = sdrTransmitter.BasebandSampleRate;sdrReceiver。CenterFrequency = sdrTransmitter.CenterFrequency;sdrReceiver。OutputDataType =“双”;sdrReceiver。ChannelMapping = 1;%配置Rx通道映射sdrReceiver。ShowAdvancedProperties = true;sdrReceiver。BypassUserLogic = true;%配置接收样品相当于两倍的长度%传输信号,这是为了确保PSDUs为了接收。%在接待重复MAC碎片移除。samplesPerFrame =长度(txWaveform);requiredCaptureLength = samplesPerFrame * 2;spectrumScope。SampleRate = sdrReceiver.BasebandSampleRate;指数在PSDU %获得所需的字段indLSTF = wlanFieldIndices (nonHTcfg,“L-STF”);indLLTF = wlanFieldIndices (nonHTcfg,“L-LTF”);indLSIG = wlanFieldIndices (nonHTcfg,“L-SIG”);Ns = indLSIG (2) -indLSIG (1) + 1;%的样本数量在一个OFDM符号

%特别提款权捕获流(“\ nStarting新的射频捕获。\ n”)%保存价值WLAN传输数据包的长度的两倍%样本,capturedData requiredCaptureLength基带% WLAN样品capturedData =捕获(sdrReceiver requiredCaptureLength,“样本”);

%接收的波形显示功率谱密度spectrumScope (capturedData);% Downsample接收到的信号rxWaveform =重新取样(capturedData fs, fs * osf);rxWaveformLen =大小(rxWaveform, 1);searchOffset = 0;%抵消从开始的波形样本%最低包长度是10 OFDM符号lstfLen =双(indLSTF (2));% L-STF的样本数量minPktLen = lstfLen * 5;pktInd = 1;sr = wlanSampleRate (nonHTcfg);%采样率fineTimingOffset = [];packetSeq = [];displayFlag = 0;%国旗显示解码信息%进行维生素与计算evmCalculator = comm.EVM (“AveragingDimensions”(1 2 3));evmCalculator。MaximumEVMOutputPort = true;%接收处理而(searchOffset + minPktLen) < = rxWaveformLen%包检测pktOffset = wlanPacketDetect (rxWaveform chanBW searchOffset, 0.8);%调整包抵消pktOffset = searchOffset + pktOffset;如果isempty (pktOffset) | | (pktOffset +双(indLSIG (2)) > rxWaveformLen)如果pktInd = = 1 disp (“* *没有包发现* *”);结束打破;结束%提取non-HT字段和执行粗频率偏移校正%时间允许可靠的象征nonHT = rxWaveform (pktOffset + (indLSTF (1): indLSIG (2)),:);coarseFreqOffset = wlanCoarseCFOEstimate (nonHT chanBW);nonHT = helperFrequencyOffset (fs, nonHT -coarseFreqOffset);%符号定时同步fineTimingOffset = wlanSymbolTimingEstimate (nonHT chanBW);%调整包抵消pktOffset = pktOffset + fineTimingOffset;%的时间同步完成:包检测和同步%提取non-HT序言场同步和之后%执行频率校正如果(pktOffset < 0) | | ((pktOffset + minPktLen) > rxWaveformLen) searchOffset = pktOffset + 1.5 * lstfLen;继续;结束流(“\ nPacket——% d发现指数% d \ n '、pktInd pktOffset + 1);%提取前7 OFDM符号的检测和数据格式% L-SIG解码nonHT = rxWaveform (pktOffset + (1:7 * Ns):);nonHT = helperFrequencyOffset (fs, nonHT -coarseFreqOffset);%对同步和执行好频率偏移校正%粗校正序言字段lltf = nonHT (indLLTF (1): indLLTF (2):);%提取L-LTFfineFreqOffset = wlanFineCFOEstimate (lltf chanBW);nonHT = helperFrequencyOffset (fs, nonHT -fineFreqOffset);cfoCorrection = coarseFreqOffset + fineFreqOffset;%总首席财务官%使用L-LTF信道估计lltf = nonHT (indLLTF (1): indLLTF (2):);demodLLTF = wlanLLTFDemodulate (lltf chanBW);chanEstLLTF = wlanLLTFChannelEstimate (demodLLTF chanBW);%噪声估计noiseVarNonHT = helperNoiseEstimate (demodLLTF);%数据包格式检测使用3立即OFDM符号% L-LTF后格式= wlanFormatDetect (nonHT (indLLTF (2) + (1:3 * Ns):),…chanEstLLTF、noiseVarNonHT chanBW);disp ([' '格式“格式检测”]);如果~ strcmp(格式,“Non-HT”)流(”除了Non-HT格式已经检测到\ n”);searchOffset = pktOffset + 1.5 * lstfLen;继续;结束%恢复L-SIG字段位[recLSIGBits, failCheck] = wlanLSIGRecover (…nonHT (indLSIG (1): indLSIG (2):),…chanEstLLTF、noiseVarNonHT chanBW);如果failCheck流(“L-SIG检查失败\ n”);searchOffset = pktOffset + 1.5 * lstfLen;继续;其他的流(“L-SIG检查通过\ n”);结束基于解码L-SIG %检索包参数[lsigMCS, lsigLen rxSamples] = helperInterpretLSIG (recLSIGBits sr);如果(rxSamples + pktOffset) > (rxWaveform) disp(长度“* *没有足够的样本来解码包* *的);打破;结束% CFO校正应用于整个包rxWaveform (pktOffset + (1: rxSamples):) = helperFrequencyOffset (…rxWaveform (pktOffset + (1: rxSamples):), fs, -cfoCorrection);%创建一个接收Non-HT配置对象rxNonHTcfg = wlanNonHTConfig;rxNonHTcfg。MCS = lsigMCS;rxNonHTcfg。PSDULength = lsigLen;%得到PPDU中的数据字段索引indNonHTData = wlanFieldIndices (rxNonHTcfg,“NonHT-Data”);%恢复PSDU位使用数据包传输参数和通道%的估计L-LTF[rxPSDU, eqSym] = wlanNonHTDataRecover (rxWaveform (pktOffset +…(indNonHTData (1): indNonHTData (2)),:),…chanEstLLTF、noiseVarNonHT rxNonHTcfg);星座(重塑(eqSym [], 1));%当前的星座暂停(0);%让星座重画释放(星座);%发布之前的星座图refSym = wlanClosestReferenceSymbol (eqSym rxNonHTcfg);[evm.RMS,维生素。峰]= evmCalculator (refSym eqSym);% MPDU和提取MSDU解码[cfgMACRx msduList {pktInd},状态]= wlanMPDUDecode (rxPSDU rxNonHTcfg);% #好< * SAGROW >如果比较字符串(状态,“成功”)disp (MAC FCS检查通过的);%存储排序信息packetSeq (pktInd) = cfgMACRx.SequenceNumber;% MSDU转换为二进制数据流rxBit {pktInd} =重塑(de2bi (hex2dec (cell2mat (msduList {pktInd})), 8)”, [], 1);其他的%解码失败如果比较字符串(状态,“FCSFailed”)% FCS失败disp (“MAC FCS检查失败”);其他的% FCS通过但遇到其他解码失败disp (MAC FCS检查通过的);结束%因为没有重发建模在这个例子中,我们将%提取图像数据从MPDU (MSDU)和序列号,%即使FCS检查失败。%去除页眉和FCS。提取MSDU。macHeaderBitsLength = 24 * bitsPerOctet;fcsBitsLength = 4 * bitsPerOctet;msduList {pktInd} = rxPSDU (macHeaderBitsLength + 1: end-fcsBitsLength);%提取和存储序号sequenceNumStartIndex = 23 * bitsPerOctet + 1;sequenceNumEndIndex = 25 * bitsPerOctet - 4;packetSeq (pktInd) = bi2de (rxPSDU (sequenceNumStartIndex: sequenceNumEndIndex) ');% MSDU二进制数据流双(msduList rxBit {pktInd} = {pktInd});结束%显示解码信息如果displayFlag流('估计首席财务官:% 5.1 f赫兹\ n \ n”,cfoCorrection);% #好< UNRCH >disp (“解码L-SIG内容:”);流(“MCS: % d \ n”,lsigMCS);流(“长度:% d \ n”,lsigLen);流(包的样品数量:% d \ n \ n ',rxSamples);流(“维生素:\ n”);流('维生素与峰:% 0.3 f % %维生素与RMS: % 0.3 f % % \ n \ n ',…evm.Peak evm.RMS);流(“解码MAC顺序控制字段内容:\ n”);流(“序列号:% d \ n”packetSeq (pktInd));结束%更新搜索索引searchOffset = pktOffset +双(indNonHTData (2));pktInd = pktInd + 1;%完成处理当检测到重复的包。的%恢复数据包括从复制帧比特如果长度(独特(packetSeq)) <长度(packetSeq)打破结束结束%释放sdrTransmitter和接收器对象的状态释放(sdrTransmitter);释放(sdrReceiver);

如果~ (isempty (fineTimingOffset) | | isempty (pktOffset)) & &…(numMSDUs = =(元素个数(packetSeq) 1))%去除重复了MAC的片段rxBitMatrix = cell2mat (rxBit);rxData = rxBitMatrix(1:结束,1:元素个数(packetSeq) 1);startSeq =找到(packetSeq = = 0);rxData = circshift (rxData, [0 - (startSeq (1) 1)));%为MAC片段%执行比特误码率(BER)计算bitErrorRate = comm.ErrorRate;呃= bitErrorRate(双(rxData (:)),…txDataBits(1:长度(重塑(rxData [], 1))));流(' \ nBit错误率(BER): \ n”);流(的误比特率(BER) = % 0.5 f。\ n ',犯错(1));流(“有些错误的数量= % d。\ n”犯错(2));流(的传输比特数= % d。\ n \ n '长度(txDataBits));%从接收的数据重建图像流(“\ nConstructing形象从接收的数据。\ n”);decdata = bi2de(重塑(rxData(1:长度(txImage) * bitsPerOctet), 8日,[])');receivedImage = uint8(重塑(decdata imsize));%情节收到图片如果存在(“imFig”,“var”)& & ishandle (imFig)%如果Tx图是开放的图(imFig);次要情节(212);其他的图;次要情节(212);结束imshow (receivedImage);标题(sprintf (收到图片的));结束