I know how to make a autotyper. but can sombody say how i make it slower. like human typing i searhed on the internet but only i found was already made auto typers.
Cya
Change the replay interval (timer) or use system.threading.thread.sleep(5000) 'sleep 5 seconds
Like Blub says: Just make the interval higher (so instead of like 1000 change it to 5000)
wow that i know but. i dont wanne edite the interval but.
if i use
Sendkeys.send("lol test")
then it like it past but not like it typ and i wanne make it that it typ not past
Use sleep between every sendkeys /
Hmm.
Declare/consts
[php]
Public Declare Function keybd_event Lib "user32" (ByVal bVk As Byte, ByVal bScan As Byte, ByVal dwFlags As Long, ByVal dwExtraInfo As Long) As Long
Const KEYEVENTF_KEYUP = &H2
[/php]
A little sub
[php]
Private Sub TypeThis(ByVal strToSend as string, ByVal speed as integer)
Dim StringToSend As String = strToSend
Dim ToChars() As Char = StringToSend.ToCharArray
Dim i As Integer = 0
Dim kCon As New KeysConverter
Do Until i = ToChars.Count
keybd_event(kCon.ConvertFromString(ToChars(i)), 0, 0, 0)
keybd_event(kCon.ConvertFromString(ToChars(i)), 0, KEYEVENTF_KEYUP, 0)
i += 1
System.Threading.Thread.Sleep(speed)
Loop
End Sub
[/php]
Unfortunately this will take some tweaking to accept spaces, i.e "OMG YOU'RE COOL" will become "OMGYOU'RECOOL".
Now to use it, call this from wherever you need
[php]
TypeThis("J-Deezy", 500)
[/php]
You can set the speed or the text to whatever you want. Remember, the time between letters is MILLSECONDS, not seconds.
ALTERNATIVELY, using sendkeys
[php]
Private Sub TypeThis(ByVal strToSend as string, ByVal speed as integer)
Dim i As Integer = 0
Do Until i = strToSend.Length
SendKeys.SendWait(strToSend(i))
i += 1
System.Threading.Thread.Sleep(speed)
Loop
End Sub
[/php]
[php]
TypeThis("Damn J-Deezy has a big peni-", 300)
[/php]
That works flawlessly
you mean to type every letter? simple, access the string by its Index, so you will sendkeys of each character.
And then make it send keys of each of the string character. With a sleep of 1000 or so.
Code:
Dim test As String = "testing"
For i As Integer = 0 To test.Length - 1
Console.WriteLine(test(i)) 'send keys here... Sendkeys.send(test(i))
Next
don't forget the timer interval..
Originally Posted by 'Bruno
you mean to type every letter? simple, access the string by its Index, so you will sendkeys of each character.
And then make it send keys of each of the string character. With a sleep of 1000 or so.
Finaly yes somthing like that but does sombody get a way for this
Originally Posted by redkevin25
Finaly yes somthing like that but does sombody get a way for this
just wrote it, check the edit.
Add another textbox and type on the timer
timer1.interval=textbox2
there u go u can change it with the textbox.
Originally Posted by wassup40
Add another textbox and type on the timer
timer1.interval=textbox2
there u go u can change it with the textbox.
Not what he wanted, what's with people and not reading threads these days
Btw with the example I gave you.. you could change the for for a timer tick event...
Code:
Dim counter As Integer = 0
Dim test As String = "testing"
Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
If (counter < test.Length) Then
SendKeys.Send(test(counter))
counter = counter + 1
End If
End Sub
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Timer1.Start()
End Sub
i guess thats what you want
Originally Posted by 'Bruno
Code:
Dim counter As Integer = 0
Dim test As String = "testing"
Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
If (counter < test.Length) Then
SendKeys.Send(test(counter))
counter = counter + 1
End If
End Sub
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Timer1.Start()
End Sub
i guess thats what you want
I already posted something similar above but without the use of a timer, this works pretty much the same.
Originally Posted by Jason
I already posted something similar above but without the use of a timer, this works pretty much the same.
you edit it.. didn't see it.. can't possible know when it was edited.. ;o
edit: or i missed the first part of the code.. anyway
Originally Posted by 'Bruno
