Make a task 10 in 10 seconds

[stackover]

Hi. I trying to make asimple script. For example: Start sending "A" al the time and running back this a counter that 10 in 10 seconds stop send "A" and send "B". I tryed too much but my scritp only send "A" or only send "B". Anyone can help.

Here my script. Doesn´t know if is that the correct way to do this kind of script. Thanks

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

$autopartyOn = 0

$autopartyC = 0

;**********************contador do autoparty

Func t2 ()

While 1

send("a")

Sleep("60")

If $autopartyC = 10 Then

Call ("Party")

$autopartyC = 0

$autopartyOn = 1

EndIf

WEnd

EndFunc

Func t1 ()

$autopartyOn = 1

$autopartyC = 0

While 1

If $autopartyOn = 1 then

$autopartyC = $autopartyC + 1

Sleep(1000)

EndIf

;If $autopartyC = 10 then

;Call ("Party")

;$autopartyC = 0

; $autopartyOn = 1

;EndIf

WEnd

EndFunc

Func Party ()

Send("xx")

EndFunc

While (1)

Sleep (1)

WEnd

[stackover]

I Tryed other kind of script but only do Mouse Click dont do Send("aa").

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


Func t1()
   $start = TimerInit()
Do
    MouseClick("right")
    Sleep(500)

    If TimerDiff($start) > 10000 Then 
        Sleep(1000)
        Call("Party")
        $start = TimerInit()
    EndIf
Until TimerDiff($start) > 30000
EndFunc

Func Party ()
    Send("aa")  
EndFunc

While (1)
    Sleep (1)
WEnd

[stackover]

Thanks All Works seconds scritp