Bloqueando WPE e hackers

O que ele faz:
Ele usa funçoes WIN32 API para verificar se existe um programa aberto com o titulo definida por você, no caso WPE. Se o WPE estiver aberto irá aparecer uma msg box:

e o jogo será fechado automaticamente.

Client Side

Adicione as seguintes declaraçoes em qualquer module(eu usei o ModConstants)

Código:

' Procura as janelas abertas
Declare Function FindWindow Lib "user32" Alias _
"FindWindowA" (ByVal lpClassName As String, _
ByVal lpWindowName As String) As Long
Declare Function PostMessage Lib "user32" Alias _
"PostMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, _
ByVal wParam As Long, lParam As Any) As Long

Agora crie 1 timer na sua frmMain e coloque o interval dele com o valor 2000(equivale a 2 segundos) ou pode colocar um valor q vc achar melhor.
coloque isso dentro do timer:

Código:

Dim winHwnd As Long
winHwnd = FindWindow(vbNullString, "WPE PRO")
Debug.Print winHwnd
If winHwnd <> 0 Then
    MsgBox "Cheat detectado, jogo finalizado."
    DestroyGame
End If
End Sub

E não, ao contrario do q muitos pensam mesmo mudando o nome do programa ele continua sendo detectado.