[HELP] superjump whats wrong again ??

i know... long time no release... cause i cant get superjump working... and i lost my data ( themida ) so i use the fucking demo + ACProtect.

here my code

Code:

Private Sub Timer9_Timer()
If chiptune6(vbKeyControl) And chiptune6(vbKeySpace) Then
Dim SJ As Long
Dim SJ1 As Long
Dim SJ2 As Single
Call chiptune12("WarRock", &H129EF90, SJ)
SJ1 = SJ + &H180
SJ2 = Text1.Text
Call chiptune13("WarRock", SJ1, SJ2)
End If
End Sub

and the complete form attached ( without module... bug saving )

i have tried like that : Call chiptune13("WarRock", SJ1, Text1.Text)... its same..
i tried too without timer... and with timer ( timer?.interval = 1 ) and ( timer?.interval = 100 )

can some one help me please

AND DONT BE RACIST CAUSE I SPEAK FRENCH

thx for help

[HELP] superjump whats wrong again ??

Post a Reply

Similar Threads

Tags for this Thread