Go To Post
Hallo,Ich habe einen kleinen bhop Hack für csgo geschrieben.Doch leider funktioniert der nicht kann mit jmd weiterhelfen? SOURCE:Public Class Form1
Public Declare Function ReadProcessMemory Lib "kernel32" (ByVal Handle As Integer, ByVal Address As Integer, ByRef Value As Long, ByVal Size As Long, ByRef BytesWritten As Long) As Long
Public Declare Function GetAsyncKeyState Lib "user32" (ByVal vKey As Long) As Integer
'Offsets
Dim PlayerBase As Integer = &HA77D3C
Dim FlagOFF As Integer = &H100
'Dims
Dim exit_thread As Boolean = False
Dim TB As System.Threading.Thread = New System.Threading.Thread(AddressOf BHop)
Dim CSP As Process()
Dim olfs As Integer
Public cLocalPlayer As Single
Public flag As Single
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
Dim u As String = "client.dll"
Dim x As String = "csgo"
CSP = Process.GetProcessesByName(x)
If Process.GetProcessesByName("csgo").Length > 0 Then
For Each [Module] As System.Diagnostics.ProcessModule In CSP(0).Modules
If [Module].ModuleName = u Then
olfs = [Module].BaseAddress
End If
Next
BHop.Start()
End If
End Sub
Private Sub Form1_FormClosing(sender As Object, e As FormClosingEventArgs) Handles Me.FormClosing
exit_thread = True
End Sub
Function BHop()
While (Not exit_thread)
ReadProcessMemory(CSP(0).Handle, olfs + PlayerBase, cLocalPlayer, 4, 0)
ReadProcessMemory(CSP(0).Handle, cLocalPlayer + FlagOFF, flag, 4, 0)
If GetAsyncKeyState(Keys.Space) Then
If flag > 257 Then
SendKeys.Send(Keys.Space)
Else
End If
End If
Threading.Thread.Sleep(10)
End While
End Function
End Class