%% 2022 World Cup Qualifers - AFC Third Round, Group B

%% Matchday 1 (September 2)
% Japan v Oman @ Suita

JPN = poissrnd(2.22);
OMA = poissrnd(1.32);

JPNgf = JPNgf + JPN;
OMAga = OMAga + JPN;
OMAgf = OMAgf + OMA;
JPNga = JPNga + OMA;

if JPN > OMA
    JPNpts = JPNpts + 3;
elseif OMA > JPN
    OMApts = OMApts + 3;
else
    JPNpts = JPNpts + 1;
    OMApts = OMApts + 1;
end

% Australia v China PR @ (Doha)

AUS = poissrnd(1.59);
CHN = poissrnd(1.36);

AUSgf = AUSgf + AUS;
CHNga = CHNga + AUS;
CHNgf = CHNgf + CHN;
AUSga = AUSga + CHN;

if AUS > CHN
    AUSpts = AUSpts + 3;
elseif CHN > AUS
    CHNpts = CHNpts + 3;
else
    AUSpts = AUSpts + 1;
    CHNpts = CHNpts + 1;
end

% Saudi Arabia v Vietnam @ Riyadh

KSA = poissrnd(1.78);
VIE = poissrnd(0.72);

KSAgf = KSAgf + KSA;
VIEga = VIEga + KSA;
VIEgf = VIEgf + VIE;
KSAga = KSAga + VIE;

if KSA > VIE
    KSApts = KSApts + 3;
elseif VIE > KSA
    VIEpts = VIEpts + 3;
else
    KSApts = KSApts + 1;
    VIEpts = VIEpts + 1;
end
%% Matchday 2 (September 7)
% Vietnam v Australia @ Hanoi

VIE = poissrnd(1.08);
AUS = poissrnd(1.45);

VIEgf = VIEgf + VIE;
AUSga = AUSga + VIE;
AUSgf = AUSgf + AUS;
VIEga = VIEga + AUS;

if VIE > AUS
    VIEpts = VIEpts + 3;
elseif AUS > VIE
    AUSpts = AUSpts + 3;
else
    VIEpts = VIEpts + 1;
    AUSpts = AUSpts + 1;
end

% Oman v Saudi Arabia @ Muscat

OMA = poissrnd(1.80);
KSA = poissrnd(1.44);

OMAgf = OMAgf + OMA;
KSAga = KSAga + OMA;
KSAgf = KSAgf + KSA;
OMAga = OMAga + KSA;

if OMA > KSA
    OMApts = OMApts + 3;
elseif KSA > OMA
    KSApts = KSApts + 3;
else
    OMApts = OMApts + 1;
    KSApts = KSApts + 1;
end

% China PR v Japan @ (Doha)

CHN = poissrnd(1.31);
JPN = poissrnd(1.90);

CHNgf = CHNgf + CHN;
JPNga = JPNga + CHN;
JPNgf = JPNgf + JPN;
CHNga = CHNga + JPN;

if CHN > JPN
    CHNpts = CHNpts + 3;
elseif JPN > CHN
    JPNpts = JPNpts + 3;
else
    CHNpts = CHNpts + 1;
    JPNpts = JPNpts + 1;
end
%% Matchday 3 (October 7)
% Australia v Oman @ [Australia]

AUS = poissrnd(1.91);
OMA = poissrnd(1.37);

AUSgf = AUSgf + AUS;
OMAga = OMAga + AUS;
OMAgf = OMAgf + OMA;
AUSga = AUSga + OMA;

if AUS > OMA
    AUSpts = AUSpts + 3;
elseif OMA > AUS
    OMApts = OMApts + 3;
else
    AUSpts = AUSpts + 1;
    OMApts = OMApts + 1;
end

% China PR v Vietnam @ [China]

CHN = poissrnd(1.71);
VIE = poissrnd(0.77);

CHNgf = CHNgf + CHN;
VIEga = VIEga + CHN;
VIEgf = VIEgf + VIE;
CHNga = CHNga + VIE;

