%% 适变框架-0318
% 2022.03.18
clear
%% Environment Scope
TimeStamp = [];
FreqCarrier = 2450e6;% 中心频点可调
Bandwidth = 5e6;% 带宽可调 20~40e6
Ts = 1/Bandwidth;

% 仿真参数
Delay_set = [1:20]*Ts;
Velocity_set = [5:250];
SNR_set = [0:5:35];

NodePair_num = 10;

load NumerologySet.mat NumerologySet
MCS_set=[2,2;4,2;4,4;16,2;16,4;64,3;64,4;64,6];

% isEncrypt = 1; % 为1时采用变CP加密传输，其他不加密
% 密钥安全算法，CP随机化算法
% 上层显示采用的波形参数（FFT，CP，导频）以及密钥算法等


%% Action
FrameNum = 1;
PacketSize = 200; % 
NumerologySel = NumerologySet(1,:); % 128 0.25 3 % N_FFT; CPratio; PilotInterval
MCS_no = MCS_set(7,:);

%%
seed_set = randi([0 5000],FrameNum,3);
SyncER_statis = zeros(NodePair_num,FrameNum);
BER_statis = zeros(NodePair_num,FrameNum);
PER_statis = zeros(NodePair_num,FrameNum);
SIR = zeros(NodePair_num,FrameNum);
for vv = 1:NodePair_num
    %% Environment Parameterant
    SNR = 25;
    tau_d = Delay_set(randi([1 20]));
    velocity = Velocity_set(randi([1 length(Velocity_set)]));
    ChanPara = ChanStat(SNR, tau_d, velocity, Ts, FreqCarrier, TimeStamp);
    
    %% Reward
    for mont = 1:FrameNum
        [BER_statis(vv,mont),PER_statis(vv,mont),SyncER_statis(vv,mont)] = ...
            ExecutedMAIN0701(PacketSize, NumerologySel, MCS_no, ChanPara, FreqCarrier, mont, seed_set(mont,:));
    end
end

















%% TMP