holding hotkey calls func rapidedly, can I change this?

[sandin]

when I hold NUMPAD1 the script calls func over and over again rapidedly, is there a way for me to change this? for example if I hold down NUMPAD1 it cals func only 1 time and then if I press NUMPAD1 it calls the same func again (but only once as well)?

here's the script:

HotKeySet("{NUMPAD1}", "func1")

HotKeySet("{NUMPAD0}", "_exit")

Global $iCC

Func func1()

$iCC += 1

ToolTip('You have called func1 ' & $iCC & ' times.', 0, 0)

Sleep(10)

EndFunc

func _exit()

Exit

EndFunc

while 1

sleep(1)

WEnd

[martin]

when I hold NUMPAD1 the script calls func over and over again rapidedly, is there a way for me to change this? for example if I hold down NUMPAD1 it cals func only 1 time and then if I press NUMPAD1 it calls the same func again (but only once as well)?

here's the script:

HotKeySet("{NUMPAD1}", "func1")

HotKeySet("{NUMPAD0}", "_exit")

Global $iCC

Func func1()

$iCC += 1

ToolTip('You have called func1 ' & $iCC & ' times.', 0, 0)

Sleep(10)

EndFunc

func _exit()

Exit

EndFunc

while 1

sleep(1)

WEnd

#include <misc.au3>

$H1reset = False
$H2reset = false
HotKeySet("{NUMPAD1}", "func1")
HotKeySet("{NUMPAD0}", "_exit")

Global $iCC

Func func1()
    HotKeySet("{NUMPAD1}")
    $H1reset = true
$iCC += 1
ToolTip('You have called func1 ' & $iCC & ' times.', 0, 0)
Sleep(10)
EndFunc

func _exit()
Exit
EndFunc

while 1
if $H1reset and not _Ispressed("61") Then
    HotKeySet("{NUMPAD1}", "func1")
    $H1reset = false
    
EndIf

[Paulie]

Along the same Lines as Martin

#Include <Misc.au3>
HotKeySet("{NUMPAD1}", "func1")
HotKeySet("{NUMPAD0}", "_exit")

Global $iCC

while 1
    sleep(100)
WEnd

Func func1()
    $iCC += 1
    ToolTip('You have called func1 ' & $iCC & ' times.', 0, 0)
    If _IsPressed(61) Then 
        Do 
            Sleep(100)
        Until NOT _IsPressed(61)
    EndIf
EndFunc

func _exit()
    Exit
EndFunc

[martin]

Along the same Lines as Martin

#Include <Misc.au3>
HotKeySet("{NUMPAD1}", "func1")
HotKeySet("{NUMPAD0}", "_exit")

Global $iCC

while 1
    sleep(100)
WEnd

Func func1()
    $iCC += 1
    ToolTip('You have called func1 ' & $iCC & ' times.', 0, 0)
    If _IsPressed(61) Then 
        Do 
            Sleep(100)
        Until NOT _IsPressed(61)
    EndIf
EndFunc

func _exit()
    Exit
EndFunc

That doesn't work Paulie, you need to stop the HotKey from working before you wait for the key to be released.

Func func1()
       HotKeySet("{NUMPAD1}")
    $iCC += 1
    ToolTip('You have called func1 ' & $iCC & ' times.', 0, 0)
    while _IsPressed(61) 
            Sleep(100)
    wend
     HotKeySet("{NUMPAD1}", "func1")
EndFunc

[Paulie]

You are right, missed that.

#Include <Misc.au3>
HotKeySet("{NUMPAD1}", "func1")
HotKeySet("{NUMPAD0}", "_exit")

Global $iCC=0

while 1
    sleep(100)
WEnd

Func func1()
    $iCC += 1
    ToolTip('You have called func1 ' & $iCC & ' times.', 0, 0)
    If _IsPressed(61) Then
    HotKeySet(@HotKeyPressed)
        Do
            Sleep(100)
        Until NOT _IsPressed(61)
    HotKeySet(@HotKeyPressed,"Func1")
    EndIf
EndFunc

func _exit()
    Exit
EndFunc

[sandin]

thank you all for all your help, it works.