频道=“GaussianNoise”；如果频道= =“OverTheAir”设备名称=“冥王星”；结尾

用于图像绘图的安装句柄如果~ (“imFig”,'var'）||〜ishandle（imfig）% #好< SUSENS >imFig=图；imFig.NumberTitle=“关闭”；imFig。Name ='图像plot'；imFig。可见=“关闭”；别的clf (imFig);%清晰的图imFig。可见=“关闭”；结尾%设置频谱查看器spectrumScope = dsp。简介(．.．“SpectrumType”,的功率密度,．.．“SpectralAverages”10．.．'ylimits'(-90 -30),．.．“标题”,“接收基带无线局域网信号频谱”,．.．“YLabel”,'功率谱密度',．.．“位置”,[69 376 800 450]);为WLAN符号设置星座图查看器refQAM = wlanReferenceSymbols (“64QAM”）;constellation = comm.constellationdiagram（．.．“标题”,“平衡的WLAN符号”,．.．“ShowReferenceConstellation”,真的,．.．“ReferenceConstellation”refQAM,．.．“位置”[878 376 460 460]）;

%输入图像文件并转换为二进制流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。可见='在'；次要情节(211);imshow (fData);标题(“传播形象”）;次要情节(212);标题(“收到的图像出现在这里……”）;集(gca),“可见”,“关闭”）;

甘氨胆酸组(findall (,'类型',“文本”），“可见”,'在'）;

msduLength=2304；MSDU的字节长度numMSDUs =装天花板(长度(txImage) / msduLength);padZeros = msduLength-mod(长度(txImage), msduLength);txData = [txImage; 0 (padZeros 1)];txDataBits = double(重塑(de2bi(txData, 8)'，[]，1));％将输入数据流划分为片段Bitsperoctet = 8;数据=零（0,1）;为了我= 0:numMSDUs-1%提取每个MPDU的图像数据(八位元)frameBody = txData(我* msduLength + 1: msduLength * (i + 1):);%创建MAC帧配置对象并配置序号cfgMAC=wlanMACFrameConfig(“FrameType”,“数据”,“序列号”,我);%生成MPDU[psdu，lengthmpdu] = wlanmacframe（Framebody，CFGMAC，“OutputFormat”,“比特”）;波形生成％Condateate PSDUdata =[数据;psdu];％＃OK 结尾

nonHTcfg = wlanNonHTConfig;%创建数据包配置nonHTcfg。MCS = 6;%调制：64QAM速率：2/3nonHTcfg.NumTransmitAntennas=1；%发射天线数量chanBW = nonHTcfg.ChannelBandwidth;nonHTcfg。PSDULength = lengthMPDU;%设置PSDU长度

scramblerInitialization = randi([1 127]，numMSDUs,1);

osf = 1.5;sampleRate = wlanSampleRate (nonHTcfg);%以Hz为单位的标称采样率%生成以空闲时间分隔的基带NonHT报文txWaveform = wlanWaveformGenerator(数据、nonHTcfg．.．“NumPackets”numMSDUs,“IdleTime”，20e-6，．.．'Sclamblerinitialization'scramblerInitialization,．.．“过度采样物料”(osf);

如果频道= =“OverTheAir”txGain =－10；%发射机性能sdrTransmitter = sdrtx(设备名称);sdrTransmitter。BasebandSampleRate = sampleRate * osf;sdrTransmitter。CenterFrequency = 2.432 e9;％通道5.sdrtransmitter.gain = txgain;fprintf('\ ngenerating wlan传输波形：\ n')％缩放标准化信号以避免RF阶段的饱和度功率标度系数=0.8；TX波形=TX波形。*（1/max（abs（TX波形））*功率标度系数）；％发送RF波形transmitRepeat (sdrTransmitter txWaveform);结尾

如果频道= =“OverTheAir”SDReceiver=sdrrx（deviceName）；SDReceiver.BasebandSampleRate=sdrTransmitter.BasebandSampleRate；SDReceiver.CenterFrequency=SDRTransmiter.CenterFrequency；SDReceiver.OutputDataType='双倍的'；%将捕获长度配置为捕获长度的两倍％传输信号，这是为了确保按顺序接收PSDU。%接收时，删除重复的MAC片段。sdrReceiver。SamplesPerFrame = 2 *长度(txWaveform);fprintf('\ nstarting一个新的rf捕获。\ n'）rxwaveform = capture（sdreceiver，sdreceiver.samplesperframe，“样本”）;elseif频道= =“GaussianNoise”信噪比= 20;% dBrxWaveform=awgn（txWaveform，SNR，“测量”）;别的百分比没有损伤rxwaveform = txwaveform;结尾

spectrumScope。SampleRate = SampleRate * osf;spectrumScope (rxWaveform);

aStop = 40;%阻带衰减ofdmInfo=wlanNonHTOFDMInfo(“NonHT-Data”, nonHTcfg);%OFDM参数SCS=取样器/ofdmInfo.fft长度；%子载波间隔txbw = max (abs (ofdmInfo.ActiveFrequencyIndices)) * 2 * SCS;%占有带宽[L，M]=大鼠（1/osf）；maxLM=最大值（[L M]）；R=（采样器txbw）/采样器；TW=2*R/maxLM；%过渡宽度B = DesignMultirateFIR（L，M，TW，ASTOP）;

firrc = dsp.FIRRateConverter (L, M, b);rxWaveform = firrc (rxWaveform);

displayFlag =错误的；

rxWaveformLen=大小（rxWaveform，1）；searchOffset=0；%采样中波形开始的偏移量

IND = WLANFIELDINDICES（非HTCFG）;ns = ind.lsig（2）-ind.lsig（1）+1;% OFDM符号中采样的个数%最小分组长度为10个OFDM符号lstfLen =双(ind.LSTF (2));% L-STF样本数minPktLen = lstfLen * 5;pktInd = 1;fineTimingOffset = [];packetSeq = [];rxBit = [];%执行EVM计算evmCalculator=comm.EVM(“AveragingDimensions”(1 2 3));evmCalculator。MaximumEVMOutputPort = true;

尽管（SearchOffset + Minpktlen）<= rxwaveformlen％数据包检测pktOffset=wlanPacketDetect（rxWaveform，chanBW，searchOffset，0.5）；％调整数据包偏移量pktOffset = searchOffset + pktOffset;如果isempty（pktoffset）||（pktoffset + double（ind.lsig（2））> rxwaveformlen）如果pktind == 1 disp（'**没有检测到包**'）;结尾休息；结尾％提取非HT字段并执行粗略频率偏移校正%以保证可靠的符号定时NONRT=RX波形（pKTOFSET+（ind.LSTF（1）：ind.LSIG（2）），：；粗略频率偏移=WLANCOARSECFEFESTIMATE（NONRT，chanBW）；NONRT=助手频率偏移（NONRT，采样器，-粗略频率偏移）；％符号定时同步fineTimingOffset=wlanSymbolTimingEstimate（非HT，chanBW）；％调整数据包偏移量pktOffset=pktOffset+fineTimingOffset；%定时同步完成:检测到数据包并同步%在同步后提取非HT前导字段，然后频率校正%如果(pktOffset<0) || ((pktOffset+minPktLen)>rxWaveformLen) searchOffset = pktOffset+1.5*lstfLen;继续；结尾fprintf('\nPacket-%d检测到索引%d\n'、pktInd pktOffset + 1);%提取数据的前7个OFDM符号值，用于格式检测和% L-SIG解码nonHT = rxWaveform (pktOffset + (1:7 * Ns):);nonHT = helperFrequencyOffset (nonHT sampleRate -coarseFreqOffset);%对同步的和进行精细的频率偏移校正%粗校正前导码字段lltf = nonHT (ind.LLTF (1): ind.LLTF (2):);%提取L-LTFfineFreqOffset = wlanFineCFOEstimate (lltf chanBW);nonHT = helperFrequencyOffset (nonHT sampleRate -fineFreqOffset);cfoCorrection = coarseFreqOffset + fineFreqOffset;%总首席财务官使用L-LTF％信道估计lltf=nonHT（ind.lltf（1）：ind.lltf（2），：）；demolltf=wlanlltfdemomodate（lltf，chanBW）；chanEstLLTF=wlanllfcchannelestimate（demolltf，chanBW）；%噪声估计noiseVarNonHT = helperNoiseEstimate (demodLLTF);立即使用3个OFDM符号的包格式检测%跟随L-LTF格式= wlanFormatDetect (nonHT (ind.LLTF (2) + (1:3 * Ns):),．.．chanEstLLTF、noiseVarNonHT chanBW);disp ([' '格式“格式检测”]）;如果~ strcmp(格式,“Non-HT”)流('已检测到非HT以外的格式\ n'）;searchOffset = pktOffset + 1.5 * lstfLen;继续；结尾%恢复L-SIG字段位[recLSIGBits, failCheck] = wlanLSIGRecover (．.．nonHT (ind.LSIG (1): ind.LSIG (2):),．.．chanEstLLTF、noiseVarNonHT chanBW);如果故障检查fprintf(' L-SIG检查失败\n'）;searchOffset = pktOffset + 1.5 * lstfLen;继续；别的fprintf('l-sig check pass \ n'）;结尾%基于解码的L-SIG检索数据包参数[lsigMCS、lsigLen、rxSamples]=帮助器解释信号（recLSIGBits、采样器）；如果(rxSamples + pktOffset) > (rxWaveform) disp(长度“**没有足够的样本来解码数据包**”）;休息；结尾%对整个数据包应用CFO修正rxWaveform (pktOffset + (1: rxSamples):) = helperFrequencyOffset (．.．rxWaveform (pktOffset + (1: rxSamples):), sampleRate, -cfoCorrection);创建一个接收非ht配置对象rxNonHTcfg=wlanNonHTConfig；rxNonHTcfg.MCS=lsigMCS；rxNonHTcfg.PSDULength=lsiglent；%获取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);％＃OK <* 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});结尾％显示解码信息如果显示标志fprintf(“预计CFO: %5.1f Hz\n\n”，cfocorrection）;% #好< * UNRCH >disp ('解码的L-SIG内容:'）;fprintf('MCS:%d\n', lsigMCS);fprintf(“长度:% d \ n”，格伦）；fprintf('包中的样本数量:%d\n\n'，rxsamples）;fprintf(“维生素:\ n”）;fprintf(RMS: %0.3f%%\n\n',．.．evm.Peak evm.RMS);fprintf('解码MAC序列控制字段内容：\ n'）;fprintf('序列号：%d\n\n'，packetSeq（pktInd））；结尾%更新搜索索引searchOffset=pktOffset+double（indNonHTData（2））；%当检测到重复数据包时，完成处理恢复的数据包括来自重复帧的位从重复的帧中删除数据位如果长度（唯一（packetseq））休息结尾pktInd = pktInd + 1;结尾

如果频道= =“OverTheAir”释放(sdrTransmitter);释放(sdrReceiver);结尾释放(spectrumScope);

如果~(is空(fineTimingOffset) || is空(pktOffset)) rxData = cell2mat(rxBit);startSeq =找到(packetSeq = = 0);rxData = circshift(rxData，[0 -(startSeq(1)-1)]);％订单MAC碎片％执行误码率（BER）计算bitErrorRate = comm.ErrorRate;呃= bitErrorRate(双(rxData (:)),．.．TxDatabits（1：长度（Rehape（rxdata，[]，1））））））;fprintf(' \nBit误码率(BER):\n'）;fprintf('误码率(BER) = %0.5f\n',犯错(1));fprintf('位错误=％d \ n'犯错(2));fprintf('传输比特数=%d\n\n'，长度（txdatabits））;试一试Decdata = Bi2De（Rehape（RxData（1：Length（TxImage）* Bitsperoctet），8，[]）;从接收的数据重新创建映像fprintf('\ n从接收的数据构造图像'\n '）;receivedImage = uint8(重塑(decdata imsize));%打印接收图像如果存在(“imFig”,'var') & & ishandle (imFig)如果TX图是打开的％图(imFig);次要情节(212);别的数字;次要情节(212);结尾imshow（收纳）;标题（Sprintf（收到图片的））;抓错误(“**没有足够的收到数据来重建图像。**”)结尾结尾