Countdown tray icon tooltip?(how?)

[pikablue]

Hello! with the help of many people here I finally created my first ever autoit function. it repeats a set number of mouse moments every 35 minutes. Give warning at the 3 minute mark down to the 1 minute mark. and also has a tray icon tip that shows a count down timer in minutes. xD took me quite a while. I was wondering how would i be able to add a countdown timer in seconds when its only 1minute left, like 60, 59, 58, 57... etc as a trayicon tool tip. anyways here is the code I got so far:

expandcollapse popup

Global $iCounter
Global $fLoop = True

HotkeySet("{Esc}", "Close")
While $fLoop
AutoItSetOption("MouseClickDelay", 100)
MouseClick("Left", 300, 790, 2)
MouseClick("Left", 400, 650, 2)
MouseClick("left", 450, 475, 2)
MouseClick("left", 475, 350, 2)
MouseClick("left", 450, 475, 2)
MouseClick("left", 475, 350, 2)
MouseClick("left", 450, 475, 2)
MouseClick("left", 475, 350, 2)
MouseClick("left", 450, 475, 2)
MouseClick("left", 475, 350, 2)
MouseClick("left", 450, 475, 2)
MouseClick("left", 475, 350, 2)
MouseClick("left", 450, 475, 2)
MouseClick("left", 475, 350, 2)
MouseClick("left", 450, 475, 2)
MouseClick("left", 475, 350, 2)
MouseClick("left", 450, 475, 2)
MouseClick("left", 475, 350, 2)
AutoItSetOption("MouseClickDownDelay", 100)
MouseClick("left", 790, 350, 2)
$iCounter = 35
        While $fLoop
        $iCounter -= 1
        TraySetState()
        TraySetToolTip($iCounter & " Minutes left.")
        Sleep(1000*60)

        If $iCounter = 0 Then ExitLoop
        If $iCounter = 5 Then Traytip("Bot", "5 Minutes left, there will be another warning at 1 minute.", 10)
        If $iCounter = 1 Then MsgBox(0, "LAST WARNING", "LAST WARNING!!" & $iCounter & " Minutes left!!", 10)

    WEnd
WEnd



Func Close()
    Exit
EndFunc

Edited June 30, 2009 by pikablue

[Yashied]

Hello! with the help of many people here I finally created my first ever autoit function. it repeats a set number of mouse moments every 35 minutes. Give warning at the 3 minute mark down to the 1 minute mark. and also has a tray icon tip that shows a count down timer in minutes. xD took me quite a while. I was wondering how would i be able to add a countdown timer in seconds when its only 1minute left, like 60, 59, 58, 57... etc as a trayicon tool tip. anyways here is the code I got so far:

expandcollapse popup

Global $iCounter
Global $fLoop = True

HotkeySet("{Esc}", "Close")
While $fLoop
AutoItSetOption("MouseClickDelay", 100)
MouseClick("Left", 300, 790, 2)
MouseClick("Left", 400, 650, 2)
MouseClick("left", 450, 475, 2)
MouseClick("left", 475, 350, 2)
MouseClick("left", 450, 475, 2)
MouseClick("left", 475, 350, 2)
MouseClick("left", 450, 475, 2)
MouseClick("left", 475, 350, 2)
MouseClick("left", 450, 475, 2)
MouseClick("left", 475, 350, 2)
MouseClick("left", 450, 475, 2)
MouseClick("left", 475, 350, 2)
MouseClick("left", 450, 475, 2)
MouseClick("left", 475, 350, 2)
MouseClick("left", 450, 475, 2)
MouseClick("left", 475, 350, 2)
MouseClick("left", 450, 475, 2)
MouseClick("left", 475, 350, 2)
AutoItSetOption("MouseClickDownDelay", 100)
MouseClick("left", 790, 350, 2)
$iCounter = 35
        While $fLoop
        $iCounter -= 1
        TraySetState()
        TraySetToolTip($iCounter & " Minutes left.")
        Sleep(1000*60)

        If $iCounter = 0 Then ExitLoop
        If $iCounter = 5 Then Traytip("Bot", "5 Minutes left, there will be another warning at 1 minute.", 10)
        If $iCounter = 1 Then MsgBox(0, "LAST WARNING", "LAST WARNING!!" & $iCounter & " Minutes left!!", 10)

    WEnd
WEnd



Func Close()
    Exit
EndFunc

I would have done so, try to understand it.

$Min = 35
$Sec = 60
TraySetState()
TraySetToolTip($Min & ' Minutes left.')
$Timer = TimerInit()
While 1
    Sleep(10)
    If TimerDiff($Timer) > 1000 Then
        $Timer = TimerInit()
        $Sec -= 1
        If $Sec = 0 Then
            $Sec = 60
            $Min -= 1
            Switch $Min
                Case 0
                    ExitLoop
                Case 1
                    MsgBox(0, 'LAST WARNING', 'LAST WARNING!! 0 Minutes left!!', 10)
                    $Sec -= 10
                Case 5
                    TrayTip('Bot', '5 Minutes left, there will be another warning at 1 minute.', 10)
            EndSwitch
            TraySetToolTip($Min & ' Minutes left.')
        Else
            If $Min = 1 Then
                TraySetToolTip($Sec & ' Seconds left.')
            EndIf
        EndIf
    EndIf
WEnd

Edited June 30, 2009 by Yashied