add multi ads batch 1: thai 2 video tags

This commit is contained in:
Pakin 2024-02-16 10:46:26 +07:00
parent f8304bad68
commit 9ebe58bc75
10 changed files with 63 additions and 93 deletions

View file

@ -1,41 +1,46 @@
; enable feature
<Video>
<X> 0 </X>
<Y> 0 </Y>
<Width> 1080</Width>
<Height> 380 </Height>
<Loop> "true" </Loop>
<State> eval(
If XMLLiveInfo = "" Then
Var return = "Invisible"
Else
Var return = "Enable"
EndIf
) </State>
<Filename> eval(
If ads_idx > 29 then
var ads_idx = 0
Else
var ads_idx = ads_idx + 1
EndIf
DEBUGVAR ads_idx
Var return = video_main[ads_idx]
) </Filename>
</Video>
<EventOpen>
; default
<Video>
<X> 0 </X>
<Y> 0 </Y>
<Width> 1080</Width>
<Height> 380 </Height>
<Loop> "true" </Loop>
<State> eval(
If XMLLiveInfo = "" Then
Var return = "Enable"
If showMultiAds = "true" Then
SPLIT XMLLiveInfo "/" 1 AdvDisplayMode
SPLIT XMLLiveInfo "/" 2 CurrentTotalCup
DEBUGVAR AdvDisplayMode
DEBUGVAR CurrentTotalCup
DEBUGVAR PreviousFileName
DEBUGVAR CurrentXMLFileName2
If PreviousFileName = "" Then
Var PreviousFileName = PreviseXMLFileName2
EndIf
If PreviousFileName = CurrentXMLFileName2 Then
Var incrementable = "false"
Else
Var incrementable = "true"
Var PreviousFileName = CurrentXMLFileName2
Var ads_idx = ads_idx + 1
EndIf
DEBUGVAR ads_idx
If ads_idx = 30 Then
Var ads_idx = 0
EndIf
Var DisplayAds = video_menu[ads_idx]
Else
Var return = "Invisible"
Var DisplayAds = video_menu_0
EndIf
) </State>
<Filename> video_menu_0 </Filename>
</Video>
</EventOpen>
<Filename> DisplayAds </Filename>
</Video>

View file

@ -4,19 +4,26 @@ If ads_idx = "" Then
EndIf
If ads_idx > 29 then
var ads_idx = 0
Var ads_idx = 0
EndIf
If XMLLiveInfo = "" Then
DEBUGVAR showSingleAds
DEBUGVAR showMultiAds
; init
Var DisplayAds = video_menu_0
If XMLLiveInfo = "" Then
Var showMultiAds = "false"
Else
Var showMultiAds = "true"
DEBUGVAR video_main_0
DEBUGVAR video_menu_0
; split from adv profile
Var video_menu[0] = video_menu_0

View file

@ -1739,14 +1739,7 @@
<Filename> VideoPlayFile </Filename>
</Video>
<Video>
<X> 0 </X>
<Y> 0 </Y>
<Width> 1080</Width>
<Height> 380 </Height>
<Loop> "true" </Loop>
<Filename> video_menu_0 </Filename>
</Video>
;include="ROOT/taobin_project/inc/video.inc"

View file

@ -1000,14 +1000,7 @@
;<Filename> "ROOT/taobin_project/image/ad_medium_2.png" </Filename>
;</Image>
<Video>
<X> 0 </X>
<Y> 0 </Y>
<Width> 1080</Width>
<Height> 380 </Height>
<Loop> "true" </Loop>
<Filename> video_menu_0 </Filename>
</Video>
;include="ROOT/taobin_project/inc/video.inc"

View file

@ -855,14 +855,7 @@
;<Filename> "ROOT/taobin_project/image/ad_medium_2.png" </Filename>
;</Image>
<Video>
<X> 0 </X>
<Y> 0 </Y>
<Width> 1080</Width>
<Height> 380 </Height>
<Loop> "true" </Loop>
<Filename> video_menu_0 </Filename>
</Video>
;include="ROOT/taobin_project/inc/video.inc"

View file

@ -347,14 +347,7 @@
;<Filename> "ROOT/taobin_project/image/ad_medium_2.png" </Filename>
;</Image>
<Video>
<X> 0 </X>
<Y> 0 </Y>
<Width> 1080</Width>
<Height> 380 </Height>
<Loop> "true" </Loop>
<Filename> video_menu_0 </Filename>
</Video>
;include="ROOT/taobin_project/inc/video.inc"

View file

@ -557,14 +557,7 @@
;<Filename> "ROOT/taobin_project/image/ad_medium_2.png" </Filename>
;</Image>
<Video>
<X> 0 </X>
<Y> 0 </Y>
<Width> 1080</Width>
<Height> 380 </Height>
<Loop> "true" </Loop>
<Filename> video_menu_0 </Filename>
</Video>
;include="ROOT/taobin_project/inc/video.inc"

View file

@ -319,14 +319,7 @@
;<Filename> "ROOT/taobin_project/image/ad_medium_2.png" </Filename>
;</Image>
<Video>
<X> 0 </X>
<Y> 0 </Y>
<Width> 1080</Width>
<Height> 380 </Height>
<Loop> "true" </Loop>
<Filename> video_menu_0 </Filename>
</Video>
;include="ROOT/taobin_project/inc/video.inc"
<Video>
<X> 0 </X>

View file

@ -71,6 +71,9 @@
DEBUGVAR SelectDrink
DEBUGVAR video_menu_0
DEBUGVAR video_menu_1
DEBUGVAR video_menu_2
DEBUGVAR video_menu_3
Var FlagQROpened = 0
@ -518,8 +521,7 @@
CoinVending BILLREJECT
EndIf
SAVELOG "menu_page4-QR.xml > ActOK_make"
;Var VendingQRCode = "ERROR"
;Coin STANDBY
VendingQR OFF
CoinVending OFF
@ -1641,6 +1643,11 @@ If alphaState = "Invisible" Then
Var QR_POPUP = "/img_popup8.png"
Var alphaState = "Enable"
Coin CARDON
Var CardOnActed = "true"
DEBUGVAR CardOnActed
DEBUGVAR VendingCashless
Var ReqPayInfoFromCashOther = 2
EndIf
EndIf

View file

@ -483,14 +483,7 @@
<Value> VendingCreditRemain </Value>
</Text>
<Video>
<X> 0 </X>
<Y> 0 </Y>
<Width> 1080</Width>
<Height> 380 </Height>
<Loop> "true" </Loop>
<Filename> video_menu_0 </Filename>
</Video>
;include="ROOT/taobin_project/inc/video.inc"
;<Image>