pakin/taobin_project
1
0
Fork 0
Code Issues Pull requests Projects 1 Releases 1 Packages Wiki Activity Actions

MYS: add promotion mystery cup

Browse source
This commit is contained in:
Pakin 2025-05-26 14:32:46 +07:00
parent fa49f87ae3
commit 4e79d45ebc
26 changed files with 22429 additions and 32 deletions
Download patch file Download diff file Expand all files Collapse all files

133
inter/mys/xml/page_topping_select6.lxml
View file

@ -25,6 +25,85 @@
WRITE_FILE "/mnt/sdcard/xml_alert_bug" "double called"
EndIf
; fix set pro random
If FromProMysteryCup = 1 Then
Var PictureDrink = "ROOT/taobin_project/image/event/bn_mystery_cup.png"
Var PriceD1 = $-.Price
Var PriceD2 = $-.Price
Var PriceD3 = PriceProMystRandom
Var PD_CODE1 = "##-##-##-####"
Var PD_CODE2 = "##-##-##-####"
Var PD_CODE3 = ProductCodeRandom
Var aliasName[0] = ""
Var aliasDesc[0] = ""
Var aliasName[1] = ""
Var aliasDesc[1] = ""
Var aliasName[2] = ""
Var aliasDesc[2] = ""
Var aliasName[3] = ""
Var aliasDesc[3] = ""
Var aliasName[4] = ""
Var aliasDesc[4] = ""
Var aliasName[5] = ""
Var aliasDesc[5] = ""
Var NameLang[0][0] = ""
Var NameLang[0][1] = ""
Var NameLang[0][2] = ""
Var NameLang[0][3] = ""
Var NameLang[0][4] = ""
Var NameLang[0][5] = ""
Var DescLang[0][0] = ""
Var DescLang[0][1] = ""
Var DescLang[0][2] = ""
Var DescLang[0][3] = ""
Var DescLang[0][4] = ""
Var DescLang[0][5] = ""
Var NameLang[1][0] = ""
Var NameLang[1][1] = ""
Var NameLang[1][2] = ""
Var NameLang[1][3] = ""
Var NameLang[1][4] = ""
Var NameLang[1][5] = ""
Var DescLang[1][0] = ""
Var DescLang[1][1] = ""
Var DescLang[1][2] = ""
Var DescLang[1][3] = ""
Var DescLang[1][4] = ""
Var DescLang[1][5] = ""
Var NameLang[2][0] = ""
Var NameLang[2][1] = ""
Var NameLang[2][2] = ""
Var NameLang[2][3] = ""
Var NameLang[2][4] = ""
Var NameLang[2][5] = ""
Var DescLang[2][0] = ""
Var DescLang[2][1] = ""
Var DescLang[2][2] = ""
Var DescLang[2][3] = ""
Var DescLang[2][4] = ""
Var DescLang[2][5] = ""
Var SelectCountDrinkType = 1
Var DefaultDrinkType = 3
Var SelectDrinkType = 0
EndIf
WEB "DISABLE"
DEBUGVAR Seeker
@ -224,6 +303,9 @@
Var PriceDrinkTmpShow = "---"
Var show_select_type = "Enable"
If FromProMysteryCup = 1 Then
Var show_select_type = "Invisible"
EndIf
Var hot_button_state = PD_STAGE_1
Var cold_button_state = PD_STAGE_2
@ -324,6 +406,11 @@
Var showname = aliasName[LanguageShowByIndex]
Var showdesc = aliasName[LanguageShowByIndex]
If FromProMysteryCup = 1 Then
Var showname = ""
Var showdesc = ""
EndIf
BackslashNToEnter showname
BackslashNToEnter showdesc
@ -660,6 +747,12 @@
EndIf
If FromProMysteryCup = 1 Then
Var showname = ""
Var showdesc = ""
EndIf
BackslashNToEnter showname
BackslashNToEnter showdesc
CRLFToSpace showname
@ -684,11 +777,13 @@
DEBUGVAR FromProThaiTea
DEBUGVAR FromProYuzu
DEBUGVAR FromProMelon
DEBUGVAR FromProMysteryCup
Var FromFruityRaya = 0
Var FromProThaiTea = 0
Var FromProYuzu = 0
Var FromProMelon = 0
Var FromProMysteryCup = 0
;Open PreviseXMLFileName2
DEBUGVAR OpenFromXML
@ -1350,6 +1445,13 @@
Else
EndIf
If FromProMysteryCup = 1 Then
EndIf
; End of UserSeletedSugar = 0
Refresh
@ -1555,6 +1657,25 @@
Function 2
EndIf
If FromProMysteryCup = 1 Then
Var BGSugar = "Invisible"
Var BGSugarNew = "Invisible"
Var ShotCoffeeBG = "Invisible"
Var ExtraTopping = "Invisible"
Var showShotEnable = "Invisible"
Var ShotCoffeePremium = "Invisible"
Var showOreoAddEnable = "Invisible"
Var BGSugarHotHealthy = "Invisible"
Var BGSugarColdHealthy = "Invisible"
Var AddShotEnable = "Invisible"
Refresh
EndIf
DEBUGVAR BGSugarNew
</EventMachine>
@ -3589,11 +3710,13 @@
DEBUGVAR FromProThaiTea
DEBUGVAR FromProYuzu
DEBUGVAR FromProMelon
DEBUGVAR FromProMysteryCup
Var FromFruityRaya = 0
Var FromProThaiTea = 0
Var FromProYuzu = 0
Var FromProMelon = 0
Var FromProMysteryCup = 0
If Seeker = "next" Then
OpenInst 1 "/mnt/sdcard/coffeevending/taobin_project/xml/page_blank.xml"
@ -4219,6 +4342,11 @@
DEBUGVAR PriceDrinkTmpShow
Var PriceDrinkTmp = PriceDrinkNoTop + TOPPING_PRICE
If FromProMysteryCup = 1 Then
Var PriceDrinkTmp = PriceProMystRandom
EndIf
Var PriceDrinkTmpShow = charOfBaht + PriceDrinkTmp
If SelectDrinkType = 0 Then
@ -4244,6 +4372,11 @@
Var Timeout = 0
If FromProMysteryCup = 1 Then
Var UserSelectProductCode = ProductCodeRandom
EndIf
RefreshAll
</Function2>