Send Limit

[metjumper]

HotKeySet("{F3}","Di")

func Di()

opt ("SendKeyDelay",50)

send("{Enter}")

Send("blabla")

send("{Enter}")

EndFunc

how can i add usage limit for func ?

exam: its might be allow 3 times press then it connot use for 30 min or smth like that.

Regards.

Edited February 24, 2009 by metjumper

[furrycow]

HotKeySet("{F3}","Di")

func Di()

opt ("SendKeyDelay",50)

send("{Enter}")

Send("blabla")

send("{Enter}")

EndFunc

how can i add usage limit for func ?

exam: its might be allow 3 times press then it connot use for 30 min or smth like that.

Regards.

I havent tried it or anything, and its not the prettiest coding ever but...might work:

$x=0
HotKeySet("{F3}","Di")


func Di()
    If $x<3 Then
        opt ("SendKeyDelay",50)
        send("{Enter}")
        Send("blabla")
        send("{Enter}")
        $x+=1
        $Timer=TimerInit()
    Else
        If TimerDiff($Timer)<1800000
            Msgbox(0,"","Please Wait "&((TimerDiff($Timer)/1000)/60)&" Minutes")
        Else
            $x=0
        EndIf
    EndIf
EndFunc

[metjumper]

nope its not working.

gives me an error "if timeriff... variable used without being declard. when i press f3 at 4 time.

thanks for reply

[furrycow]

nope its not working.

gives me an error "if timeriff... variable used without being declard. when i press f3 at 4 time.

thanks for reply

Umm, just noticed i missed a "Then" at the end of that line:

If TimerDiff($Timer)<1800000 Then

Edited February 24, 2009 by furrycow

[metjumper]

i recognize it i did put then.

its give me error as i said before...

[Melba23]

metjumper,

This should do what you want - 3 presses and then a time-out:

HotKeySet("{SPACE}", "My_Function")

Global $iBegin = 0
Global $iCount = 0

While 1
    Sleep(100)
WEnd

Func My_Function()

    If $iCount = 3 Then
        If TimerDiff($iBegin) < 10000 Then; 10 secs for example
            ConsoleWrite("Returning " & Int(TimerDiff($iBegin) / 1000) & " secs elapsed" & @CRLF)
            Return
        Else
            $iCount = 0
        EndIf
    EndIf
    $iCount += 1
    ConsoleWrite("Function call " & $iCount & @CRLF)
    If $iCount = 3 Then $iBegin = TimerInit()

EndFunc  ;==>My_Function

Keep pressing Space and you will see the 3 function calls and then the timer running.

M23

[metjumper]

M23 whit your code

space key wont work even 1 time like disable space key

i tryed to make smthg but i could not able.

[furrycow]

M23 whit your code

space key wont work even 1 time like disable space key

i tryed to make smthg but i could not able.

If M23's doesnt work, you could put Global $Timer in mine, as i think that is what the prob with mine was

Global $Timer

$x=0
HotKeySet("{F3}","Di")


func Di()
    If $x<3 Then
        opt ("SendKeyDelay",50)
        send("{Enter}")
        Send("blabla")
        send("{Enter}")
        $x+=1
        $Timer=TimerInit()
    Else
        If TimerDiff($Timer)<1800000 Then
            Msgbox(0,"","Please Wait "&((TimerDiff($Timer)/1000)/60)&" Minutes")
        Else
            $x=0
        EndIf
    EndIf
EndFunc

[youknowwho4eva]

HotKeySet("{F3}","Di")
$i = 0
func Di()
If $i < 3 then  
opt ("SendKeyDelay",50)
    send("{Enter}")
    Send("blabla")
    send("{Enter}")
    EndFunc
$i += 1
else
msgbox(0,"","no more worky")
endif
endfunc

Edits: Forgot the endif and endfunc

Edited February 24, 2009 by youknowwho4eva

[Melba23]

metjumper,

So replace SPACE with another key - the script works!

M23

[metjumper]

furrycow

Tnx for second code its working very well.

M23 i know u are one of the best coder autoit,i didnt mean your code is not workin but i changed key but it wont work probably my bad,

Thanks for all reply i appreciated.

Best Regards.