Code:
Public Class Form1
Private Declare Function GetAsyncKeyState Lib "user32" (ByVal vkey As Long) As Integer
Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
If GetAsyncKeyState(Keys.F3) Then
Timer2.Start()
End If
If GetAsyncKeyState(Keys.F4) Then
Timer2.Stop()
End If
End Sub
Private Sub Timer2_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer2.Tick
Dim value As Point
value = Cursor.Position
Cursor.Position = value
Me.Cursor = New Cursor(Cursor.Current.Handle)
Cursor.Position = New Point(Cursor.Position.X, Cursor.Position.Y + 30)
End Sub
End Class
That was the code for my Anti-Recoil Beta 2, which apparently fucked up but ran perfectly on my PC. Here is the full unedited code for it, which is actually quite simple. I got the Cursor.Position thing straight from the Microsoft online help/resource thingy.
Anybody know what the problem is? It's F3 to start and F4 to stop. If you can fix it successfully then I will put your name on it as well as mine. If you're gonna leech, credit me for the original.