Visual Basic 6 codes

[jokuvaan11]

I am writing codes to Visual Basic 6,I have writed this:

Private Sub Command6_Click()
Call ReadALong("Warrock", &H7DB120, 1120403456)
End Sub

WHAT IS WRONG WITH THIS ??
This is must be UNLIMITED STAMINA !!
PLZ SEND ME ANSWER OR THIS RIGHT CODE?!?!?!
THEN I HAVE DONE MY 2nd TRAINER!!and I will post it for 30mins...

[Stranger00]

use WriteAlong. Not read...

[jokuvaan11]

use WriteAlong. Not read...

OH I AM SO STUPID

IS THIS RIGHT NOW:

Private Sub Command6_Click()
Call WriteALong("Warrock", &H7DB120, 1120403456)
End Sub

[MS Word]

no, u must freeze it with a timer i think...

[jokuvaan11]

no, u must freeze it with a timer i think...

I already have timer to freeze that I just didn't write timer code here!!

[Kung Fu Penguin31]

yes you are supposed to freeze it , thats why its called unlimited stamina , it doesnt change .

[kyo]

Private Sub staminatimer_Timer()
Call WriteALong("WarRock", &H7DB120, 1120403456)
End Sub

Private Sub CmdStamina_Click()
If staminatimer.Interval = 400 Then
CmdStamina.Caption = "OFF"
staminatimer.Interval = 0
Else
staminatimer.Interval = 400
CmdStamina.Caption = "ON"
End If
End Sub

on off button with a 400 ms interval for the stamina reset (works fine)

[cjg333]

yea kyo has it rt,you have to put the code in the timer to freeze,and put the rest in the button like kyo did,or just use a timer with hotkeys and do away with buttons.who wants to minimize and hit a button anymore.make hotkeys

[scooby107]

Or why not do it like this:

Private Sub Timer1_Timer '//Stamina()
Call WriteALong("WarRock", &H7DB120, 1120403456)
End Sub

Private Sub Command1_Click '//Stamina On()
Timer1.Interval = 1
End Sub

Private Sub Command2_Click '//Stamina Off()
Timer1.Interval = 1
End Sub

[Xosmi]

Or why not do it like this:

Private Sub Timer1_Timer '//Stamina()
Call WriteALong("WarRock", &H7DB120, 1120403456)
End Sub

Private Sub Command1_Click '//Stamina On()
Timer1.Interval = 1
End Sub

Private Sub Command10_Click '//Stamina Off()
Timer5.Interval = 1
End Sub

looking at your code you have 2 timers (timer1 and 5) to turn it on/off.
however, the off timer (5) just overwrites timer 1, wich is also still active. this might cause conflicts. also, you have no way to turn it back on, since the off function keeps running.

also, it's just plain excess code.

why use 2 timers if you can do with just one ?

[scooby107]

looking at your code you have 2 timers (timer1 and 5) to turn it on/off.
however, the off timer (5) just overwrites timer 1, wich is also still active. this might cause conflicts. also, you have no way to turn it back on, since the off function keeps running.

also, it's just plain excess code.

why use 2 timers if you can do with just one ?

Typo, sorry.

[kyo]

Who wants to minimize and hit a button anymore.make hotkeys

use 2 screens ?

Or why not do it like this:

Private Sub Timer1_Timer '//Stamina()
Call WriteALong("WarRock", &H7DB120, 1120403456)
End Sub

Private Sub Command1_Click '//Stamina On()
Timer1.Interval = 1
End Sub

Private Sub Command2_Click '//Stamina Off()
Timer1.Interval = 1
End Sub

that uses 2 buttons & you cant see in the program if the hack is active

[scooby107]

use 2 screens ?



that uses 2 buttons & you cant see in the program if the hack is active

So you add hotkeys, it isn't hard.

EDIT: Actually you are right, i would have messed up even if i add hotkeys. The hotkeys would only be activated if the button was clicked.

[tednugent]

Post this in the code support section.

Someone move this...