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

Merge branch 'masterpiece' of ssh://192.168.10.159/1TBHDD/ikong/taobin_project into masterpiece

Browse source
This commit is contained in:
Ittipat Lusuk 2025-06-20 18:47:54 +07:00
commit 1b63c31e7a
31 changed files with 3560 additions and 2834 deletions
Download patch file Download diff file Expand all files Collapse all files

BIN
inter/mys/image/event/pro_myst_cup/myst_coffee_disable.png Normal file
View file

Binary file not shown.
Side by side

After

Width:  |  Height:  |  Size: 57 KiB

BIN
inter/mys/image/event/pro_myst_cup/myst_milk_disable.png Normal file
View file

Binary file not shown.
Side by side

After

Width:  |  Height:  |  Size: 52 KiB

BIN
inter/mys/image/event/pro_myst_cup/myst_tea_disable.png Normal file
View file

Binary file not shown.
Side by side

After

Width:  |  Height:  |  Size: 60 KiB

BIN
inter/mys/image/page_e_receipt/bn_no.png Normal file
View file

Binary file not shown.
Side by side

After

Width:  |  Height:  |  Size: 3.1 KiB

BIN
inter/mys/image/page_e_receipt/bn_yes.png Normal file
View file

Binary file not shown.
Side by side

After

Width:  |  Height:  |  Size: 3.6 KiB

BIN
inter/mys/image/page_e_receipt/bp_no.png Normal file
View file

Binary file not shown.
Side by side

After

Width:  |  Height:  |  Size: 3.2 KiB

BIN
inter/mys/image/page_e_receipt/bp_yes.png Normal file
View file

Binary file not shown.
Side by side

After

Width:  |  Height:  |  Size: 3.6 KiB

BIN
inter/mys/image/page_e_receipt/img_popup_eReceiptPrompt.png Normal file
View file

Binary file not shown.
Side by side

After

Width:  |  Height:  |  Size: 15 KiB

BIN
inter/mys/image/page_e_receipt/img_popup_eReceiptPrompt_result.png Normal file
View file

Binary file not shown.
Side by side

After

Width:  |  Height:  |  Size: 13 KiB

BIN
inter/mys/image/page_e_receipt/img_popup_eReceiptPrompt_yes.png Normal file
View file

Binary file not shown.
Side by side

After

Width:  |  Height:  |  Size: 19 KiB

135
inter/mys/xml/e_receipt/page_prompt_e_receipt.lxml Normal file
View file

@ -0,0 +1,135 @@
<Popup>
<Cache> "Enable" </Cache>
<Width> 1080 </Width>
<Height> 1920 </Height>
<Background> "0xeae6e1" </Background>
<Volume> SoundVolume </Volume>
;<Refresh> "Partial" </Refresh>
<EventOpen>
SAVELOG "Prompt E-Receipt v1"
; init-default
Var Seeker.e_receipt = "false"
Var Timeout = 0
Var ShowCaution = "Invisible"
; check-case-pay-with-code
DEBUGVAR Seeker.CodeChannel
If Seeker.CodeChannel = 1 Then
DEBUGVAR "Pay with code, nah-ah no e receipt"
Open "ROOT/taobin_project/xml/page_lid_straw.xml"
EndIf
Var EReceiptImgDir = CountryRootPath + "/image/page_e_receipt/"
; prompt-Popup
Var PromptImg = EReceiptImgDir + "img_popup_eReceiptPrompt.png"
Var PromptImgIfYes = EReceiptImgDir + "img_popup_eReceiptPrompt_yes.png"
Var bn_yes = EReceiptImgDir + "bn_yes.png"
Var bn_no = EReceiptImgDir + "bn_no.png"
Var bp_yes = EReceiptImgDir + "bp_yes.png"
Var bp_no = EReceiptImgDir + "bp_no.png"
DEBUGVAR EReceiptImgDir
DEBUGVAR PromptImg
DEBUGVAR bn_yes
DEBUGVAR bn_no
DEBUGVAR bp_yes
DEBUGVAR bp_no
</EventOpen>
<Timeout> 1000 </Timeout>
<EventTimeout>
Var Timeout = Timeout + 1
; auto-no
If Timeout > 15 Then
If TestReceiptPage = 1 Then
Var TestReceiptPage = 0
Open "ROOT/taobin_project/xml/page_board.xml"
Else
Open "ROOT/taobin_project/xml/page_lid_straw.xml"
EndIf
EndIf
Refresh
TimerReset
</EventTimeout>
; dim-bg
<Image>
<X> 0 </X>
<Y> 380 </Y>
<Filename> "ROOT/taobin_project/image/collectiing/alpha.png" </Filename>
</Image>
; prompt-Popup
<Image>
<X> 178 </X>
<Y> 665 </Y>
<Filename> PromptImg </Filename>
</Image>
<Button>
<X> 288 </X>
<Y> 971 </Y>
<Filename> bn_yes </Filename>
<FilenamePress> bp_yes </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var Seeker.e_receipt = "true"
; Open "ROOT/taobin_project/xml/page_lid_straw.xml"
Var SelectMenuBetweenBrewEnable1Blink = "Invisible"
Var SelectMenuBetweenBrewEnable1 = "Invisible"
Var ShowCaution = "Enable"
Var Timeout = 10
</EventClick>
</Button>
<Button>
<X> 288 </X>
<Y> 1171 </Y>
<Filename> bn_no </Filename>
<FilenamePress> bp_no </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var Seeker.e_receipt = "false"
Open "ROOT/taobin_project/xml/page_lid_straw.xml"
</EventClick>
</Button>
<Image>
<X> 178 </X>
<Y> 665 </Y>
<State> ShowCaution </State>
<Filename> PromptImgIfYes </Filename>
</Image>
</Popup>

229
inter/mys/xml/e_receipt/page_show_e_receipt.lxml Normal file
View file

@ -0,0 +1,229 @@
<Popup>
<Cache> "Enable" </Cache>
<Width> 1080 </Width>
<Height> 1920 </Height>
<Background> BackgroundColor </Background>
<Volume> SoundVolume </Volume>
<EventOpen>
DEBUGVAR Seeker.e_receipt
If Seeker.e_receipt = "false" Then
Open "ROOT/taobin_project/xml/page_drinkok.xml"
EndIf
Var ProductDesc = ""
Var Timeout = 0
Var service = "eInvoice.mys"
Var EReceiptQR = ""
; build uri
Var INVOICE_URL = ""
Var Final_INVOICE_URL = ""
If Seeker.VendingTSID = "" Then
DEBUGVAR Seeker.VendingTSID
DEBUGVAR VendingTSID
If VendingTSID = "" Then
Else
Var Seeker.VendingTSID = VendingTSID
EndIf
EndIf
DEBUGVAR Seeker.VendingTSID
DEBUGVAR Seeker.PriceDrinkTmpShow
DEBUGVAR Seeker.showname
DEBUGVAR Seeker.PictureDrink
Var PureName2 = ""
If ProMysteryCup = 1 Then
If Seeker.FromProMysteryCup = "true" Then
STRCONTAIN "size" Seeker.shownameMystery SizeFromSheet
If SizeFromSheet = "true" Then
SPLIT Seeker.shownameMystery "###" 1 PureName2
Else
Var PureName2 = Seeker.shownameMystery
EndIf
EndIf
EndIf
DEBUGVAR PureName2
Var ShowNameMystery = "Invisible"
If ProMysteryCup = 1 Then
If Seeker.FromProMysteryCup = "true" Then
Var ShowNameMystery = "Enable"
Else
Var ShowNameMystery = "Invisible"
EndIf
Else
Var ShowNameMystery = "Invisible"
EndIf
Var EReceiptImgDir = CountryRootPath + "/image/page_e_receipt/"
Var EReceiptQRDialog = EReceiptImgDir + "img_popup_eReceiptPrompt_result.png"
Var LOADING_STATE = "Enable"
Var QR_STATE = "Invisible"
Refresh
</EventOpen>
<Timeout> 1000 </Timeout>
<EventTimeout>
DEBUGVAR VendingTSID
Var Seeker.VendingTSID = VendingTSID
DEBUGVAR Seeker.VendingTSID
DEBUGVAR LOADING_STATE
DEBUGVAR QR_STATE
DEBUGVAR Seeker.e_receipt
Var Timeout = Timeout + 1
If Timeout = 5 Then
Var LOADING_STATE = "Invisible"
SAVELOG "TSID should be ready!"
TRY "ROOT/taobin_project/inter/mys/xml/process/e_receipt.ev"
Refresh
EndIf
If Timeout > 5 Then
Var QR_STATE = "Enable"
Refresh
EndIf
If Timeout > 15 Then
Open "ROOT/taobin_project/xml/page_drinkok.xml"
EndIf
Refresh
TimerReset
</EventTimeout>
; dim-bg
<Image>
<X> 0 </X>
<Y> 380 </Y>
<Filename> "ROOT/taobin_project/image/collectiing/alpha.png" </Filename>
</Image>
; show-qr-Popup
<Image>
<X> 178 </X>
<Y> 665 </Y>
<Filename> EReceiptQRDialog </Filename>
</Image>
; need-change-position
<QRCode>
<X> 415 </X>
<Y> 875 </Y>
<Width> 250 </Width>
<Height> 250 </Height>
<State> QR_STATE </State>
<Service> service </Service>
</QRCode>
; menu-name
<Image>
<X> 175 </X>
<Y> 1200 </Y>
<Height> 300 </Height>
<Width> 320 </Width>
<Filename> Seeker.PictureDrink </Filename>
</Image>
<Text>
<X> 450 </X>
<Y> 1250 </Y>
<Width> 443 </Width>
<Font> KanitLightTTF </Font>
<LineHeight> 30 </LineHeight>
<MaxSize> 40 </MaxSize>
<MinSize> 24 </MinSize>
<MaxLine> 2 </MaxLine>
<Size> Auto </Size>
<Color> HeadlineColor </Color>
<Value>
eval(
STRCONTAIN "size" Seeker.showname SizeFromSheet
If SizeFromSheet = "true" Then
SPLIT Seeker.showname "###" 1 PureName
Var return = PureName
Else
Var return = Seeker.showname
EndIf
)
</Value>
</Text>
<Text>
<X> 450 </X>
<Y> 1250 </Y>
<Width> 443 </Width>
<Font> KanitLightTTF </Font>
<LineHeight> 30 </LineHeight>
<MaxSize> 40 </MaxSize>
<MinSize> 24 </MinSize>
<MaxLine> 2 </MaxLine>
<Size> Auto </Size>
<Color> HeadlineColor </Color>
<State> ShowNameMystery </State>
<Value> PureName2 </Value>
</Text>
; show-price
<Text>
<X> 450 </X>
<Y> 1325 </Y>
<Font> KanitTTF </Font>
<Size> 48 </Size>
<Width> 1080 </Width>
<Color> HeadlineColor </Color>
<Value> Seeker.PriceDrinkTmpShow </Value>
</Text>
<GIF>
<X> 493 </X>
<Y> 1068 </Y>
<Width> 94 </Width>
<Height> 94 </Height>
<State> LOADING_STATE </State>
<Filename> "ROOT/taobin_project/image/page_payment_en/page_payment/loading.gif" </Filename>
</GIF>
</Popup>

29
inter/mys/xml/event/mystery_cup/check_menu.ev
View file

