WizzBot
Beaucoup de bug existe ! Une REFONTE COMPLÈTE va être commencé à plusieurs ! On vous tiens au courant ! (Mais vous pourrez toujours utiliser celui-ci mais évitez la verif Combat !)
Bonjour/bonsoir à tous et à toutes,
Vous connaissez tous DofusTouch et attendez un bot bien optimisé ? Bah celui-la n'est pas du tout optimisé mais vous permettra de vous faire patienter :D
Il vous faudra juste un émulateur, ainsi que DofusTouch !
Je tiens à préciser que le bot sera gratuit à vie, qu'il est open source donc le code est dispo si dessous, mais citez-moi si vous l'utilisez dans un autre sujet...
Et surtout n'hésitez pas à me dire des améloration etc, votre critique me donnera l'envie de continuer
Instruction
- Lancez "WizzBot Config"
- Sélectionnez un pixel de la ressource voulu en mettant la souris, puis en appuyant sur "C". A ce moment, une bulle de texte vous dit la couleur !
- Cochez ou non les cases en dessous : Le Verif Lvl pour cliquer sur "OK" après passage d'un lvl, Le verif Combat qui fais un "BIP" toutes les 2 sec lorsque l'on est en combat
- Maintenant lancez le "WizzBot"
- Appuyez sur Start et vous aurez les instructions
- F1 pour lancer, F2 pour pause (Maintenir car j'ai eu un bug) et F3 pour quitter
Et voila le tour est joué :D
Et voici le code :
#Region ;**** Directives created by AutoIt3Wrapper_GUI ****
#AutoIt3Wrapper_Icon=1475779252_Settings_gear_setting_tools.ico
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <IE.au3>
#Region ### START Koda GUI section ### Form=
Local $Pos[2]
Local $Couleur
$Form1 = GUICreate("WizzBot", 474, 193, 192, 124, -1, $WS_EX_TOPMOST)
$Label1 = GUICtrlCreateLabel("Placez votre souris sur le pixel de la ressource", 8, 8, 269, 20)
GUICtrlSetFont(-1, 10, 400, 0, "Tahoma")
$Checkbox1 = GUICtrlCreateCheckbox("Verification Passage de Niveau", 8, 64, 177, 17)
$Checkbox2 = GUICtrlCreateCheckbox("Verification Combat (beep)", 8, 80, 153, 17)
$Label2 = GUICtrlCreateLabel("Puis appuyez sur C", 8, 24, 112, 20)
GUICtrlSetFont(-1, 10, 400, 0, "Tahoma")
$Button1 = GUICtrlCreateButton("Sauvegarder", 248, 152, 75, 25)
$Button2 = GUICtrlCreateButton("Quitter", 336, 152, 75, 25)
$Button3 = GUICtrlCreateButton("Donate :D", 384, 8, 75, 25)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
HotKeySet("c", "pixel")
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Button2
Exit
Case $Button1
save()
Case $Button3
donate()
EndSwitch
WEnd
Func donate()
$ui = GUICreate("WizzBot", 1000, 800) ; on créer la GUI
$wb = _IECreateEmbedded() ; on appel le navigateur embarqué
GUICtrlCreateObj($wb, 10, 10, 980, 780) ; on le met en place ici
GUISetState() ; on montre la GUI
_IENavigate($wb, "https://www.paypal.com/cgi-bin/webscr?cmd=_donations&business=frojerome%40gmail%2ecom&lc=ZA&item_name=WizzBot&no_note=0¤cy_code=EUR&bn=PP%2dDonationsBF%3abtn_donateCC_LG%2egif%3aNonHostedGuest", 1) ; l'adresse de votre messagerie
While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
GUIDelete($ui)
ExitLoop
EndSwitch
WEnd
EndFunc
Func pixel()
$Pos = MouseGetPos()
$Couleur = PixelGetColor( $Pos[0], $Pos[1])
$Couleur = Hex($Couleur, 6)
ToolTip("Pixel Done : " & $Couleur, 0, 0)
Sleep(2000)
ToolTip("")
EndFunc
Func save()
FileDelete("Settings.cfg")
FileOpen("Settings.cfg")
FileWriteLine("Settings.cfg", "0x" & $Couleur)
If GuiCtrlRead($Checkbox1) = 1 Then
FileWriteLine("Settings.cfg", "Verif1 : true")
Else
FileWriteLine("Settings.cfg", "Verif1 : false")
EndIf
If GuiCtrlRead($Checkbox2) = 1 Then
FileWriteLine("Settings.cfg", "Verif2 : true")
Else
FileWriteLine("Settings.cfg", "Verif2 : false")
EndIf
Exit
EndFunc
#AutoIt3Wrapper_Icon=1475779252_Settings_gear_setting_tools.ico
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <IE.au3>
#Region ### START Koda GUI section ### Form=
Local $Pos[2]
Local $Couleur
$Form1 = GUICreate("WizzBot", 474, 193, 192, 124, -1, $WS_EX_TOPMOST)
$Label1 = GUICtrlCreateLabel("Placez votre souris sur le pixel de la ressource", 8, 8, 269, 20)
GUICtrlSetFont(-1, 10, 400, 0, "Tahoma")
$Checkbox1 = GUICtrlCreateCheckbox("Verification Passage de Niveau", 8, 64, 177, 17)
$Checkbox2 = GUICtrlCreateCheckbox("Verification Combat (beep)", 8, 80, 153, 17)
$Label2 = GUICtrlCreateLabel("Puis appuyez sur C", 8, 24, 112, 20)
GUICtrlSetFont(-1, 10, 400, 0, "Tahoma")
$Button1 = GUICtrlCreateButton("Sauvegarder", 248, 152, 75, 25)
$Button2 = GUICtrlCreateButton("Quitter", 336, 152, 75, 25)
$Button3 = GUICtrlCreateButton("Donate :D", 384, 8, 75, 25)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
HotKeySet("c", "pixel")
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Button2
Exit
Case $Button1
save()
Case $Button3
donate()
EndSwitch
WEnd
Func donate()
$ui = GUICreate("WizzBot", 1000, 800) ; on créer la GUI
$wb = _IECreateEmbedded() ; on appel le navigateur embarqué
GUICtrlCreateObj($wb, 10, 10, 980, 780) ; on le met en place ici
GUISetState() ; on montre la GUI
_IENavigate($wb, "https://www.paypal.com/cgi-bin/webscr?cmd=_donations&business=frojerome%40gmail%2ecom&lc=ZA&item_name=WizzBot&no_note=0¤cy_code=EUR&bn=PP%2dDonationsBF%3abtn_donateCC_LG%2egif%3aNonHostedGuest", 1) ; l'adresse de votre messagerie
While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
GUIDelete($ui)
ExitLoop
EndSwitch
WEnd
EndFunc
Func pixel()
$Pos = MouseGetPos()
$Couleur = PixelGetColor( $Pos[0], $Pos[1])
$Couleur = Hex($Couleur, 6)
ToolTip("Pixel Done : " & $Couleur, 0, 0)
Sleep(2000)
ToolTip("")
EndFunc
Func save()
FileDelete("Settings.cfg")
FileOpen("Settings.cfg")
FileWriteLine("Settings.cfg", "0x" & $Couleur)
If GuiCtrlRead($Checkbox1) = 1 Then
FileWriteLine("Settings.cfg", "Verif1 : true")
Else
FileWriteLine("Settings.cfg", "Verif1 : false")
EndIf
If GuiCtrlRead($Checkbox2) = 1 Then
FileWriteLine("Settings.cfg", "Verif2 : true")
Else
FileWriteLine("Settings.cfg", "Verif2 : false")
EndIf
Exit
EndFunc
#Region ;**** Directives created by AutoIt3Wrapper_GUI ****
#AutoIt3Wrapper_Icon=1475791664_Alarm_Signal_Alert_Telltale.ico
#AutoIt3Wrapper_Run_AU3Check=n
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
#cs ----------------------------------------------------------------------------
AutoIt Version : 3.3.14.2
Auteur: Wizzar
Fonction du Script :
Modèle de Script AutoIt.
#ce ----------------------------------------------------------------------------
; Début du script - Ajouter votre code ci-dessous.
#include <Misc.au3>
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <IE.au3>
#Region ### START Koda GUI section ### Form=
Global $Coord[2]
Global $Compteur
Local $Couleur
Local $CompteurGlobal
Local $hDLL = DllOpen("user32.dll")
$Couleur = FileReadLine("Settings.cfg", 1)
$Compteur = 0
$CompteurGlobal = 0
$Form1 = GUICreate("WizzBot", 316, 127, 192, 124, -1, BitOR($WS_EX_TOPMOST,$WS_EX_WINDOWEDGE))
$Button1 = GUICtrlCreateButton("Donate :D", 216, 16, 75, 25)
$Label3 = GUICtrlCreateLabel("Couleur du Pixel :", 16, 56, 105, 20)
GUICtrlSetFont(-1, 10, 400, 0, "Tahoma")
$Label4 = GUICtrlCreateLabel("WizzBot ", 16, 16, 108, 34)
GUICtrlSetFont(-1, 18, 800, 2, "Harlow Solid Italic")
$CouleurPixel = GUICtrlCreateLabel($Couleur, 144, 56, 74, 20)
GUICtrlSetFont(-1, 10, 400, 0, "Tahoma")
$START = GUICtrlCreateButton("START", 120, 88, 75, 25)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $START
Tooltip("Appuyez sur F1 pour lancer, maintenir F2 pour mettre en Pause et F3 pour stopper",0,0)
Case HotKeySet("{F1}", "main")
Case HotKeySet("{F2}", "stop")
Case HotKeySet("{F3}", "end")
Case $Button1
donate()
EndSwitch
WEnd
main()
Func main()
Do
ToolTip("WizzBot is Running : " & $Compteur, 0, 0)
$Coord = PixelSearch(0, 0, @DesktopWidth, @DesktopHeight, $Couleur, 1)
If Not @error Then
$Compteur = $Compteur + 1
$CompteurGlobal = $CompteurGlobal +1
MouseMove($Coord[0], $Coord[1], 1)
MouseClick("left", $Coord[0], $Coord[1], 1)
Sleep(500) ; On attend 0,5secs.
EndIf
If FileReadLine("Settings.cfg", 2) = "Verif1 : true" Then
Verif()
Else
EndIf
If FileReadLine("Settings.cfg", 3) = "Verif2 : true" Then
VerifComb()
Else
EndIf
If _IsPressed("71", $hDLL) Then
ExitLoop
stop()
EndIf
Until($Compteur = 100)
ToolTip("Free Pause", 0, 0)
Sleep(30000)
$Compteur = 0
main()
EndFunc
Func end()
Tooltip("Bot Closed", 0, 0)
Sleep(2000)
Tooltip("")
Exit
EndFunc
Func stop()
ToolTip("Pause (forcé)", 0, 0)
If _IsPressed("70", $hDLL) Then
main()
ElseIf _IsPressed("72", $hDLL) Then
end()
EndIf
EndFunc
Func Verif()
$Coord = PixelSearch(0, 0, 915, 545, 0x2E2D28, 1)
If Not @error Then
MouseMove(898, 595, 1)
MouseClick("left", 898, 595, 1)
Sleep(500) ; On attend 0,5secs.
main()
EndIf
EndFunc
Func VerifComb()
$Coord = PixelSearch(0, 0, 915, 545, 0xC33326, 1)
If Not @error Then
Beep(500, 200)
Sleep(500) ; On attend 0,5secs.
main()
EndIf
EndFunc
Func donate()
$ui = GUICreate("WizzBot", 1000, 800) ; on créer la GUI
$wb = _IECreateEmbedded() ; on appel le navigateur embarqué
GUICtrlCreateObj($wb, 10, 10, 980, 780) ; on le met en place ici
GUISetState() ; on montre la GUI
_IENavigate($wb, "https://www.paypal.com/cgi-bin/webscr?cmd=_donations&business=frojerome%40gmail%2ecom&lc=ZA&item_name=WizzBot&no_note=0¤cy_code=EUR&bn=PP%2dDonationsBF%3abtn_donateCC_LG%2egif%3aNonHostedGuest", 1) ; l'adresse de votre messagerie
While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
GUIDelete($ui)
ExitLoop
EndSwitch
WEnd
EndFunc
#AutoIt3Wrapper_Icon=1475791664_Alarm_Signal_Alert_Telltale.ico
#AutoIt3Wrapper_Run_AU3Check=n
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
#cs ----------------------------------------------------------------------------
AutoIt Version : 3.3.14.2
Auteur: Wizzar
Fonction du Script :
Modèle de Script AutoIt.
#ce ----------------------------------------------------------------------------
; Début du script - Ajouter votre code ci-dessous.
#include <Misc.au3>
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <IE.au3>
#Region ### START Koda GUI section ### Form=
Global $Coord[2]
Global $Compteur
Local $Couleur
Local $CompteurGlobal
Local $hDLL = DllOpen("user32.dll")
$Couleur = FileReadLine("Settings.cfg", 1)
$Compteur = 0
$CompteurGlobal = 0
$Form1 = GUICreate("WizzBot", 316, 127, 192, 124, -1, BitOR($WS_EX_TOPMOST,$WS_EX_WINDOWEDGE))
$Button1 = GUICtrlCreateButton("Donate :D", 216, 16, 75, 25)
$Label3 = GUICtrlCreateLabel("Couleur du Pixel :", 16, 56, 105, 20)
GUICtrlSetFont(-1, 10, 400, 0, "Tahoma")
$Label4 = GUICtrlCreateLabel("WizzBot ", 16, 16, 108, 34)
GUICtrlSetFont(-1, 18, 800, 2, "Harlow Solid Italic")
$CouleurPixel = GUICtrlCreateLabel($Couleur, 144, 56, 74, 20)
GUICtrlSetFont(-1, 10, 400, 0, "Tahoma")
$START = GUICtrlCreateButton("START", 120, 88, 75, 25)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $START
Tooltip("Appuyez sur F1 pour lancer, maintenir F2 pour mettre en Pause et F3 pour stopper",0,0)
Case HotKeySet("{F1}", "main")
Case HotKeySet("{F2}", "stop")
Case HotKeySet("{F3}", "end")
Case $Button1
donate()
EndSwitch
WEnd
main()
Func main()
Do
ToolTip("WizzBot is Running : " & $Compteur, 0, 0)
$Coord = PixelSearch(0, 0, @DesktopWidth, @DesktopHeight, $Couleur, 1)
If Not @error Then
$Compteur = $Compteur + 1
$CompteurGlobal = $CompteurGlobal +1
MouseMove($Coord[0], $Coord[1], 1)
MouseClick("left", $Coord[0], $Coord[1], 1)
Sleep(500) ; On attend 0,5secs.
EndIf
If FileReadLine("Settings.cfg", 2) = "Verif1 : true" Then
Verif()
Else
EndIf
If FileReadLine("Settings.cfg", 3) = "Verif2 : true" Then
VerifComb()
Else
EndIf
If _IsPressed("71", $hDLL) Then
ExitLoop
stop()
EndIf
Until($Compteur = 100)
ToolTip("Free Pause", 0, 0)
Sleep(30000)
$Compteur = 0
main()
EndFunc
Func end()
Tooltip("Bot Closed", 0, 0)
Sleep(2000)
Tooltip("")
Exit
EndFunc
Func stop()
ToolTip("Pause (forcé)", 0, 0)
If _IsPressed("70", $hDLL) Then
main()
ElseIf _IsPressed("72", $hDLL) Then
end()
EndIf
EndFunc
Func Verif()
$Coord = PixelSearch(0, 0, 915, 545, 0x2E2D28, 1)
If Not @error Then
MouseMove(898, 595, 1)
MouseClick("left", 898, 595, 1)
Sleep(500) ; On attend 0,5secs.
main()
EndIf
EndFunc
Func VerifComb()
$Coord = PixelSearch(0, 0, 915, 545, 0xC33326, 1)
If Not @error Then
Beep(500, 200)
Sleep(500) ; On attend 0,5secs.
main()
EndIf
EndFunc
Func donate()
$ui = GUICreate("WizzBot", 1000, 800) ; on créer la GUI
$wb = _IECreateEmbedded() ; on appel le navigateur embarqué
GUICtrlCreateObj($wb, 10, 10, 980, 780) ; on le met en place ici
GUISetState() ; on montre la GUI
_IENavigate($wb, "https://www.paypal.com/cgi-bin/webscr?cmd=_donations&business=frojerome%40gmail%2ecom&lc=ZA&item_name=WizzBot&no_note=0¤cy_code=EUR&bn=PP%2dDonationsBF%3abtn_donateCC_LG%2egif%3aNonHostedGuest", 1) ; l'adresse de votre messagerie
While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
GUIDelete($ui)
ExitLoop
EndSwitch
WEnd
EndFunc
Voili-Voilou, en espérant vous avoir aidé !
Ps : Un bouton donation existe, si vous adorez le projet, vous pouvez le soutenir mais AUCUNE obligation !
(Merci de me rapporter tous les bug, ce bot est exclusif Cheat-Gam3.com)
Mon mail pour vous aider, car oui je suis un humain comme vous et moi : Ce lien n'est pas visible, veuillez vous connecter pour l'afficher. Je m'inscris!
Lien : Ce lien n'est pas visible, veuillez vous connecter pour l'afficher. Je m'inscris!
Virus Total : Ce lien n'est pas visible, veuillez vous connecter pour l'afficher. Je m'inscris!
(Mais si vous avez peur, construisez vous même avec le code :D)
Last edited:
![[A]pokah.](/data/avatars/s/257/257419.jpg?1504230395){kind=avatar}
