HotKey нужна помощь

[EWR]

Ребят возникла проблема есть такой код:

If $znachenie = 1 Then
				MsgBox(0, $caption, "Znachenie ravno 1")
			Else
				MsgBox(0, $caption, "Znachenie ravno 0")
			EndIf

Так вот нужно чтоб скажем при нажатии на F5 выдавало

MsgBox(0, $caption, "Znachenie ravno 1")

А при последующем нажатии

MsgBox(0, $caption, "Znachenie ravno 0")

И так опять F5 выдается

MsgBox(0, $caption, "Znachenie ravno 1")

и так далее

 

[DarWiM]

$znachenie=0

HotKeySet('{F5}','_Msg')

Sleep(10000)

Func _Msg()
	MsgBox(0,'','Значение = '&$znachenie,1)
	If $znachenie=1 Then
		$znachenie=0
	Else
		$znachenie=1
	EndIf
EndFunc

 

[inververs]

Вот самый короткий вариант: ;D

$iZn = 0
HotKeySet("{F5}",'_MyFunc')

While Sleep(100)
WEnd

Func _MyFunc()
	$iZn = Not $iZn
	MsgBox(0,'',"Значение равно: "& Int($iZn) )
EndFunc

 

[CreatoR]

Справку отменили?

Тема закрыта.