bot déplacement dofus 2.0(autoIT)

    Publicités

Users Who Are Viewing This Thread (Total: 0, Members: 0, Guests: 0)

mederic

Membre
Jul 5, 2010
73
0
912
bonjour(soir) voila après la création de mon bot déplacement dofus j'ai décidé de partagé le code source
Screenshots:
Ce lien n'est pas visible, veuillez vous connecter pour l'afficher. Je m'inscris!
Ce lien n'est pas visible, veuillez vous connecter pour l'afficher. Je m'inscris!
Code source:
Code:
#Region ;**** Directives created by AutoIt3Wrapper_GUI ****
#AutoIt3Wrapper_Icon=icon\94px-Ice_Dofus.ico
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
 $nom = InputBox("Information nécessaire", "Entrez le nom de votre personnage"& @CRLF & @CRLF & "(Avec les majuscules)");===> information pour permetre au bot de redimentioné la fenetre dofus
                     WinSetState($nom,"",@SW_MINIMIZE);===> reduit la fentre
                     WinSetState($nom,"",@SW_RESTORE);===> mai la fenetre en premier plan
                     WinMove($nom, "", 0, 0, 800, 600);===> deplacement et redimention
                     MsgBox(0,"Information","Fenêtre de " & $nom & " redimensionnée");===>information de redimaten
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
;===>gui <===
;===>fom1<===
$Form1 = GUICreate("Déplacement dofus", 448, 280, 307, 279)
GUISetBkColor(0xFFFFFF)
;===>deplacement par bouton <===
$Button1 = GUICtrlCreateButton("Haut", 24, 80, 113, 33);===> bouton déplacement haut
$Button4 = GUICtrlCreateButton("Bas", 24, 136, 113, 33);===> bouton deplacement bas
$Button3 = GUICtrlCreateButton("Droite", 80, 112, 57, 25);===> bouton déplacement droite
$Button2 = GUICtrlCreateButton("Gauche", 24, 112, 57, 25);===> buton déplacement gauche
$Group1 = GUICtrlCreateGroup("Déplacement par bouton", 8, 56, 177, 145);===> groupe de tout les bouton déplacement
GUICtrlCreateGroup("", -99, -99, 1, 1)
;===>déplacement par trajet <===
$Input1 = GUICtrlCreateInput("Veuillez insérer vautre trajet", 208, 144, 201, 21);===>trajet (non-fonctionel)
$sauvegard = GUICtrlCreateButton("sauvegardé", 208, 168, 89, 17);===> sauvegard du trajet (non-fonctionel)
$Button5 = GUICtrlCreateButton("chargé", 304, 168, 81, 17);===> chargé une trajet (non fonctionel)
$Button6 = GUICtrlCreateButton("tutoriel", 224, 88, 193, 33);===> fenter dinformation pour les deplacement par scripte
$Group2 = GUICtrlCreateGroup("Déplacement par scrpte", 192, 56, 241, 145);===> groupe tou les deplacement par scripte
GUICtrlCreateGroup("", -99, -99, 1, 1)
;===>dépmacement avec touche du clavier <===
$Group3 = GUICtrlCreateGroup("Déplacement avec touche du clavier", 8, 208, 193, 65);===> fenetre d'information
$Button7 = GUICtrlCreateButton("Tutoriel", 24, 232, 161, 33);===> fentre d'information
#EndRegion ### END Koda GUI section ###

Func gauche() ;===> se qui va se passé quand on apuis sur la touche gauche
Mouseclick("left",59,328,1,1);===> clic en 59,328

                     EndFunc ;===>fin de fonction

HotKeySet("{left}", "gauche") ;===> si on apui sur le bouton gauche la fonction gauche se mai en marche
Func droite() ;===> debut de la fonction droite
	Mouseclick("left",738,302,1,1) ;===> clic en 738,302



                     EndFunc;===> fin de la fonction

HotKeySet("{right}", "droite") ;===> si on apui sur la touche droite la fonction droite se mai en marche
Func bas();===> fonction bas
	Mouseclick("left",464,501,1,1) ;===> clic en 464,501


                     EndFunc;===>fin de la fonction

HotKeySet("{down}", "bas") ;===>si on apui sur la bouton bas du clavier la fonction bas se mai en marche
Func haut() ;===>dabut fonction haut
Mouseclick("left",385,34,1,1) ;===> clic en 385,34

                     EndFunc;===> fin de la fonction bas

HotKeySet("{up}", "haut");===> si on apui sur la bouton haut du clavier la fonction haut se mai en marche
While 1

	$nMsg = GUIGetMsg()
	Switch $nMsg
		Case $GUI_EVENT_CLOSE
			Exit
	     Case $Button1 ;===>  quand on apui sur le bouton 1 alor clic en 385,34
			Mouseclick("left",385,34,1,2) ;===>  clic en 385,34

		Case $Button2;===>  quand on apui sur le bouton 2 alor clic en 59,328
			Mouseclick("left",59,328,1,2);===>  clic en 59,328

		Case $Button3;===>  quand on apui sur le bouton 3 alor clic en 738,302
			Mouseclick("left",738,302,1,2);===>  clic en 738,302

		Case $Button4;===>  quand on apui sur le bouton 4 alor clic en 464,501
			Mouseclick("left",464,501,1,2);===>  clic en 464,501

		Case $sauvegard ;===>  quand on apui sur le bouton sauvegard un mesage safiche
			MsgBox(1,"Sauvegard","a venir") ;===>  mesage
		Case $Button5;===>  quand on apui sur le bouton 5
			MsgBox(1,"chargé","a venir");===>  mesage;===>  mesage
		Case $Button6 ;===>  quand on apui sur le bouton6
			MsgBox(1,"tuto","le tutoriel sera a venir");===>  mesage
		Case $Button7;===>  quand on apui sur le bouton7
			msgBox(1," bot clavier","pour bougé apuié sur les touche du clavier haut,bas,gauche et droite");===>  mesage

	EndSwitch
WEnd
 

Th5G4mer

Membre
Jan 8, 2012
38
0
732
27
Bien moi Je mais le nom de la fenêtre dofus (le nom de mon personnage),
je clique sur ok, un message "fenêtre redimensionnée" et après plus rien.
 

TheHardButcher

Programmeur C/C++
V
Dec 14, 2009
1,461
58
964
France
Je suis nul en orthographe, mais "vautre" ...
Sinon, pour le bot, rien de très compliquée, mais ça peut tout de même être utile =)