Change advertise

This commit is contained in:
kong 2022-05-05 23:15:44 +07:00
parent fa40d4cb59
commit ed9c02b916
42 changed files with 712 additions and 222 deletions

View file

@ -346,27 +346,27 @@
EndIf
If VideoAdvIndex = 0 Then
Var video_menu_1 = AdvTaobinMenu + AdvertiseProfile7
Var video_menu_1 = AdvTaobinMenu2 + AdvertiseProfile7
Var video_menu_1 = video_menu_1 + ".mp4"
EndIf
If VideoAdvIndex = 1 Then
Var video_menu_1 = AdvTaobinMenu + AdvertiseProfile8
Var video_menu_1 = AdvTaobinMenu2 + AdvertiseProfile8
Var video_menu_1 = video_menu_1 + ".mp4"
EndIf
If VideoAdvIndex = 2 Then
Var video_menu_1 = AdvTaobinMenu + AdvertiseProfile9
Var video_menu_1 = AdvTaobinMenu2 + AdvertiseProfile9
Var video_menu_1 = video_menu_1 + ".mp4"
EndIf
If VideoAdvIndex = 3 Then
Var video_menu_1 = AdvTaobinMenu + AdvertiseProfile10
Var video_menu_1 = AdvTaobinMenu2 + AdvertiseProfile10
Var video_menu_1 = video_menu_1 + ".mp4"
EndIf
If VideoAdvIndex = 4 Then
Var video_menu_1 = AdvTaobinMenu + AdvertiseProfile11
Var video_menu_1 = AdvTaobinMenu2 + AdvertiseProfile11
Var video_menu_1 = video_menu_1 + ".mp4"
EndIf
If VideoAdvIndex = 5 Then
Var video_menu_1 = AdvTaobinMenu + AdvertiseProfile12
Var video_menu_1 = AdvTaobinMenu2 + AdvertiseProfile12
Var video_menu_1 = video_menu_1 + ".mp4"
EndIf
@ -388,22 +388,8 @@
Machine CancelWepApp
;StrLen AdvertiseProfile AdvertiseProfileLen
;
;If AdvertiseProfileLen = 0 Then
; CacheVarStr "get" AdvertiseProfile
;Else
;
; STRCONTAIN "00/00" AdvertiseProfile advPro
;
; If advPro = "true" Then
; CacheVarStr "get" AdvertiseProfile
; Else
; CacheVarStr "put" AdvertiseProfile
; EndIf
;EndIf
DEBUGVAR AdvertiseProfile
StrLen AdvertiseProfile AdvertiseProfileLen
If XMLProfile = "taobin_notopup" Then
Var ButtontoTopupMenu = "Disable"
@ -442,6 +428,22 @@
If NetworkStatus = "DEACTIVE" Then
Open "/ROOT/xml/offline.xml"
EndIf
If AdvertiseProfileLen = 0 Then
CacheVarStr "get" AdvertiseProfile
Else
STRCONTAIN "00/00" AdvertiseProfile advPro
If advPro = "true" Then
CacheVarStr "get" AdvertiseProfile
Else
CacheVarStr "put" AdvertiseProfile
EndIf
EndIf
DEBUGVAR AdvertiseProfile
</EventOpen>
<Timeout> 1000 </Timeout>
@ -693,7 +695,7 @@
;<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
OpenInst 1 "/mnt/sdcard/coffeevending/taobin_project/xml/page_advert.xml"
;OpenInst 1 "/mnt/sdcard/coffeevending/taobin_project/xml/page_advert.xml"
If CocktailShow = "true" Then
OpenInst 2 "/mnt/sdcard/coffeevending/taobin_project/xml/page_catalog_cocktail.xml"
Else