dude i can tell your bitch ass never made a hack in VB before.... 'cause when you do it should look something like this.
Code:
Private Sub Command1_Click()
Timer1.Interval = 1
End Sub
Private Sub Command10_Click()
Timer1.Interval = 0
End Sub
Private Sub Command11_Click()
Timer6.Interval = 1
Timer7.Interval = 0
End Sub
Private Sub Command12_Click()
Timer1.Interval = 0
Timer2.Interval = 1
End Sub
Private Sub Command2_Click()
Timer1.Interval = 0
End Sub
Private Sub Command3_Click()
Timer2.Interval = 1
End Sub
Private Sub Command4_Click()
Timer2.Interval = 0
End Sub
Private Sub Command5_Click()
Timer3.Interval = 1
End Sub
Private Sub Command6_Click()
Timer3.Interval = 0
End Sub
Private Sub Command7_Click()
Timer4.Interval = 1
End Sub
Private Sub Command8_Click()
Timer4.Interval = 0
End Sub
Private Sub Command9_Click()
Timer5.Interval = 1
End Sub
Private Sub Timer1_Timer()
Call WriteALong("WarRock", &Hxxxxxx, 1120403456)
End Sub
Private Sub Timer2_Timer()
Call WriteALong("WarRock", &Hxxxxxx, 0)
Call WriteALong("WarRock", &Hxxxxxx, 0)
End Sub
Private Sub Timer3_Timer()
Call WriteALong("WarRock", &Hxxxxxx, 0)
Call WriteALong("WarRock", &Hxxxxxx, 0)
Call WriteALong("WarRock", &Hxxxxxx, 0)
Call WriteALong("WarRock", &Hxxxxxx, 0)
End Sub
Private Sub Timer4_Timer()
Call WriteALong("WarRock", &Hxxxxxx, 0)
Call WriteALong("WarRock", &Hxxxxxx, 0)
Call WriteALong("WarRock", &Hxxxxxx, 0)
Call WriteALong("WarRock", &Hxxxxxx, 0)
Call WriteALong("WarRock", &Hxxxxxx, 0)
Call WriteALong("WarRock", &Hxxxxxx, 0)
End Sub
Private Sub Timer5_Timer()
Dim NFD As Long
Dim NFD1 As Long
Call ReadALong("WarRock", &Hxxxxxx, NFD)
NFD1 = NFD + &H26C
Call WriteALong("Warrock", NFD1, -2000)
End Sub
Private Sub Timer6_Timer()
Call WriteALong("WarRock", &Hxxxxxx, 0)
End Sub
Private Sub Timer7_Timer()
Call WriteALong("WarRock", &Hxxxxxx, 1176256512)
End Sub
Private Sub Timer8_Timer()
If GetKeyPress(vbKeyRButton) Then
Call WriteALong("Warrock", &Hxxxxxx, 0)
Else:
Call WriteALong("Warrock", &Hxxxxxx, 1176256512)
End Sub
And this is for a basic hack too.
Edit: to hide my addresses.