51 lines
851 B
Text
51 lines
851 B
Text
|
|
SAVELOG "RoadShow.ev 201648 201667 201576 Jan 15-19 "
|
|
|
|
Var RoadShow = "false"
|
|
|
|
DEBUGVAR SystemDateDayInt
|
|
|
|
;DEBUGVAR SystemTimeMinuteInt
|
|
DEBUGVAR SystemTimeHourInt
|
|
|
|
If SystemDateYearInt = 2025 Then
|
|
|
|
If SystemDateMonthInt = 1 Then
|
|
|
|
Var RoadShowBoxID = 0
|
|
|
|
If BoxID = 201648 Then
|
|
Var RoadShowBoxID = 1
|
|
EndIf
|
|
If BoxID = 201667 Then
|
|
Var RoadShowBoxID = 1
|
|
EndIf
|
|
If BoxID = 201576 Then
|
|
Var RoadShowBoxID = 1
|
|
EndIf
|
|
|
|
|
|
If RoadShowBoxID = 1 Then
|
|
If SystemDateDayInt = 15 Then
|
|
Var RoadShow = "true"
|
|
EndIf
|
|
If SystemDateDayInt = 16 Then
|
|
Var RoadShow = "true"
|
|
EndIf
|
|
If SystemDateDayInt = 17 Then
|
|
Var RoadShow = "true"
|
|
EndIf
|
|
If SystemDateDayInt = 18 Then
|
|
Var RoadShow = "true"
|
|
EndIf
|
|
If SystemDateDayInt = 19 Then
|
|
Var RoadShow = "true"
|
|
EndIf
|
|
EndIf
|
|
|
|
EndIf
|
|
|
|
|
|
EndIf
|
|
|
|
DEBUGVAR RoadShow
|