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 :D
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 :D
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