if CHN > VIE
    CHNpts = CHNpts + 3;
elseif VIE > CHN
    VIEpts = VIEpts + 3;
else
    CHNpts = CHNpts + 1;
    VIEpts = VIEpts + 1;
end

% Saudi Arabia v Japan @ [Saudi Arabia]

KSA = poissrnd(1.58);
JPN = poissrnd(1.64);

KSAgf = KSAgf + KSA;
JPNga = JPNga + KSA;
JPNgf = JPNgf + JPN;
KSAga = KSAga + JPN;

if KSA > JPN
    KSApts = KSApts + 3;
elseif JPN > KSA
    JPNpts = JPNpts + 3;
else
    KSApts = KSApts + 1;
    JPNpts = JPNpts + 1;
end
%% Matchday 4 (October 12)
% Japan v Australia @ Saitama

JPN = poissrnd(2.01);
AUS = poissrnd(1.26);

JPNgf = JPNgf + JPN;
AUSga = AUSga + JPN;
AUSgf = AUSgf + AUS;
JPNga = JPNga + AUS;

if JPN > AUS
    JPNpts = JPNpts + 3;
elseif AUS > JPN
    AUSpts = AUSpts + 3;
else
    JPNpts = JPNpts + 1;
    AUSpts = AUSpts + 1;
end

% Saudi Arabia v China PR @ Saudi Arabia

KSA = poissrnd(1.72);
CHN = poissrnd(1.19);

KSAgf = KSAgf + KSA;
CHNga = CHNga + KSA;
CHNgf = CHNgf + CHN;
KSAga = KSAga + CHN;

if KSA > CHN
    KSApts = KSApts + 3;
elseif CHN > KSA
    CHNpts = CHNpts + 3;
else
    KSApts = KSApts + 1;
    CHNpts = CHNpts + 1;
end

% Oman v Vietnam @ Muscat

OMA = poissrnd(1.92);
VIE = poissrnd(0.89);

OMAgf = OMAgf + OMA;
VIEga = VIEga + OMA;
VIEgf = VIEgf + VIE;
OMAga = OMAga + VIE;

if OMA > VIE
    OMApts = OMApts + 3;
elseif VIE > OMA
    VIEpts = VIEpts + 3;
else
    OMApts = OMApts + 1;
    VIEpts = VIEpts + 1;
end
%% Matchday 5 (November 11)
% Australia v Saudi Arabia @ [Australia]

AUS = poissrnd(1.73);
KSA = poissrnd(1.23);

AUSgf = AUSgf + AUS;
KSAga = KSAga + AUS;
KSAgf = KSAgf + KSA;
AUSga = AUSga + KSA;

if AUS > KSA
    AUSpts = AUSpts + 3;
elseif KSA > AUS
    KSApts = KSApts + 3;
else
    AUSpts = AUSpts + 1;
    KSApts = KSApts + 1;
end

% Vietnam v Japan @ Hanoi

VIE = poissrnd(1.04);
JPN = poissrnd(1.76);

VIEgf = VIEgf + VIE;
JPNga = JPNga + VIE;
JPNgf = JPNgf + JPN;
VIEga = VIEga + JPN;

if VIE > JPN
    VIEpts = VIEpts + 3;
elseif JPN > VIE
    JPNpts = JPNpts + 3;
else
    VIEpts = VIEpts + 1;
    JPNpts = JPNpts + 1;
end

% China PR v Oman @ [China]

CHN = poissrnd(1.77);
OMA = poissrnd(1.46);

CHNgf = CHNgf + CHN;
OMAga = OMAga + CHN;
OMAgf = OMAgf + OMA;
CHNga = CHNga + OMA;

if CHN > OMA
    CHNpts = CHNpts + 3;
elseif OMA > CHN
    OMApts = OMApts + 3;
else
    CHNpts = CHNpts + 1;
    OMApts = OMApts + 1;
