spread / recoil

ZeaS · 2007-07-03T19:58:35.000Z

hello, i get a question, how look`s the code in vb6, for the no spread/no Recoil hack??? (with hotkey) please, you don`t must write the adress... please help me^^ and for swim in the air??? i get the adress, too.. but i can`t turn off the... ^^

lol sorry, i made hacks in vb6, and i wan`t to know, how the code look, that no spread no recoil and swim with hotkey works.. here a example

Private Sub Timer8_Timer()
If GetKeyPress(vbKeyControl) And GetKeyPress(vbKeySpace) Then
Dim SJ As Long
Dim SJ1 As Long
Dim SJ2 As Single
Call ReadALong("WarRock", &ADRESS, SJ)
SJ1 = SJ + &HPOINTER
SJ2 = Text1.Text
Call WriteAFloat("WarRock", SJ1, SJ2)

End If
End Sub

this is a working superjump hack, with hotkey, and it works, but how to write the code for no spread / no recoil and for swim in the air?? the adresses i have

and sorry for bad english :P

i dont know for no spriad/no recoil but this is for swim:

Private Sub Timer8_Timer()
Dim swim As Long
Dim swim1 As Long
Dim swim3 As Single

If GetKeyPress(vbKeyNumpad8) Then
Call ReadALong("WarRock", &H896E28, swim)
swim1 = swim + &H54
Call WriteALong("WarRock", swim1, &H4)
End If
If GetKeyPress(vbKeyNumpad9) Then
Call ReadALong("WarRock", &H896E28, swim)
swim1 = swim + &H54
Call WriteALong("WarRock", swim1, &H0)
End If
End Sub

ok thank you for swim i try it in few of minutes

anybody know`s with no spread no recoil?

Originally Posted by 123456789987654321

i dont know for no spriad/no recoil but this is for swim:

Private Sub Timer8_Timer()
Dim swim As Long
Dim swim1 As Long
Dim swim3 As Single

If GetKeyPress(vbKeyNumpad8) Then
Call ReadALong("WarRock", &H896E28, swim)
swim1 = swim + &H54
Call WriteALong("WarRock", swim1, &H4)
End If
If GetKeyPress(vbKeyNumpad9) Then
Call ReadALong("WarRock", &H896E28, swim)
swim1 = swim + &H54
Call WriteALong("WarRock", swim1, &H0)
End If
End Sub

Dam it i'm too late.

So you were going to post swim too terminator O.o?

nobody know's the code for no spread/no recoil??

Originally Posted by Inna

So you were going to post swim too terminator O.o?

of curse. i was searching for it. and sudently you showed up

bad bad bad!!!

Timer code:

Code:

Call WriteALong("WarRock", address, 0)
Call WriteALong("WarRock", address, 0)
Call WriteALong("WarRock", address, 0)
Call WriteALong("WarRock", address, 0)
Call WriteALong("WarRock", address, 0)
Call WriteALong("WarRock", address, 0)
Call WriteALong("WarRock", address, 0)
Call WriteALong("WarRock", address, 0)
Call WriteALong("WarRock", address, 0)
Call WriteALong("WarRock", address, 0)
Call WriteALong("WarRock", address, 0)
Call WriteALong("WarRock", address, 0)

Hotkey code:

Code:

if getkeypress(hotkey) and getkeypress(another one) then
timerX.intrval = 1
end if

eot

thank you a lot

now my trainer are finished

spread / recoil

Similar Threads

Tags for this Thread