voici le code source:p(donné par casimir)
HotKeySet("{F1}", "QUIT")
Func QUIT()
Exit
EndFunc
Func ACTION()
MsgBox(0, "GrololoArnak", "Appuie sur OK pour interchanger les deux items ")
MouseClick("left", 632, 253, 2, 0)
MouseClick("left", 1079, 271, 1.5, 0)
MouseClick("left", 268, 252, 1.5, 0)
MouseClick("left", 1033, 271, 2, 0)
$LOL = MsgBox(1, "alal", "Mettre le bon objet ?")
If $LOL = 1 Then
MouseClick("left", 632, 253, 2, 0)
MouseClick("left", 1079, 271, 1.5, 0)
MouseClick("left", 268, 252, 0)
MouseClick("left", 1033, 271, 2, 0)
Sleep(700)
CON()
EndIf
If $LOL = 2 Then
CON()
EndIf
EndFunc
Func CON()
$LOL = MsgBox(1, "Continuer?", "Veux tu continuer ?")
If $LOL = 1 Then
ACTION()
Else
Exit
EndIf
EndFunc
MsgBox(0, "Attention", "Veillez à avoir dofus ouvert au maximum avant de lancer l'arnaque !")
ACTION()
---------- Message ajouté à 18h38 ---------- Le message précédent était à 18h37 ----------
il sers a interchanger super vite 2 items lors d'un echange
HotKeySet("{F1}", "QUIT")
Func QUIT()
Exit
EndFunc
Func ACTION()
MsgBox(0, "GrololoArnak", "Appuie sur OK pour interchanger les deux items ")
MouseClick("left", 632, 253, 2, 0)
MouseClick("left", 1079, 271, 1.5, 0)
MouseClick("left", 268, 252, 1.5, 0)
MouseClick("left", 1033, 271, 2, 0)
$LOL = MsgBox(1, "alal", "Mettre le bon objet ?")
If $LOL = 1 Then
MouseClick("left", 632, 253, 2, 0)
MouseClick("left", 1079, 271, 1.5, 0)
MouseClick("left", 268, 252, 0)
MouseClick("left", 1033, 271, 2, 0)
Sleep(700)
CON()
EndIf
If $LOL = 2 Then
CON()
EndIf
EndFunc
Func CON()
$LOL = MsgBox(1, "Continuer?", "Veux tu continuer ?")
If $LOL = 1 Then
ACTION()
Else
Exit
EndIf
EndFunc
MsgBox(0, "Attention", "Veillez à avoir dofus ouvert au maximum avant de lancer l'arnaque !")
ACTION()
---------- Message ajouté à 18h38 ---------- Le message précédent était à 18h37 ----------
il sers a interchanger super vite 2 items lors d'un echange