Songgran go on

This commit is contained in:
kong 2023-03-28 14:44:43 +07:00
parent d8fef6b51e
commit 1c20abc0e9
30 changed files with 416 additions and 2482 deletions

View file

@ -783,12 +783,40 @@
Var ShowPromoitonOreo = 0
EndIf
Var SongkranEnable = 0
If BoxID = 173149 Then
Var SongkranEnable = 1
EndIf
If BoxID = 200001 Then
Var SongkranEnable = 1
EndIf
If SystemDateMonthInt = 4 Then
If SystemDateDayInt > 7 Then
Var SongkranEnable = 1
EndIf
EndIf
If SongkranEnable = 1 Then
If SoundThaiIndex = 0 Then
Var SoundThaiIndex = 1
Else
If SoundThaiIndex = 1 Then
Var SoundThaiIndex = 2
Else
If SoundThaiIndex = 2 Then
Var SoundThaiIndex = 3
Else
Var SoundThaiIndex = 0
EndIf
EndIf
EndIf
EndIf
DEBUGVAR SoundThaiIndex
RootLayoutVisible 3 "hide"
</EventOpen>
@ -915,7 +943,11 @@
If ShowPromoitonOreo = 1 Then
OpenInst 2 "/mnt/sdcard/coffeevending/taobin_project/xml/page_catalog_group_recommend2.xml"
Else
OpenInst 2 "/mnt/sdcard/coffeevending/taobin_project/xml/page_catalog_group_recommend.xml"
If SongkranEnable = 1 Then
OpenInst 2 "/mnt/sdcard/coffeevending/taobin_project/xml/page_catalog_group_recommend3.xml"
Else
OpenInst 2 "/mnt/sdcard/coffeevending/taobin_project/xml/page_catalog_group_recommend.xml"
EndIf
EndIf
Machine DoorClose