Source : flood basique

[-zzz-]

Bonjour,

Voilà je poste ici un bot flood pour Dofus, basique mais qui marche

Il redimensionne la fenêtre automatiquement, prend 3 phrases en compte, programmé en autoIt...

#cs ----------------------------------------------------------------------------

 AutoIt Version : 3.3.6.0
 Auteur:         -zZz-

 Fonction du Script :
	Modèle de Script AutoIt.

#ce ----------------------------------------------------------------------------

; Début du script - Ajouter votre code ci-dessous.

#RequireAdmin

HotKeySet("^!{ESCAPE}", "Quit")
Func Quit()
Exit
EndFunc


$pseudo = InputBox ("Flood Bot (by -zzz-) pour cheat-gam3", "Saisissez le pseudo de votre personnage :", "", "")
$Message = InputBox ("Flood Bot (by -zzz-) pour cheat-gam3", "Saisissez la phrase qui serra envoyée :", "", "")
$Message2 = InputBox ("Flood Bot (by -zzz-) pour cheat-gam3", "Saisissez la phrase 2 qui serra envoyée :", "", "")
$Message3 = InputBox ("Flood Bot (by -zzz-) pour cheat-gam3", "Saisissez la phrase 3 qui serra envoyée :", "", "")

$SleepTime = Random (4000, 8000, 1)

WinWaitActive($pseudo) 
WinMove($pseudo, "", 0, 0, 800, 600) 
ToolTip("La fenêtre à étée automatiquement redimensionnée", 80, 60)
toolTip("Le bot se lancer automatiquement ! Temps restant : 5", 80, 60)
Sleep(1000)
toolTip("Le bot se lancer automatiquement ! Temps restant : 4", 80, 60)
Sleep(1000) 
toolTip("Le bot se lancer automatiquement ! Temps restant : 3", 80, 60)
Sleep(1000) 
toolTip("Le bot se lancer automatiquement ! Temps restant : 2", 80, 60)
Sleep(1000) 
toolTip("Le bot se lancer automatiquement ! Temps restant : 1", 80, 60)
Sleep(1000) 
toolTip("Le FloodBot by -zZz- a été lancé", 0, 0)
$Depart = PixelSearch(0, 0, @DesktopWidth, @DesktopHeight, 0x985F01)
If Not @error Then
chat()
ElseIf @error Then
sleep(5000)
ElseIf @error Then
sleep(5000)
Else
Exit
EndIf

Func Chat()
do
mouseClick("left", 75, 584)
sleep(50)
send($Message)
send("{ENTER}")
sleep($SleepTime)
mouseClick("left", 75, 584)
sleep(50)
send($Message2)
send("{ENTER}")
sleep($SleepTime)
mouseClick("left", 75, 584)
sleep(50)
send($Message3)
send("{ENTER}")
sleep($SleepTime)
Until (@error)
endFunc

Voilà voilà

 

[Shoyo]

Bon travail!!