you only need 2 buttons and 1 timmer, 1 button
Private Sub Command1_Click()
Timer1.Interval = 1
End Sub
secound button:
Private Sub Command2_Click()
Timer1.Interval = 0
End Sub
Timer:
Private Sub Timer1_Timer()
Call WriteALong("WarRock", &H7D9120, 1120403456)
End Sub
Ah ok thx! Danke dir hast icq? Wenn ja dann kannst du mir vllt helfen bin neu in VB6.
I have one more questition. How i can rename the buttons?^^ *noobask*^^
xDDD ich schreib se dir per pm^^
i found a new way in vb6 to do timers for stamina,i had the problem of stamina not unfrezzing when i want it to turn off with timer2.interval = 1,so
instead make a timer with interval of 1,then in the timer for hotkeys,
make it like so
If GetKeyPress(VbKeyNumpad1)Then
Timer2 = true 'on code
If GetKeyPress(VbKeyNumpad2)Then
Timer2 = False 'off code
this works good for me,now i dont use this method for all hacks just stamina,and others that wont shut off with interval = 0