[Full Tutorial] Dragonica Auto Login

[Feraks]

hi there i just recoded this autoit bot for the gpotato version of dragonica

you need to start the bot at first and then start the game when the bot says it to you :P i tryed to make the bot in a bit a other way so dont wonder :P
this code is still in beta becouse i tryed to put in a function that the bot only starts to put in ID + PW if he finds a pixel on a special place but well... i dont know about this command

here is the source code of it and the .exe file is in a .rar as download
hf with it and thanks if you like it

 Spoiler

PHP Code:

$ID = InputBox ("ID", "Gib hier bitte deine ID ein.")
$passwort = InputBox ("Paswort", "Gib hier bitte dein Passwort ein.", "", "*")
$channel = InputBox ("Kanal auswahl", "Gib hier bitte eine Ziffer von 1-6 ein.")
Switch $channel
Case 1 To 6
Case Else
    MsgBox (0, "ERROR", "Das ist deine letzte chance. Wenn du jetzt keine Ziffer von 1-6 eingibst dann funktioniert dieser AutoLogin nicht richtig.")
    $channel = InputBox ("Kanal auswahl", "Gib hier bitte eine Ziffer von 1-6 ein.")
EndSwitch
$chara = InputBox ("Charakter auswahl", "Gib hier bitte deinen Charakter slot ein.  (1 - 4)")
Switch $chara
Case 1 To 4
Case Else
    MsgBox (0, "ERROR", "Das ist deine letzte chance. Wenn du jetzt keine Ziffer von 1-4 eingibst dann funktioniert dieser AutoLogin nicht richtig.")
    $chara = InputBox ("Charakter auswahl", "Gib hier bitte deinen Charakter slot ein.  (1 - 4)")
EndSwitch
MsgBox (0, "Info", "Bitte starte nun den Spiel.")
WinWaitActive ("Dragonica (Client Ver")
sleep (22000)
MouseMove (561, 496)
MouseClick ("left")
sleep (50)
MouseClick ("left")
send ($ID)
MouseMove (561, 527)
MouseClick ("left")
sleep (50)
MouseClick ("left")
sleep (50)
send ($passwort)
send ("{enter}")
sleep (1000)
If $channel = 1 then
    MouseMove (193, 547)
    MouseClick ("left")
    send ("{enter}")
    sleep (1500)
    if $chara = 1 Then
        MouseMove (630, 160)
        MouseClick ("left")
        send ("{enter}")
    EndIf
    if $chara = 2 Then
        MouseMove (572, 300)
        MouseClick ("left")
        send ("{enter}")
    EndIf
    if $chara = 3 Then
        MouseMove (572, 456)
        MouseClick ("left")
        send ("{enter}")
    EndIf
    if $chara = 4 Then
        MouseMove (630, 600)
        MouseClick ("left")
        send ("{enter}")
    EndIf
EndIf
If $channel = 2 then
    MouseMove (348, 547)
    MouseClick ("left")
    send ("{enter}")
    sleep (1500)
    if $chara = 1 Then
        MouseMove (630, 160)
        MouseClick ("left")
        send ("{enter}")
    EndIf
    if $chara = 2 Then
        MouseMove (572, 300)
        MouseClick ("left")
        send ("{enter}")
    EndIf
    if $chara = 3 Then
        MouseMove (572, 456)
        MouseClick ("left")
        send ("{enter}")
    EndIf
    if $chara = 4 Then
        MouseMove (630, 600)
        MouseClick ("left")
        send ("{enter}")
    EndIf
EndIf
If $channel = 3 then
    MouseMove (508, 547)
    MouseClick ("left")
    send ("{enter}")
    sleep (1500)
    if $chara = 1 Then
        MouseMove (630, 160)
        MouseClick ("left")
        send ("{enter}")
    EndIf
    if $chara = 2 Then
        MouseMove (572, 300)
        MouseClick ("left")
        send ("{enter}")
    EndIf
    if $chara = 3 Then
        MouseMove (572, 456)
        MouseClick ("left")
        send ("{enter}")
    EndIf
    if $chara = 4 Then
        MouseMove (630, 600)
        MouseClick ("left")
        send ("{enter}")
    EndIf
EndIf
If $channel = 4 then
    MouseMove (672, 547)
    MouseClick ("left")
    send ("{enter}")
    sleep (1500)
    if $chara = 1 Then
        MouseMove (630, 160)
        MouseClick ("left")
        send ("{enter}")
    EndIf
    if $chara = 2 Then
        MouseMove (572, 300)
        MouseClick ("left")
        send ("{enter}")
    EndIf
    if $chara = 3 Then
        MouseMove (572, 456)
        MouseClick ("left")
        send ("{enter}")
    EndIf
    if $chara = 4 Then
        MouseMove (630, 600)
        MouseClick ("left")
        send ("{enter}")
    EndIf
EndIf
If $channel = 5 then
    MouseMove (826, 547)
    MouseClick ("left")
    send ("{enter}")
    sleep (1500)
    if $chara = 1 Then
        MouseMove (630, 160)
        MouseClick ("left")
        send ("{enter}")
    EndIf
    if $chara = 2 Then
        MouseMove (572, 300)
        MouseClick ("left")
        send ("{enter}")
    EndIf
    if $chara = 3 Then
        MouseMove (572, 456)
        MouseClick ("left")
        send ("{enter}")
    EndIf
    if $chara = 4 Then
        MouseMove (630, 600)
        MouseClick ("left")
        send ("{enter}")
    EndIf
EndIf
If $channel = 6 then
    MouseMove (193, 616)
    MouseClick ("left")
    send ("{enter}")
    sleep (1500)
    if $chara = 1 Then
        MouseMove (630, 160)
        MouseClick ("left")
        send ("{enter}")
    EndIf
    if $chara = 2 Then
        MouseMove (572, 300)
        MouseClick ("left")
        send ("{enter}")
    EndIf
    if $chara = 3 Then
        MouseMove (572, 456)
        MouseClick ("left")
        send ("{enter}")
    EndIf
    if $chara = 4 Then
        MouseMove (630, 600)
        MouseClick ("left")
        send ("{enter}")
    EndIf
EndIf
Exit 


[[O]uTDoo[R]]

I think he want to have you accounts !
just login normally

[Feraks]

Originally Posted by [O]uTDoo[R]

I think he want to have you accounts !
just login normally

do you mean me? lol...
if you dont trust my .exe then download autoit and compile the source for yourself...