pbbr (point blank brasil) ajudem aki

[0lukas0 0]

galera estou quase terminando um trainer sóke quando eu vou adiquiri o repeat hack eu nao consigo pq?eu colokei tudo q precisa no repeat ta assim oh:

 

BtnRepeat

Dim Re As Integer

Re = ReadPointerInteger("PointBlank", &HA72CA8, &H45DCC)

Dim R As Integer

R = Re - 5

WritePointerInteger("PointBlank", &HA72CA8, R, &H45DCC)

Dim Hotkey As Boolean

Hotkey = GetAsyncKeyState(Keys.F1) '<< Hotkey Escolhida

If Hotkey = True Then

Button1.PerformClick() '<<< Butão Que Vai Ser Pra a Hotkey Ser Ativa >>

End If

 

HOTKEY(timer1)

 

Dim Hotkey As Boolean

Hotkey = GetAsyncKeyState(Keys.F1)

If Hotkey = True Then

BtnRepeat.PerformClick()

End If

 

sóke nbao da certo

ajudem ai tou criando o trainer pra vces vlw

[~ Dragon' 0]

não sou dessa area ,mas pode estar algo errado nesse codigo.

[salssichao 0]

Dim Re As Integer

Re = ReadPointerInteger("PointBlank", &HA72CA8, &H45DCC)

Dim R As Integer

R = Re - 5

WritePointerInteger("PointBlank", &HA72CA8, R, &H45DCC)

 

 

Dim Hotkey As Boolean

Hotkey = GetAsyncKeyState(Keys.F10) '<< Hotkey Escolhida

If Hotkey = True Then

Button1.PerformClick() '<<< Butão Que Vai Ser Pra a Hotkey Ser Ativa >>

End If