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

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

%输入图像文件并转换为二进制流文件传送=“peppers.png”；%图像文件名fData = imread (fileTx);从文件中读取图像数据规模= 0.2;%图像比例因子origSize=大小（fData）；%原始输入图像大小scaledSize=最大值（地板（比例。*原始尺寸（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（0,1）；对于我= 0:numMSDUs-1%提取每个MPDU的图像数据(八位元)frameBody = txData(我* msduLength + 1: msduLength * (i + 1):);%创建MAC帧配置对象并配置序号cfgMAC = wlanMACFrameConfig (“FrameType”，“数据”，“SequenceNumber”,我);%生成MPDU[psdu，lengthMPDU]=wlanMACFrame（框体，cfgMAC，“OutputFormat”，“位”）;%连接PSDU以生成波形data =[数据;psdu];%#好的终止

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”, 20 e-6,．..“加扰初始化”scramblerInitialization,．..“过采样因子”(osf);

如果频道= =“OverTheAir”txGain =－10；%发射机性能sdrTransmitter = sdrtx(设备名称);sdrTransmitter。BasebandSampleRate = sampleRate * osf;sdrTransmitter。CenterFrequency = 2.432 e9;%第五频道SDR变送器。增益=txGain；fprintf(“\n正在生成WLAN传输波形：\n”）%缩放标准化信号以避免射频级饱和powerScaleFactor = 0.8;txWaveform = txWaveform。* (1 / max (abs (txWaveform)) * powerScaleFactor);%发射射频波形transmitRepeat (sdrTransmitter txWaveform);终止

如果频道= =“OverTheAir”sdrReceiver = sdrrx(设备名称);sdrReceiver。BasebandSampleRate = sdrTransmitter.BasebandSampleRate;sdrReceiver。CenterFrequency = sdrTransmitter.CenterFrequency;sdrReceiver。OutputDataType =“双人”；将捕获长度配置为文件长度的两倍%发送信号，这是为了确保按顺序接收PSDU。%接收到重复的MAC分片时会被删除。sdrReceiver。SamplesPerFrame = 2 *长度(txWaveform);流(“\n正在开始新的射频捕获。\n”)rxWaveform=捕获（SDRCeiver，SDRCeiver.SamplesPerFrame，“样本”）;elseif频道= =“GaussianNoise”信噪比= 20;% dBrxWaveform = awgn (txWaveform,信噪比,“测量”）;其他的%无损伤rxWaveform=txWaveform；终止

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

aStop = 40;%阻带衰减ofdmInfo = wlanNonHTOFDMInfo (“NonHT-Data”, nonHTcfg);% OFDM参数SCS = sampleRate / ofdmInfo.FFTLength;%副载波间距txbw = max (abs (ofdmInfo.ActiveFrequencyIndices)) * 2 * SCS;%占有带宽(L, M) =鼠(1 / osf);maxLM = max([L M]);R = (sampleRate-txbw) / sampleRate;TW = 2 * R / maxLM;%过渡宽度b=设计多速率FIR（L、M、TW、aStop）；

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

displayFlag =错误的；

rxWaveformLen =大小(rxWaveform, 1);searchOffset = 0;%采样中波形开始的偏移量

ind=WLANFIELDICES（非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显示('**没有检测到包**'）;终止打破；终止%提取非HT字段并执行粗略频率偏移校正%以保证可靠的符号定时nonHT = rxWaveform (pktOffset + (ind.LSTF (1): ind.LSIG (2)),:);coarseFreqOffset = wlanCoarseCFOEstimate (nonHT chanBW);nonHT = helperFrequencyOffset (nonHT sampleRate -coarseFreqOffset);%符号定时同步fineTimingOffset = wlanSymbolTimingEstimate (nonHT chanBW);%调整数据包偏移量pktOffset = pktOffset + fineTimingOffset;%定时同步完成:检测到数据包并同步%同步后提取非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 (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):);demodLLTF = wlanLLTFDemodulate (lltf chanBW);chanEstLLTF = wlanLLTFChannelEstimate (demodLLTF 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);如果failCheck流(' L-SIG检查失败\n'）;searchOffset = pktOffset + 1.5 * lstfLen;继续；其他的流('L-SIG检查通过\n'）;终止%基于解码的L-SIG检索数据包参数[lsigMCS, lsigLen rxSamples] = helperInterpretLSIG (recLSIGBits sampleRate);如果(rxSamples + pktOffset) > (rxWaveform) disp(长度'**没有足够的样本来解码包**'）;打破；终止%对整个数据包应用CFO修正rxWaveform (pktOffset + (1: rxSamples):) = helperFrequencyOffset (．..rxWaveform (pktOffset + (1: rxSamples):), sampleRate, -cfoCorrection);创建一个接收非ht配置对象rxNonHTcfg = wlanNonHTConfig;rxNonHTcfg。MCS = lsigMCS;rxNonHTcfg。PSDULength = lsigLen;%获取PPDU中的数据字段索引indNonHTData=WLANFIELDICES（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流(“预计CFO: %5.1f Hz\n\n”，CFO校正）；% #好< * UNRCH >disp ('解码的L-SIG内容:'); fprintf(“MCS: % d \ n”, lsigMCS);流(“长度:% d \ n”, lsigLen);流('包中的样本数量:%d\n\n'，Rx样本）；fprintf(“维生素:\ n”); fprintf(RMS: %0.3f%%\n\n'，．..evm.Peak evm.RMS);流('解码的MAC序列控制字段内容：\n'); fprintf('序列号:%d\n\n'packetSeq (pktInd));终止%更新搜索索引searchOffset = pktOffset +双(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：长度（重塑（rxData，[]，1）））；fprintf(' \nBit误码率(BER):\n'); fprintf('误码率(BER) = %0.5f\n',犯错(1));流('位错误数=%d\n'犯错(2));流('传输位数= %d\n\n'，长度（txDataBits））；试一试decdata=bi2de（重塑（rxData（1:length（txImage）*bitsPerOctet），8，[]）；从接收的数据重新创建映像流('\ n从接收的数据构造图像'\n '）;receivedImage = uint8(重塑(decdata imsize));图接收图像如果存在(“imFig”，“var”) & & ishandle (imFig)%如果Tx数字为开图(imFig);次要情节(212);其他的图；子地块（212）；终止imshow（receivedImage）；title（sprintf）(收到图片的））;抓错误(“**接收的数据不足，无法重建图像。**）终止终止