wats wrong with the Super Jump code

[nub_g0t_high]

its in vb6

Private Sub Command5_Click()
Timer3.Interval = 1
End Sub

Private Sub Command14_Click()
Timer3.Interval = 0
End Sub

Private Sub Timer3_Timer()
If GetKeyPress(vbKeyControl) Then
Dim JSER As Long
Dim JSER1 As Long
Dim JSER2 As Single
Call ReadALong("WarRock", &HA1279280, JSER)
JSER1 = JSER + &H178
JSER2 = Text1.Text
Call WriteAFloat("WarRock", JSER1, JSER2)
End If
End Sub

text1 is set to 2000.

[federico*]

its in vb6

Private Sub Command5_Click()
Timer3.Interval = 1
End Sub

Private Sub Command14_Click()
Timer3.Interval = 0
End Sub

Private Sub Timer3_Timer()
If GetKeyPress(vbKeyControl) Then
Dim JSER As Long
Dim JSER1 As Long
Dim JSER2 As Single
Call ReadALong("WarRock", &HA1279280, JSER)
JSER1 = JSER + &H178
JSER2 = Text1.Text
Call WriteAFloat("WarRock", JSER1, JSER2)
End If
End Sub

text1 is set to 2000.

where is timer.enabled?
learn vb, then you're able to create cheats

[killer2334]

Private Sub Timer3_Timer()
If GetKeyPress(vbKeyControl) Then
Dim JSER As Long
Dim JSER1 As Long
Dim JSER2 As Single
Call ReadALong("WarRock", &HA1279280, JSER)
JSER = JSER1 + &H178
JSER2 = Text1.Text
Call WriteAFloat("WarRock", JSER1, JSER2)
End If
End Sub

that's how ur supposed to do it.
and u dont put it in a timer u dick. o btw superjump is detected i think.

[nub_g0t_high]

did wat u said, and put ur code in a command. still did not work.

wat should my timer interval be?

[XqwertyX]

does it give any errors?

[nub_g0t_high]

does it give any errors?

nope, just doesnt fucking jump thats all.

[radnomguywfq3]

Post this in the VB section, you will get a better reply.