Home › Forum › MultiPlayer Game Hacks & Cheats › Other Semi-Popular First Person Shooter Hacks › WarRock - International Hacks › [REQ.] For Check! [I Give SomeOne]
[REQ.] For Check! [I Give SomeOne]
[REQ.] For Check! [I Give SomeOne]
It's Good Written??
Please, Check Thanks.
Code:
Private Declare Function HetasynsKeyState Lib "user32" (ByVal key As Long) As Integer
------------------------------------------------------------------------
Private Sub Timer1_Timer()
Dim shotgun As Long
Dim shotgun1 As Long
Call ReadALong("Warrock", &H8B5288, shotgun)
shotgun1 = shotgun + &H4C
Call WriteALong("Warrock", shotgun1, 34)
End Sub
------------------------------------------------------------------------
Private Sub Timer2_Timer()
If GetKeyPress(vbKeyControl) And GetKeyPress(vbKeyF1) Then
Timer1.Interval = 1
End If
End Sub
nope not well written shotgun is a command button not a timer and im pretty sure it cant be written as a timer
im sure this is the way its written
im sure this is the way its written
Code:
Private Sub Command3_Click()
If GetKeyPress(vbKeyControl) And GetKeyPress(vbKeyF1) Then
Dim shotgun As Long
Dim shotgun1 As Long
Call ReadALong("Warrock", &H8B5288, shotgun)
shotgun1 = shotgun + &H4C
Call WriteALong("Warrock", shotgun1, 34)
End If
End Sub
Similar Threads
- 1Last post
- 3Last post
- 1Last post
Originally Posted by yogilek