@ -8,12 +8,21 @@ For RandomCoffeeCheckIdx < 5 Loop
Var CurrentPd = RandMystCoffee[RandomCoffeeCheckIdx] Var CurrentPd = RandMystCoffee[RandomCoffeeCheckIdx]
Var CurrentState !assigned @AutoVar ${CurrentPd}.Button Var CurrentState !assigned @AutoVar ${CurrentPd}.Button
DEBUGVAR CurrentPd
DEBUGVAR CurrentState
DEBUGVAR RandomCoffeeCheckIdx
If CurrentState = "Enable" Then If CurrentState = "Enable" Then
DEBUGVAR CurrentPd
DEBUGVAR CurrentState
Var RandMystCoffeeEnabled[RandomCoffeeCheckOkIdx] = CurrentPd Var RandMystCoffeeEnabled[RandomCoffeeCheckOkIdx] = CurrentPd
Var RandMystCoffeeNameEnabled[RandomCoffeeCheckOkIdx][0] = RandMystCoffeeName[RandomCoffeeCheckIdx][0]
Var RandMystCoffeeNameEnabled[RandomCoffeeCheckOkIdx][1] = RandMystCoffeeName[RandomCoffeeCheckIdx][1]
Var RandMystCoffeeNameEnabled[RandomCoffeeCheckOkIdx][2] = RandMystCoffeeName[RandomCoffeeCheckIdx][2]
Var RandMystCoffeeNameEnabled[RandomCoffeeCheckOkIdx][3] = RandMystCoffeeName[RandomCoffeeCheckIdx][3]
Var RandMystCoffeeNameEnabled[RandomCoffeeCheckOkIdx][4] = RandMystCoffeeName[RandomCoffeeCheckIdx][4]
Var RandomCoffeeCheckOkIdx = RandomCoffeeCheckOkIdx + 1 Var RandomCoffeeCheckOkIdx = RandomCoffeeCheckOkIdx + 1
EndIf EndIf
@ -35,6 +44,13 @@ For RandomTeaCheckIdx < 7 Loop
If CurrentState = "Enable" Then If CurrentState = "Enable" Then
Var RandMystTeaEnabled[RandomTeaCheckOkIdx] = CurrentPd Var RandMystTeaEnabled[RandomTeaCheckOkIdx] = CurrentPd
Var RandMystTeaNameEnabled[RandomTeaCheckOkIdx][0] = RandMystTeaName[RandomTeaCheckIdx][0]
Var RandMystTeaNameEnabled[RandomTeaCheckOkIdx][1] = RandMystTeaName[RandomTeaCheckIdx][1]
Var RandMystTeaNameEnabled[RandomTeaCheckOkIdx][2] = RandMystTeaName[RandomTeaCheckIdx][2]
Var RandMystTeaNameEnabled[RandomTeaCheckOkIdx][3] = RandMystTeaName[RandomTeaCheckIdx][3]
Var RandMystTeaNameEnabled[RandomTeaCheckOkIdx][4] = RandMystTeaName[RandomTeaCheckIdx][4]
Var RandomTeaCheckOkIdx = RandomTeaCheckOkIdx + 1 Var RandomTeaCheckOkIdx = RandomTeaCheckOkIdx + 1
EndIf EndIf
@ -56,6 +72,13 @@ For RandomMilkCheckIdx < 7 Loop
If CurrentState = "Enable" Then If CurrentState = "Enable" Then
Var RandMystMilkEnabled[RandomMilkCheckOkIdx] = CurrentPd Var RandMystMilkEnabled[RandomMilkCheckOkIdx] = CurrentPd
Var RandMystMilkNameEnabled[RandomMilkCheckOkIdx][0] = RandMystMilkName[RandomMilkCheckIdx][0]
Var RandMystMilkNameEnabled[RandomMilkCheckOkIdx][1] = RandMystMilkName[RandomMilkCheckIdx][1]
Var RandMystMilkNameEnabled[RandomMilkCheckOkIdx][2] = RandMystMilkName[RandomMilkCheckIdx][2]
Var RandMystMilkNameEnabled[RandomMilkCheckOkIdx][3] = RandMystMilkName[RandomMilkCheckIdx][3]
Var RandMystMilkNameEnabled[RandomMilkCheckOkIdx][4] = RandMystMilkName[RandomMilkCheckIdx][4]
Var RandomMilkCheckOkIdx = RandomMilkCheckOkIdx + 1 Var RandomMilkCheckOkIdx = RandomMilkCheckOkIdx + 1
EndIf EndIf

20
inter/mys/xml/event/mystery_cup/random.ev
View file

@ -64,6 +64,26 @@ Var ProductCodeRandomTea = RandMystTeaEnabled[ResultRandomIndexTea]
Var ProductCodeRandomMilk = RandMystMilkEnabled[ResultRandomIndexMilk] Var ProductCodeRandomMilk = RandMystMilkEnabled[ResultRandomIndexMilk]
Var ResultRandomIndexOther = RandMystOtherEnabled[ResultRandomIndexOtherTemp] Var ResultRandomIndexOther = RandMystOtherEnabled[ResultRandomIndexOtherTemp]
; Get_Random_Name
Var ProductCodeRandomCoffeeName[0] = RandMystCoffeeNameEnabled[ResultRandomIndexCofee][0]
Var ProductCodeRandomCoffeeName[1] = RandMystCoffeeNameEnabled[ResultRandomIndexCofee][1]
Var ProductCodeRandomCoffeeName[2] = RandMystCoffeeNameEnabled[ResultRandomIndexCofee][2]
Var ProductCodeRandomCoffeeName[3] = RandMystCoffeeNameEnabled[ResultRandomIndexCofee][3]
Var ProductCodeRandomCoffeeName[4] = RandMystCoffeeNameEnabled[ResultRandomIndexCofee][4]
Var ProductCodeRandomTeaName[0] = RandMystTeaNameEnabled[ResultRandomIndexTea][0]
Var ProductCodeRandomTeaName[1] = RandMystTeaNameEnabled[ResultRandomIndexTea][1]
Var ProductCodeRandomTeaName[2] = RandMystTeaNameEnabled[ResultRandomIndexTea][2]
Var ProductCodeRandomTeaName[3] = RandMystTeaNameEnabled[ResultRandomIndexTea][3]
Var ProductCodeRandomTeaName[4] = RandMystTeaNameEnabled[ResultRandomIndexTea][4]
Var ProductCodeRandomMilkName[0] = RandMystMilkNameEnabled[ResultRandomIndexMilk][0]
Var ProductCodeRandomMilkName[1] = RandMystMilkNameEnabled[ResultRandomIndexMilk][1]
Var ProductCodeRandomMilkName[2] = RandMystMilkNameEnabled[ResultRandomIndexMilk][2]
Var ProductCodeRandomMilkName[3] = RandMystMilkNameEnabled[ResultRandomIndexMilk][3]
Var ProductCodeRandomMilkName[4] = RandMystMilkNameEnabled[ResultRandomIndexMilk][4]
; ProductCodeRandom -> ProductCodeRandomCoffee ; ProductCodeRandom -> ProductCodeRandomCoffee
DEBUGVAR ProductCodeRandomCoffee DEBUGVAR ProductCodeRandomCoffee

124
inter/mys/xml/event/mystery_cup/random_list.ev
View file

@ -2,53 +2,175 @@ DEBUGVAR "Random Pool Setup"
Var PriceProMystRandom = 0 Var PriceProMystRandom = 0
Var RandMystCoffeePrice = 550 Var RandMystCoffeePrice = 550
If Discount50 = "true" Then
Var RandMystCoffeePrice = 275
EndIf
; Thai Espresso Smoothie ; Thai Espresso Smoothie
Var RandMystCoffee[0] = "12-31-03-0001" Var RandMystCoffee[0] = "12-31-03-0001"
Var RandMystCoffeeName[0][0] = "THAI Iced ESPRESSO SMOOTHIE"
Var RandMystCoffeeName[0][1] = "-"
Var RandMystCoffeeName[0][2] = "-"
Var RandMystCoffeeName[0][3] = "-"
Var RandMystCoffeeName[0][4] = "SMOOTHIE ESPRESSO THAI"
; Peach Cafe Latte Smoothie ; Peach Cafe Latte Smoothie
Var RandMystCoffee[1] = "12-21-03-0060" Var RandMystCoffee[1] = "12-21-03-0060"
Var RandMystCoffeeName[1][0] = "PEACH CAFE LATTE SMOOTHIE"
Var RandMystCoffeeName[1][1] = "-"
Var RandMystCoffeeName[1][2] = "-"
Var RandMystCoffeeName[1][3] = "-"
Var RandMystCoffeeName[1][4] = "PEACH CAFE LATTE SMOOTHIE"
; Cafe Latte Smoothie ; Cafe Latte Smoothie
Var RandMystCoffee[2] = "12-21-03-0002" Var RandMystCoffee[2] = "12-21-03-0002"
Var RandMystCoffeeName[2][0] = "CAFE LATTE SMOOTHIE"
Var RandMystCoffeeName[2][1] = "-"
Var RandMystCoffeeName[2][2] = "-"
Var RandMystCoffeeName[2][3] = "-"
Var RandMystCoffeeName[2][4] = "SMOOTHIE KAFÉ LATTE"
; Mint Cafe Latte Smoothie ; Mint Cafe Latte Smoothie
Var RandMystCoffee[3] = "12-21-03-0057" Var RandMystCoffee[3] = "12-21-03-0057"
Var RandMystCoffeeName[3][0] = "MINT CAFE LATTE\nSMOOTHIE"
Var RandMystCoffeeName[3][1] = "-"
Var RandMystCoffeeName[3][2] = "-"
Var RandMystCoffeeName[3][3] = "-"
Var RandMystCoffeeName[3][4] = "KOPI LATTE MINT\nSMOOTHIE"
; Taiwanese Tea Cafe Latte Smoothie ; Taiwanese Tea Cafe Latte Smoothie
Var RandMystCoffee[4] = "12-21-03-0030" Var RandMystCoffee[4] = "12-21-03-0030"
Var RandMystCoffeeName[4][0] = "TAIWANESE TEA CAFÉ SMOOTHIE"
Var RandMystCoffeeName[4][1] = "-"
Var RandMystCoffeeName[4][2] = "-"
Var RandMystCoffeeName[4][3] = "-"
Var RandMystCoffeeName[4][4] = "SMOOTHIE CHAM TAIWAN"
Var RandMystTeaPrice = 450 Var RandMystTeaPrice = 450
If Discount50 = "true" Then
Var RandMystTeaPrice = 225
EndIf
; JASMINE MILK TEA\nOREO SMOOTHIE ----- Secret Rare ; JASMINE MILK TEA\nOREO SMOOTHIE ----- Secret Rare
Var RandMystTea[0] = "12-02-03-0048" Var RandMystTea[0] = "12-02-03-0048"
Var RandMystTeaName[0][0] = "JASMINE MILK TEA\nOREO SMOOTHIE###size=58"
Var RandMystTeaName[0][1] = "-"
Var RandMystTeaName[0][2] = "-"
Var RandMystTeaName[0][3] = "-"
Var RandMystTeaName[0][4] = "TEH SUSU JASMINE\nOREO SMOOTHIE###size=58"
; Thai Milk Tea Smoothie ; Thai Milk Tea Smoothie
Var RandMystTea[1] = "12-02-02-0039" Var RandMystTea[1] = "12-02-03-0039"
Var RandMystTeaName[1][0] = "THAI MILK TEA SMOOTHIE"
Var RandMystTeaName[1][1] = "-"
Var RandMystTeaName[1][2] = "-"
Var RandMystTeaName[1][3] = "-"
Var RandMystTeaName[1][4] = "SMOOTHIE TEH SUSU THAI"
; Taiwanese Milk Tea Smoothie ; Taiwanese Milk Tea Smoothie
Var RandMystTea[2] = "12-02-03-0025" Var RandMystTea[2] = "12-02-03-0025"
Var RandMystTeaName[2][0] = "TAIWANESE TEA SMOOTHIE"
Var RandMystTeaName[2][1] = "-"
Var RandMystTeaName[2][2] = "-"
Var RandMystTeaName[2][3] = "-"
Var RandMystTeaName[2][4] = "SMOOTHIE TEH SUSU TAIWAN"
; Matcha Latte Smootie ; Matcha Latte Smootie
Var RandMystTea[3] = "12-02-03-0026" Var RandMystTea[3] = "12-02-03-0026"
Var RandMystTeaName[3][0] = "MATCHA LATTE SMOOTHIE"
Var RandMystTeaName[3][1] = "-"
Var RandMystTeaName[3][2] = "-"
Var RandMystTeaName[3][3] = "-"
Var RandMystTeaName[3][4] = "SMOOTHIE MATCHA LATTE"
; Coconut Thai Milk Tea Smoothie ; Coconut Thai Milk Tea Smoothie
Var RandMystTea[4] = "12-02-03-0062" Var RandMystTea[4] = "12-02-03-0062"
Var RandMystTeaName[4][0] = "Coconut Thai Milk \nTea SMOOTHIE###size=58"
Var RandMystTeaName[4][1] = "-"
Var RandMystTeaName[4][2] = "-"
Var RandMystTeaName[4][3] = "-"
Var RandMystTeaName[4][4] = "SMOOTHIE TEH SUSU THAI KELAPA###size=58"
; Coconut Matcha Latte Smoothie ; Coconut Matcha Latte Smoothie
Var RandMystTea[5] = "12-02-03-0060" Var RandMystTea[5] = "12-02-03-0060"
Var RandMystTeaName[5][0] = "Coconut Matcha \nlatte SMOOTHIE###size=58"
Var RandMystTeaName[5][1] = "-"
Var RandMystTeaName[5][2] = "-"
Var RandMystTeaName[5][3] = "-"
Var RandMystTeaName[5][4] = "SMOOTHIE MACTHA \nLATTE KELAPA###size=58"
; Coconut Jasmine Milk Tea Smoothie ; Coconut Jasmine Milk Tea Smoothie
Var RandMystTea[6] = "12-02-03-0064" Var RandMystTea[6] = "12-02-03-0064"
Var RandMystTeaName[6][0] = "Coconut Jasmine milk \ntea SMOOTHIE###size=58"
Var RandMystTeaName[6][1] = "-"
Var RandMystTeaName[6][2] = "-"
Var RandMystTeaName[6][3] = "-"
Var RandMystTeaName[6][4] = "SMOOTHIE TEH SUSU \nJASMINE KELAPA###size=58"
Var RandMystMilkPrice = 350 Var RandMystMilkPrice = 350
If Discount50 = "true" Then
Var RandMystMilkPrice = 175
EndIf
; Oreo Volcano Smoothie ----- Secret Rare ; Oreo Volcano Smoothie ----- Secret Rare
Var RandMystMilk[0] = "12-03-03-0009" Var RandMystMilk[0] = "12-03-03-0009"
Var RandMystMilkName[0][0] = "OREO SMOOTHIE VOLCANO"
Var RandMystMilkName[0][1] = "-"
Var RandMystMilkName[0][2] = "-"
Var RandMystMilkName[0][3] = "-"
Var RandMystMilkName[0][4] = "SMOOTHIE OREO VOLCANO"
; Strawberry Mint Milk Smoothie ; Strawberry Mint Milk Smoothie
Var RandMystMilk[1] = "12-03-03-0037" Var RandMystMilk[1] = "12-03-03-0037"
Var RandMystMilkName[1][0] = "STRAWBERRY MINT MILK\nSMOOTHIE"
Var RandMystMilkName[1][1] = "-"
Var RandMystMilkName[1][2] = "-"
Var RandMystMilkName[1][3] = "-"
Var RandMystMilkName[1][4] = "SUSU STRAWBERI MINT\nSMOOTHIE"
; Melon Milk Smoothie ; Melon Milk Smoothie
Var RandMystMilk[2] = "12-03-03-0022" Var RandMystMilk[2] = "12-03-03-0022"
Var RandMystMilkName[2][0] = "MELON MILK SMOOTHIE"
Var RandMystMilkName[2][1] = "-"
Var RandMystMilkName[2][2] = "-"
Var RandMystMilkName[2][3] = "-"
Var RandMystMilkName[2][4] = "SMOOTHIE SUSU MELON"
; Coconut Milk Smoothie ; Coconut Milk Smoothie
Var RandMystMilk[3] = "12-03-03-0058" Var RandMystMilk[3] = "12-03-03-0058"
Var RandMystMilkName[3][0] = "Coconut milk SMOOTHIE"
Var RandMystMilkName[3][1] = "-"
Var RandMystMilkName[3][2] = "-"
Var RandMystMilkName[3][3] = "-"
Var RandMystMilkName[3][4] = "SMOOTHIE SUSU KELAPA"
; Peach Milk Smoothie ; Peach Milk Smoothie
Var RandMystMilk[4] = "12-03-03-0038" Var RandMystMilk[4] = "12-03-03-0038"
Var RandMystMilkName[4][0] = "PEACH MILK SMOOTHIE"
Var RandMystMilkName[4][1] = "-"
Var RandMystMilkName[4][2] = "-"
Var RandMystMilkName[4][3] = "-"
Var RandMystMilkName[4][4] = "PEACH MILK SMOOTHIE"
; Straw Milk Smoothie ; Straw Milk Smoothie
Var RandMystMilk[5] = "12-03-03-0011" Var RandMystMilk[5] = "12-03-03-0011"
Var RandMystMilkName[5][0] = "STRAWMILK SMOOTHIE"
Var RandMystMilkName[5][1] = "-"
Var RandMystMilkName[5][2] = "-"
Var RandMystMilkName[5][3] = "-"
Var RandMystMilkName[5][4] = "SMOOTHIE SUSU STRAWBERI"
; Mint Milk Smoothie ; Mint Milk Smoothie
Var RandMystMilk[6] = "12-03-03-0036" Var RandMystMilk[6] = "12-03-03-0036"
Var RandMystMilkName[6][0] = "MINT MILK\nSMOOTHIE"
Var RandMystMilkName[6][1] = "-"
Var RandMystMilkName[6][2] = "-"
Var RandMystMilkName[6][3] = "-"
Var RandMystMilkName[6][4] = "SUSU MINT\nSMOOTHIE"

