royalfint
Трейдер, Программист, Игродел, Веб-Мастер
- Сообщения
- 74
- Репутация
- 0
Всем привет!
Мне нужно чтобы скрипт работал в нужное мне время. Но не получается, где то погрешность в коде.
Основной код:
Функция:
Всем заранее спасибо! :IL_AutoIt_1:
Мне нужно чтобы скрипт работал в нужное мне время. Но не получается, где то погрешность в коде.
Основной код:
Код:
If TradeTime() Then
;my code here :)
Endif
Функция:
Код:
Func TradeTime()
$uTimed=GUICtrlRead($iTimed)
$uStartTime1=GUICtrlRead($iStartTime1)
$uStartTime2=GUICtrlRead($iStartTime2)
$uFinishTime1=GUICtrlRead($iFinishTime1)
$uFinishTime2=GUICtrlRead($iFinishTime2)
$uStartTime3=GUICtrlRead($iStartTime3)
$uStartTime4=GUICtrlRead($iStartTime4)
$uFinishTime3=GUICtrlRead($iFinishTime3)
$uFinishTime4=GUICtrlRead($iFinishTime4)
$uStartTime5=GUICtrlRead($iStartTime5)
$uStartTime6=GUICtrlRead($iStartTime6)
$uFinishTime5=GUICtrlRead($iFinishTime5)
$uFinishTime6=GUICtrlRead($iFinishTime6)
If ($uTimed = "1 Параметр") Then
If @HOUR*60+@MIN > $uStartTime1*60+$uFinishTime1 And @HOUR*60+@MIN < $uStartTime2*60+$uFinishTime2 Then
Return True
Else
Return False
EndIf
EndIf
If ($uTimed = "2 Параметра") Then
If BitOR(@HOUR*60+@MIN > $uStartTime1*60+$uFinishTime1 And @HOUR*60+@MIN < $uStartTime2*60+$uFinishTime2,@HOUR*60+@MIN > $uStartTime3*60+$uFinishTime3 And @HOUR*60+@MIN < $uStartTime4*60+$uFinishTime4) Then
Return True
Else
Return False
EndIf
EndIf
If ($uTimed = "3 Параметра") Then
If BitOR(@HOUR*60+@MIN > $uStartTime1*60+$uFinishTime1 And @HOUR*60+@MIN < $uStartTime2*60+$uFinishTime2,@HOUR*60+@MIN > $uStartTime3*60+$uFinishTime3 And @HOUR*60+@MIN < $uStartTime4*60+$uFinishTime4,@HOUR*60+@MIN > $uStartTime5*60+$uFinishTime5 And @HOUR*60+@MIN < $uStartTime6*60+$uFinishTime6) Then
Return True
Else
Return False
EndIf
EndIf
EndFunc
Всем заранее спасибо! :IL_AutoIt_1: