what is the code and the right hotkey (space) for SJ

[floris12345!]

i tried to add a hotkey to my superjump
but it dont work : ?

If GetKeyPress(vbKeySpace) Then
Dim SJ As Long
Dim SJ1 As Long
Dim SJ2 As Single
Call ReadALong("WarRock", &address, SJ)
SJ1 = SJ + &H180
SJ2 = Text1.Text
Call WriteAFloat("WarRock", SJ1, SJ2)

then i get the error "Sub or Function is not defied"
but i tried it with an old address and it didnt work why ?

[bohnenbong]

wrong offset...
&H179

[-TM-]

This needs to be in a Timer with a Interval of about 150 - 300, I usually do 200...

If GetKeyPress(vbKeySpace) Then
Dim SJ As Long
Dim SJ1 As Long
Dim SJ2 As Single
Call ReadALong("WarRock", &H12DF500, SJ)
SJ1 = SJ + &H179
SJ2 = Text1.Text
Call WriteAFloat("WarRock", SJ1, SJ2)
End If

Game updated, offsets and address's changed...

Sub or Function not defined...Something is wrong with your Module I'm guessing, you didn't specify enough.

[Teh Sasuke]

My super jump code :

Timer?.interval = 1

If GetKeyPress (vbKeyControl) And GetKeyPress (vbKeySpace) Then
Dim SJ As Long
Dim SJ1 As Long
Dim SJ2 As Single
Call ReadALong("warrock", &H12DF500, SJ)
SJ1 = SJ + &H178
SJ2 = Text1.Text
Call WriteAFloat("warrock", SJ1, SJ2)
End If

And this is working . Tested by me .

[floris12345!]

i am sorry but i made it right
but when i press space he jumps normal
with Ctrl nothing happens
and when i press space+Ctrl it works sometimes