854
inter/mys/xml/event/promotion_mystery_cup.lxml
View file

@ -1278,276 +1278,7 @@
<Align> center-vertical-horizontal </Align> <Align> center-vertical-horizontal </Align>
</Text> </Text>
</Block> </Block>
; ==================> Len = 3
; - - 12-03-03-0026
<Block>
<MarginLeft> 33 </MarginLeft>
<MarginTop> 22 </MarginTop>
<Width> 225 </Width>
<Height> 296 </Height>
<State> Flag( 12-03-03-0026.Button,Disable=Invisible,$Sum1203030026) </State>
<Button>
<State> $Sum1203030026 </State>
<Filename> "ROOT/taobin_project/inter/mys/image/page_drink_n//bn_PinkOreo_smoothie.png" </Filename>
<FilenamePress> "ROOT/taobin_project/inter/mys/image/page_drink_press_n//bn_PinkOreo_smoothie.png" </FilenamePress>
<FilenameDisable> "ROOT/taobin_project/inter/mys/image/page_drink_disable_n2//bn_PinkOreo_smoothie.png" </FilenameDisable>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventOnClick>
Var PictureDrink = "ROOT/taobin_project/inter/mys/image/page_drink_picture2_n/" + "bn_PinkOreo_smoothie.png"
Var OpenFromXML = CurrentXMLFileName2
Var PriceD1 = $-.Price
Var PriceD2 = $-.Price
Var PriceD3 = $12-03-03-0026.Price
Var PD_CODE1 = "##-##-##-####"
Var PD_CODE2 = "##-##-##-####"
Var PD_CODE3 = "12-03-03-0026"
; begin lang
Var aliasName[0] = "Pink milk\nOreo Vocalno"
Var aliasDesc[0] = "Salak Syrup, Milk,\nSugar Oreo"
Var aliasName[1] = ""
Var aliasDesc[1] = ""
Var aliasName[2] = ""
Var aliasDesc[2] = ""
Var aliasName[3] = ""
Var aliasDesc[3] = ""
Var aliasName[4] = "Susu Pink\nOreo Volcano"
Var aliasDesc[4] = "Sirap Salak, Susu, Gula, Oreo"
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] = "Pink milk Oreo Vocalno"
Var NameLang[2][1] = "นมชมพูปั่น โอริโอ้ภูเขาไฟ"
Var NameLang[2][2] = "-"
Var NameLang[2][3] = "-"
Var NameLang[2][4] = "SUSU PINK OREO VOLCANO"
Var NameLang[2][5] = ""
Var DescLang[2][0] = "Salak Syrup, Milk, Sugar Oreo"
Var DescLang[2][1] = "น้ำแดงกลิ่นสละ นม น้ำตาล Oreo"
Var DescLang[2][2] = "-"
Var DescLang[2][3] = "-"
Var DescLang[2][4] = "Sirap Salak, Susu, Gula, Oreo"
Var DescLang[2][5] = ""
; end lang
Var PD_STAGE_1 = "Disable2"
Var PD_STAGE_2 = "Disable2"
Var PD_STAGE_3 = $12-03-03-0026.Button
Var SelectCountDrinkType = 0
Var DefaultDrinkType = 0
If PD_STAGE_1 = "Enable" Then
Var SelectCountDrinkType = SelectCountDrinkType + 1
Var DefaultDrinkType = 1
EndIf
If PD_STAGE_2 = "Enable" Then
Var SelectCountDrinkType = SelectCountDrinkType + 1
Var DefaultDrinkType = 2
EndIf
If PD_STAGE_3 = "Enable" Then
Var SelectCountDrinkType = SelectCountDrinkType + 1
Var DefaultDrinkType = 3
EndIf
If PD_STAGE_2 = "Enable" Then
Topping "Load" "-"
Else
If PD_STAGE_1 = "Enable" Then
Topping "Load" "-"
Else
Topping "Load" "12-03-03-0026"
EndIf
EndIf
DEBUGVAR PD_STAGE_1
DEBUGVAR PD_STAGE_2
DEBUGVAR PD_STAGE_3
Var SelectDrinkType = 0
Open "ROOT/taobin_project/xml/page_topping_select6.lxml"
</EventOnClick>
</Button>
<Text>
<X> 16 </X>
<Y> 164 </Y>
<Size> 22 </Size>
<Width>222</Width>
<Mode> "multi2" </Mode>
<Font> KanitMediumTTF </Font>
<Color> 0x322B26 </Color>
<LanguageGroup>
<LanguageSlot1>Pink milk\nOreo Vocalno</LanguageSlot1>
<LanguageSlot2></LanguageSlot2>
<LanguageSlot3>Pink milk\nOreo Vocalno</LanguageSlot3>
<LanguageSlot4></LanguageSlot4>
<LanguageSlot5>Susu Pink\nOreo Volcano</LanguageSlot5>
<LanguageSlot6></LanguageSlot6>
</LanguageGroup>
</Text>
<Text>
<X> 16 </X>
<Y> 220 </Y>
<Size> 14 </Size>
<Width>222</Width>
<Font> KanitMediumTTF </Font>
<Color> 0x6F5F51 </Color>
<LanguageGroup>
<LanguageSlot1>Salak Syrup, Milk,\nSugar Oreo</LanguageSlot1>
<LanguageSlot2></LanguageSlot2>
<LanguageSlot3>Salak Syrup, Milk,\nSugar Oreo</LanguageSlot3>
<LanguageSlot4></LanguageSlot4>
<LanguageSlot5>Sirap Salak, Susu, Gula, Oreo</LanguageSlot5>
<LanguageSlot6></LanguageSlot6>
</LanguageGroup>
</Text>
<Image>
<X> 16 </X>
<Y> 264 </Y>
<Filename> Var( DirImage2 + "option_deactive.png" ) </Filename>
</Image>
<Image>
<X> 16 </X>
<Y> 264 </Y>
<State> "Invisible" </State>
<Filename> Var( DirImage2 + "hot.png" ) </Filename>
<FilenameDisable> Var( DirImage2 + "hot_db.png" ) </FilenameDisable>
</Image>
<Text>
<X> TextPriceMenuHotX </X>
<Y> TextPriceMenuY </Y>
<Size> TextPriceMenuSize </Size>
<Width>220</Width>
<Font> KanitMediumTTF </Font>
<Color> 0x6F5F51 </Color>
<ColorDisable> 0xEAE6E1 </ColorDisable>
<State> "Invisible" </State>
<Value> StringFmt( $-.Price , DisplayFormat, PreScaleConvertShow) </Value>; test
</Text>
<Image>
<X> 81 </X>
<Y> 264 </Y>
<Filename> Var( DirImage2 + "cold.png" ) </Filename>
<FilenameDisable> Var( DirImage2 + "cold_db.png" ) </FilenameDisable>
<State> "Invisible" </State>
</Image>
<Text>
<X> 113 </X>
<Y> TextPriceMenuY </Y>
<Size> TextPriceMenuSize </Size>
<Width>220</Width>
<Font> KanitMediumTTF </Font>
<Color> 0x6F5F51 </Color>
<ColorDisable> 0xEAE6E1 </ColorDisable>
<State> "Invisible" </State>
<Value> StringFmt( $-.Price , DisplayFormat, PreScaleConvertShow) </Value>; test
</Text>
<Image>
<X> 146 </X>
<Y> 264 </Y>
<Filename> Var( DirImage2 + "blend.png" ) </Filename>
<FilenameDisable> Var( DirImage2 + "blend_db.png" ) </FilenameDisable>
<State> $12-03-03-0026.Button </State>
</Image>
<Text>
<X> TextPriceMenuBlendX </X>
<Y> TextPriceMenuY </Y>
<Size> TextPriceMenuSize </Size>
<Width>220</Width>
<Font> KanitRegularTTF </Font>
<Color> 0x6F5F51 </Color>
<ColorDisable> 0xEAE6E1 </ColorDisable>
<State> $12-03-03-0026.Button </State>
<Value> StringFmt( $12-03-03-0026.Price , DisplayFormat, PreScaleConvertShow) </Value>; test
</Text>
<Image>
<X> 81 </X>
<Y> 264 </Y>
<State>
eval(
If ICE_PROCESS_STATUS = 2 Then
Var ice_tab_process_show = "Invisible"
Else
Var ice_tab_process_show = "Invisible"
EndIf
Var return = ice_tab_process_show
)
</State>
<Filename> "ROOT/taobin_project/image/drink_option/ice_tab_unavalible.png" </Filename>
<FilenameDisable> "ROOT/taobin_project/image/drink_option/ice_tab_unavalible_dis.png" </FilenameDisable>
</Image>
<Image>
<X> 49 </X>
<Y> 117 </Y>
<State>
eval(
If $Sum1203030026 = "Disable" Then
STRCONTAIN "ERR" $##-##-##-####.TAG tag1_is_disable
STRCONTAIN "ERR" $##-##-##-####.TAG tag2_is_disable
STRCONTAIN "ERR" $12-03-03-0026.TAG tag3_is_disable
Var return = "Invisible"
If tag1_is_disable = "true" Then
Var return = "Enable"
EndIf
If tag2_is_disable = "true" Then
Var return = "Enable"
EndIf
If tag3_is_disable = "true" Then
Var return = "Enable"
EndIf
Else
Var return = "Invisible"
EndIf
)
</State>
<Filename> "ROOT/taobin_project/image//img_menu_err2.png" </Filename>
</Image>
<Text>
<X> 84 </X>
<Y> 266 </Y>
<Size> 10 </Size>
<Font> OpunMediumTTF </Font>
<Color> 0xDE794E </Color>
<State> ice_tab_process_show </State>
<Value> ice_show_open </Value>
</Text>
<Text>
<X> 48 </X>
<Y> 116 </Y>
<Size> 32 </Size>
<Width>128</Width>
<Height>64</Height>
<Mode> "disable-show" </Mode>
<State> $Sum1203030026 </State>
<Language>
<ID> 000013 </ID>
</Language>
<Align> center-vertical-horizontal </Align>
</Text>
</Block>
; ==================> Len = 3 ; ==================> Len = 3
; 12-21-01-0001 - - ; 12-21-01-0001 - -
<Block> <Block>
@ -1555,7 +1286,7 @@
<MarginTop> 22 </MarginTop> <MarginTop> 22 </MarginTop>
<Width> 225 </Width> <Width> 225 </Width>
<Height> 296 </Height> <Height> 296 </Height>
<State> Flag( 12-21-01-0001.Button,Disable=Invisible,$Sum1221010001) </State> <State> Flag( 12-21-01-0001.Button,Invisible=Disable,$Sum1221010001) </State>
<Button> <Button>
<State> $Sum1221010001 </State> <State> $Sum1221010001 </State>
<Filename> "ROOT/taobin_project/inter/mys/image/page_drink_n//bn_hot_espresso.png" </Filename> <Filename> "ROOT/taobin_project/inter/mys/image/page_drink_n//bn_hot_espresso.png" </Filename>
@ -1823,6 +1554,286 @@
</Text> </Text>
</Block> </Block>
; ==================> Len = 3
; 12-21-01-0003 12-21-02-0001|12-21-22-0001 -
<Block>
<MarginLeft> 33 </MarginLeft>
<MarginTop> 22 </MarginTop>
<Width> 225 </Width>
<Height> 296 </Height>
<State> Flag( 12-21-01-0003.Button,@Slot 12-21-02-0001.Button or 12-21-22-0001.Button,$Sum12210100031221X20001) </State>
<Button>
<State> $Sum12210100031221X20001 </State>
<Filename> "ROOT/taobin_project/inter/mys/image/page_drink_n//bn_hot_america_no.png" </Filename>
<FilenamePress> "ROOT/taobin_project/inter/mys/image/page_drink_press_n//bn_hot_america_no.png" </FilenamePress>
<FilenameDisable> "ROOT/taobin_project/inter/mys/image/page_drink_disable_n2//bn_hot_america_no.png" </FilenameDisable>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventOnClick>
Var PictureDrink = "ROOT/taobin_project/inter/mys/image/page_drink_picture2_n/" + "bn_hot_america_no.png"
Var OpenFromXML = CurrentXMLFileName2
Var PriceD1 = $12-21-01-0003.Price
Var PriceD2 !assigned @AutoVar $12-21-{1221XX0001XSlotPrefix[1]}2-0001.Price
Var PriceD3 = $-.Price
Var PD_CODE1 = "12-21-01-0003"
Var PD_CODE2 !assigned @AutoVar "12-21-{1221XX0001XSlotPrefix[1]}2-0001"
Var PD_CODE3 = "##-##-##-####"
; begin lang
Var aliasName[0] = "AMERICANO"
Var aliasDesc[0] = "Espresso, Water"
Var aliasName[1] = ""
Var aliasDesc[1] = ""
Var aliasName[2] = ""
Var aliasDesc[2] = ""
Var aliasName[3] = ""
Var aliasDesc[3] = ""
Var aliasName[4] = "AMERICANO"
Var aliasDesc[4] = "Espresso, Air"
Var aliasName[5] = ""
Var aliasDesc[5] = ""
Var NameLang[0][0] = "Hot AMERICANO"
Var NameLang[0][1] = "กาแฟดำร้อน(อเมริกาโน)"
Var NameLang[0][2] = "-"
Var NameLang[0][3] = "-"
Var NameLang[0][4] = "AMERICANO PANAS"
Var NameLang[0][5] = ""
Var DescLang[0][0] = "Espresso, Water"
Var DescLang[0][1] = "กาแฟ และน้ำร้อน(อเมริกาโน)"
Var DescLang[0][2] = "-"
Var DescLang[0][3] = "-"
Var DescLang[0][4] = "Espresso, Air"
Var DescLang[0][5] = ""
Var NameLang[1][0] = "Iced AMERICANO"
Var NameLang[1][1] = "กาแฟดำเย็น(อเมริกาโน)"
Var NameLang[1][2] = "-"
Var NameLang[1][3] = "-"
Var NameLang[1][4] = "AMERICANO AIS"
Var NameLang[1][5] = ""
Var DescLang[1][0] = "Espresso, Water, Ice"
Var DescLang[1][1] = "กาแฟ น้ำ และ น้ำแข็ง(อเมริกาโน)"
Var DescLang[1][2] = "-"
Var DescLang[1][3] = "-"
Var DescLang[1][4] = "Espresso, Air, Ais"
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] = ""
; end lang
Var PD_STAGE_1 = $12-21-01-0003.Button
Var PD_STAGE_2 !assigned @AutoVar $12-21-{1221XX0001XSlotPrefix[1]}2-0001.Button
Var PD_STAGE_3 = "Disable2"
Var SelectCountDrinkType = 0
Var DefaultDrinkType = 0
If PD_STAGE_1 = "Enable" Then
Var SelectCountDrinkType = SelectCountDrinkType + 1
Var DefaultDrinkType = 1
EndIf
If PD_STAGE_2 = "Enable" Then
Var SelectCountDrinkType = SelectCountDrinkType + 1
Var DefaultDrinkType = 2
EndIf
If PD_STAGE_3 = "Enable" Then
Var SelectCountDrinkType = SelectCountDrinkType + 1
Var DefaultDrinkType = 3
EndIf
If PD_STAGE_2 = "Enable" Then
If XSlot[1] = 1 Then
Topping "Load" "12-21-02-0001"
EndIf
If XSlot[1] = 2 Then
Topping "Load" "12-21-22-0001"
EndIf
Else
If PD_STAGE_1 = "Enable" Then
Topping "Load" "12-21-01-0003"
Else
Topping "Load" "-"
EndIf
EndIf
DEBUGVAR PD_STAGE_1
DEBUGVAR PD_STAGE_2
DEBUGVAR PD_STAGE_3
Var SelectDrinkType = 0
Open "ROOT/taobin_project/xml/page_topping_select6.lxml"
</EventOnClick>
</Button>
<Text>
<X> 16 </X>
<Y> 164 </Y>
<Size> 22 </Size>
<Width>222</Width>
<Mode> "multi2" </Mode>
<Font> KanitMediumTTF </Font>
<Color> 0x322B26 </Color>
<LanguageGroup>
<LanguageSlot1>AMERICANO</LanguageSlot1>
<LanguageSlot2></LanguageSlot2>
<LanguageSlot3>AMERICANO</LanguageSlot3>
<LanguageSlot4></LanguageSlot4>
<LanguageSlot5>AMERICANO</LanguageSlot5>
<LanguageSlot6></LanguageSlot6>
</LanguageGroup>
</Text>
<Text>
<X> 16 </X>
<Y> 220 </Y>
<Size> 14 </Size>
<Width>222</Width>
<Font> KanitMediumTTF </Font>
<Color> 0x6F5F51 </Color>
<LanguageGroup>
<LanguageSlot1>Espresso, Water</LanguageSlot1>
<LanguageSlot2></LanguageSlot2>
<LanguageSlot3>Espresso, Water</LanguageSlot3>
<LanguageSlot4></LanguageSlot4>
<LanguageSlot5>Espresso, Air</LanguageSlot5>
<LanguageSlot6></LanguageSlot6>
</LanguageGroup>
</Text>
<Image>
<X> 16 </X>
<Y> 264 </Y>
<Filename> Var( DirImage2 + "option_deactive.png" ) </Filename>
</Image>
<Image>
<X> 16 </X>
<Y> 264 </Y>
<State> $12-21-01-0003.Button </State>
<Filename> Var( DirImage2 + "hot.png" ) </Filename>
<FilenameDisable> Var( DirImage2 + "hot_db.png" ) </FilenameDisable>
</Image>
<Text>
<X> TextPriceMenuHotX </X>
<Y> TextPriceMenuY </Y>
<Size> TextPriceMenuSize </Size>
<Width>220</Width>
<Font> KanitMediumTTF </Font>
<Color> 0x6F5F51 </Color>
<ColorDisable> 0xEAE6E1 </ColorDisable>
<State> $12-21-01-0003.Button </State>
<Value> StringFmt( $12-21-01-0003.Price , DisplayFormat, PreScaleConvertShow) </Value>; test
</Text>
<Image>
<X> 81 </X>
<Y> 264 </Y>
<Filename> Var( DirImage2 + "cold.png" ) </Filename>
<FilenameDisable> Var( DirImage2 + "cold_db.png" ) </FilenameDisable>
<State> @AutoVar $12-21-{1221XX0001XSlotPrefix[1]}2-0001.Button </State>
</Image>
<Text>
<X> 113 </X>
<Y> TextPriceMenuY </Y>
<Size> TextPriceMenuSize </Size>
<Width>220</Width>
<Font> KanitMediumTTF </Font>
<Color> 0x6F5F51 </Color>
<ColorDisable> 0xEAE6E1 </ColorDisable>
<State> @AutoVar $12-21-{1221XX0001XSlotPrefix[1]}2-0001.Button </State>
<Value> @AutoVar StringFmt( $12-21-{1221XX0001XSlotPrefix[1]}2-0001.Price , DisplayFormat, PreScaleConvertShow) </Value>; test
</Text>
<Image>
<X> 146 </X>
<Y> 264 </Y>
<Filename> Var( DirImage2 + "blend.png" ) </Filename>
<FilenameDisable> Var( DirImage2 + "blend_db.png" ) </FilenameDisable>
<State> "Invisible" </State>
</Image>
<Text>
<X> TextPriceMenuBlendX </X>
<Y> TextPriceMenuY </Y>
<Size> TextPriceMenuSize </Size>
<Width>220</Width>
<Font> KanitRegularTTF </Font>
<Color> 0x6F5F51 </Color>
<ColorDisable> 0xEAE6E1 </ColorDisable>
<State> "Invisible" </State>
<Value> StringFmt( $-.Price , DisplayFormat, PreScaleConvertShow) </Value>; test
</Text>
<Image>
<X> 81 </X>
<Y> 264 </Y>
<State>
eval(
If ICE_PROCESS_STATUS = 2 Then
If $Sum12210100031221X20001 = "Disable" Then
Var ice_tab_process_show = "Disable"
Else
Var ice_tab_process_show = "Enable"
EndIf
Else
Var ice_tab_process_show = "Invisible"
EndIf
Var return = ice_tab_process_show
)
</State>
<Filename> "ROOT/taobin_project/image/drink_option/ice_tab_unavalible.png" </Filename>
<FilenameDisable> "ROOT/taobin_project/image/drink_option/ice_tab_unavalible_dis.png" </FilenameDisable>
</Image>
<Image>
<X> 49 </X>
<Y> 117 </Y>
<State>
eval(
If $Sum12210100031221X20001 = "Disable" Then
STRCONTAIN "ERR" $12-21-01-0003.TAG tag1_is_disable
STRCONTAIN "ERR" $12-21-{1221XX0001XSlotPrefix[1]}2-0001.TAG tag2_is_disable
STRCONTAIN "ERR" $##-##-##-####.TAG tag3_is_disable
Var return = "Invisible"
If tag1_is_disable = "true" Then
Var return = "Enable"
EndIf
If tag2_is_disable = "true" Then
Var return = "Enable"
EndIf
If tag3_is_disable = "true" Then
Var return = "Enable"
EndIf
Else
Var return = "Invisible"
EndIf
)
</State>
<Filename> "ROOT/taobin_project/image//img_menu_err2.png" </Filename>
</Image>
<Text>
<X> 84 </X>
<Y> 266 </Y>
<Size> 10 </Size>
<Font> OpunMediumTTF </Font>
<Color> 0xDE794E </Color>
<State> ice_tab_process_show </State>
<Value> ice_show_open </Value>
</Text>
<Text>
<X> 48 </X>
<Y> 116 </Y>
<Size> 32 </Size>
<Width>128</Width>
<Height>64</Height>
<Mode> "disable-show" </Mode>
<State> $Sum12210100031221X20001 </State>
<Language>
<ID> 000013 </ID>
</Language>
<Align> center-vertical-horizontal </Align>
</Text>
</Block>
<Block> <Block>
<MarginLeft> 33 </MarginLeft> <MarginLeft> 33 </MarginLeft>
<MarginTop> 22 </MarginTop> <MarginTop> 22 </MarginTop>
@ -5898,285 +5909,7 @@
<Align> center-vertical-horizontal </Align> <Align> center-vertical-horizontal </Align>
</Text> </Text>
</Block> </Block>
; ==================> Len = 3
; 12-21-01-0003 12-21-02-0001|12-21-22-0001 -
<Block>
<MarginLeft> 33 </MarginLeft>
<MarginTop> 22 </MarginTop>
<Width> 225 </Width>
<Height> 296 </Height>
<State> Flag( 12-21-01-0003.Button,@Slot 12-21-02-0001.Button or 12-21-22-0001.Button,Disable=Invisible,$Sum12210100031221X20001) </State>
<Button>
<State> $Sum12210100031221X20001 </State>
<Filename> "ROOT/taobin_project/inter/mys/image/page_drink_n//bn_hot_america_no.png" </Filename>
<FilenamePress> "ROOT/taobin_project/inter/mys/image/page_drink_press_n//bn_hot_america_no.png" </FilenamePress>
<FilenameDisable> "ROOT/taobin_project/inter/mys/image/page_drink_disable_n2//bn_hot_america_no.png" </FilenameDisable>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventOnClick>
Var PictureDrink = "ROOT/taobin_project/inter/mys/image/page_drink_picture2_n/" + "bn_hot_america_no.png"
Var OpenFromXML = CurrentXMLFileName2
Var PriceD1 = $12-21-01-0003.Price
Var PriceD2 !assigned @AutoVar $12-21-{1221XX0001XSlotPrefix[1]}2-0001.Price
Var PriceD3 = $-.Price
Var PD_CODE1 = "12-21-01-0003"
Var PD_CODE2 !assigned @AutoVar "12-21-{1221XX0001XSlotPrefix[1]}2-0001"
Var PD_CODE3 = "##-##-##-####"
; begin lang
Var aliasName[0] = "AMERICANO"
Var aliasDesc[0] = "Espresso, Water"
Var aliasName[1] = ""
Var aliasDesc[1] = ""
Var aliasName[2] = ""
Var aliasDesc[2] = ""
Var aliasName[3] = ""
Var aliasDesc[3] = ""
Var aliasName[4] = "AMERICANO"
Var aliasDesc[4] = "Espresso, Air"
Var aliasName[5] = ""
Var aliasDesc[5] = ""
Var NameLang[0][0] = "Hot AMERICANO"
Var NameLang[0][1] = "กาแฟดำร้อน(อเมริกาโน)"
Var NameLang[0][2] = "-"
Var NameLang[0][3] = "-"
Var NameLang[0][4] = "AMERICANO PANAS"
Var NameLang[0][5] = ""
Var DescLang[0][0] = "Espresso, Water"
Var DescLang[0][1] = "กาแฟ และน้ำร้อน(อเมริกาโน)"
Var DescLang[0][2] = "-"
Var DescLang[0][3] = "-"
Var DescLang[0][4] = "Espresso, Air"
Var DescLang[0][5] = ""
Var NameLang[1][0] = "Iced AMERICANO"
Var NameLang[1][1] = "กาแฟดำเย็น(อเมริกาโน)"
Var NameLang[1][2] = "-"
Var NameLang[1][3] = "-"
Var NameLang[1][4] = "AMERICANO AIS"
Var NameLang[1][5] = ""
Var DescLang[1][0] = "Espresso, Water, Ice"
Var DescLang[1][1] = "กาแฟ น้ำ และ น้ำแข็ง(อเมริกาโน)"
Var DescLang[1][2] = "-"
Var DescLang[1][3] = "-"
Var DescLang[1][4] = "Espresso, Air, Ais"
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] = ""
; end lang
Var PD_STAGE_1 = $12-21-01-0003.Button
Var PD_STAGE_2 !assigned @AutoVar $12-21-{1221XX0001XSlotPrefix[1]}2-0001.Button
Var PD_STAGE_3 = "Disable2"
Var SelectCountDrinkType = 0
Var DefaultDrinkType = 0
If PD_STAGE_1 = "Enable" Then
Var SelectCountDrinkType = SelectCountDrinkType + 1
Var DefaultDrinkType = 1
EndIf
If PD_STAGE_2 = "Enable" Then
Var SelectCountDrinkType = SelectCountDrinkType + 1
Var DefaultDrinkType = 2
EndIf
If PD_STAGE_3 = "Enable" Then
Var SelectCountDrinkType = SelectCountDrinkType + 1
Var DefaultDrinkType = 3
EndIf
If PD_STAGE_2 = "Enable" Then
If XSlot[1] = 1 Then
Topping "Load" "12-21-02-0001"
EndIf
If XSlot[1] = 2 Then
Topping "Load" "12-21-22-0001"
EndIf
Else
If PD_STAGE_1 = "Enable" Then
Topping "Load" "12-21-01-0003"
Else
Topping "Load" "-"
EndIf
EndIf
DEBUGVAR PD_STAGE_1
DEBUGVAR PD_STAGE_2
DEBUGVAR PD_STAGE_3
Var SelectDrinkType = 0
Open "ROOT/taobin_project/xml/page_topping_select6.lxml"
</EventOnClick>
</Button>
<Text>
<X> 16 </X>
<Y> 164 </Y>
<Size> 22 </Size>
<Width>222</Width>
<Mode> "multi2" </Mode>
<Font> KanitMediumTTF </Font>
<Color> 0x322B26 </Color>
<LanguageGroup>
<LanguageSlot1>AMERICANO</LanguageSlot1>
<LanguageSlot2></LanguageSlot2>
<LanguageSlot3>AMERICANO</LanguageSlot3>
<LanguageSlot4></LanguageSlot4>
<LanguageSlot5>AMERICANO</LanguageSlot5>
<LanguageSlot6></LanguageSlot6>
</LanguageGroup>
</Text>
<Text>
<X> 16 </X>
<Y> 220 </Y>
<Size> 14 </Size>
<Width>222</Width>
<Font> KanitMediumTTF </Font>
<Color> 0x6F5F51 </Color>
<LanguageGroup>
<LanguageSlot1>Espresso, Water</LanguageSlot1>
<LanguageSlot2></LanguageSlot2>
<LanguageSlot3>Espresso, Water</LanguageSlot3>
<LanguageSlot4></LanguageSlot4>
<LanguageSlot5>Espresso, Air</LanguageSlot5>
<LanguageSlot6></LanguageSlot6>
</LanguageGroup>
</Text>
<Image>
<X> 16 </X>
<Y> 264 </Y>
<Filename> Var( DirImage2 + "option_deactive.png" ) </Filename>
</Image>
<Image>
<X> 16 </X>
<Y> 264 </Y>
<State> $12-21-01-0003.Button </State>
<Filename> Var( DirImage2 + "hot.png" ) </Filename>
<FilenameDisable> Var( DirImage2 + "hot_db.png" ) </FilenameDisable>
</Image>
<Text>
<X> TextPriceMenuHotX </X>
<Y> TextPriceMenuY </Y>
<Size> TextPriceMenuSize </Size>
<Width>220</Width>
<Font> KanitMediumTTF </Font>
<Color> 0x6F5F51 </Color>
<ColorDisable> 0xEAE6E1 </ColorDisable>
<State> $12-21-01-0003.Button </State>
<Value> StringFmt( $12-21-01-0003.Price , DisplayFormat, PreScaleConvertShow) </Value>; test
</Text>
<Image>
<X> 81 </X>
<Y> 264 </Y>
<Filename> Var( DirImage2 + "cold.png" ) </Filename>
<FilenameDisable> Var( DirImage2 + "cold_db.png" ) </FilenameDisable>
<State> @AutoVar $12-21-{1221XX0001XSlotPrefix[1]}2-0001.Button </State>
</Image>
<Text>
<X> 113 </X>
<Y> TextPriceMenuY </Y>
<Size> TextPriceMenuSize </Size>
<Width>220</Width>
<Font> KanitMediumTTF </Font>
<Color> 0x6F5F51 </Color>
<ColorDisable> 0xEAE6E1 </ColorDisable>
<State> @AutoVar $12-21-{1221XX0001XSlotPrefix[1]}2-0001.Button </State>
<Value> @AutoVar StringFmt( $12-21-{1221XX0001XSlotPrefix[1]}2-0001.Price , DisplayFormat, PreScaleConvertShow) </Value>; test
</Text>
<Image>
<X> 146 </X>
<Y> 264 </Y>
<Filename> Var( DirImage2 + "blend.png" ) </Filename>
<FilenameDisable> Var( DirImage2 + "blend_db.png" ) </FilenameDisable>
<State> "Invisible" </State>
</Image>
<Text>
<X> TextPriceMenuBlendX </X>
<Y> TextPriceMenuY </Y>
<Size> TextPriceMenuSize </Size>
<Width>220</Width>
<Font> KanitRegularTTF </Font>
<Color> 0x6F5F51 </Color>
<ColorDisable> 0xEAE6E1 </ColorDisable>
<State> "Invisible" </State>
<Value> StringFmt( $-.Price , DisplayFormat, PreScaleConvertShow) </Value>; test
</Text>
<Image>
<X> 81 </X>
<Y> 264 </Y>
<State>
eval(
If ICE_PROCESS_STATUS = 2 Then
If $Sum12210100031221X20001 = "Disable" Then
Var ice_tab_process_show = "Disable"
Else
Var ice_tab_process_show = "Enable"
EndIf
Else
Var ice_tab_process_show = "Invisible"
EndIf
Var return = ice_tab_process_show
)
</State>
<Filename> "ROOT/taobin_project/image/drink_option/ice_tab_unavalible.png" </Filename>
<FilenameDisable> "ROOT/taobin_project/image/drink_option/ice_tab_unavalible_dis.png" </FilenameDisable>
</Image>
<Image>
<X> 49 </X>
<Y> 117 </Y>
<State>
eval(
If $Sum12210100031221X20001 = "Disable" Then
STRCONTAIN "ERR" $12-21-01-0003.TAG tag1_is_disable
STRCONTAIN "ERR" $12-21-{1221XX0001XSlotPrefix[1]}2-0001.TAG tag2_is_disable
STRCONTAIN "ERR" $##-##-##-####.TAG tag3_is_disable
Var return = "Invisible"
If tag1_is_disable = "true" Then
Var return = "Enable"
EndIf
If tag2_is_disable = "true" Then
Var return = "Enable"
EndIf
If tag3_is_disable = "true" Then
Var return = "Enable"
EndIf
Else
Var return = "Invisible"
EndIf
)
</State>
<Filename> "ROOT/taobin_project/image//img_menu_err2.png" </Filename>
</Image>
<Text>
<X> 84 </X>
<Y> 266 </Y>
<Size> 10 </Size>
<Font> OpunMediumTTF </Font>
<Color> 0xDE794E </Color>
<State> ice_tab_process_show </State>
<Value> ice_show_open </Value>
</Text>
<Text>
<X> 48 </X>
<Y> 116 </Y>
<Size> 32 </Size>
<Width>128</Width>
<Height>64</Height>
<Mode> "disable-show" </Mode>
<State> $Sum12210100031221X20001 </State>
<Language>
<ID> 000013 </ID>
</Language>
<Align> center-vertical-horizontal </Align>
</Text>
</Block>
; ==================> Len = 3 ; ==================> Len = 3
; 12-01-01-0013 - - ; 12-01-01-0013 - -
<Block> <Block>
@ -18083,7 +17816,7 @@
<State> SubRandMilkButtonEnable </State> <State> SubRandMilkButtonEnable </State>
<Filename> "ROOT/taobin_project/inter/mys/image/event/pro_myst_cup/myst_milk.png" </Filename> <Filename> "ROOT/taobin_project/inter/mys/image/event/pro_myst_cup/myst_milk.png" </Filename>
<FilenamePress> "ROOT/taobin_project/inter/mys/image/event/pro_myst_cup/myst_milk.png" </FilenamePress> <FilenamePress> "ROOT/taobin_project/inter/mys/image/event/pro_myst_cup/myst_milk.png" </FilenamePress>
<FilenameDisable> "ROOT/taobin_project/inter/mys/image/event/pro_myst_cup/myst_milk.png" </FilenameDisable> <FilenameDisable> "ROOT/taobin_project/inter/mys/image/event/pro_myst_cup/myst_milk_disable.png" </FilenameDisable>
<EventClick> <EventClick>
Var FromProMysteryCup = 1 Var FromProMysteryCup = 1
@ -18091,6 +17824,12 @@
Var ProductCodeRandom = ProductCodeRandomMilk Var ProductCodeRandom = ProductCodeRandomMilk
Var PriceProMystRandom = RandMystMilkPrice Var PriceProMystRandom = RandMystMilkPrice
Var MysteryCupResultName[0] = ProductCodeRandomMilkName[0]
Var MysteryCupResultName[1] = ProductCodeRandomMilkName[1]
Var MysteryCupResultName[2] = ProductCodeRandomMilkName[2]
Var MysteryCupResultName[3] = ProductCodeRandomMilkName[3]
Var MysteryCupResultName[4] = ProductCodeRandomMilkName[4]
Topping "Load" ProductCodeRandom Topping "Load" ProductCodeRandom
Var OpenFromXML = CurrentXMLFileName2 Var OpenFromXML = CurrentXMLFileName2
Open "ROOT/taobin_project/xml/page_topping_select6.lxml" Open "ROOT/taobin_project/xml/page_topping_select6.lxml"
@ -18118,7 +17857,7 @@
<State> SubRandTeaButtonEnable </State> <State> SubRandTeaButtonEnable </State>
<Filename> "ROOT/taobin_project/inter/mys/image/event/pro_myst_cup/myst_tea.png" </Filename> <Filename> "ROOT/taobin_project/inter/mys/image/event/pro_myst_cup/myst_tea.png" </Filename>
<FilenamePress> "ROOT/taobin_project/inter/mys/image/event/pro_myst_cup/myst_tea.png" </FilenamePress> <FilenamePress> "ROOT/taobin_project/inter/mys/image/event/pro_myst_cup/myst_tea.png" </FilenamePress>
<FilenameDisable> "ROOT/taobin_project/inter/mys/image/event/pro_myst_cup/myst_tea.png" </FilenameDisable> <FilenameDisable> "ROOT/taobin_project/inter/mys/image/event/pro_myst_cup/myst_tea_disable.png" </FilenameDisable>
<EventClick> <EventClick>
Var FromProMysteryCup = 1 Var FromProMysteryCup = 1
@ -18126,6 +17865,12 @@
Var ProductCodeRandom = ProductCodeRandomTea Var ProductCodeRandom = ProductCodeRandomTea
Var PriceProMystRandom = RandMystTeaPrice Var PriceProMystRandom = RandMystTeaPrice
Var MysteryCupResultName[0] = ProductCodeRandomTeaName[0]
Var MysteryCupResultName[1] = ProductCodeRandomTeaName[1]
Var MysteryCupResultName[2] = ProductCodeRandomTeaName[2]
Var MysteryCupResultName[3] = ProductCodeRandomTeaName[3]
Var MysteryCupResultName[4] = ProductCodeRandomTeaName[4]
Topping "Load" ProductCodeRandom Topping "Load" ProductCodeRandom
Var OpenFromXML = CurrentXMLFileName2 Var OpenFromXML = CurrentXMLFileName2
Open "ROOT/taobin_project/xml/page_topping_select6.lxml" Open "ROOT/taobin_project/xml/page_topping_select6.lxml"
@ -18154,7 +17899,7 @@
<State> SubRandCoffButtonEnable </State> <State> SubRandCoffButtonEnable </State>
<Filename> "ROOT/taobin_project/inter/mys/image/event/pro_myst_cup/myst_coffee.png" </Filename> <Filename> "ROOT/taobin_project/inter/mys/image/event/pro_myst_cup/myst_coffee.png" </Filename>
<FilenamePress> "ROOT/taobin_project/inter/mys/image/event/pro_myst_cup/myst_coffee.png" </FilenamePress> <FilenamePress> "ROOT/taobin_project/inter/mys/image/event/pro_myst_cup/myst_coffee.png" </FilenamePress>
<FilenameDisable> "ROOT/taobin_project/inter/mys/image/event/pro_myst_cup/myst_coffee.png" </FilenameDisable> <FilenameDisable> "ROOT/taobin_project/inter/mys/image/event/pro_myst_cup/myst_coffee_disable.png" </FilenameDisable>
<EventClick> <EventClick>
Var FromProMysteryCup = 1 Var FromProMysteryCup = 1
@ -18162,6 +17907,13 @@
Var ProductCodeRandom = ProductCodeRandomCoffee Var ProductCodeRandom = ProductCodeRandomCoffee
Var PriceProMystRandom = RandMystCoffeePrice Var PriceProMystRandom = RandMystCoffeePrice
Var MysteryCupResultName[0] = ProductCodeRandomCoffeeName[0]
Var MysteryCupResultName[1] = ProductCodeRandomCoffeeName[1]
Var MysteryCupResultName[2] = ProductCodeRandomCoffeeName[2]
Var MysteryCupResultName[3] = ProductCodeRandomCoffeeName[3]
Var MysteryCupResultName[4] = ProductCodeRandomCoffeeName[4]
Topping "Load" ProductCodeRandom Topping "Load" ProductCodeRandom
Var OpenFromXML = CurrentXMLFileName2 Var OpenFromXML = CurrentXMLFileName2
Open "ROOT/taobin_project/xml/page_topping_select6.lxml" Open "ROOT/taobin_project/xml/page_topping_select6.lxml"

