[Suche] Auto Klicker/Keypresser für Metin2 Pserver

01/04/2014 23:57 Palassa#1
Wie der tropic schon sagt, suche ich einen autokeypresser.

Kenne mich da nämlich nicht so aus :s ^^.

Der keypresser soll alle 250 Milli-sec ( Y ) drücken und das so lange bis ich ihn stope

Hoffe es nimmt niemanden al zu viel zeit und ich bin hier richtig (: währe echt nett

MFG Yannic
01/05/2014 00:25 mo.tennis#2
so ungefähr?

Dort wo ich fenstername hingeschrieben hab musst du den Fensternamen deines Spiels eitntragen finden.
Mit "F5" startest du es, mit "F6" pausierst es und mit "F7" scließt du es.

Ein thanks wäre nett.

Code:
HotKeySet("{F5}", "_starten")
HotKeySet("{F6}", "_pause")
HotKeySet("{F7}", "_exit")
While 1
	Sleep(1)
WEnd


Func _starten()
	While 1
		WinWaitActive("Fenstername")
		Sleep(250)
		send("y")
	WEnd
EndFunc

Func _pause()
	While 1
		Sleep(1)
	WEnd
EndFunc

Func _exit()
	Exit
EndFunc
01/05/2014 01:07 alpines#3
Sowas gibts schon in Haufen, einfach mal nach Multihacks suchen die haben meistens sowas schon drinne.
01/05/2014 14:52 Palassa#4
Quote:
Originally Posted by mo.tennis View Post
so ungefähr?

Dort wo ich fenstername hingeschrieben hab musst du den Fensternamen deines Spiels eitntragen finden.
Mit "F5" startest du es, mit "F6" pausierst es und mit "F7" scließt du es.

Ein thanks wäre nett.

Code:
HotKeySet("{F5}", "_starten")
HotKeySet("{F6}", "_pause")
HotKeySet("{F7}", "_exit")
While 1
	Sleep(1)
WEnd


Func _starten()
	While 1
		WinWaitActive("Fenstername")
		Sleep(250)
		send("y")
	WEnd
EndFunc

Func _pause()
	While 1
		Sleep(1)
	WEnd
EndFunc

Func _exit()
	Exit
EndFunc
danke dir für die schnelle antwort ähm, ich habe es bei SciTE Script Editor
eingefügt und den fenster namen metin2client eingetragen da es für eine P-server ist :D, ähm es funktioniert leider nicht villeicht mache ich einen fehler.. da ich das, das erstemal jetzt gefragt bzw gemacht habe.

MFG Yannic
01/05/2014 15:22 alpines#5
Nimm lieber WinGetTitle("teil_vom_titel") da der den Rest ergänzt, die Wahrscheinlichkeit ist also höher.
Oder du holst dir einfach das Handle vom aktiven und waitest halt auf den.
01/05/2014 15:27 Palassa#6
Code:
HotKeySet("{F5}", "_starten")
HotKeySet("{F6}", "_pause")
HotKeySet("{F7}", "_exit")
While 1
	Sleep(1)
WEnd


Func _starten()
	While 1
		WinGetTitle("metin2client")
		Sleep(250)
		send("y")
	WEnd
EndFunc

Func _pause()
	While 1
		Sleep(1)
	WEnd
EndFunc

Func _exit()
	Exit
EndFunc

so habe ich es jetzt hingeschrieben richtig? :s

ps so geht es auch nicht :/
01/05/2014 15:54 alpines#7
Mach mal folgendes
Code:
HotKeySet("{F8}", "GetHandle")

Func GetHandle()
	Global $hMetin2 = WinGetHandle("[active]")
EndFunc
Fokussier das Fenster und drück dann F8. Brauchst nur den Code dort im Snippet unterzubringen.
01/05/2014 15:57 Palassa#8
Quote:
Originally Posted by alpines View Post
Mach mal folgendes
Code:
HotKeySet("{F8}", "GetHandle")

Func GetHandle()
	Global $hMetin2 = WinGetHandle("[active]")
EndFunc
Fokussier das Fenster und drück dann F8. Brauchst nur den Code dort im Snippet unterzubringen.
könntest du mir bitte den Ganzen code schreiben wie ich ihn einfügen soll :s entschuldige habe gestern das 1x damit angefangen mich zu informieren
01/05/2014 16:07 alpines#9
Wenn du den Bot startest, erst Metin2 Fenster aktivieren - F8 drücken und dann auf F5.

Code:
HotKeySet("{F5}", "_starten")
HotKeySet("{F6}", "_pause")
HotKeySet("{F7}", "_exit")
HotKeySet("{F8}", "GetHandle")

While 1
	Sleep(1)
WEnd


Func _starten()
	While 1
		WinWaitActive($hMetin2)
		Sleep(250)
		send("y")
	WEnd
EndFunc

Func _pause()
	While 1
		Sleep(1)
	WEnd
EndFunc

Func _exit()
	Exit
EndFunc

Func GetHandle()
	Global $hMetin2 = WinGetHandle("[active]")
EndFunc
01/05/2014 20:29 Palassa#10
irgendwas muss ich falsch machen o.0 geht bei mir nicht ._.?
01/05/2014 20:48 alpines#11
Hast du das Mt2 Fenster fokussiert und f8 gedrückt bevor du f5 gedrückt hast?
01/05/2014 22:39 lolkop#12
ich denke ein einfacher hotkey zum starten/stoppen sollte hier vollkommen ausreichen....

Code:
HotKeySet('{f5}', 'StartStop')
Dim $t, $run
While Sleep(1)
	If $run And TimerDiff($t)>=250 Then
		Send('Y')
		$t = TimerInit()
	EndIf
WEnd
Func StartStop()
	$run = Not $run
EndFunc
01/06/2014 01:23 flumio#13
Code:
HotKeySet("{F1}", "Start")
HotKeySet("{F2}", "Stop")
HotKeySet("{F3}", "_Exit")

Func Start()
	While True
		Global $iLoop = True
		ControlSend("metin2client", "", "", "Y")
		Sleep(250)
		If Not $iLoop Then ExitLoop
	WEnd
EndFunc

Func Stop()
	$iLoop = False
EndFunc

Func _Exit()
	$answer = MsgBox(4, "", "do you want to close ?")
		If $answer = 6 Then
			Exit
		EndIf
EndFunc

While True
	Sleep(10)
WEnd
Das ist wohl die einfachste Art, für dein Zweck.
01/30/2014 00:30 Palassa#14
suche leider immernoch geht nicht :/

ich schätze ich gebe irwas falsch ein kann es mir wer einrichten ?.?
01/30/2014 15:20 ZeiZm0#15
Das Problem is bei mir (Bei mir klappts aber andres game)
Dass ich den Hotkey ausserhalb des spielfensters drücken muss
sprich desktop anwählen, hoktey drücken, wieder zum spielfenster

Das nerft ! und wenn ich in full screen spiele
kann man ned machen dass man den hotkey im spiel pressen muss
iwie mit Controlgettext doerso