[Q] Button który po wciśnięciu wciśnie F7 ;D

[M4Sell]

Witam mam 2 buttony.

Start i Stop

No i jak wcisne start to się "cheat" włącza.

A żeby stop trzeba wcisnąć F7.

I chcę żeby buton stop wciskał F7 jak to zrobić?

[jackraymund]

o przypisaniu funkcji w buttonie masz w tutorialu w podpiętych

funkcją send "wciśniesz" f7

[M4Sell]

Jakoś nie mogę znaleźć to czego potrzebuje.

[dzikiszpadel]

w funckcji podtezymującej tam gdzie masz:

while 1
case $guieventclose
exit
wend

daj:

while 1
case $guieventclose
exit
case $button1(chodzi o button start)
dziala()
wend

func dziala()
;kod programu
endfunc

i takie coś na początku:

hotkeyset("{F7}","stop")

func stop()
exit
endfunc

a Jeżeli chcesz żeby F7 nie wyłaczał programu tylko dawał 'pauze' to:

hotkeyset("{F7}","stop")

func stop()
while 999999
sleep(100)
wend
endfunc

 

jeżeli jakaś literówka będzie to scite ci podpowie gdzie bo pisałem na oko ;D

Daj like to nic nie kosztuje a ja ci pomogłem ;D

[GameOverMan]

To i tak mu pewnie nie zadziała, powiedz lepiej co ten twój program robi jak się wciśnie start.

[M4Sell]

To taki dopiero amatorski program. ; p dopiero się uczę. Na początek zrobiłem kod który wciska co 15 sec "1" ; P

No i po starcie działa ; P

 

HotKeySet("{F7}","KONIEC")

#include <GUIConstantsEx.au3>

GuiCreate( "Pelerynki By -SkiloR.-", 300, 200 ) ;gui

GUICtrlCreateLabel("Aby właczyć wciśni start, aby wyłączyć stop", 60, 30, 180, 50)

$Start = GuiCtrlCreateButton("Start", 120, 80, 60, 30 ) ;button start

$stop = GUICtrlCreateButton ("Stop", 120, 110, 60, 30)



Guisetstate(@SW_SHOW)

While 1

	$msg = GUIGetMsg()

	Select

		Case $msg = $GUI_EVENT_CLOSE

			Exit ;----zamyka botka

		Case $msg = $Start

			While 1

				SPAM() ;funkcja spam

			WEnd

	EndSelect

WEnd

Func spam() ;wykonuje funkcję

	Send( "{1}" )

	Send( "1" )

	sleep(10000); - 1000 - sekunda

	EndFunc

Func KONIEC()

	Exit

EndFunc

UISetState(@SW_SHOW,$GUI1)

[IZZER4]

Wtf po co tyle petli??

While 1

$msg = GUIGetMsg()

Select

Case $msg = $GUI_EVENT_CLOSE

Exit ;----zamyka botka

Case $Start

SPAM() ;funkcja spam
Case $Stop
Exit
EndSwitch

WEnd

 

I wywal ta funkcje koniec.

[GameOverMan]

Np.:

 

HotKeySet("{F6}", "Start")
HotKeySet("{F7}", "Stop")

#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>

$On = False
$Timer = 0

$Form1 = GUICreate("Pelerynki By -SkiloR.-", 300, 200) ;gui

GUICtrlCreateLabel("Aby właczyć wciśni start, aby wyłączyć stop", 60, 30, 180, 50)

$Start = GUICtrlCreateButton("Start", 120, 80, 60, 30)

$Stop = GUICtrlCreateButton("Stop", 120, 110, 60, 30)
GUISetState(@SW_SHOW)

While 1
	$nMsg = GUIGetMsg()
	Switch $nMsg
		Case $GUI_EVENT_CLOSE
			Exit
		Case $Start
			Start()
		Case $Stop
			Stop()
	EndSwitch

	If $On == True And TimerDiff($Timer) >= 15000 Then
		Send("{1}")
		$Timer = TimerInit()
	EndIf
WEnd

Func Start()
	$On = True
	Send("{1}")
	$Timer = TimerInit()
EndFunc   ;==>Start

Func Stop()
	$On = False
EndFunc   ;==>Stop