Private Sub Command1_Click() Timer3.Interval = 1 End Sub
Private Sub Command2_Click() Timer1.Interval = 0 End Sub
Private Sub Timer1_Timer()
Call WriteALong("Warrock", &H7F2B34, 1120403456) "Right Code
End Sub
Private Sub Timer2_Timer() "For the On Button Hotkey If GetKeyPress(vbKeyControl) And GetKeyPress(vbKeyF1) Then "Press CTRL F1 Timer3.Interval = 1 End If End Sub
Private Sub Timer3_Timer() "For the Off Button Hotkey If GetKeyPress(vbKeyControl) And GetKeyPress(vbKeyF2) Then "Press CTRL F2 Timer3.Interval = 0 End If End Sub