TBS = 144;% The transport block sizetotnumblks = 1;模拟传输块的％数量ue = struct（）;％初始化UE结构ue.nbulsubcarrierspacing ='15kHz';% 3.75kHz, 15kHzue.nncellid = 0;% Narrowband cell identitychs = struct（）;％npusch携带数据或控制信息chs.NPUSCHFormat ='Data';％有效载荷类型（数据或控制）％npusch'nscru'的子载波数量取决于npusch％格式和子载波间距“ nbusubcarrierspacing”，如TS所示% 36.211 Table 10.1.2.3-1. There are 1,3,6 or 12 contiguous subcarriers for％npuschchs.NBULSubcarrierSet = 0;% Range is 0-11 (15kHz); 0-47 (3.75kHz)chs.NRUsc = length(chs.NBULSubcarrierSet); chs.CyclicShift = 0;NRUSC = 3或6时需要循环移位％chs.RNTI = 0;％rnti值chs.NLayers = 1;% Number of layerschs.nru = 2;资源单位数量的％chs.nrep = 4;NPUSCH的重复数量％chs.SlotIdx = 0;％开始捆绑插槽索引％符号调制取决于npusch格式和nscru% given by TS 36.211 Table 10.1.3.2-1chs.modulation ='QPSK';rvdci = 0;通过DCI发出信号的RV偏移％（请参阅36.213 16.5.1.2）% Specify the NPUSCH and DM-RS power scaling in dB for plot visualizationchs.npuschpower = 30;chs.npuschdrspower = 34;

chs.seqgrouphopping ='上';% Enable/Disable Sequence-Group Hopping for UEchs.seqgroup = 0;％delta_ss。高层参数groupAssignmentnpusch％在资源单位nulslots中获取时间插槽的数量％TS 36.211表10.1.2.3-1如果strcmpi（chs.npuschformat，'Data'）如果chs.NRUsc == 1 NULSlots = 16;别的如果任何（chs.nrusc == [3 6 12]）nulslots = 24/chs.nrusc;别的error('Invalid number of subcarriers. NRUsc must be one of 1,3,6,12'）；结尾别的如果strcmpi（chs.npuschformat，'Control'）nulslots= 4;别的error('无效NPUSCH格式（％s）。npuschformat必须是'data''或'control'''，chs.npuschformat）;结尾chs.nulslots = nulslots;nslotsperbundle = chs.nru*chs.nulslots*chs.nrep;% Number of slots in a codeword bundletotnslots = totnumblks*nslotsperbundle;模拟插槽的总数

％将随机发电机初始化为默认状态rng('default'）；％获得插槽网格和每个框架的插槽数emptyslotgrid = ltenbresourcegrid（ue）;slotgridsize = size（emptySlotGrid）;nslotsperframe = 20/（slotgridsize（1）/12）;状态= [];％npuschencoder and DM-RS state, auto re-initialization in the functiontrblk = [];％初始化运输块txgrid = [];％全网格初始化% Display the number of slots being generatedfprintf（'\ ngererating％d插槽对应于％d传输块\ n',TotNSlots,totNumBlks);为了slotidx = 0+（0：totnslots-1）％计算框架内的帧号和插槽号ue.NFrame = fix(slotIdx/NSlotsPerFrame); ue.NSlot = mod(slotIdx,NSlotsPerFrame);如果Isempty（trblk）如果strcmpi（chs.npuschformat，'Data'）对于用于使用的两个RV值完成的％UL-SCH编码% transmitting the codewords. The RV sequence used is determined% from the rvDCI value signaled in the DCI and alternatesTS 36.213第16.5.1.2节中给出的0和2之间的％在2之间％定义将编码以创建的传输块不同RV的代码字％trblk = randi（[0 1]，tbs，1）;％确定编码的运输块大小[〜，info] = ltenpuschindices（ue，chs）;OutBlklen = info.g;%建立相对应的码字两个房车values used% in the first and second block, this will be repeated till all% blocks are transmittedchs.RV = 2*mod(rvDCI+0,2);第一个块的％RVcw = ltenulsch（chs，outblklen，trblk）;％CRC和涡轮编码chs.RV = 2*mod(rvDCI+1,2);% RV for the second blockcw = [CW ltenulsch（chs，outblklen，trblk）];％＃OK ％CRC和涡轮编码is repeated别的trblk = randi（[0 1]，1）;% 1 bit ACK％的ACK％，相同的代码字可以传输每个块TS 36.212中定义的％6.3.3节cw = lteNULSCH(trblk);结尾blockIdx = 0;百分比要传输的块结尾% Initialize gridslotgrid = emptyslotgrid;％npusch编码和映射到插槽网格txsym = ltenpusch（ue，chs，cw（：，mod（blockidx，size（cw，2））+1），状态）;% Map NPUSCH symbols in the grid of a slotindicesNPUSCH = lteNPUSCHIndices(ue,chs); slotGrid(indicesNPUSCH) = txsym*db2mag(chs.NPUSCHPower);％创建DM-RS序列并映射到插槽网格[dmrs，state] = ltenpuschdrs（ue，chs，state）;indicesdmrs = ltenpuschdrsindices（ue，chs）;slotgrid（indicesdmrs）= dmrs*db2mag（chs.npuschdrspower）;％加入该插槽与插槽网格txgrid = [txgrid slotGrid];％＃OK ％如果传输完整块，请增加时钟计数器以便％可以选择正确的代码字如果state.EndOfBlk blockIdx = blockIdx + 1;结尾％trblk err计数和重新初始化如果state.endoftx% Re-initialize to enable the transmission of a new transport blocktrblk = [];结尾结尾% Perform SC-FDMA modulation to create time domain waveformue.CyclicPrefixUL ='普通的';NB-iot的正常循环前缀长度的％[waveform，scfdmainfo] = ltescfdmamamamamydulate（ue，chs，txgrid）;

％创建整体资源网格的图像图IM = Image（ABS（TXGRID））;cmap = parula（64）;colormap（im.parent，cmap）;轴xy;标题（sprintf（sprintf）（'nb-iot uplink re网格（nrep =％d，nrusc =％d，nru =％d）'，chs.nrep，chs.nrusc，chs.nru））xlabel（'OFDM symbols'）ylabel('Subcarriers'）％创建传奇框来指示与Res关联的频道/信号类型Renames = {'npusch';'DM-RS'}; clevels = round(db2mag([chs.NPUSCHPower chs.NPUSCHDRSPower])); N = numel(reNames); L = line(ones(N),ones(N),'行宽',8);% Generate lines% Set the colors according to cmapset（l，{'color'}，mat2cell（cmap（min（1+clevels，长度（cmap）），:)，一个（1，n），3））;legend（Renames {：}）;