6
inter/mys/xml/event/tricker.ev
View file

@ -1,6 +1,12 @@
; malaysia ; malaysia
; e-receipt-flag
Var eReceiptFlag = 1
DEBUGVAR eReceiptFlag
;DEBUGVAR SystemDateMonthInt ;DEBUGVAR SystemDateMonthInt
;DEBUGVAR SystemDateDayInt ;DEBUGVAR SystemDateDayInt

18
inter/mys/xml/page_brewing3.lxml
View file

@ -144,7 +144,7 @@
Var ServiceCredit = "coffee" Var ServiceCredit = "coffee"
Pay ServiceType TelephoneNumber ServiceCredit SuggestID SessionID2 ServiceAmount2 ServiceCharge Donate Pay ServiceType TelephoneNumber ServiceCredit SuggestID SessionID2 ServiceAmount2 ServiceCharge Donate
Else Else
If Seeker.StoreCreditFlag = 1 Then If Seeker.StoreCreditFlag = 1 Then
Var VendingDiscount = 0 Var VendingDiscount = 0
@ -614,6 +614,22 @@
EndIf EndIf
EndIf EndIf
DEBUGVAR Seeker.e_receipt
; e-receipt
If Seeker.e_receipt = "true" Then
Var SelectMenuBetweenBrewEnable1Blink = "Invisible"
Var SelectMenuBetweenBrewEnable1 = "Invisible"
Var SelectMenuBetweenBrewEnable2Blink = "Invisible"
Var SelectMenuBetweenBrewEnable2 = "Invisible"
EndIf
Var AppRunFlagState = "" Var AppRunFlagState = ""
Var HasResumePreventFlag = "false" Var HasResumePreventFlag = "false"

