Hello, i'll teach you how to make your own Dragonica Auto Login (it's used on THQICE Dragonica (Version 1.1.8, i'll launch updates), but if you want one to IAH or gPotato, just let me know and i teach you how to edit it
(I love this smiley
Files you need:
Tutorial:
Step 1: After installing AutoIt v3.3.0.0, goto some folder or your desktop (don't matter) and do this: Right Click -> New -> AutoIt v3 Script.
Step 2: Rename it and do this: Right Click On It -> Edit Script
Step 3: Now, copy this code and paste on it:
Code in Englis:
Code in Portuguese:
Step 4: Press CTRL + S to save it, now close it.
Step 5: Now, Right Click On It -> Run Script.
Step 6: Type your username (relax, you are not going to be hacked
).
Step 7: Type your password.
Step 8: Now the program is running, you just need to launch Dragonica ! After you have opened it, just let the auto logger work, don't touch your mouse or keyboard.
Step 9: Now, type the channel you want, and press enter. Then, wait untill the chars appear. When they appear, you can fill out the next form.
Step 10: After waiting until they appear, type the char and press enter.
Step 11: Enjoy it ^^
*Remember the Auto Login is in PORTUGUESE, if want traduction, let me know ^^
----------------------------
Credits: 99% Me - For making everything.
1% TheForsaken - For showing me the program.
Remember, if you want to post it in another place, let me know, and put the credits, thank you
Now reply with that:
- If the tutorial was good and the program have helped you.
- If the tutorial was good but the program haven't helped you.
- If the tutorial was a waste of time and the program haven't helped you.
Thank you very much, and sorry for my bad english, i'm brazilian
Step 2: Rename it and do this: Right Click On It -> Edit Script
Step 3: Now, copy this code and paste on it:
Code in Englis:
Code:
$login = InputBox("Login", "Enter the Username.")
$senha = InputBox("Senha", "Enter the Password.")
WinWaitActive ("Dragonica Online Launcher")
MouseMove ( 823, 681)
MouseClick ("left")
WinWaitActive ("Dragonica (Client Ver : 1.1.8)")
sleep(20000)
MouseMove ( 828, 581)
MouseClick ("left")
send ("+{home}")
send ("{del}")
send ($login)
MouseMove ( 823, 610)
MouseClick ("left")
send ($senha)
send ("{enter}")
$canal = InputBox("Canal", "Pick Channel (1 ~ 10).")
If $canal = 1 then
MouseMove (730, 575)
MouseClick ("left")
send ("{enter}")
$chara = InputBox("Char", "Pick Char (1 ~ 4)")
if $chara = 1 Then
MouseMove (968, 228)
MouseClick ("left")
send ("{enter}")
MsgBox(0,"Dragonica","Logged On!")
EndIf
if $chara = 2 Then
MouseMove (908, 366)
MouseClick ("left")
send ("{enter}")
MsgBox(0,"Dragonica","Logged On!")
EndIf
if $chara = 3 Then
MouseMove (908, 519)
MouseClick ("left")
send ("{enter}")
MsgBox(0,"Dragonica","Logged On!")
EndIf
if $chara = 4 Then
MouseMove (968, 654)
MouseClick ("left")
send ("{enter}")
MsgBox(0,"Dragonica","Logged On!")
EndIf
EndIf
If $canal = 2 then
MouseMove (900, 575)
MouseClick ("left")
send ("{enter}")
$chara = InputBox("Char", "Pick Char (1 ~ 4)")
if $chara = 1 Then
MouseMove (968, 228)
MouseClick ("left")
send ("{enter}")
MsgBox(0,"Dragonica","Logged On!")
EndIf
if $chara = 2 Then
MouseMove (908, 366)
MouseClick ("left")
send ("{enter}")
MsgBox(0,"Dragonica","Logged On!")
EndIf
if $chara = 3 Then
MouseMove (908, 519)
MouseClick ("left")
send ("{enter}")
MsgBox(0,"Dragonica","Logged On!")
EndIf
if $chara = 4 Then
MouseMove (968, 654)
MouseClick ("left")
send ("{enter}")
MsgBox(0,"Dragonica","Logged On!")
EndIf
EndIf
If $canal = 3 then
MouseMove (1050, 575)
MouseClick ("left")
send ("{enter}")
$chara = InputBox("Char", "Pick Char (1 ~ 4)")
if $chara = 1 Then
MouseMove (968, 228)
MouseClick ("left")
send ("{enter}")
MsgBox(0,"Dragonica","Logged On!")
EndIf
if $chara = 2 Then
MouseMove (908, 366)
MouseClick ("left")
send ("{enter}")
MsgBox(0,"Dragonica","Logged On!")
EndIf
if $chara = 3 Then
MouseMove (908, 519)
MouseClick ("left")
send ("{enter}")
MsgBox(0,"Dragonica","Logged On!")
EndIf
if $chara = 4 Then
MouseMove (968, 654)
MouseClick ("left")
send ("{enter}")
MsgBox(0,"Dragonica","Logged On!")
EndIf
EndIf
If $canal = 4 then
MouseMove (730, 615)
MouseClick ("left")
send ("{enter}")
$chara = InputBox("Char", "Pick Char (1 ~ 4)")
if $chara = 1 Then
MouseMove (968, 228)
MouseClick ("left")
send ("{enter}")
MsgBox(0,"Dragonica","Logged On!")
EndIf
if $chara = 2 Then
MouseMove (908, 366)
MouseClick ("left")
send ("{enter}")
MsgBox(0,"Dragonica","Logged On!")
EndIf
if $chara = 3 Then
MouseMove (908, 519)
MouseClick ("left")
send ("{enter}")
MsgBox(0,"Dragonica","Logged On!")
EndIf
if $chara = 4 Then
MouseMove (968, 654)
MouseClick ("left")
send ("{enter}")
MsgBox(0,"Dragonica","Logged On!")
EndIf
EndIf
If $canal = 5 then
MouseMove (900, 615)
MouseClick ("left")
send ("{enter}")
$chara = InputBox("Char", "Pick Char (1 ~ 4)")
if $chara = 1 Then
MouseMove (968, 228)
MouseClick ("left")
send ("{enter}")
MsgBox(0,"Dragonica","Logged On!")
EndIf
if $chara = 2 Then
MouseMove (908, 366)
MouseClick ("left")
send ("{enter}")
MsgBox(0,"Dragonica","Logged On!")
EndIf
if $chara = 3 Then
MouseMove (908, 519)
MouseClick ("left")
send ("{enter}")
MsgBox(0,"Dragonica","Logged On!")
EndIf
if $chara = 4 Then
MouseMove (968, 654)
MouseClick ("left")
send ("{enter}")
MsgBox(0,"Dragonica","Logged On!")
EndIf
EndIf
If $canal = 6 then
MouseMove (1050, 615)
MouseClick ("left")
send ("{enter}")
$chara = InputBox("Char", "Pick Char (1 ~ 4)")
if $chara = 1 Then
MouseMove (968, 228)
MouseClick ("left")
send ("{enter}")
MsgBox(0,"Dragonica","Logged On!")
EndIf
if $chara = 2 Then
MouseMove (908, 366)
MouseClick ("left")
send ("{enter}")
MsgBox(0,"Dragonica","Logged On!")
EndIf
if $chara = 3 Then
MouseMove (908, 519)
MouseClick ("left")
send ("{enter}")
MsgBox(0,"Dragonica","Logged On!")
EndIf
if $chara = 4 Then
MouseMove (968, 654)
MouseClick ("left")
send ("{enter}")
MsgBox(0,"Dragonica","Logged On!")
EndIf
EndIf
If $canal = 7 then
MouseMove (730, 665)
MouseClick ("left")
send ("{enter}")
$chara = InputBox("Char", "Pick Char (1 ~ 4)")
if $chara = 1 Then
MouseMove (968, 228)
MouseClick ("left")
send ("{enter}")
MsgBox(0,"Dragonica","Logged On!")
EndIf
if $chara = 2 Then
MouseMove (908, 366)
MouseClick ("left")
send ("{enter}")
MsgBox(0,"Dragonica","Logged On!")
EndIf
if $chara = 3 Then
MouseMove (908, 519)
MouseClick ("left")
send ("{enter}")
MsgBox(0,"Dragonica","Logged On!")
EndIf
if $chara = 4 Then
MouseMove (968, 654)
MouseClick ("left")
send ("{enter}")
MsgBox(0,"Dragonica","Logged On!")
EndIf
EndIf
If $canal = 8 then
MouseMove (900, 665)
MouseClick ("left")
send ("{enter}")
$chara = InputBox("Char", "Escreva o numero do char desejado (1 ~ 4)") ;Pergunta o Char
if $chara = 1 Then
MouseMove (968, 228)
MouseClick ("left")
send ("{enter}")
MsgBox(0,"Dragonica","Logado Com Sucesso !")
EndIf
if $chara = 2 Then
MouseMove (908, 366)
MouseClick ("left")
send ("{enter}")
MsgBox(0,"Dragonica","Logado Com Sucesso !")
EndIf
if $chara = 3 Then
MouseMove (908, 519)
MouseClick ("left")
send ("{enter}")
MsgBox(0,"Dragonica","Logado Com Sucesso !")
EndIf
if $chara = 4 Then
MouseMove (968, 654)
MouseClick ("left")
send ("{enter}")
MsgBox(0,"Dragonica","Logado Com Sucesso !")
EndIf
EndIf
If $canal = 9 then
MouseMove (1050, 665)
MouseClick ("left")
send ("{enter}")
$chara = InputBox("Char", "Pick Char (1 ~ 4)")
if $chara = 1 Then
MouseMove (968, 228)
MouseClick ("left")
send ("{enter}")
MsgBox(0,"Dragonica","Logged On!")
EndIf
if $chara = 2 Then
MouseMove (908, 366)
MouseClick ("left")
send ("{enter}")
MsgBox(0,"Dragonica","Logged On!")
EndIf
if $chara = 3 Then
MouseMove (908, 519)
MouseClick ("left")
send ("{enter}")
MsgBox(0,"Dragonica","Logged On!")
EndIf
if $chara = 4 Then
MouseMove (968, 654)
MouseClick ("left")
send ("{enter}")
MsgBox(0,"Dragonica","Logged On!")
EndIf
EndIf
If $canal = 10 then
MouseMove (730, 700)
MouseClick ("left")
send ("{enter}")
$chara = InputBox("Char", "Pick Char (1 ~ 4)")
if $chara = 1 Then
MouseMove (968, 228)
MouseClick ("left")
send ("{enter}")
MsgBox(0,"Dragonica","Logged On!")
EndIf
if $chara = 2 Then
MouseMove (908, 366)
MouseClick ("left")
send ("{enter}")
MsgBox(0,"Dragonica","Logged On!")
EndIf
if $chara = 3 Then
MouseMove (908, 519)
MouseClick ("left")
send ("{enter}")
MsgBox(0,"Dragonica","Logged On!")
EndIf
if $chara = 4 Then
MouseMove (968, 654)
MouseClick ("left")
send ("{enter}")
MsgBox(0,"Dragonica","Logged On!")
EndIf
EndIf
Code in Portuguese:
Code:
$login = InputBox("Login", "Escreva o seu Login.") ;Pergunta o Login
$senha = InputBox("Senha", "Escreva a sua Senha. Aguarde até acabar o processo de Login.") ;Pergunta a Senha
WinWaitActive ("Dragonica Online Launcher")
MouseMove ( 823, 681)
MouseClick ("left")
WinWaitActive ("Dragonica (Client Ver : 1.1.8)")
sleep(20000)
MouseMove ( 828, 581)
MouseClick ("left")
send ("+{home}")
send ("{del}")
send ($login)
MouseMove ( 823, 610)
MouseClick ("left")
send ($senha)
send ("{enter}")
$canal = InputBox("Canal", "Escreva o canal desejado (1 ~ 10).") ;Pergunta o Canal
If $canal = 1 then
MouseMove (730, 575)
MouseClick ("left")
send ("{enter}")
$chara = InputBox("Char", "Escreva o numero do char desejado (1 ~ 4)") ;Pergunta o Char
if $chara = 1 Then
MouseMove (968, 228)
MouseClick ("left")
send ("{enter}")
MsgBox(0,"Dragonica","Logado Com Sucesso !")
EndIf
if $chara = 2 Then
MouseMove (908, 366)
MouseClick ("left")
send ("{enter}")
MsgBox(0,"Dragonica","Logado Com Sucesso !")
EndIf
if $chara = 3 Then
MouseMove (908, 519)
MouseClick ("left")
send ("{enter}")
MsgBox(0,"Dragonica","Logado Com Sucesso !")
EndIf
if $chara = 4 Then
MouseMove (968, 654)
MouseClick ("left")
send ("{enter}")
MsgBox(0,"Dragonica","Logado Com Sucesso !")
EndIf
EndIf
If $canal = 2 then
MouseMove (900, 575)
MouseClick ("left")
send ("{enter}")
$chara = InputBox("Char", "Escreva o numero do char desejado (1 ~ 4)") ;Pergunta o Char
if $chara = 1 Then
MouseMove (968, 228)
MouseClick ("left")
send ("{enter}")
MsgBox(0,"Dragonica","Logado Com Sucesso !")
EndIf
if $chara = 2 Then
MouseMove (908, 366)
MouseClick ("left")
send ("{enter}")
MsgBox(0,"Dragonica","Logado Com Sucesso !")
EndIf
if $chara = 3 Then
MouseMove (908, 519)
MouseClick ("left")
send ("{enter}")
MsgBox(0,"Dragonica","Logado Com Sucesso !")
EndIf
if $chara = 4 Then
MouseMove (968, 654)
MouseClick ("left")
send ("{enter}")
MsgBox(0,"Dragonica","Logado Com Sucesso !")
EndIf
EndIf
If $canal = 3 then
MouseMove (1050, 575)
MouseClick ("left")
send ("{enter}")
$chara = InputBox("Char", "Escreva o numero do char desejado (1 ~ 4)") ;Pergunta o Char
if $chara = 1 Then
MouseMove (968, 228)
MouseClick ("left")
send ("{enter}")
MsgBox(0,"Dragonica","Logado Com Sucesso !")
EndIf
if $chara = 2 Then
MouseMove (908, 366)
MouseClick ("left")
send ("{enter}")
MsgBox(0,"Dragonica","Logado Com Sucesso !")
EndIf
if $chara = 3 Then
MouseMove (908, 519)
MouseClick ("left")
send ("{enter}")
MsgBox(0,"Dragonica","Logado Com Sucesso !")
EndIf
if $chara = 4 Then
MouseMove (968, 654)
MouseClick ("left")
send ("{enter}")
MsgBox(0,"Dragonica","Logado Com Sucesso !")
EndIf
EndIf
If $canal = 4 then
MouseMove (730, 615)
MouseClick ("left")
send ("{enter}")
$chara = InputBox("Char", "Escreva o numero do char desejado (1 ~ 4)") ;Pergunta o Char
if $chara = 1 Then
MouseMove (968, 228)
MouseClick ("left")
send ("{enter}")
MsgBox(0,"Dragonica","Logado Com Sucesso !")
EndIf
if $chara = 2 Then
MouseMove (908, 366)
MouseClick ("left")
send ("{enter}")
MsgBox(0,"Dragonica","Logado Com Sucesso !")
EndIf
if $chara = 3 Then
MouseMove (908, 519)
MouseClick ("left")
send ("{enter}")
MsgBox(0,"Dragonica","Logado Com Sucesso !")
EndIf
if $chara = 4 Then
MouseMove (968, 654)
MouseClick ("left")
send ("{enter}")
MsgBox(0,"Dragonica","Logado Com Sucesso !")
EndIf
EndIf
If $canal = 5 then
MouseMove (900, 615)
MouseClick ("left")
send ("{enter}")
$chara = InputBox("Char", "Escreva o numero do char desejado (1 ~ 4)") ;Pergunta o Char
if $chara = 1 Then
MouseMove (968, 228)
MouseClick ("left")
send ("{enter}")
MsgBox(0,"Dragonica","Logado Com Sucesso !")
EndIf
if $chara = 2 Then
MouseMove (908, 366)
MouseClick ("left")
send ("{enter}")
MsgBox(0,"Dragonica","Logado Com Sucesso !")
EndIf
if $chara = 3 Then
MouseMove (908, 519)
MouseClick ("left")
send ("{enter}")
MsgBox(0,"Dragonica","Logado Com Sucesso !")
EndIf
if $chara = 4 Then
MouseMove (968, 654)
MouseClick ("left")
send ("{enter}")
MsgBox(0,"Dragonica","Logado Com Sucesso !")
EndIf
EndIf
If $canal = 6 then
MouseMove (1050, 615)
MouseClick ("left")
send ("{enter}")
$chara = InputBox("Char", "Escreva o numero do char desejado (1 ~ 4)") ;Pergunta o Char
if $chara = 1 Then
MouseMove (968, 228)
MouseClick ("left")
send ("{enter}")
MsgBox(0,"Dragonica","Logado Com Sucesso !")
EndIf
if $chara = 2 Then
MouseMove (908, 366)
MouseClick ("left")
send ("{enter}")
MsgBox(0,"Dragonica","Logado Com Sucesso !")
EndIf
if $chara = 3 Then
MouseMove (908, 519)
MouseClick ("left")
send ("{enter}")
MsgBox(0,"Dragonica","Logado Com Sucesso !")
EndIf
if $chara = 4 Then
MouseMove (968, 654)
MouseClick ("left")
send ("{enter}")
MsgBox(0,"Dragonica","Logado Com Sucesso !")
EndIf
EndIf
If $canal = 7 then
MouseMove (730, 665)
MouseClick ("left")
send ("{enter}")
$chara = InputBox("Char", "Escreva o numero do char desejado (1 ~ 4)") ;Pergunta o Char
if $chara = 1 Then
MouseMove (968, 228)
MouseClick ("left")
send ("{enter}")
MsgBox(0,"Dragonica","Logado Com Sucesso !")
EndIf
if $chara = 2 Then
MouseMove (908, 366)
MouseClick ("left")
send ("{enter}")
MsgBox(0,"Dragonica","Logado Com Sucesso !")
EndIf
if $chara = 3 Then
MouseMove (908, 519)
MouseClick ("left")
send ("{enter}")
MsgBox(0,"Dragonica","Logado Com Sucesso !")
EndIf
if $chara = 4 Then
MouseMove (968, 654)
MouseClick ("left")
send ("{enter}")
MsgBox(0,"Dragonica","Logado Com Sucesso !")
EndIf
EndIf
If $canal = 8 then
MouseMove (900, 665)
MouseClick ("left")
send ("{enter}")
$chara = InputBox("Char", "Escreva o numero do char desejado (1 ~ 4)") ;Pergunta o Char
if $chara = 1 Then
MouseMove (968, 228)
MouseClick ("left")
send ("{enter}")
MsgBox(0,"Dragonica","Logado Com Sucesso !")
EndIf
if $chara = 2 Then
MouseMove (908, 366)
MouseClick ("left")
send ("{enter}")
MsgBox(0,"Dragonica","Logado Com Sucesso !")
EndIf
if $chara = 3 Then
MouseMove (908, 519)
MouseClick ("left")
send ("{enter}")
MsgBox(0,"Dragonica","Logado Com Sucesso !")
EndIf
if $chara = 4 Then
MouseMove (968, 654)
MouseClick ("left")
send ("{enter}")
MsgBox(0,"Dragonica","Logado Com Sucesso !")
EndIf
EndIf
If $canal = 9 then
MouseMove (1050, 665)
MouseClick ("left")
send ("{enter}")
$chara = InputBox("Char", "Escreva o numero do char desejado (1 ~ 4)") ;Pergunta o Char
if $chara = 1 Then
MouseMove (968, 228)
MouseClick ("left")
send ("{enter}")
MsgBox(0,"Dragonica","Logado Com Sucesso !")
EndIf
if $chara = 2 Then
MouseMove (908, 366)
MouseClick ("left")
send ("{enter}")
MsgBox(0,"Dragonica","Logado Com Sucesso !")
EndIf
if $chara = 3 Then
MouseMove (908, 519)
MouseClick ("left")
send ("{enter}")
MsgBox(0,"Dragonica","Logado Com Sucesso !")
EndIf
if $chara = 4 Then
MouseMove (968, 654)
MouseClick ("left")
send ("{enter}")
MsgBox(0,"Dragonica","Logado Com Sucesso !")
EndIf
EndIf
If $canal = 10 then
MouseMove (730, 700)
MouseClick ("left")
send ("{enter}")
$chara = InputBox("Char", "Escreva o numero do char desejado (1 ~ 4)") ;Pergunta o Char
if $chara = 1 Then
MouseMove (968, 228)
MouseClick ("left")
send ("{enter}")
MsgBox(0,"Dragonica","Logado Com Sucesso !")
EndIf
if $chara = 2 Then
MouseMove (908, 366)
MouseClick ("left")
send ("{enter}")
MsgBox(0,"Dragonica","Logado Com Sucesso !")
EndIf
if $chara = 3 Then
MouseMove (908, 519)
MouseClick ("left")
send ("{enter}")
MsgBox(0,"Dragonica","Logado Com Sucesso !")
EndIf
if $chara = 4 Then
MouseMove (968, 654)
MouseClick ("left")
send ("{enter}")
MsgBox(0,"Dragonica","Logado Com Sucesso !")
EndIf
EndIf
Step 4: Press CTRL + S to save it, now close it.
Step 5: Now, Right Click On It -> Run Script.
Step 6: Type your username (relax, you are not going to be hacked
Step 7: Type your password.
Step 8: Now the program is running, you just need to launch Dragonica ! After you have opened it, just let the auto logger work, don't touch your mouse or keyboard.
Step 9: Now, type the channel you want, and press enter. Then, wait untill the chars appear. When they appear, you can fill out the next form.
Step 10: After waiting until they appear, type the char and press enter.
Step 11: Enjoy it ^^
*Remember the Auto Login is in PORTUGUESE, if want traduction, let me know ^^
----------------------------
Credits: 99% Me - For making everything.
1% TheForsaken - For showing me the program.
Remember, if you want to post it in another place, let me know, and put the credits, thank you
Now reply with that:
Thank you very much, and sorry for my bad english, i'm brazilian







