[BOT] Wciskanie klawiszy

[wiesiuxd]

Potrzebuje bota który będzie mieć GUI z dwoma buttonami, tzn Start i Stop. Który będzie wciskał litery "F" i "E" co 5 sekund w pętli aż do naciśnięcia stop.

Próbowałem coś zdziałać ale wychodziło mi tylko bez GUI.

Tu próby z interfejsem ale i tak na nic:

 

#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("BOT", 186, 71, 342, 325)
$Button1 = GUICtrlCreateButton("START", 8, 40, 75, 25)
$Button2 = GUICtrlCreateButton("STOP", 104, 40, 75, 25)
$Label1 = GUICtrlCreateLabel("go go go", 40, 16, 115, 17)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
	$nMsg = GUIGetMsg()
	Switch $nMsg
		Case $GUI_EVENT_CLOSE

			Exit

		Case $Button1			;nie wiem jak zrobic aby pod przyciskiem 1 "pracowaly" 2 petle, a pod przyciskiem 2 mogl bym ten proces zatrzymac

			Sleep(5000)			; tu ma byc petla z literka "F" powtarzajaca sie co 5 sek.
			Send ("{F}")

			Sleep(5000)			; j.w. lecz literka "E"
			Send("{E}")
	EndSwitch

WEnd

 

[ktoZjarany]

zamiast sleepa możesz użyć AdlibRegister

a do buttona1 zrobiłbym case z funckją, która ma w sobie dwa case

func button()

 

Switch @GUI_CtrlId

Case $Button2

Exit

Case $Button1

tutaj co ma robić przycisk

EndSwitch

EndFunc

[samios3]

To mozesz zrobic przykładowo ci powiem

 

Case $Button1

AdilbRegister("Odswiez",5000)

Case $Button2

AdilbRegister("Odswiez")

 

1 button start

 

2 button stop

 

A jak chcesz zeby spamowal E i F

 

To najprostrze co jest to

 

Sleep(0) czy ile tam chcesz

While 1

Send("{E}")

Send("{F}")

Sleep(0)

Wend

 

 

Mogl bys zrobic tez za pomoacać HotkeySet ..

 

Pomysl troche bo gotowcow nie dajemy