Archeage - AntiAFK

09/21/2014 15:18 ppaul1#31
Quote:
Originally Posted by Paraly View Post
evtl. 24 stunden disconnect?
Ich denke eher es liegt nicht an deinem Tool, sondern schlicht an den Servern. Ich hatte das Tool die Nacht an + Kreiselmount im eigenen Haus. Trotzdem DC weil einfach der Server abgeschmiert ist.
09/21/2014 17:23 dexter74#32
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   ;
09/21/2014 21:48 ppaul1#33
@Paraly:

Irgendwas in Planung für Mount-leveling nebenbei? Wäre doch praktisch wenn es noch einen Modus für Pfeiltaste-Links+Pfeiltaste-Hoch/Pfeiltaste-Rechts+Pfeiltaste-Hoch gibt um im Kreis zu rennen.
09/21/2014 22:10 Paraly#34
Quote:
Originally Posted by ppaul1 View Post
@Paraly:

Irgendwas in Planung für Mount-leveling nebenbei? Wäre doch praktisch wenn es noch einen Modus für Pfeiltaste-Links+Pfeiltaste-Hoch/Pfeiltaste-Rechts+Pfeiltaste-Hoch gibt um im Kreis zu rennen.
Habe ich eben für jemanden geschrieben, jedoch bin ich mir nicht ganz sicher ob ich es release immerhin hat er mir extra geld dafür gegeben, es jetzt als freeware rauszuhauen fänd ich ziemlich unfair.

Ausserdem werden morgen ein paar bugfixes kommen.
09/22/2014 00:47 Nomuken#35
Ist es möglich das du Space rausnimmst, das springen fällt viel zu sehr auf stattdessen einfach nur P O I ect diese fenster mehr nicht weil das keiner sieht so kann man irgendwo stehen bleiben und alle meinen du bist nur kurz afk. Aber das springen fällt zu sehr auf.
09/22/2014 01:28 Paraly#36
Quote:
Originally Posted by Nomuken View Post
Ist es möglich das du Space rausnimmst, das springen fällt viel zu sehr auf stattdessen einfach nur P O I ect diese fenster mehr nicht weil das keiner sieht so kann man irgendwo stehen bleiben und alle meinen du bist nur kurz afk. Aber das springen fällt zu sehr auf.
Ich bin mir nicht sicher ob die Fenster ausreichen um nicht gekickt zu werden aber klar kann ich machen.
09/22/2014 08:10 Nomuken#37
Also bei Aion damals hab ich mir mit der Maus Tastatur nur Macro geschrieben das er I drückt alle 30 sec. Also Inventar. Das hatte gerreicht um die Tageonline zu bleiben. Man müsste es halt Probieren aber ich denke das es reichen würde.


Edit:

Das wegen dem Mount leveln scheinbar reichts auch wenn man nur gerade aus lauft in eine Wand. Dann noch das Afk-Programm und fertig. Mann muss halt nur ein Ort finden wo keine leute hinlaufen.
09/22/2014 11:31 Esukho#38
man kann doch in seinem haus sein das ist doch wohl ein ort wo man nicht gefunden wird^^
09/22/2014 19:23 Paraly#39
New version aviable :)
I've added a new keystroke send method which gets hopefully not detected like controlsend.

it also reconizes if ArcheAge got closed and it will create a log file with the crashed time and close itself.
09/22/2014 20:33 holi20#40
also bei mir schliesst sich sofort archeage wenn ich dein tool benutze
09/22/2014 21:58 Nomuken#41
1.16 funktioniert bei mir ich werde es mal Tag und Nacht testen ob es auch ohne Space geht. (In der nacht machen die gerne mal Serverclear logout, warum auch immer.)

PS: Danke für die Space option.
09/23/2014 02:36 lTSNl#42
die machen serverclear logout , um die ganzen afk'ler bzw botter zu kicken :D
09/23/2014 02:46 Paraly#43
Ja, im nächsten update bring ich evtl. eine auto relog funktion rein.
09/23/2014 04:29 pikachukaki#44
Quote:
Originally Posted by Paraly View Post
Ja, im nächsten update bring ich evtl. eine auto relog funktion rein.
Thaats why i login to ask....thanks hope it stops crashing the game and opening hackshield site!
09/23/2014 15:01 Xardovar#45
Funktioniert soweit super, danke dafür! Hat jemand schon ausprobiert ob Jumping benötigt wird?