1. ActionScript / Говнокод #17548

    −100

    1. 01
    2. 02
    3. 03
    4. 04
    5. 05
    6. 06
    7. 07
    8. 08
    9. 09
    10. 10
    11. 11
    12. 12
    13. 13
    14. 14
    15. 15
    16. 16
    17. 17
    18. 18
    19. 19
    20. 20
    21. 21
    22. 22
    23. 23
    24. 24
    25. 25
    26. 26
    27. 27
    28. 28
    29. 29
    30. 30
    31. 31
    32. 32
    33. 33
    34. 34
    35. 35
    36. 36
    37. 37
    38. 38
    F7:: 
hTray := WinExist("ahk_class Shell_TrayWnd")
ControlGetPos, X,,,, CiceroUIWndFrame1
WinGetPos,, Y_Tray,, H_Tray

Gui, -Caption +ToolWindow +AlwaysOnTop +Owner
Gui, Margin, 0, 0
Gui, Color, 0x99FF99
Gui, Font, s3
Gui, Add, Text, % "center x0 y4 cWhite w" H_Tray " h" H_Tray - 8, % sec := 10
Gui, Show, % "NA x" X-250 " y" Y_Tray - 4
StartTime := A_TickCount
SetTimer, Timer, 600000
Return

Timer:
   Gui, +AlwaysOnTop
   Time := (A_TickCount - StartTime)//1000
   if (Time != PrevTime)
   {
      GuiControl,, Static1, % res := sec - Time
      PrevTime := Time
   }
   if res = 0
   {
      SetTimer, Timer, Off
      SoundPlay, *16
	  Sleep 10
	  
Gui, -Caption +ToolWindow +AlwaysOnTop +Owner
Gui, Margin, 0, 0
Gui, Color, Red
Gui, Font, s3
Gui, Add, Text, % "center x0 y4 cWhite w" H_Tray " h" H_Tray - 8, % sec := 10
Gui, Show, % "NA x" X-250 " y" Y_Tray - 4
Return
}
      ExitApp

    /b/

    Запостил: Fishyfishy, 30 Января 2015

    Комментарии (6) RSS

    Добавить комментарий