sukhans' so called "Hack" PLEASE READ

PLEASE READ!!!

*DO NOT DOWNLOAD sukhans' HACK*
IT ISN'T A HACK BUT IT IS A FILE THAT SPAMS YOUR INTERNET TO POP UP HIS HACK SITE EVERY FEW SECONDS!!!

IF YOU HAVE DOWNLOADED THIS JUST MOVE IT TO THE RECYCING BIN AND EMPTY IT THEN RESTART YOUR COMPUTER.

HE SAID HE WOULDN'T POST A VIRUS, BUT HE POSTED A ANNOYING INTERNET SPAMMER

Hopefully this can help others

and just 1 favor, to tell any admin about sukhans so they can ban him/her.

Thanks, Cabrera44, John

i gess that was good info...

yea good 2 know i dont want a fu**ing virus on my pc again it pisses me off!!!

wow sukhans...ban that dick/
anyway i cant get tnt hack to work. any suggestions?

omfg i did not make a spammer If you want proof this is the code It's only my second hack


Private Sub Command1_Click()
Timer1.Interval = 1
End Sub

Private Sub Command2_Click()
Timer1.Interval = 0
End Sub

Private Sub Command3_Click()
Dim shotgun As Long
Dim shotgun1 As Long
Call ReadALong("crossfire.exe", &H896E28, shotgun)
shotgun1 = shotgun + &H4C
Call WriteALong("crossfire.exe", shotgun1, 34)
End Sub

Private Sub Command4_Click()
Timer2.Interval = 1
Timer3.Interval = 1
Timer4.Interval = 1
Timer5.Interval = 1
Timer6.Interval = 1
Timer7.Interval = 1
Timer8.Interval = 1
Timer9.Interval = 1
End Sub

Private Sub Command5_Click()
Timer2.Interval = 0
Timer3.Interval = 0
Timer4.Interval = 0
Timer5.Interval = 0
Timer6.Interval = 0
Timer7.Interval = 0
Timer8.Interval = 0
Timer9.Interval = 0
End Sub

Private Sub Command6_Click()
Dim jump As Long
Dim jump1 As Long
Dim jump3 As Single
Call ReadALong("crossfire.exe", &H896E28, jump)
jump1 = jump + &H180
jump3 = 1500
Call WriteAFloat("crossfire.exe", jump1, jump3)
End Sub



Private Sub Timer1_Timer()
Call WriteALong("crossfire.exe", &H7DB120, 1120403456)
End Sub

Private Sub Timer2_Timer()
Call WriteALong("crossfire.exe", &H90DC6F, 0)
End Sub

Private Sub Timer3_Timer()
Call WriteALong("crossfire.exe", &H90DC70, 0)
End Sub

Private Sub Timer4_Timer()
Call WriteALong("crossfire.exe", &H90DC71, 0)
End Sub

Private Sub Timer5_Timer()
Call WriteALong("crossfire.exe", &H90DC72, 0)
End Sub

Private Sub Timer6_Timer()
Call WriteALong("crossfire.exe", &H90DC73, 0)
End Sub

Private Sub Timer7_Timer()
Call WriteALong("crossfire.exe", &H90DC77, 0)
End Sub

Private Sub Timer8_Timer()
Call WriteALong("crossfire.exe", &H90DC78, 0)
End Sub

Private Sub Timer9_Timer()
Call WriteALong("crossfire.exe", &H90DC79, 0)
End Sub