(Guide) Hot to create an undetectable Auto Talker

Discussion in 'Programming General' started by chrisc163, Jun 9, 2008.

Thread Status:
Not open for further replies.
(Guide) Hot to create an undetectable Auto Talker
  1. Unread #1 - Jun 9, 2008 at 1:25 PM
  2. chrisc163
    Referrals:
    0

    chrisc163 Guest

    (Guide) Hot to create an undetectable Auto Talker

    Written by chrisc163 (BackLine Software)

    This is my 1st post! going to make my home in the VB Section :) Writing guides, posting my source codes and helping others.

    ::Intoduction::

    In this guide i will teach you how to create a undetectable auto talker for runescape. I will be using Visual Basics 6.

    What makes this auto talker undetectable you might ask?

    Well, There are 3 lines of text that the user would be able to send to the RS client. Each line should say somthing different or say the same thing but have spelling mistakes.

    The auto talker will randomly select a number between 1 and 3. If 1 is randomly chosen then the talker will send the Line1 to the RS client. Same goes with 2 and 3.

    Another antiban feature is the random speed interval. The talker will add a randomly selected number between "500" to the speed that the user inputs. This makes sure that the time between messages is always different. Making it harder for Jajex to detect you :p

    Add the following items to a form:


    Text Box - (Name it "Line1")
    Text Box - (Name it "Line2")
    Text Box - (Name it "Line3")
    Text Box - (Name it "Speed")
    Label - (Name it "Status")
    Command Button - (Name is "Start")
    Timmer - (Name it "Timmer1") Set Enabled = False

    Have it all set up like this:
    [​IMG]

    Now that you have all the components set up with the correct names its time to code the auto takler.

    Code For command Button "start"

    Code:
    Private Sub Start_Click()
    Dim Interval As Integer
    Interval = (Rnd * 500)
    
    If Timmer1.Enabled = True Then
        Timmer1.Enabled = False
        Start.Caption = "Start"
    Else
        Timmer1.Interval = Speed.Text + Interval
        Timmer1.Enabled = True
        Start.Caption = "Stop"
    End If
    End Sub
    
    Code for timmer "Timmer1"

    Code:
    Private Sub Timmer1_Timer()
    Dim Line As Integer
    Dim Interval As Integer
    Line = (Rnd * 3)
    Interval = (Rnd * 500)
    
        Timmer1.Interval = Speed.Text + Interval
    If Line = 1 Then
        SendKeys Line1.Text & "~"
    ElseIf Line = 2 Then
        SendKeys Line2.Text & "~"
    ElseIf Line = 3 Then
        SendKeys Line3.Text & "~"
    End If
    
    Status.Caption = Timmer1.Interval
    
    End Sub
    
    There we go an undetectable auto talker :).

    Feel free to play around with my code maybe add some more user interaction features like text effects etc...

    Written by chrisc163 (backline Software)

    Copywrite 2008
     
  3. Unread #2 - Jun 9, 2008 at 3:59 PM
  4. jdsfighter
    Joined:
    Jan 21, 2007
    Posts:
    603
    Referrals:
    0
    Sythe Gold:
    0

    jdsfighter Forum Addict
    Visual Basic Programmers

    (Guide) Hot to create an undetectable Auto Talker

    This is hardly undetectable. I mean come on. There is nothing even some what secure about this.

    To add security you need to throw in some wait functions and make it so it hits 1 key at a time. Not the entire string at once.
     
  5. Unread #3 - Jun 9, 2008 at 7:48 PM
  6. Jazz00006
    Joined:
    Aug 26, 2005
    Posts:
    807
    Referrals:
    0
    Sythe Gold:
    0

    Jazz00006 Apprentice
    Visual Basic Programmers

    (Guide) Hot to create an undetectable Auto Talker

    If I see this fucking tutorial one more time....
     
  7. Unread #4 - Jun 10, 2008 at 3:09 AM
  8. 0h n035
    Joined:
    Feb 1, 2007
    Posts:
    163
    Referrals:
    0
    Sythe Gold:
    0

    0h n035 Active Member

    (Guide) Hot to create an undetectable Auto Talker

    You could AT LEAST include:

    Code:
    Public Function SmartMistake(Letter As String, MistakenLetter As String) As Boolean
       Dim Char As String, Char2() As String, Upper As Boolean, Found As Boolean
       Randomize
       Char = "abcdefghijklmnopqrstuvwxyz1234567890"
       Char2() = Split("sq|vn|xv|sf|wr|dg|fh|gj|uo|hk|jl|k;|n,|bm|ip|o[|wa|et|ad|ry|yi|cb|qe|zc|tu|xsa|`2|13|24|35|46|57|68|79|80|9-", "|")
       Upper = IsCharUpper(Asc(Letter))
       If IsNumeric(Letter) = False Then LCase (Letter)
       For c = 1 To Len(Char)
          If Mid(Char, c, 1) = Letter Then
             MistakenLetter = Mid(Char2(c - 1), Int(Len(Char2(c - 1)) * Rnd + 1), 1)
             c = Len(Char)
             Found = True
             SmartMistake = True
          End If
       Next c
       If Upper = True Then UCase (Mistake)
       If Found = False Then MistakenLetter = Letter: If Upper = True Then UCase (MistakenLetter): SmartMistake = False
    End Function
    Public Function SmartType(Text As String, Pause As Long, Mistake As Long, Enter As Boolean)
       Dim NewLetter As String
       Randomize
       For i = 1 To Len(Text)
          If Int(Mistake * Rnd) = 0 Then
             If SmartMistake(Mid(Text, i, 1), NewLetter) = True Then
                SendKeys NewLetter
                Wait (Int(Rnd * Pause))
                SendKeys "{BS}"
                Wait (Int(Rnd * Pause))
             End If
          End If
          SendKeys (Mid$(Text, i, 1))
          Wait (Int(Rnd * Pause))
       Next i
       If Enter = True Then SendKeys "{ENTER}"
    End Function
    Found them in some other Autotalker guide.
     
  9. Unread #5 - Jun 10, 2008 at 3:35 AM
  10. Covey
    Joined:
    Sep 9, 2005
    Posts:
    4,510
    Referrals:
    9
    Sythe Gold:
    9
    Discord Unique ID:
    807246764155338833
    Discord Username:
    Covey#1816

    Covey Creator of EliteSwitch
    Retired Sectional Moderator Visual Basic Programmers

    (Guide) Hot to create an undetectable Auto Talker

    We need a new vb6 programming rule, anymore auto talker tutorials = insta ban
     
  11. Unread #6 - Jun 10, 2008 at 3:52 AM
  12. Darthatron
    Joined:
    May 22, 2006
    Posts:
    1,612
    Referrals:
    3
    Sythe Gold:
    0

    Darthatron Massive Troll
    Retired Sectional Moderator Visual Basic Programmers

    (Guide) Hot to create an undetectable Auto Talker

    Really now... I've seen more undetectable giant golden statues of Buddha... It doesn't even type the text, it just pastes it. Before you post your next "undetectable" tutorial maybe you learn2code.

    [​IMG]

    - Darthatron. :)
     
  13. Unread #7 - Jun 10, 2008 at 6:39 AM
  14. Jazz00006
    Joined:
    Aug 26, 2005
    Posts:
    807
    Referrals:
    0
    Sythe Gold:
    0

    Jazz00006 Apprentice
    Visual Basic Programmers

    (Guide) Hot to create an undetectable Auto Talker

    People ripping off my code again? I originally created the "Mistake" function and people stole it =( Oh, I have a PM...
     
  15. Unread #8 - Oct 10, 2008 at 4:46 AM
  16. abluescarab
    Joined:
    Oct 10, 2008
    Posts:
    18
    Referrals:
    0
    Sythe Gold:
    0

    abluescarab Newcomer

    (Guide) Hot to create an undetectable Auto Talker

    It would be easier to create a personal autotalker in AutoHotKey...and some people could probably make one that actually types whatever you want.
     
  17. Unread #9 - Oct 10, 2008 at 8:23 AM
  18. rofloller
    Referrals:
    0

    rofloller Guest

    (Guide) Hot to create an undetectable Auto Talker

    Undetectable my ass..
     
  19. Unread #10 - Oct 10, 2008 at 9:16 AM
  20. Swan
    Joined:
    Jan 23, 2007
    Posts:
    4,957
    Referrals:
    0
    Sythe Gold:
    0
    Sythe's 10th Anniversary Member of the Month Winner

    Swan When They Cry...
    Retired Global Moderator

    (Guide) Hot to create an undetectable Auto Talker

    Useless thread is useless.

    Closed.
     
< New program i made i need a tester | [code] Get your real IP-address >

Users viewing this thread
1 guest
Thread Status:
Not open for further replies.


 
 
Adblock breaks this site