Whats Wrong in this SuperJump code??

[Rudde]

Button:


Dim JSER As Long
Dim JSER1 As Long
Dim JSER2 As Single
Call ReadALong("WarRock", &H12C8520, JSER)
JSER1 = JSER + &H179
JSER2 = Text1.Text
Call WriteAFloat("WarRock", JSER1, JSER2)

Timer:


If GetKeyPress(vbKeyMButton) Then
Dim JSER As Long
Dim JSER1 As Long
Dim JSER2 As Single
Call ReadALong("WarRock", &H12C8520, JSER)
JSER1 = JSER + &H179
JSER2 = Text1.Text
Call WriteAFloat("WarRock", JSER1, JSER2)
End If

[janitso]

I think warrock has been updatated

[Rudde]

I have take in the new codes.. I can just go underground if i use -2000 but i DONT get in the sky

[wr194t]

Don't use -2000 as the value. - = below 0 which makes you go underground. You want to make the value 1000-2000+ to jump in the air.

[DutchHelFire]

didnt the ofset get 178????

[Rudde]

I have the value on 1500+ so vats the problem?

[wr194t]

didnt the ofset get 178????Oh I just noticed that. Your offset is 179, but it should be 178.

[ZeaS]

Oh I just noticed that. Your offset is 179, but it should be 178.

doesn`t work, too ;) i got the same problem it only works in emblem >_>

[DutchHelFire]

doesn`t work, too ;) i got the same problem it only works in emblem >_>

ye and in emblem NFD doesnt works!

[ZeaS]

ye and in emblem NFD doesnt works!

thats not true mine works

[str1k3r21]

thats the new warrock update :P

[ZeaS]

thats the new warrock update :P

hehe my superjump work now ^^ :P just "don`t use my module generator" because there is a fucking bug in it... now my superjump works perfect ;)

[i will release later a updated version of the module maker (then the superjump... works :)]

~ZeaS