[Pytanie] Mouse Click

[adoksz]

Siemka, jak zrobić aby po wciśnięciu END klikał LPM co 1 sec.? Coś takiego nie działa.

HotKeySet("{END}", "Start")

   Func Start()
   While 1
	  MouseClick("left")
	  Sleep(1000)
   WEnd
   EndFunc

Dam lubke

[M4niak]

HotKeySet("{END}", "Start")
HotKeySet("{HOME}", "_check")

Local $Stop = False

While 1
Sleep(100)
WEnd

Func _check()
If $Stop = False Then
	$Stop = True
ElseIf $Stop = True Then
	$Stop = False
EndIf
EndFunc

Func Start()
Do
	MouseClick("left")
	Sleep(1000)
Until $Stop = True
EndFunc

 

Zanim zdążyłeś wejść w nową pętlę program się wyłączał ;P

 

#Edit

 

Lub jeśli wolisz tak

 

HotKeySet("{END}", "_check")

Local $Stop = False
Local $Timer = TimerInit()

While 1
If $Stop = False Then
	If Int(TimerDiff($Timer)) >= 1000 Then ; co sekunde twoja funkcja ;p
		MouseClick("left")
		$Timer = TimerInit()
	EndIf
EndIf
Sleep(1) ; wiadomo, jesli nie to zakomentuj ;p
WEnd

Func _check()
If $Stop = False Then
	$Stop = True
ElseIf $Stop = True Then
	$Stop = False
EndIf
EndFunc

[adoksz]

dzięki

[Sopelek997]

się wtrące.

Func _check()
$stop = not $stop
EndFunc

 

 

 

Int(TimerDiff($Timer))

niepotrzebne zaokrąglenie do inta

 

 

If Int(TimerDiff($Timer)) >= 1000 Then ; co sekunde twoja funkcja ;p

...

Sleep(1000)

timer + sleep = czysta zajebistość

[M4niak]

@up

 

Na pałę kopiowałem i nie zauważyłem..

Czysta zajebistość