Guest User

Clock.au3

a guest
Feb 13th, 2013
335
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
AutoIt 0.52 KB | None | 0 0
  1. TraySetState(2)
  2. HotKeySet("{F3}", "Reset")
  3. HotKeySet("{F4}", "Close")
  4. $TIME = TimerInit()
  5. While 1
  6.     $SECONDS = TimerDiff($TIME) / 1000
  7.     $MINUTES = Round(Floor(Mod($SECONDS / 60, 60)))
  8.     $HOURS = Round(Floor($SECONDS / 3600))
  9.     $SECONDS = Round(Mod($SECONDS, 60))
  10.     $RUNTIME = $HOURS & ":" & $MINUTES & ":" & $SECONDS
  11.     $TIMECLOCK = @HOUR & ":" & @MIN & ":" & @SEC
  12.     ToolTip("Clock: " & $TIMECLOCK & @CRLF & "Runtime: " & $RUNTIME, 0, 0)
  13.     Sleep(1000)
  14. WEnd
  15. Func CLOSE()
  16.     Exit
  17. EndFunc
  18. Func RESET()
  19.     $TIME = TimerInit()
  20. EndFunc
Advertisement
Add Comment
Please, Sign In to add comment