"KlickBot" Metin2

[pascal4556]

Hey leute kenne das Programm erst seit einem Tag ich brauche einfach nur einen Klick bot der :

1. Einen Rechtsklick macht (Kordinaten sind ersmal egal)
2. Einen Linksklick (Kordinaten sind ersmal egal)
3. Bevor er wieder den Rechtsklick macht 60 Sek. warten
4. Immer wiederholen
5.Einen "Button" um es in dem Metin2 Fenster zu starten/stoppen ohne das er das Metin2 Fenster "verlässt/schließt"


Hier ist mein Code "Nooblike" :P

MouseClick("right" , 1205, 756, 1)
MouseClick("left" , 746, 473, 1)
Sleep(60000)

Muss einfach nur die 5. Sachen erfüllen wäre nett wenn ihr mir den Code kurz schreiben könnten

[lolkop]

Originally Posted by pascal4556

Hey leute kenne das Programm erst seit einem Tag ich brauche einfach nur einen Klick bot der :

1. Einen Rechtsklick macht (Kordinaten sind ersmal egal)
2. Einen Linksklick (Kordinaten sind ersmal egal)
3. Bevor er wieder den Rechtsklick macht 60 Sek. warten
4. Immer wiederholen
5.Einen "Button" um es in dem Metin2 Fenster zu starten/stoppen ohne das er das Metin2 Fenster "verlässt/schließt"


Hier ist mein Code "Nooblike" :P

MouseClick("right" , 1205, 756, 1)
MouseClick("left" , 746, 473, 1)
Sleep(60000)

Muss einfach nur die 5. Sachen erfüllen wäre nett wenn ihr mir den Code kurz schreiben könnten

setze das ganze noch in eine einfache schleife und es läuft endlos... danach noch einen einfachen laufzustand einfügen, welchen du zb per tastendruck ändern kannst, und du erhälst folgendes:

HotKeySet('{F5}', 'SwitchState')
Dim $run=False
Do
	If $run Then
		MouseClick("right" , 1205, 756, 1)
		MouseClick("left" , 746, 473, 1)
		Sleep(60000)
	EndIf
Until False

Func SwitchState()
	$run = Not $run
EndFunc

[pascal4556]

Originally Posted by lolkop

setze das ganze noch in eine einfache schleife und es läuft endlos... danach noch einen einfachen laufzustand einfügen, welchen du zb per tastendruck ändern kannst, und du erhälst folgendes:

HotKeySet('{F5}', 'SwitchState')
Dim $run=False
Do
	If $run Then
		MouseClick("right" , 1205, 756, 1)
		MouseClick("left" , 746, 473, 1)
		Sleep(60000)
	EndIf
Until False

Func SwitchState()
	$run = Not $run
EndFunc

Wow Cool danke für die Schnelle Antwort