No spread/recoil

[Death526]

can some1 write the code of how to get all of the no spread/recoil addresses into one command box on vb6???

[daemen14]

lol can you send me your private version

[Death526]

it doesnt have any of the hacks u wanted they are still basic hacks but i just put more things like scope crosshairs 5th slot uhhh and some others

[daemen14]

does 5th slot actually work? and what others? lol

[ZeaS]

Private Sub Timer8_Timer()
Call WriteALong("WarRock", &Hadress, 0)
Call WriteALong("WarRock", &Hadress, 0)
Call WriteALong("WarRock", &Hadress, 0)
Call WriteALong("WarRock", &Hadress, 0)
Call WriteALong("WarRock", &Hadress, 0)
Call WriteALong("WarRock", &Hadress, 0)
Call WriteALong("WarRock", &Hadress, 0)
Call WriteALong("WarRock", &Hadress, 0)
Call WriteALong("WarRock", &Hadress, 0)
Call WriteALong("WarRock", &Hadress, 0)
End Sub

[Death526]

Private Sub Timer8_Timer()
Call WriteALong("WarRock", &Hadress, 0)
Call WriteALong("WarRock", &Hadress, 0)
Call WriteALong("WarRock", &Hadress, 0)
Call WriteALong("WarRock", &Hadress, 0)
Call WriteALong("WarRock", &Hadress, 0)
Call WriteALong("WarRock", &Hadress, 0)
Call WriteALong("WarRock", &Hadress, 0)
Call WriteALong("WarRock", &Hadress, 0)
Call WriteALong("WarRock", &Hadress, 0)
Call WriteALong("WarRock", &Hadress, 0)
End Sub

thaaaaankkkkksss!!!!!

[daemen14]

can u post ur trainer when u add no recoil/no spread please

[Death526]

can u post ur trainer when u add no recoil/no spread please

i released happy???

[t3lazy1]

Also for people who are new to VB6. You have to do this:
Make a Command Button.
In it put:
Timer1.Interval = 1

Then make a timer. It should say Timer1(If not change the one above to TimerX,the x represents the number of timer it is.)In Timer one put this:


Private Sub Timer1_Timer()
Call WriteALong("WarRock", &H943A50, 0)
Call WriteALong("WarRock", &H943A51, 0)
Call WriteALong("WarRock", &H943A52, 0)
Call WriteALong("WarRock", &H943A53, 0)
Call WriteALong("WarRock", &H943A54, 0)
Call WriteALong("WarRock", &H943A55, 0)
Call WriteALong("WarRock", &H943A56, 0)
Call WriteALong("WarRock", &H943A57, 0)
Call WriteALong("WarRock", &H943A58, 0)
Call WriteALong("WarRock", &H943A59, 0)
End Sub

[unseenss]

no thats wrong

it should be

Private Sub Command1_Click()
If Timer1.Enabled=True Then Timer1.Enabled=False Else Timer1.Enabled=True
End Sub

with the writealongs in the timer and the timer interval should be at 100

[t3lazy1]

I don't know. It works for me.