end
%% Matchday 6 (November 16)
% Vietnam v Saudi Arabia @ Hanoi

VIE = poissrnd(1.12);
KSA = poissrnd(1.38);

VIEgf = VIEgf + VIE;
KSAga = KSAga + VIE;
KSAgf = KSAgf + KSA;
VIEga = VIEga + KSA;

if VIE > KSA
    VIEpts = VIEpts + 3;
elseif KSA > VIE
    KSApts = KSApts + 3;
else
    VIEpts = VIEpts + 1;
    KSApts = KSApts + 1;
end

% China PR v Australia @ [China]

CHN = poissrnd(1.56);
AUS = poissrnd(1.39);

CHNgf = CHNgf + CHN;
AUSga = AUSga + CHN;
AUSgf = AUSgf + AUS;
CHNga = CHNga + AUS;

if CHN > AUS
    CHNpts = CHNpts + 3;
elseif AUS > CHN
    AUSpts = AUSpts + 3;
else
    CHNpts = CHNpts + 1;
    AUSpts = AUSpts + 1;
end

% Oman v Japan @ Muscat

OMA = poissrnd(1.72);
JPN = poissrnd(1.82);

OMAgf = OMAgf + OMA;
JPNga = JPNga + OMA;
JPNgf = JPNgf + JPN;
OMAga = OMAga + JPN;

if OMA > JPN
    OMApts = OMApts + 3;
elseif JPN > OMA
    JPNpts = JPNpts + 3;
else
    OMApts = OMApts + 1;
    JPNpts = JPNpts + 1;
end
%% Matchday 7 (January 27)
% Australia v Vietnam @ [Australia]

AUS = poissrnd(1.85);
VIE = poissrnd(0.68);

AUSgf = AUSgf + AUS;
VIEga = VIEga + AUS;
VIEgf = VIEgf + VIE;
AUSga = AUSga + VIE;

if AUS > VIE
    AUSpts = AUSpts + 3;
elseif VIE > AUS
    VIEpts = VIEpts + 3;
else
    AUSpts = AUSpts + 1;
    VIEpts = VIEpts + 1;
end

% Japan v China PR @ [Japan]

JPN = poissrnd(2.10);
CHN = poissrnd(1.11);

JPNgf = JPNgf + JPN;
CHNga = CHNga + JPN;
CHNgf = CHNgf + CHN;
JPNga = JPNga + CHN;

if JPN > CHN
    JPNpts = JPNpts + 3;
elseif CHN > JPN
    CHNpts = CHNpts + 3;
else
    JPNpts = JPNpts + 1;
    CHNpts = CHNpts + 1;
end

% Saudi Arabia v Oman @ [Saudi Arabia]

KSA = poissrnd(1.84);
OMA = poissrnd(1.40);

KSAgf = KSAgf + KSA;
OMAga = OMAga + KSA;
OMAgf = OMAgf + OMA;
KSAga = KSAga + OMA;

if KSA > OMA
    KSApts = KSApts + 3;
elseif OMA > KSA
    OMApts = OMApts + 3;
else
    KSApts = KSApts + 1;
    OMApts = OMApts + 1;
end
%% Matchday 8 (February 1)
% Japan v Saudi Arabia @ [Japan]

JPN = poissrnd(2.04);
KSA = poissrnd(1.18);

JPNgf = JPNgf + JPN;
KSAga = KSAga + JPN;
KSAgf = KSAgf + KSA;
JPNga = JPNga + KSA;

if JPN > KSA
    JPNpts = JPNpts + 3;
elseif KSA > JPN
    KSApts = KSApts + 3;
else
    JPNpts = JPNpts + 1;
    KSApts = KSApts + 1;
end

% Vietnam v China PR @ Hanoi

VIE = poissrnd(1.17);
CHN = poissrnd(1.31);

VIEgf = VIEgf + VIE;
CHNga = CHNga + VIE;
CHNgf = CHNgf + CHN;
VIEga = VIEga + CHN;

