hello,
Code:
#Region ;**** Directives created by AutoIt3Wrapper_GUI ****
#AutoIt3Wrapper_Version=Alpha
#AutoIt3Wrapper_Icon=Archeage.ico
#AutoIt3Wrapper_Res_Comment=Script by Dexter74
#AutoIt3Wrapper_Res_Description=Anti-AFK
#AutoIt3Wrapper_Res_Fileversion=0.0.0.4
#AutoIt3Wrapper_Res_Fileversion_AutoIncrement=y
#AutoIt3Wrapper_Res_LegalCopyright=Dexter74
#AutoIt3Wrapper_Res_Icon_Add=Archeage.ico
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
; ####################
; # Script Anti-AFK #
; ####################
; #
; # Jeux: Archeage
; # Auteur: dexter74
; #
; # Fonctions: Start, Pause, Exit
; Raccourcis
HotKeySet("{F9}", "start")
HotKeySet("{F10}", "stop")
HotKeySet("{F11}", "_exit")
; Création d'une variable globale pouvant avoir plusieur etat (pause , start, exit)
Global $archeage = 0
;Variable
$titre = WinGetTitle("[Class:ArcheAge]", "")
_tooltip()
While 1
If $archeage = 1 Then
_key()
ElseIf $archeage = 0 Then
EndIf
WEnd
Func start() ; Permet de lancer le script
$archeage = 1 ;
MsgBox('', "Information", "Bot Démarrer",'1')
EndFunc ;==>start
Func stop() ; Permet de Stopper le script
$archeage = 0 ;
MsgBox('', "Information", "Bot Stopper",'1')
EndFunc ;==>stop
Func _exit() ; Permet de Quitter le script
Exit
EndFunc ;==>_exit
Func _tooltip()
ToolTip("F9: Start " & "F10: Stop " & "F11: Quitter", 820, 3, "") ;
EndFunc
Func _key()
_Random_1()
_z()
_Random_1()
_s()
_Random_1()
_space()
_Random_1()
_q()
_Random_1()
_d()
_Random_1()
_space()
EndFunc
Func _z()
ControlSend($titre, "", "", "{z}")
EndFunc ;==>_z
Func _s()
ControlSend($titre, "", "", "{s}")
EndFunc ;==>_s
Func _q()
ControlSend($titre, "", "", "{q}")
EndFunc ;==>_q
Func _d()
ControlSend($titre, "", "", "{d}")
EndFunc ;==>_d
Func _space()
ControlSend($titre, "", "", "{space down}")
ControlSend($titre, "", "", "{space up}")
EndFunc ;==>_space
Func _Random_1() ;
; 1 seconde = 1000 ms
; 1 Minute 60000
; 2 Minute 120000
; 3 Minute 180000
; 4 Minute 240000
; 5 minute 300000
;
Sleep(Random(60000, 120000, 1))
EndFunc ;