How to make a text flooder?

Ah I was gonna show u how to do it on paltalk but it might be totaly different yo see we use this code in a module to send text to the paltalk room

Function RoomSend(Sendit As String)

Dim mywindowclass As Long

Dim wtlsplitterwindow As Long

Dim atlb As Long

Dim atlaxwin As Long

Dim X As Long

Dim richedita As Long

Dim toolbarwindow As Long

Dim wtlbitmapbutton As Long



mywindowclass = FindWindow("my window class", vbNullString)

wtlsplitterwindow = FindWindowEx(mywindowclass, 0&, "wtl_splitterwindow", vbNullString)

wtlsplitterwindow = FindWindowEx(wtlsplitterwindow, 0&, "wtl_splitterwindow", vbNullString)

wtlsplitterwindow = FindWindowEx(wtlsplitterwindow, 0&, "wtl_splitterwindow", vbNullString)

atlb = FindWindowEx(wtlsplitterwindow, 0&, "atl:0053b788", vbNullString)

atlaxwin = FindWindowEx(atlb, 0&, "atlaxwin71", vbNullString)

X = FindWindowEx(atlaxwin, 0&, "#32770", vbNullString)

richedita = FindWindowEx(X, 0&, "richedit20a", vbNullString)

richedita = FindWindowEx(X, richedita, "richedit20a", vbNullString)

Call SendMessageByString(richedita, WM_SETTEXT, 0&, Sendit$)



If richedita = 0 Then

Exit Function

End If



Do

DoEvents

mywindowclass = FindWindow("my window class", vbNullString)

wtlsplitterwindow = FindWindowEx(mywindowclass, 0&, "wtl_splitterwindow", vbNullString)

wtlsplitterwindow = FindWindowEx(wtlsplitterwindow, 0&, "wtl_splitterwindow", vbNullString)

wtlsplitterwindow = FindWindowEx(wtlsplitterwindow, 0&, "wtl_splitterwindow", vbNullString)

atlb = FindWindowEx(wtlsplitterwindow, 0&, "atl:0053b788", vbNullString)

atlaxwin = FindWindowEx(atlb, 0&, "atlaxwin71", vbNullString)

X = FindWindowEx(atlaxwin, 0&, "#32770", vbNullString)

toolbarwindow = FindWindowEx(X, 0&, "toolbarwindow32", vbNullString)

wtlbitmapbutton = FindWindowEx(toolbarwindow, 0&, "wtl_bitmapbutton", vbNullString)

Call SendMessageLong(wtlbitmapbutton, WM_LBUTTONDOWN, 0&, 0&)

Call SendMessageLong(wtlbitmapbutton, WM_LBUTTONUP, 0&, 0&)

Loop Until wtlbitmapbutton  0

End Function

then on a timer we call it like this

Call RoomSend(Text1.Text)

where text1 is where you put the messege 🙂 its a mess lol

but can you tell us the windows handle to see if I can change it so it works for that program or can u give us the link to the program I might be able to do a quick flooder for ya by next week 😉

Ah it sounds like is close to the paltalk code hey but whas the ehole window handle where the richt20 is, and whats the program 🙂

umm okie, but i need to check it can u pm it to me 🙂