Faire un bot de flood fonctionnant sur plusieurs jeux a la fois

[drov]

Hallo ! aujourd'hui on va faire un tuto pour faire un bot de flood. C'est basique mais c'est un sujet assez intéressant quand même ;)

ce que fera le bot :
0: agresser les petites vieilles et voler leur argent :pirate:
1: flooder avec un intervalle de temps variable
2: un antikick aléatoire à la fin
3: un fonctionnement sur tout les jeux :)

c'est parti ! mon kiki ! Quoi...Cette expression est vieille?

on va commencer par faire une fonction qui enregistrera la position de la souris :

Func record()
	$pos = MouseGetPos()
	Beep(330 * 2, 2000)
EndFunc   ;==>record

une fonction c'est une partie du code que on pourra réutiliser quand on veut mais que a moins d'être appelée le code dedans ne sera pas activé

$pos = MouseGetPos()

On range la position en x et y de la position de la souris dans $pos

Beep(330 * 2, 2000)

on émet un bip pour informer que la fonction a bien fonctionné. Ici j'ai configuré pour qu'il aie une fréquence bien particulière et qu'il dure 2 secondes mais un simple

Beep()

suffit aussi


Ensuite on placera ( au dessus de la fonction) une ligne :

HotKeySet("{DEL}", "record")

Cela signifie que quand on appuiera sur "suppr" la fonction se lancera.

tant qu'on est dans les hotkeyset on ajoute celle ci :

HotKeySet("{END}", "stop")

puis une autre fonction : "stop"

Func stop()
	Exit 
EndFunc

Vous verrez c'est extremment utile quand votre bot part dans tout les sens et que vous devez le stopper rapidement ;)

il suffira d'appuyer sur "fin" pour que le bot s’arrête immédiatement

Ensuite viens une fonction très importante : celle de l'antikick !:

Func anti()
	$ran = Random(0, 10, 1)
	If $ran = 0 Then
		Send(" :) !")
	ElseIf $ran = 1 Then
		Send(" ;) !")
	ElseIf $ran = 2 Then
		Send(" :D !")
	ElseIf $ran = 3 Then
		Send(" :p !")
	ElseIf $ran = 4 Then
		Send(" x) !")
	ElseIf $ran = 5 Then
		Send(" :3 !")
	ElseIf $ran = 6 Then
		Send(" =) !")
	ElseIf $ran = 7 Then
		Send(" :] !")
	ElseIf $ran = 8 Then
		Send(" :} !")
	ElseIf $ran = 9 Then
		Send(" ^^ !")
	ElseIf $ran = 10 Then
		Send(" *_* !")
	EndIf
EndFunc

holala c'est gros c'est gras on fais quoi avec ça ?
c'est facile :

$ran = Random(0, 10, 1)

on met dans la variable $ran un nombre entre 0 et 10 entier ( le 1 a la fin sert a ça)

puis

If $ran = 0 Then
		Send(" :) !")

signifie que si le chiffre aléatoire est 0 alors il enverra ":) !" à la fin du bot ;)

et ainsi de suite :) ça permet de varier les messages de quelques caractères et d'éviter la censure par les programmes anti flood du jeu ;)

"ça y est on passe a quelque chose d'un peu utile ?"

on y arrive au plus gros ! :

Ce lien n'est pas visible, veuillez vous connecter pour l'afficher. Je m'inscris! (oui sinon c'est tout moche sur le forum)

BAAAAM ! alors vous comprenez ? cool ! A plus my work here is done

non je déconne :p

bon alors :

$temps = $temps*1000

ça évite que le gars ais a mettre le temps en millisecondes ;)

WinMove("WAKFU", "", 0, 0, 800, 600)

oui il faut bien se baser sur quelque chose c'est donc basé sur wakfu

alors cette partie est faite par rapport au jeu wakfu , oui faut bien que je me base sur quelque chose :p

ProgressOn("Timer", "", "10 secondes restantes", 1000, 100)
                        ProgressSet(100, 10, "Secondes")
                        For $i = 100 To 0 Step -10
                                Sleep(1000)
                                ProgressSet($i, $i / 10 & "Secondes")
                        Next
                        ProgressSet(0, "Fini", "Terminé!")
Sleep(500)
                        ProgressOff()

ce code permet d'afficher une progressbar a droite de la fenètre pour montrer a l'utilisateurs combien de temps il lui reste avant d'appuyer sur "suppr" allez voir dans l'aide d'autoit pour plus d'infos

While $fois <= $time

tant que le nombre de fois paramétré est plus petit ou égal que le nombre de fois fait :

MouseClick("left", $pos[0], $pos[1])

on va sur la barre de chat

Send($message)

en envoie le message configuré

Call("anti")

on appelle la fonction d'antikick

Send("{enter}")

on envoie le tout avec entrée

$fois = $fois + 1

on ajoute 1 au nombre de fois floodé

Sleep($temps)

on patiente le nombre de fois que l'utilisateur a prévu

MsgBox(0, "Flood", "Terminé!")

une fois que c'est terminé on informe l'utilisateur

et voila :)

ce qui nous donne :

Ce lien n'est pas visible, veuillez vous connecter pour l'afficher. Je m'inscris!

Merci de m'avoir lu et n'hesitez pas à me remercier ;)

 

[Xyxyal]

Pas mal ^^

 

[Etawyn]

Tu peux l'optimiser en changeant :

Func anti()
$ran = Random(0, 10, 1)
If $ran = 0 Then
Send(" :) !")
ElseIf $ran = 1 Then
Send(" ;) !")
ElseIf $ran = 2 Then
Send(" :D !")
ElseIf $ran = 3 Then
Send(" :p !")
ElseIf $ran = 4 Then
Send(" x) !")
ElseIf $ran = 5 Then
Send(" :3 !")
ElseIf $ran = 6 Then
Send(" =) !")
ElseIf $ran = 7 Then
Send(" :] !")
ElseIf $ran = 8 Then
Send(" :} !")
ElseIf $ran = 9 Then
Send(" ^^ !")
ElseIf $ran = 10 Then
Send(" *_* !")
EndIf
EndFunc

par :

Func anti()
$ran = Random(0, 10, 1)
Switch $ran
Case 0
Send(" :) !")
Case 1
Send(" ;) !")
Case 2
Send(" :D !")
...
EndSwitch
EndFunc

Car les switchs sont plus rapides que les Ifs

 

[RunningBac]

c'est facile , mais ça peut servir merci!

 

[Etawyn]

Encore un truc pour aller plus vite :

Send(" :) !")

par :

ClipPut(":)")
Send("^v")

 

[drov]

Ah oui switch ça m'étais sorti de la tête ^^
pour clipput je suis prudent, l'utilisateur met souvent des trucs utiles pour lui dans le presse papier donc je préfère qu'il le garde ;)

 

[GMdioxice]

llllllllloooooooooolllllll

 

[casimir]

apres un up aussi bidon que ca il faut quelque chose de plus intéressant

aller en 2 lignes :

$smil[10]=[":D "," x) "," :3 ","^^ "," *_* ",";)",";(","-- ","8-)","niark "]
Send($smil[Random(0,9,1)])