• Страница 1 из 1
  • 1
[AHK] Исходник - Будильника
Владислав
Дата: Воскресенье, 09.03.2014, 23:17 | Сообщение # 1
Главный
Сообщений:
527
Награды:
5
Offline

Код
Menu,Tray,NoStandard  
  Menu,Tray,DeleteAll  
  Menu, tray, Add, AHK-Power.RU,zz  
  Menu, tray, Add, Выйти., Exit   
  Gui, Add, Text, x6 y11 w130 h90 vMyTime, Пододжите  
  Gui, Font, S8 CRed, Verdana  
  Gui, Add, GroupBox, x146 y1 w250 h100 , Будильник  
  Gui, Font, S8 CBlack, Verdana  
  Gui, Add, Edit, x156 y21 w40 h20 vPCh, ч.  
  Gui, Add, Edit, x206 y21 w70 h20 vPMin, мин.  
  Gui, Add, Edit, x286 y21 w60 h20 vPSek, сек.  
  Gui, Add, Button, x166 y61 w100 h30  gPostt, Поставить  
  ; Generated using SmartGUI Creator 4.0  
  Gui, Show, x131 y91 h116 w409, Будильник 0.1   
  SetTimer, c, 10  
  rabota = 0  
  Return  

  zz:  
  Run, www.ahk-power.ru  
  return  

  GuiClose:  
  ExitApp  

  Exit:  
  ExitApp  
  return  

  Postt:  
    If (rabota = 0)  
       {  
       rabota = 1  
       }  
  else   
  rabota = 0  
  return  

  c:  
  Gui, Submit, NoHide  
    If (rabota = 1)  
       {  
           vremia =  
           (  
  Ваше время:  
  %A_Hour%:%A_Min%:%A_Sec%  
  Время звонка:  
  %PCH%:%PMin%:%PSek%  
           )  
           GuiControl,,MyTime,%vremia%`n`n`nAHK-power.ru  
           If (PCH=A_Hour) and (PMin=A_Min) and (PSek<=A_Sec)  
              {  
              MsgBox,БЗЗЗЗЗЗЗЗЗЗЗЗЗЗЗЗЗЗЗЗЗЗ  
              rabota = 0  
              GuiControl,,ln,Поставить  
              }  
      }  
             
  else  
  vremia =  
  (  
  Ваше время:  
  %A_Hour%:%A_Min%:%A_Sec%  
  )  
  GuiControl,,MyTime,%vremia%`n`n`nAHK-power.ru  
  return
  • Страница 1 из 1
  • 1
Поиск: