Private Sub Timer2_Timer()
If GetAsyncKeyState(97) <> 0 Then Call WriteALong("Warrock", &H90DC36, &H0)
End Sub
Private Declare Function GetAsyncKeyState Lib "user32" (ByVal vKey As Long) As Integer
If GetAsyncKeyState(96) <> 0 Then Call WriteALong("Warrock", &H90DC36, &H1)