8
inter/mys/xml/page_brewing3Conti.xml
View file

@ -82,6 +82,14 @@
Var EnableSelectMenuBetweenBrewBlink = "Invisible" Var EnableSelectMenuBetweenBrewBlink = "Invisible"
EndIf EndIf
; e-receipt
If Seeker.e_receipt = "true" Then
Var SelectMenuBetweenBrewEnable1Blink = "Invisible"
Var SelectMenuBetweenBrewEnable1 = "Invisible"
Var SelectMenuBetweenBrewEnable2Blink = "Invisible"
Var SelectMenuBetweenBrewEnable2 = "Invisible"
EndIf
Var bg_strawlid = DirImage2 + "/bg_strawlidSmall.png" Var bg_strawlid = DirImage2 + "/bg_strawlidSmall.png"
If Seeker.thankLidFlag = 1 Then If Seeker.thankLidFlag = 1 Then

18
inter/mys/xml/page_brewing3Conti_event.lxml
View file

@ -65,6 +65,11 @@
If waitAckPay = 1 Then If waitAckPay = 1 Then
SAVELOG "waitAckPay = 1" SAVELOG "waitAckPay = 1"
If Seeker.e_receipt = "true" Then
Open "ROOT/taobin_project/inter/mys/xml/e_receipt/page_show_e_receipt.lxml"
EndIf
Open "ROOT/taobin_project/xml/page_drinkok.xml" Open "ROOT/taobin_project/xml/page_drinkok.xml"
EndIf EndIf
@ -185,6 +190,10 @@
Var VendingTSIDTmp1 = "" Var VendingTSIDTmp1 = ""
SAVELOG "waitAckPay = 1 tineout > 60" SAVELOG "waitAckPay = 1 tineout > 60"
If Seeker.e_receipt = "true" Then
Open "ROOT/taobin_project/inter/mys/xml/e_receipt/page_show_e_receipt.lxml"
EndIf
Open "ROOT/taobin_project/xml/page_drinkok.xml" Open "ROOT/taobin_project/xml/page_drinkok.xml"
EndIf EndIf
@ -565,6 +574,10 @@
SAVELOG "waitAckPay = 0 Timeout" SAVELOG "waitAckPay = 0 Timeout"
If Seeker.e_receipt = "true" Then
Open "ROOT/taobin_project/inter/mys/xml/e_receipt/page_show_e_receipt.lxml"
EndIf
Open "ROOT/taobin_project/xml/page_drinkok.xml" Open "ROOT/taobin_project/xml/page_drinkok.xml"
EndIf EndIf
@ -842,6 +855,11 @@
If IgnoreNetCore = "true" Then If IgnoreNetCore = "true" Then
If CountDownBrewing = 0 Then If CountDownBrewing = 0 Then
SAVELOG "CountDownBrewing = 0" SAVELOG "CountDownBrewing = 0"
If Seeker.e_receipt = "true" Then
Open "ROOT/taobin_project/inter/mys/xml/e_receipt/page_show_e_receipt.lxml"
EndIf
Open "ROOT/taobin_project/xml/page_drinkok.xml" Open "ROOT/taobin_project/xml/page_drinkok.xml"
EndIf EndIf
EndIf EndIf