if VIE > CHN
    VIEpts = VIEpts + 3;
elseif CHN > VIE
    CHNpts = CHNpts + 3;
else
    VIEpts = VIEpts + 1;
    CHNpts = CHNpts + 1;
end

% Oman v Australia @ [Oman]

OMA = poissrnd(1.77);
AUS = poissrnd(1.51);

OMAgf = OMAgf + OMA;
AUSga = AUSga + OMA;
AUSgf = AUSgf + AUS;
OMAga = OMAga + AUS;

if OMA > AUS
    OMApts = OMApts + 3;
elseif AUS > OMA
    AUSpts = AUSpts + 3;
else
    OMApts = OMApts + 1;
    AUSpts = AUSpts + 1;
end
%% Matchday 9 (March 24)
% Australia v Japan @ [Australia]

AUS = poissrnd(1.66);
JPN = poissrnd(1.61);

AUSgf = AUSgf + AUS;
JPNga = JPNga + AUS;
JPNgf = JPNgf + JPN;
AUSga = AUSga + JPN;

if AUS > JPN
    AUSpts = AUSpts + 3;
elseif JPN > AUS
    JPNpts = JPNpts + 3;
else
    AUSpts = AUSpts + 1;
    JPNpts = JPNpts + 1;
end

% Vietnam v Oman @ Hanoi

VIE = poissrnd(1.29);
OMA = poissrnd(1.52);

VIEgf = VIEgf + VIE;
OMAga = OMAga + VIE;
OMAgf = OMAgf + OMA;
VIEga = VIEga + OMA;

if VIE > OMA
    VIEpts = VIEpts + 3;
elseif OMA > VIE
    OMApts = OMApts + 3;
else
    VIEpts = VIEpts + 1;
    OMApts = OMApts + 1;
end

% China PR v Saudi Arabia @ [China]

CHN = poissrnd(1.59);
KSA = poissrnd(1.32);

CHNgf = CHNgf + CHN;
KSAga = KSAga + CHN;
KSAgf = KSAgf + KSA;
CHNga = CHNga + KSA;

if CHN > KSA
    CHNpts = CHNpts + 3;
elseif KSA > CHN
    KSApts = KSApts + 3;
else
    CHNpts = CHNpts + 1;
    KSApts = KSApts + 1;
end
%% Matchday 10 (March 29)
% Japan v Vietnam @ [Japan]

JPN = poissrnd(2.16);
VIE = poissrnd(0.64);

JPNgf = JPNgf + JPN;
VIEga = VIEga + JPN;
VIEgf = VIEgf + VIE;
JPNga = JPNga + VIE;

if JPN > VIE
    JPNpts = JPNpts + 3;
elseif VIE > JPN
    VIEpts = VIEpts + 3;
else
    JPNpts = JPNpts + 1;
    VIEpts = VIEpts + 1;
end

% Saudi Arabia v Australia @ [Saudi Arabia];

KSA = poissrnd(1.63);
AUS = poissrnd(1.33);

KSAgf = KSAgf + KSA;
AUSga = AUSga + KSA;
AUSgf = AUSgf + AUS;
KSAga = KSAga + AUS;

if KSA > AUS
    KSApts = KSApts + 3;
elseif AUS > KSA
    AUSpts = AUSpts + 3;
else
    KSApts = KSApts + 1;
    AUSpts = AUSpts + 1;
end

% Oman v China PR @ [Oman];

OMA = poissrnd(1.86);
CHN = poissrnd(1.37);

OMAgf = OMAgf + OMA;
CHNga = CHNga + OMA;
CHNgf = CHNgf + CHN;
OMAga = OMAga + CHN;

if OMA > CHN
    OMApts = OMApts + 3;
elseif CHN > OMA
    CHNpts = CHNpts + 3;
else
    OMApts = OMApts + 1;
    CHNpts = CHNpts + 1;
end