43 lines
544 B
Text
43 lines
544 B
Text
|
|
SAVELOG "RoadShow.ev 200587 "
|
|
SAVELOG "200587 04 mar"
|
|
|
|
|
|
Var RoadShow = "false"
|
|
|
|
DEBUGVAR SystemDateDayInt
|
|
|
|
;DEBUGVAR SystemTimeMinuteInt
|
|
DEBUGVAR SystemTimeHourInt
|
|
|
|
|
|
Var RoadShowBoxID = 0
|
|
|
|
If SystemDateYearInt = 2025 Then
|
|
|
|
If BoxID = 201316 Then
|
|
Var RoadShowBoxID = 0
|
|
EndIf
|
|
If BoxID = 200435 Then
|
|
Var RoadShowBoxID = 0
|
|
EndIf
|
|
|
|
If BoxID = 200587 Then
|
|
Var RoadShowBoxID = 1
|
|
EndIf
|
|
|
|
If SystemDateMonthInt = 3 Then
|
|
|
|
If RoadShowBoxID = 1 Then
|
|
If SystemDateDayInt = 4 Then
|
|
|
|
EndIf
|
|
EndIf
|
|
|
|
EndIf
|
|
|
|
|
|
|
|
EndIf
|
|
|
|
DEBUGVAR RoadShow
|