Alert icon
We're changing our privacy policy. This stuff matters.  Learn more  Dismiss

Teamspeak Message Spammer TUTORIAL

Loading...

Sign in or sign up now!
Alert icon
Upgrade to the latest Flash Player for improved playback performance. Upgrade now or more info.
1,139
Loading...
Alert icon
Sign in or sign up now!
Alert icon

Uploaded by on May 17, 2008

Source Code:
Remeber F1 To Start F2 Stop


Private Scroll As Boolean
Private Shift As Boolean
Private Caps As Boolean
Private KeyResult As Long
Private Declare Function GetAsyncKeyState Lib "user32" (ByVal vKey As Long) As Integer

Private Sub Form_Load()
timer1.Enabled = False
timer1.Interval = 10
timer2.Interval = 1
timer3.Interval = 1
End Sub

Private Sub timer1_Timer()
SendKeys "{f10}"
SendKeys "{c}"
SendKeys "{t}"
SendKeys Text1.Text
SendKeys "{tab}"
SendKeys "{enter}"
End Sub

Private Sub timer2_Timer()
KeyResult = GetAsyncKeyState(112) If KeyResult = -32767 Then
timer1.Enabled = True End If




End Sub

Private Sub timer3_Timer()
KeyResult = GetAsyncKeyState(113) If KeyResult = -32767 Then
timer1.Enabled = False End If




End Sub

Category:

Entertainment

Tags:

License:

Standard YouTube License

Link to this comment:

Share to:
see all

All Comments (0)

Sign In or Sign Up now to post a comment!
Loading...
Alert icon
0 / 00Unsaved Playlist Return to active list
    1. Your queue is empty. Add videos to your queue using this button:
      or sign in to load a different list.
    Loading...Loading...Saving...
    • Clear all videos from this list
    • Learn more