Salutations,
Voilà un bout de code qui peut servir de squelette pour vous bot
Il est préferable de commencer par l'attente d'une fenetre nommé Dofus avant tout !
Opt("WinWaitDelay",100)
Opt("WinTitleMatchMode",4)
Opt("WinDetectHiddenText",1)
Opt("MouseCoordMode",0)
WinWait("Dofus","")
If Not WinActive("Dofus","") Then WinActivate("Dofus","")
WinWaitActive("Dofus","")
Voilà qui est fait, maintenant, on place nos raccourci clavier,
Avec la touche Pause pour la pause, echape pour quitter F2 et F6 pour divers maneuvre
HotKeySet("{PAUSE}","pause")
HotKeySet("{ESC}","stop")
hotkeyset("{F2}","Test")
HotKeySet("{F6}","bot")
Voilà qui est fait !
On declare toutes nos variables, sans en oublier, et proprement ici !
Voilà un exemple, mais utilisez vos variables, pas les miennes ^^'
Global $xmax = 0, $i
Global $coordx[10],$coordy[10], $pixres[5], $pix, $x = 0, $co[2], $coord, $Paused = 0,$time = 0
A présent, pourquoi ne pas informer de nos raccourcis à l'utilisateur, avec une bulle dans le systray
traytip ("Information","F2 pour le teste , F6 pour lancer le bot, Pause la pause, Echap l'arrêt",0)
On place les fonctions de d'arret et de pause
func stop() ; l'arrêt
;WinActivate("C:\Users\admin\Documents\script\metier.au3 - SciTE","") ; Utile quand on fait des testes
Exit
EndFunc
Func Pause() ; la pause
TrayTip("Clear TIP", "" , 0)
$Paused = NOT $Paused
if $Paused then
TrayTip("Pause !", "Pause ", 1, 1)
while $Paused
sleep(1000);
WEnd
else
TrayTip("plus pause !", "plus Pause", 1, 1)
endif
EndFunc
A present les fonctions que l'on veut, pour y placer du code
func test() ;
; Votre code ici
func bot()
; Un autre bout de code ici
;Bot() ; Si on veux ne jamais finir cette fonction, la faire en boucle :]
EndFunc
A présent, on fait en sorte de jamais finir le bot
while 1 ; pour ne jamais fermer le prog'
sleep(50)
WEnd
Voilà, a présent, à vous de jouer !
Ps: Tuto "en construction" il peut être améliorer au fil du temps, par moi ou par un autre.