30
inter/mys/xml/page_brewing3_event.lxml
View file

@ -66,6 +66,13 @@
EndIf EndIf
If waitAckPay = 1 Then If waitAckPay = 1 Then
; temp:redirect-show-qr
If Seeker.e_receipt = "true" Then
Open "ROOT/taobin_project/inter/mys/xml/e_receipt/page_show_e_receipt.lxml"
EndIf
SAVELOG "waitAckPay = 1" SAVELOG "waitAckPay = 1"
Open "ROOT/taobin_project/xml/page_drinkok.xml" Open "ROOT/taobin_project/xml/page_drinkok.xml"
@ -265,6 +272,14 @@
If waitAckPay = 1 Then If waitAckPay = 1 Then
If Timeout > 60 Then If Timeout > 60 Then
; temp:redirect-show-qr
If Seeker.e_receipt = "true" Then
Open "ROOT/taobin_project/inter/mys/xml/e_receipt/page_show_e_receipt.lxml"
EndIf
Var VendingTSID = "" Var VendingTSID = ""
SAVELOG "TIMEOUT=60" SAVELOG "TIMEOUT=60"
Open "ROOT/taobin_project/xml/page_drinkok.xml" Open "ROOT/taobin_project/xml/page_drinkok.xml"
@ -650,6 +665,14 @@
Var ServiceSuccess = "yes" Var ServiceSuccess = "yes"
If waitAckPay = 0 Then If waitAckPay = 0 Then
SAVELOG "waitAckPay=0" SAVELOG "waitAckPay=0"
; temp:redirect-show-qr
If Seeker.e_receipt = "true" Then
Open "ROOT/taobin_project/inter/mys/xml/e_receipt/page_show_e_receipt.lxml"
EndIf
Open "ROOT/taobin_project/xml/page_drinkok.xml" Open "ROOT/taobin_project/xml/page_drinkok.xml"
EndIf EndIf
@ -1009,6 +1032,13 @@
If IgnoreNetCore = "true" Then If IgnoreNetCore = "true" Then
If CountDownBrewing = 0 Then If CountDownBrewing = 0 Then
; temp:redirect-show-qr
If Seeker.e_receipt = "true" Then
Open "ROOT/taobin_project/inter/mys/xml/e_receipt/page_show_e_receipt.lxml"
EndIf
SAVELOG "CountDownBrewing=0" SAVELOG "CountDownBrewing=0"
Open "ROOT/taobin_project/xml/page_drinkok.xml" Open "ROOT/taobin_project/xml/page_drinkok.xml"
EndIf EndIf

62
inter/mys/xml/page_collect_point_1.lxml
View file

