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 )
$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:
- 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
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 )
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:
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:
- 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
Code:
$login = InputBox("Login", "Enter Username.") ;Pergunta o Login
$senha = InputBox("Senha", "Enter Password.") ;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", "Pick Channel (1 ~ 10).") ;Pergunta o Canal
If $canal = 1 then
MouseMove (730, 575)
MouseClick ("left")
send ("{enter}")
$chara = InputBox("Char", "Pick Char (1 ~ 4)") ;Pergunta o Char
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", "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
the code basicly with some words changed it worked okish for me but doesnt work all the time
Interesting... seems like Autoit can run mouse emulation while macromonkey cannot.
Gonna get to the root of this and see if I can't find a way to use the same mouse hook that autoit uses.
Wie Speichert man die Login daten und macht nen Auto Login 07/15/2010 - Metin2 Private Server - 5 Replies Souh ma wieder ne "Blöde Frage"... wie speichert man die login daten und macht nen autologin für den client wie es hier gemacht worden ist: http://www.elitepvpers.com/forum/metin2-pserver-dis cussions-questions/616285-my-new-client.html
Über ne antwort würde ich mich freuen...
Dragonica Auto Login 12/09/2009 - Dragonica Hacks, Bots, Cheats & Exploits - 1 Replies Please, go to the new tutorial: New Full Tutorial
Auto Login Professional - Full Version 06/22/2008 - SRO PServer Guides & Releases - 15 Replies ScreenShot :
http://i28.tinypic.com/2vifuo8.png
Features :
Re-Login Normally Or with Bot Support when DC
Checking DC, Error Message, Update etc..
Play Sound, Shutdown Computer when DC
Its working Original Client and NODC Client.
Automatic Selecting Server