Timer

[QuQu97]

Heyka, piszę coś takiego jakby budzik... I chcę aby odtwarzał dźwięk o pełnej godzinie niezależnie od tego kiedy go uruchomię. Wiem, że jest dużo sposobów

ale chcę taki który jest niezawodny ;> Próbowałem już kilka sposobów ale nic mi nie wychodzi np:

 

#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Timer", 239, 117, 401, 354)
$Button1 = GUICtrlCreateButton("Start", 16, 16, 75, 25)
$Radio1 = GUICtrlCreateRadio("1 Godzina", 104, 16, 113, 17)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
$Button1
If GUICtrlRead($Radio1) = 1 And @HOUR = 1 or 2 or 3 or 4 or 5 or 6 or 7 or 8 or 9 or 10 or 11 or 12 or 13 or 14 or 15 or 16 or 17 or 18 or 19 or 20 or 21 or 22 or 23 or 24 Then
Beep (500, 3000)
Sleep (2100000)
EndIf
WEnd

 

 

Próbowałem trochę z Timerami ale też nie wyszło tak że proszę o pomoc ( nawet jakieś naprowadzenie jak to ma wyglądać )

Z góry dziękuję

[Phoenix_PL]

@HOUR = 1 or 2 or 3 or 4 or 5 or 6 or 7 or 8 or 9 or 10 or 11 or 12 or 13 or 14 or 15 or 16 or 17 or 18 or 19 or 20 or 21 or 22 or 23 or 24 Then

@hour zawsze przyjmuje wartość 0-24 ... Nielogiczne.

I powinno ci wywalić na ryj przy odpalaniu.

 

Ustaw warunki na @min = 0 and @sec = 0 to będzie o pełnej godzinie odpalał

[jackraymund]

@up

lepiej tylko co minute, bo może się przyciąć i zapomnieć

[Gość]

Powiem tak... poszukaj chwilę i znajdziesz

http://www.mpcforum.pl/topic/104881-tut-uruchamianie-skryptu-o-wybranej-godzinie/

[QuQu97]

Widziałem to ale nieumiałem tego wykorzystać... -,-

[Gość]

Widziałem to ale nieumiałem tego wykorzystać... -,-

Jak nie umiesz?

Kod masz podany na tacy.

Zresztą pomogę.

 

Oryginał

 

 

HotKeySet ( "{ESC}" , "Terminate" )
Func Terminate()
Exit 0
EndFunc
Do
Sleep(30000)
$m=@MIN
$h=@HOUR
Until $h = 07 And $m = 00
while 1
beep(1500,100)
sleep(100)
beep(1500,100)
sleep(100)
beep(1500,100)
sleep(100)
beep(1500,100)
sleep(300)
wend

 

 

 

Dla ciebie:

 

 

HotKeySet ( "{ESC}" , "Terminate" )
Func Terminate()
Exit 0
EndFunc
Do
Sleep(30000)
$m=@MIN
$h=@HOUR
Until $h = 0 or 1 or 2 or 3 or 4 or 5 or 6 or 7 or 8 or 9 or 10 or 11 or 12 or 13 or 14 or 15 or 16 or 17 or 18 or 19 or 20 or 21 or 22 or 23 or 24 And $m = 00
while 1
beep(1500,100)
sleep(100)
beep(1500,100)
sleep(100)
beep(1500,100)
sleep(100)
beep(1500,100)
sleep(300)
wend

 

 

[Phoenix_PL]

$h = 0 or 1 or 2 or 3 or 4 or 5 or 6 or 7 or 8 or 9 or 10 or 11 or 12 or 13 or 14 or 15 or 16 or 17 or 18 or 19 or 20 or 21 or 22 or 23 or 24 And $m = 00

 

Co ja kurde mówiłem... nie sprawdzi ci tych warunków, a jeśli tak to weźmie pod uwagę tylko $h = 0...

 

Jeśli już to

$h = 0 or $h = 1 or $h = 2 or $h = 3 or $h = 4 [itd...] And $m = 00

[wefhy]

sprawdzi.

If $h = 0 or 1 or 2 or 3

czyli inaczej

 

if ($h=0) OR (1=true) OR (2=true) OR (3=true)

 

Czyli ogólnie zawsze warunek jest spełniony, bo liczba różna od 0 po zamianie na bool przyjmuje true.

 

proponuję coś takiego

 

while not(@min=0 and @sec=0)
sleep(50)
wend
beep(2000, 2000)

 

I przy okazji @hour nie przyjmuje wartości 24 (tylko 0-23)

[QuQu97]

Dzięki za odpowiedź... Każdy dostaje Lubię to (bo chyba tylko tak mozna podziekowac...)

[wojtek333314]

Zawsze możesz ich poprosić o numery kont , płakać nie będą jak cos przeslesz ;p