@ -11,17 +11,48 @@
; jump ; jump
If IgnoreCollectPointByMe = 1 Then If IgnoreCollectPointByMe = 1 Then
Var IgnoreCollectPointByMe = 0 Var IgnoreCollectPointByMe = 0
If eReceiptFlag = 1 Then
If CountryName = "Malaysia" Then
Var RecieptPromptPage = CountryRootPath + "/xml/e_receipt/page_prompt_e_receipt.lxml"
DEBUGVAR RecieptPromptPage
Open RecieptPromptPage
EndIf
EndIf
Open "ROOT/taobin_project/xml/page_lid_straw.xml" Open "ROOT/taobin_project/xml/page_lid_straw.xml"
EndIf EndIf
If Seeker.CodeChannel = 1 Then If Seeker.CodeChannel = 1 Then
If Seeker.CollectPointMain = 0 Then If Seeker.CollectPointMain = 0 Then
SAVELOG "Seeker.CollectPointMain = 0 Jump!!!" SAVELOG "Seeker.CollectPointMain = 0 Jump!!!"
If eReceiptFlag = 1 Then
If CountryName = "Malaysia" Then
Var RecieptPromptPage = CountryRootPath + "/xml/e_receipt/page_prompt_e_receipt.lxml"
DEBUGVAR RecieptPromptPage
Open RecieptPromptPage
EndIf
EndIf
Open "ROOT/taobin_project/xml/page_lid_straw.xml" Open "ROOT/taobin_project/xml/page_lid_straw.xml"
EndIf EndIf
EndIf EndIf
If SettingIgnoreCollectPoint = 1 Then If SettingIgnoreCollectPoint = 1 Then
If eReceiptFlag = 1 Then
If CountryName = "Malaysia" Then
Var RecieptPromptPage = CountryRootPath + "/xml/e_receipt/page_prompt_e_receipt.lxml"
DEBUGVAR RecieptPromptPage
Open RecieptPromptPage
EndIf
EndIf
Open "ROOT/taobin_project/xml/page_lid_straw.xml" Open "ROOT/taobin_project/xml/page_lid_straw.xml"
EndIf EndIf
@ -285,6 +316,15 @@
SAVELOG "collect_point1-p107." SAVELOG "collect_point1-p107."
;Open "ROOT/taobin_project/xml/page_catalog.xml" ;Open "ROOT/taobin_project/xml/page_catalog.xml"
If eReceiptFlag = 1 Then
If CountryName = "Malaysia" Then
Var RecieptPromptPage = CountryRootPath + "/xml/e_receipt/page_prompt_e_receipt.lxml"
DEBUGVAR RecieptPromptPage
Open RecieptPromptPage
EndIf
EndIf
Open "ROOT/taobin_project/xml/page_lid_straw.xml" Open "ROOT/taobin_project/xml/page_lid_straw.xml"
EndIf EndIf
@ -635,6 +675,16 @@
If LuckyDrawCampaign = 1 Then If LuckyDrawCampaign = 1 Then
Open "ROOT/taobin_project/xml/sometime/page_campaign_ads_lucky_draw.xml" Open "ROOT/taobin_project/xml/sometime/page_campaign_ads_lucky_draw.xml"
Else Else
If eReceiptFlag = 1 Then
If CountryName = "Malaysia" Then
Var RecieptPromptPage = CountryRootPath + "/xml/e_receipt/page_prompt_e_receipt.lxml"
DEBUGVAR RecieptPromptPage
Open RecieptPromptPage
EndIf
EndIf
Open "ROOT/taobin_project/xml/page_lid_straw.xml" Open "ROOT/taobin_project/xml/page_lid_straw.xml"
EndIf EndIf
</EventClick> </EventClick>
@ -690,6 +740,18 @@
If ChildrenFree = 1 Then If ChildrenFree = 1 Then
Var Seeker.TNumberTaobinMember = TelephoneNumber Var Seeker.TNumberTaobinMember = TelephoneNumber
If eReceiptFlag = 1 Then
If CountryName = "Malaysia" Then
Var RecieptPromptPage = CountryRootPath + "/xml/e_receipt/page_prompt_e_receipt.lxml"
DEBUGVAR RecieptPromptPage
Open RecieptPromptPage
EndIf
EndIf
Open "ROOT/taobin_project/xml/page_lid_straw.xml" Open "ROOT/taobin_project/xml/page_lid_straw.xml"
EndIf EndIf

16
inter/mys/xml/page_collect_point_3.lxml
View file

@ -691,7 +691,13 @@
Open "ROOT/taobin_project/xml/page_display_get_free.xml" Open "ROOT/taobin_project/xml/page_display_get_free.xml"
Else Else
If eReceiptFlag = 1 Then
If CountryName = "Malaysia" Then
Var RecieptPromptPage = CountryRootPath + "/xml/e_receipt/page_prompt_e_receipt.lxml"
DEBUGVAR RecieptPromptPage
Open RecieptPromptPage
EndIf
EndIf
Open "ROOT/taobin_project/xml/page_lid_straw.xml" Open "ROOT/taobin_project/xml/page_lid_straw.xml"
EndIf EndIf
@ -857,7 +863,13 @@
Open "ROOT/taobin_project/xml/page_display_get_free.xml" Open "ROOT/taobin_project/xml/page_display_get_free.xml"
EndIf EndIf
If eReceiptFlag = 1 Then
If CountryName = "Malaysia" Then
Var RecieptPromptPage = CountryRootPath + "/xml/e_receipt/page_prompt_e_receipt.lxml"
DEBUGVAR RecieptPromptPage
Open RecieptPromptPage
EndIf
EndIf
Open "ROOT/taobin_project/xml/page_lid_straw.xml" Open "ROOT/taobin_project/xml/page_lid_straw.xml"

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

@ -4000,6 +4000,12 @@
Var Seeker.PictureDrink = PictureDrink Var Seeker.PictureDrink = PictureDrink
Var Seeker.showname = showname Var Seeker.showname = showname
If FromProMysteryCup = 1 Then
Var Seeker.shownameMystery = MysteryCupResultName[LanguageShowByIndex]
DEBUGVAR Seeker.showname
EndIf
DEBUGVAR MenuCautionImageStage0 DEBUGVAR MenuCautionImageStage0
DEBUGVAR CustomerFilterEnable DEBUGVAR CustomerFilterEnable
DEBUGVAR CustomerFilterType DEBUGVAR CustomerFilterType
@ -4021,6 +4027,13 @@
Else Else
If SelectDrinkType = 1 Then If SelectDrinkType = 1 Then
; save-for-e-receipt
If eReceiptFlag = 1 Then
Var Seeker.PriceDrinkTmpShow = PriceDrinkTmpShow
Var Seeker.PriceDrink = PriceDrinkTmp
EndIf
OpenInst 1 "/mnt/sdcard/coffeevending/taobin_project/xml/page_blank.xml" OpenInst 1 "/mnt/sdcard/coffeevending/taobin_project/xml/page_blank.xml"
Open "ROOT/taobin_project/xml/page_payment.xml" Open "ROOT/taobin_project/xml/page_payment.xml"
EndIf EndIf

4
inter/mys/xml/process/discount_from_promotion.ev
View file

@ -50,8 +50,12 @@ EndIf
If FromProMysteryCup = 1 Then If FromProMysteryCup = 1 Then
Var Seeker.VendingCode = RandomVendingCode Var Seeker.VendingCode = RandomVendingCode
Var Seeker.FromProMysteryCup = "true" Var Seeker.FromProMysteryCup = "true"
Var FromProMysteryCup = 0
Else Else
Var Seeker.FromProMysteryCup = "false" Var Seeker.FromProMysteryCup = "false"
Var FromProMysteryCup = 0
EndIf EndIf

149
inter/mys/xml/process/e_receipt.ev Normal file
View file

@ -0,0 +1,149 @@
Var EReceiptQR = ""
; build uri
Var INVOICE_URL = ""
Var Final_INVOICE_URL = ""
Var ProjectId = "682d5a08f4fa421acbfd4102"
Var ProductionProjectId = "6854f7c2f72ea3dfd20962bd"
Var DisplayFormatFloat = "%.2f"
Var Seeker.PriceDrink !assigned StringFmt( Seeker.PriceDrink , DisplayFormatFloat, PreScaleConvertShow)
; fix-v3-float-string
IntoFloatString Seeker.PriceDrink "FloatPriceDrinkString"
DEBUGVAR Seeker.PriceDrink
DEBUGVAR FloatPriceDrinkString
Var Seeker.PriceDrink = FloatPriceDrinkString
DEBUGVAR Seeker.PriceDrink
; check test mode
READ_FILE "/mnt/sdcard/coffeevending/CURR_TEST" TEST_MODE_FLAG
STRCONTAIN "1" TEST_MODE_FLAG IS_TEST_MODE
If IS_TEST_MODE = "true" Then
Var INVOICE_URL = INVOICE_DEV_URL
Else
Var INVOICE_URL = INVOICE_PROD_URL
EndIf
DEBUGVAR IS_TEST_MODE
DEBUGVAR INVOICE_URL
Var ForceStaging = "false"
If ForceStaging = "true" Then
Var IS_TEST_MODE = "true"
SAVELOG "Force test staging"
EndIf
DEBUGVAR ForceStaging
If ProMysteryCup = 1 Then
If Seeker.FromProMysteryCup = "true" Then
Var ProductDesc = Seeker.shownameMystery2
Else
Var ProductDesc = Seeker.showname
EndIf
Else
Var ProductDesc = Seeker.showname
EndIf
Var documentNo = Seeker.VendingTSID
Var internalRemark = BoxID
Var dateTime = SystemISOTime
Var ProductItemClassification = "022"
Var ProductItemDescription = ProductDesc
Var ProductItemQuantity = 1
Var ProductItemUnitPrice = Seeker.PriceDrink
Var ProductItemTaxType = "06"
Var ProductItemTaxRate = 0
Var ProductItemTaxAmount = 0
Var ProductItemDiscountAmount = 0
Var ProductItemSubTotalExcludingTax = Seeker.PriceDrink
Var ProductItemSubTotal = Seeker.PriceDrink
Var totalExcludingTax = Seeker.PriceDrink
Var totalDiscountAmount = 0
Var totalTaxAmount = 0
Var totalRoundingAmount = Seeker.PriceDrink
Var totalPayableAmount = Seeker.PriceDrink
Var PayloadEReceipt = "{'documentNo':'"
Var PayloadEReceipt = PayloadEReceipt + documentNo
Var PayloadEReceipt = PayloadEReceipt + "','internalRemark':'"
Var PayloadEReceipt = PayloadEReceipt + internalRemark
Var PayloadEReceipt = PayloadEReceipt + "','dateTime':'"
Var PayloadEReceipt = PayloadEReceipt + dateTime
; array-1-item
Var PayloadEReceipt = PayloadEReceipt + "','items':[{"
Var PayloadEReceipt = PayloadEReceipt + "'ProductItemClassification':'"
Var PayloadEReceipt = PayloadEReceipt + ProductItemClassification
Var PayloadEReceipt = PayloadEReceipt + "','ProductItemDescription':'"
Var PayloadEReceipt = PayloadEReceipt + ProductItemDescription
Var PayloadEReceipt = PayloadEReceipt + "','ProductItemQuantity':"
Var PayloadEReceipt = PayloadEReceipt + ProductItemQuantity
Var PayloadEReceipt = PayloadEReceipt + ",'ProductItemUnitPrice':"
Var PayloadEReceipt = PayloadEReceipt + ProductItemUnitPrice
Var PayloadEReceipt = PayloadEReceipt + ",'ProductItemTaxType':'"
Var PayloadEReceipt = PayloadEReceipt + ProductItemTaxType
Var PayloadEReceipt = PayloadEReceipt + "','ProductItemTaxRate':"
Var PayloadEReceipt = PayloadEReceipt + ProductItemTaxRate
Var PayloadEReceipt = PayloadEReceipt + ",'ProductItemTaxAmount':"
Var PayloadEReceipt = PayloadEReceipt + ProductItemTaxAmount
Var PayloadEReceipt = PayloadEReceipt + ",'ProductItemDiscountAmount':"
Var PayloadEReceipt = PayloadEReceipt + ProductItemDiscountAmount
Var PayloadEReceipt = PayloadEReceipt + ",'ProductItemSubTotalExcludingTax':"
Var PayloadEReceipt = PayloadEReceipt + ProductItemSubTotalExcludingTax
Var PayloadEReceipt = PayloadEReceipt + ",'ProductItemSubTotal':"
Var PayloadEReceipt = PayloadEReceipt + ProductItemSubTotal
Var PayloadEReceipt = PayloadEReceipt + "}]"
Var PayloadEReceipt = PayloadEReceipt + ",'totalExcludingTax':"
Var PayloadEReceipt = PayloadEReceipt + totalExcludingTax
Var PayloadEReceipt = PayloadEReceipt + ",'totalDiscountAmount':"
Var PayloadEReceipt = PayloadEReceipt + totalDiscountAmount
Var PayloadEReceipt = PayloadEReceipt + ",'totalTaxAmount':"
Var PayloadEReceipt = PayloadEReceipt + totalTaxAmount
Var PayloadEReceipt = PayloadEReceipt + ",'totalRoundingAmount':"
Var PayloadEReceipt = PayloadEReceipt + totalRoundingAmount
Var PayloadEReceipt = PayloadEReceipt + ",'totalPayableAmount':"
Var PayloadEReceipt = PayloadEReceipt + totalPayableAmount
Var PayloadEReceipt = PayloadEReceipt + "}"
DEBUGVAR PayloadEReceipt
HashSha256 PayloadEReceipt "HashData"
EncodeURIComponent PayloadEReceipt "PayloadEReceiptEncoded"
DEBUGVAR HashData
DEBUGVAR PayloadEReceiptEncoded
Var EQ_SIGN = "="
If IS_TEST_MODE = "true" Then
Var Final_INVOICE_URL !assigned @AutoVar "https://einvoice-stg.sernsoft.com/public-create-invoice?_id{EQ_SIGN}{ProjectId}&data{EQ_SIGN}{PayloadEReceiptEncoded}&hash{EQ_SIGN}{HashData}"
Else
Var Final_INVOICE_URL !assigned @AutoVar "https://einvoice.sernsoft.com/public-create-invoice?_id{EQ_SIGN}{ProductionProjectId}&data{EQ_SIGN}{PayloadEReceiptEncoded}&hash{EQ_SIGN}{HashData}"
EndIf
DEBUGVAR Final_INVOICE_URL

35
xml/page_drinkok.xml
View file

@ -11,6 +11,8 @@
DEBUGVAR Seeker.PictureDrink DEBUGVAR Seeker.PictureDrink
DEBUGVAR Seeker.showname DEBUGVAR Seeker.showname
Var PureName = ""
; Block Have ; Block Have
Var DrinkOKStringVersion = "DKT3" Var DrinkOKStringVersion = "DKT3"
@ -297,6 +299,25 @@
; helper show in page_board ; helper show in page_board
Var FromDrinkOk = 1 Var FromDrinkOk = 1
; pro-mystery-cup
If ProMysteryCup = 1 Then
If Seeker.FromProMysteryCup = "true" Then
Var ShowNameMystery = "Enable"
Else
Var ShowNameMystery = "Invisible"
EndIf
Else
Var ShowNameMystery = "Invisible"
EndIf
STRCONTAIN "size" Seeker.shownameMystery SizeFromSheet
If SizeFromSheet = "true" Then
SPLIT Seeker.shownameMystery "###" 1 PureName
Var ShowNameMysteryName = PureName
Else
Var ShowNameMysteryName = Seeker.shownameMystery
EndIf
</EventOpen> </EventOpen>
<Timeout> 500 </Timeout> <Timeout> 500 </Timeout>
<EventTimeout> <EventTimeout>
@ -308,6 +329,8 @@
DEBUGVAR buttonRemoveCup DEBUGVAR buttonRemoveCup
DEBUGVAR CART_COUNT DEBUGVAR CART_COUNT
DEBUGVAR VendingTSID
DEBUGVAR Seeker.VendingTSID
DEBUGVAR HaveCup DEBUGVAR HaveCup
DEBUGVAR CHECKCUP DEBUGVAR CHECKCUP
@ -619,6 +642,18 @@
</Value> </Value>
</Text> </Text>
<Text>
<X> 300 </X>
<Y> 1750 </Y>
<Width> 1080 </Width>
<Align> Center </Align>
<Font> KanitLightTTF </Font>
<Size> 48 </Size>
<Color> HeadlineColor </Color>
<State> ShowNameMystery </State>
<Value> ShowNameMysteryName </Value>
</Text>
<Image> <Image>
<X> 0 </X> <X> 0 </X>

4
xml/page_payment_cash-MYR.xml
View file

@ -138,6 +138,7 @@
Var ServiceAmount2 = PayAmount Var ServiceAmount2 = PayAmount
Var Seeker.ServiceAmount2 = PayAmount Var Seeker.ServiceAmount2 = PayAmount
Var ServiceCharge = 0 Var ServiceCharge = 0
Var Seeker.ServiceCharge = 0
Var Donate = "" Var Donate = ""
Var SuggestID = "" Var SuggestID = ""
Var CancleState = "Enable" Var CancleState = "Enable"
@ -1025,6 +1026,9 @@
Var ServiceType = "credit" Var ServiceType = "credit"
Var SessionID2 = SelectDrink Var SessionID2 = SelectDrink
Var ServiceCredit = "coffee" Var ServiceCredit = "coffee"
Var ServiceCharge = 0
Pay ServiceType TelephoneNumber ServiceCredit SuggestID SessionID2 ServiceAmount2 ServiceCharge Donate Pay ServiceType TelephoneNumber ServiceCredit SuggestID SessionID2 ServiceAmount2 ServiceCharge Donate
Var PayCredit = 1 Var PayCredit = 1

79
xml/page_thankyou.xml
View file

@ -106,6 +106,8 @@
DEBUGVAR TelephoneNumber DEBUGVAR TelephoneNumber
DEBUGVAR Seeker.StoreCreditFlag DEBUGVAR Seeker.StoreCreditFlag
Var Seeker.e_receipt = "false"
If Seeker = "next" Then If Seeker = "next" Then
Var NextOrder = "true" Var NextOrder = "true"
EndIf EndIf
@ -300,6 +302,16 @@
If CountDownThankyou = 0 Then If CountDownThankyou = 0 Then
If IgnoreNetCore = "true" Then If IgnoreNetCore = "true" Then
If eReceiptFlag = 1 Then
If CountryName = "Malaysia" Then
Var RecieptPromptPage = CountryRootPath + "/xml/e_receipt/page_prompt_e_receipt.lxml"
DEBUGVAR RecieptPromptPage
Open RecieptPromptPage
EndIf
EndIf
Open "ROOT/taobin_project/xml/page_lid_straw.xml" Open "ROOT/taobin_project/xml/page_lid_straw.xml"
EndIf EndIf
@ -323,9 +335,27 @@
If LuckyDrawCampaign = 1 Then If LuckyDrawCampaign = 1 Then
Open "ROOT/taobin_project/xml/sometime/page_campaign_ads_lucky_draw.xml" Open "ROOT/taobin_project/xml/sometime/page_campaign_ads_lucky_draw.xml"
Else Else
If eReceiptFlag = 1 Then
If CountryName = "Malaysia" Then
Var RecieptPromptPage = CountryRootPath + "/xml/e_receipt/page_prompt_e_receipt.lxml"
DEBUGVAR RecieptPromptPage
Open RecieptPromptPage
EndIf
EndIf
Open "ROOT/taobin_project/xml/page_lid_straw.xml" Open "ROOT/taobin_project/xml/page_lid_straw.xml"
EndIf EndIf
Else Else
If eReceiptFlag = 1 Then
If CountryName = "Malaysia" Then
Var RecieptPromptPage = CountryRootPath + "/xml/e_receipt/page_prompt_e_receipt.lxml"
DEBUGVAR RecieptPromptPage
Open RecieptPromptPage
EndIf
EndIf
Open "ROOT/taobin_project/xml/page_lid_straw.xml" Open "ROOT/taobin_project/xml/page_lid_straw.xml"
EndIf EndIf
EndIf EndIf
@ -337,6 +367,15 @@
Var CleanFeedBackToCollectPoint = 0 Var CleanFeedBackToCollectPoint = 0
Open "ROOT/taobin_project/xml/page_clean_feedback.xml" Open "ROOT/taobin_project/xml/page_clean_feedback.xml"
Else Else
If eReceiptFlag = 1 Then
If CountryName = "Malaysia" Then
Var RecieptPromptPage = CountryRootPath + "/xml/e_receipt/page_prompt_e_receipt.lxml"
DEBUGVAR RecieptPromptPage
Open RecieptPromptPage
EndIf
EndIf
Open "ROOT/taobin_project/xml/page_lid_straw.xml" Open "ROOT/taobin_project/xml/page_lid_straw.xml"
EndIf EndIf
EndIf EndIf
@ -502,6 +541,15 @@
If LuckyDrawCampaign = 1 Then If LuckyDrawCampaign = 1 Then
Open "ROOT/taobin_project/xml/sometime/page_campaign_ads_lucky_draw.xml" Open "ROOT/taobin_project/xml/sometime/page_campaign_ads_lucky_draw.xml"
Else Else
If eReceiptFlag = 1 Then
If CountryName = "Malaysia" Then
Var RecieptPromptPage = CountryRootPath + "/xml/e_receipt/page_prompt_e_receipt.lxml"
DEBUGVAR RecieptPromptPage
Open RecieptPromptPage
EndIf
EndIf
Open "ROOT/taobin_project/xml/page_lid_straw.xml" Open "ROOT/taobin_project/xml/page_lid_straw.xml"
EndIf EndIf
EndIf EndIf
@ -510,6 +558,17 @@
Var CleanFeedBackToCollectPoint = 0 Var CleanFeedBackToCollectPoint = 0
Open "ROOT/taobin_project/xml/page_clean_feedback.xml" Open "ROOT/taobin_project/xml/page_clean_feedback.xml"
Else Else
If eReceiptFlag = 1 Then
If CountryName = "Malaysia" Then
Var RecieptPromptPage = CountryRootPath + "/xml/e_receipt/page_prompt_e_receipt.lxml"
DEBUGVAR RecieptPromptPage
Open RecieptPromptPage
EndIf
EndIf
Open "ROOT/taobin_project/xml/page_lid_straw.xml" Open "ROOT/taobin_project/xml/page_lid_straw.xml"
EndIf EndIf
EndIf EndIf
@ -564,6 +623,17 @@
If LuckyDrawCampaign = 1 Then If LuckyDrawCampaign = 1 Then
Open "ROOT/taobin_project/xml/sometime/page_campaign_ads_lucky_draw.xml" Open "ROOT/taobin_project/xml/sometime/page_campaign_ads_lucky_draw.xml"
Else Else
If eReceiptFlag = 1 Then
If CountryName = "Malaysia" Then
Var RecieptPromptPage = CountryRootPath + "/xml/e_receipt/page_prompt_e_receipt.lxml"
DEBUGVAR RecieptPromptPage
Open RecieptPromptPage
EndIf
EndIf
Open "ROOT/taobin_project/xml/page_lid_straw.xml" Open "ROOT/taobin_project/xml/page_lid_straw.xml"
EndIf EndIf
EndIf EndIf
@ -572,6 +642,15 @@
Var CleanFeedBackToCollectPoint = 0 Var CleanFeedBackToCollectPoint = 0
Open "ROOT/taobin_project/xml/page_clean_feedback.xml" Open "ROOT/taobin_project/xml/page_clean_feedback.xml"
Else Else
If eReceiptFlag = 1 Then
If CountryName = "Malaysia" Then
Var RecieptPromptPage = CountryRootPath + "/xml/e_receipt/page_prompt_e_receipt.lxml"
DEBUGVAR RecieptPromptPage
Open RecieptPromptPage
EndIf
EndIf
Open "ROOT/taobin_project/xml/page_lid_straw.xml" Open "ROOT/taobin_project/xml/page_lid_straw.xml"
EndIf EndIf
EndIf EndIf

21
xml/vending_info2.xml
View file

@ -191,6 +191,8 @@
DEBUGVAR Timeout DEBUGVAR Timeout
DEBUGVAR WhileRetryCounter DEBUGVAR WhileRetryCounter
If alphaPasswordPromptWithKeyboard = "Enable" Then If alphaPasswordPromptWithKeyboard = "Enable" Then
Var Timeout = 0 Var Timeout = 0
Else Else
@ -265,7 +267,11 @@
If WhileRetryCounter < 10 Then If WhileRetryCounter < 10 Then
DEBUGVAR "WaitPasswordCheck" DEBUGVAR "WaitPasswordCheck"
__CMD "check-password-wait" "-" "-" "-" If EnableBrewIPC = "true" Then
Else
__CMD "check-password-wait" "-" "-" "-"
EndIf
Var Timeout = 0 Var Timeout = 0
Var WaitPopup = "Enable" Var WaitPopup = "Enable"
Var FailPopup = "Invisible" Var FailPopup = "Invisible"
@ -957,11 +963,14 @@
<Volume> SoundVolume </Volume> <Volume> SoundVolume </Volume>
<EventClick> <EventClick>
If EnableBrewIPC = "true" Then
; CallCMDFromXML ; Direct-call-to-brew
__CMD "check-password" PassPhrase "-" "-" LoginBrew PassPhrase
Else
Var WaitPopup = "Enable" ; CallCMDFromXML
__CMD "check-password" PassPhrase "-" "-"
Var WaitPopup = "Enable"
EndIf
</EventClick> </EventClick>
</Button> </Button>

4
xml/vending_tasks_pre_main.xml
View file

@ -37,7 +37,7 @@
Var Timeout = Timeout + 1 Var Timeout = Timeout + 1
If Timeout > 60 Then If Timeout > 900 Then
StatusLog "exit" StatusLog "exit"
__CMD "cancel-pw-newui" "-" "-" "-" __CMD "cancel-pw-newui" "-" "-" "-"
@ -50,7 +50,7 @@
Var Text1_9 = Text1_9 + " " Var Text1_9 = Text1_9 + " "
Var Text1_9 = Text1_9 + SystemDate Var Text1_9 = Text1_9 + SystemDate
Var BackToMainTime = 60 - Timeout Var BackToMainTime = 900 - Timeout
DEBUGVAR tmpPassPhrase DEBUGVAR tmpPassPhrase