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

THAI INTER: Smoothie, Help center

Browse source
This commit is contained in:
Ittipat Lusuk 2025-04-30 10:48:55 +07:00
parent aaeb2fa8bc
commit f9fea323bc
76 changed files with 3713 additions and 117 deletions
Download patch file Download diff file Expand all files Collapse all files

2
xml/page_NewBrewing3.xml
View file

@ -6,6 +6,8 @@
<Volume> SoundVolume </Volume>
<EventOpen>
RootLayoutVisible 3 "hide"
TRY "/mnt/sdcard/coffeevending/taobin_project/xml/process/payext_setup.ev"
Var SendNotiPaySuccess = 2

76
xml/page_board.xml
View file

@ -134,6 +134,8 @@
Var ShowButtonClick_WTC = "Invisible"
Var ShowButtonClickFull_WTC = "Invisible"
Var BtnLangToggleIndex = "Invisible"
;SAVELOG DisplayType
If DisplayType = "2" Then
@ -1314,7 +1316,35 @@
If EnableMultiInstanceFromBoxID = 1 Then
If CountryName = "Thailand" Then
; enable btn_change_langs
Var LanguageButtonEnable = "Enable"
Var ButtonLanguageCurrentXPosition = 990
Var ButtonLanguageCurrentYPosition = 608
Var ButtonLanguageListXPosition = 970
Var ButtonLanguageListYPosition = 590
OpenInst 3 "ROOT/taobin_project/xml/topview2.xml"
RootLayoutVisible 3 "show"
; enable helper
Var EnableHelperShow = 1
;Var FromDrinkOk = 1
Var CurrHelpCenter = 0
If EnableHelperShow = 1 Then
If FromDrinkOk = 1 Then
Var TimeOutShowHelpCenter = 15
Var FromSmoothieProcess = "Invisible"
Var FromPaymentCash = "Invisible"
Var FromBrewingProcess = "Enable"
RootLayoutVisible 15 "show"
OpenInst 15 "ROOT/taobin_project/inter/tha/xml/topview_helper.lxml"
Else
RootLayoutVisible 15 "hide"
EndIf
EndIf
Var EnableMultiInstance = "true"
Var MyanmarLangEnable = "true"
Var InternationalShow = 0
@ -1328,6 +1358,12 @@
Var InternationalShow = 0
EndIf
If BoxID = 210699 Then
Var SpiralOnline = "true"
Var SpiralModeFrozenFruit = 1
Var InternationalShow = 1
EndIf
; test payment
Var New_Payment = 1
@ -1457,7 +1493,13 @@
;DEBUGVAR LivenessControlVersion
;DEBUGVAR Not#CameraSettingStatus
RootLayoutVisible 3 "hide"
If EnableMultiInstanceFromBoxID = 1 Then
If CountryName = "Thailand" Then
RootLayoutVisible 3 "show"
Else
RootLayoutVisible 3 "hide"
EndIf
EndIf
If SELLSTATUS = "DEACTIVE" Then
OpenInst 0 "/ROOT/xml/offline.xml"
@ -2235,11 +2277,41 @@ PRICE "Reset" "-"
Open "ROOT/taobin_project/xml/page_sleepmode.xml"
EndIf
; for count helper show
If EnableHelperShow = 1 Then
If FromDrinkOk = 1 Then
If TimeOutShowHelpCenter > 0 Then
Var TimeOutShowHelpCenter = TimeOutShowHelpCenter - 1
EndIf
If TimeOutShowHelpCenter = 0 Then
Var FromDrinkOk = 0
If CurrHelpCenter = 1 Then
;do not thing
Else
OpenInst 15 "/mnt/sdcard/coffeevending/taobin_project/inter/tha/xml/page_instance_empty.lxml"
EndIf
EndIf
EndIf
EndIf
Refresh
TimerReset
</EventTimeout>
<EventLanguageOnChange>
Var LanguageButtonEnable = "Enable"
Var ButtonLanguageCurrentXPosition = 990
Var ButtonLanguageCurrentYPosition = 608
Var ButtonLanguageListXPosition = 970
Var ButtonLanguageListYPosition = 590
OpenInst 3 "ROOT/taobin_project/xml/topview2.xml"
RefreshAll
</EventLanguageOnChange>
<EventEnd>
SAVELOG "EVENT END"

2
xml/page_brewing3.xml
View file

@ -5,7 +5,7 @@
<Background> "0xeae6e1" </Background>
<Volume> SoundVolume </Volume>
<EventOpen>
RootLayoutVisible 3 "hide"
If New_Payment = 1 Then
Open "ROOT/taobin_project/xml/page_NewBrewing3.xml"

3
xml/page_brewing3Conti.xml
View file

@ -5,7 +5,8 @@
<Background> "0xeae6e1" </Background>
<Volume> SoundVolume </Volume>
<EventOpen>
RootLayoutVisible 3 "hide"
Var waitAckPay = 0
Var ChangeFlag = 0

3
xml/page_drinkok.xml
View file

@ -293,6 +293,9 @@
Var EnableDoorJamAlert = 0
; helper show in page_board
Var FromDrinkOk = 1
</EventOpen>
<Timeout> 500 </Timeout>
<EventTimeout>

126
xml/page_payment_cash.xml
View file

@ -430,7 +430,11 @@
If New_Payment = 1 Then
__CMD "SetPay" "coffee-payment" Seeker.VendingTSID Seeker.ORDER_ID
EndIf
MakeDrinkV1 SelectDrink SelectSugarID
If SmoothieToPayment = 1 Then
; do nothing
Else
MakeDrinkV1 SelectDrink SelectSugarID
EndIf
Var TxRef1 = ""
CreateTxRef1 TxRef1
Else
@ -441,7 +445,11 @@
Var PaidPaymentFromNextStage = 1
EndIf
Open "ROOT/taobin_project/xml/page_thankyou.xml"
If SmoothieToPayment = 1 Then
Open "ROOT/taobin_project/xml/page_spiral_sell.xml"
Else
Open "ROOT/taobin_project/xml/page_thankyou.xml"
EndIf
EndIf
@ -457,7 +465,11 @@
If New_Payment = 1 Then
__CMD "SetPay" "coffee-payment" Seeker.VendingTSID Seeker.ORDER_ID
EndIf
MakeDrinkV1 SelectDrink SelectSugarID
If SmoothieToPayment = 1 Then
; do nothing
Else
MakeDrinkV1 SelectDrink SelectSugarID
EndIf
Var TxRef1 = ""
CreateTxRef1 TxRef1
Else
@ -468,7 +480,11 @@
Var PaidPaymentFromNextStage = 1
EndIf
Open "ROOT/taobin_project/xml/page_thankyou.xml"
If SmoothieToPayment = 1 Then
Open "ROOT/taobin_project/xml/page_spiral_sell.xml"
Else
Open "ROOT/taobin_project/xml/page_thankyou.xml"
EndIf
EndIf
@ -1290,6 +1306,17 @@
Var X_CASH3 = 664 - 113
EndIf
Var FromSmoothieProcess = "Invisible"
Var FromPaymentCash = "Enable"
Var FromBrewingProcess = "Invisible"
If EnableHelperShow = 1 Then
Var Showhelper = "Enable"
Else
Var Showhelper = "Invisible"
EndIf
</EventOpen>
<EventActionOk>
@ -1370,7 +1397,11 @@
If New_Payment = 1 Then
__CMD "SetPay" "coffee-payment" Seeker.VendingTSID Seeker.ORDER_ID
EndIf
MakeDrinkV1 SelectDrink SelectSugarID
If SmoothieToPayment = 1 Then
; do nothing
Else
MakeDrinkV1 SelectDrink SelectSugarID
EndIf
;Var TxRef1 = ""
;CreateTxRef1 TxRef1
EndIf
@ -1378,7 +1409,11 @@
Var GIFShowProcess = "ROOT/ui/page_05_loading/pic_loading_cup.gif"
Var BrewingTextThai = "เตรียมแก้ว"
Open "ROOT/taobin_project/xml/page_thankyou.xml"
If SmoothieToPayment = 1 Then
Open "ROOT/taobin_project/xml/page_spiral_sell.xml"
Else
Open "ROOT/taobin_project/xml/page_thankyou.xml"
EndIf
EndIf
@ -1924,12 +1959,20 @@
If New_Payment = 1 Then
__CMD "SetPay" "coffee-payment" Seeker.VendingTSID Seeker.ORDER_ID
EndIf
MakeDrinkV1 SelectDrink SelectSugarID
If SmoothieToPayment = 1 Then
; do nothing
Else
MakeDrinkV1 SelectDrink SelectSugarID
EndIf
EndIf
Var Seeker.CreditCard = 1
Var Seeker.CreditCardRef = CreditCardRef
Open "ROOT/taobin_project/xml/page_thankyou.xml"
If SmoothieToPayment = 1 Then
Open "ROOT/taobin_project/xml/page_spiral_sell.xml"
Else
Open "ROOT/taobin_project/xml/page_thankyou.xml"
EndIf
EndIf
EndIf
@ -2170,8 +2213,12 @@
If TestLoopMakeDrink = 1 Then
MakeDrinkV1 SelectDrink SelectSugarID
Open "ROOT/taobin_project/xml/page_thankyou.xml"
If SmoothieToPayment = 1 Then
Open "ROOT/taobin_project/xml/page_spiral_sell.xml"
Else
MakeDrinkV1 SelectDrink SelectSugarID
Open "ROOT/taobin_project/xml/page_thankyou.xml"
EndIf
EndIf
@ -2202,7 +2249,11 @@
If New_Payment = 1 Then
__CMD "SetPay" "coffee-payment" Seeker.VendingTSID Seeker.ORDER_ID
EndIf
MakeDrinkV1 SelectDrink SelectSugarID
If SmoothieToPayment = 1 Then
; do nothing
Else
MakeDrinkV1 SelectDrink SelectSugarID
EndIf
Var TxRef1 = ""
CreateTxRef1 TxRef1
Else
@ -2213,7 +2264,11 @@
EndIf
Open "ROOT/taobin_project/xml/page_thankyou.xml"
If SmoothieToPayment = 1 Then
Open "ROOT/taobin_project/xml/page_spiral_sell.xml"
Else
Open "ROOT/taobin_project/xml/page_thankyou.xml"
EndIf
Else
If CancelFlag = 0 Then
@ -2754,7 +2809,25 @@
EndIf
</EventVDCancle>
; helper button
<Button>
<X> 990 </X>
<Y> 430 </Y>
<State> Showhelper </State>
<Filename> "ROOT/taobin_project/image/page_payment/helper.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/page_payment/helper.png" </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var OpenFromXML = "ROOT/taobin_project/xml/page_payment_cash.xml"
OpenInst 3 "ROOT/taobin_project/xml/topview2.xml"
OpenInst 15 "ROOT/taobin_project/inter/tha/xml/page_help_center.lxml"
;RootLayoutVisible 15 "show"
</EventClick>
</Button>
<Image>
@ -2885,8 +2958,12 @@
Var GIFShowProcess = "ROOT/ui/page_05_loading/pic_loading_cup.gif"
Var MachineStage = "make-drink"
Var BrewingTextThai = "เตรียมแก้ว"
MakeDrinkV1 SelectDrink SelectSugarID
Open "ROOT/taobin_project/xml/page_thankyou.xml"
If SmoothieToPayment = 1 Then
Open "ROOT/taobin_project/xml/page_spiral_sell.xml"
Else
MakeDrinkV1 SelectDrink SelectSugarID
Open "ROOT/taobin_project/xml/page_thankyou.xml"
EndIf
;Pay ServiceType TelephoneNumber ServiceCredit SuggestID SessionID2 ServiceAmount2 ServiceCharge Donate
EndIf
@ -3737,11 +3814,19 @@ eval(
If IgnoreNetCore = "true" Then
If Seeker = "curr" Then
MakeDrinkV1 SelectDrink SelectSugarID
If SmoothieToPayment = 1 Then
; do nothing
Else
MakeDrinkV1 SelectDrink SelectSugarID
EndIf
Else
EndIf
Open "ROOT/taobin_project/xml/page_thankyou.xml"
If SmoothieToPayment = 1 Then
Open "ROOT/taobin_project/xml/page_spiral_sell.xml"
Else
Open "ROOT/taobin_project/xml/page_thankyou.xml"
EndIf
EndIf
</EventClick>
</Button>
@ -3758,9 +3843,12 @@ eval(
</Text>
<EventUnitTest1>
MakeDrinkV1 SelectDrink SelectSugarID
Open "ROOT/taobin_project/xml/page_thankyou.xml"
If SmoothieToPayment = 1 Then
Open "ROOT/taobin_project/xml/page_spiral_sell.xml"
Else
MakeDrinkV1 SelectDrink SelectSugarID
Open "ROOT/taobin_project/xml/page_thankyou.xml"
EndIf
</EventUnitTest1>

56
xml/page_spiral_failed.xml Normal file
View file

@ -0,0 +1,56 @@
<Popup>
<Cache> "Enable" </Cache>
<Width> 1080 </Width>
<Height> 1920 </Height>
<Background> "0xeae6e1" </Background>
;<Sound> "ROOT/taobin_project/sounds/chaching.mp3" </Sound>
<Volume> SoundVolume </Volume>
<EventOpen>
Var Timeout = 0
Var ShowSwapVDO = "ROOT/taobin_project/spiral/video/sp01.mp4"
</EventOpen>
<Timeout> 1000 </Timeout>
<EventTimeout>
Var Timeout = Timeout + 1
If Timeout > 3 Then
Open "ROOT/taobin_project/xml/page_back_to_main.xml"
EndIf
TimerReset
Refresh
</EventTimeout>
<EventActionOk>
</EventActionOk>
<Image>
<X> 89 </X>
<Y> 700 </Y>
<Width> 902 </Width>
<Height> 902 </Height>
<Filename> "ROOT/taobin_project/spiral/image/page_spiral/spiral_fail.png" </Filename>
</Image>
<Image>
<X> 84 </X>
<Y> 1314 </Y>
<Width> 911 </Width>
<Height> 265 </Height>
<Filename> "ROOT/taobin_project/spiral/image/page_spiral/spiral_text_fail.png" </Filename>
</Image>
;include="ROOT/taobin_project/inc/video.inc"
</Popup>

133
xml/page_spiral_sell.xml Normal file
View file

@ -0,0 +1,133 @@
<Popup>
<Cache> "Enable" </Cache>
<Width> 1080 </Width>
<Height> 1920 </Height>
<Background> "0xeae6e1" </Background>
;<Sound> "ROOT/taobin_project/sounds/chaching.mp3" </Sound>
<Volume> SoundVolume </Volume>
<EventOpen>
Var Timeout = 0
Var LastMakeSpiralResult = 0
Var ShowSwapVDO = "ROOT/taobin_project/spiral/video/sp01.mp4"
GenHashWithTimeStamp SpiralRef
Var ServiceCredit = "03-02-00-6001"
SPIRAL_SELL ServiceCredit SpiralRef
Var SmoothieToPayment = 0
Var TimeOutSmoothiesProcess = 120
</EventOpen>
<Timeout> 1000 </Timeout>
<EventTimeout>
Var Timeout = Timeout + 1
If LastMakeSpiralResult = 1 Then
Var SessionID4 = MachineSpiralID
Var SessionID4 = SessionID4 + ":"
Var SessionID4 = SessionID4 + MachineSpiralVMName
Var SessionID4 = SessionID4 + ":"
Var SessionID4 = SessionID4 + MachineSpiralSlotID
Var SessionID4 = SessionID4 + ":"
Var SessionID4 = SessionID4 + ServiceCredit
Var SessionID4 = SessionID4 + ":"
Var SessionID4 = SessionID4 + 1
Var SessionID4 = SessionID4 + ":"
Var SessionID4 = SessionID4 + MachineSpiralRemaining
Var PayDetail="S:0:"
Var PayDetail = PayDetail + SessionID4
Var Cid = 27
Var PointCrm = CounterOrderId
If FromCounterMulti = 1 Then
Var PointCrm = PayReference
EndIf
Var GetScore = Seeker.VendingTSID
Var param1 = PayDetail
Var ACC = "0899999999"
AddData Cid ACC param1 PointCrm GetScore
;Open "ROOT/taobin_project/xml/page_spiral_success.xml"
OpenInst 3 "ROOT/taobin_project/xml/topview2.xml"
Open "ROOT/taobin_project/inter/tha/xml/page_smoothie_suggest_and_process.xml"
EndIf
If LastMakeSpiralResult = 2 Then
Var SessionID4 = MachineSpiralID
Var SessionID4 = SessionID4 + ":"
Var SessionID4 = SessionID4 + MachineSpiralVMName
Var SessionID4 = SessionID4 + ":"
Var SessionID4 = SessionID4 + MachineSpiralSlotID
Var SessionID4 = SessionID4 + ":"
Var SessionID4 = SessionID4 + ServiceCredit
Var SessionID4 = SessionID4 + ":"
Var SessionID4 = SessionID4 + 1
Var SessionID4 = SessionID4 + ":"
Var SessionID4 = SessionID4 + MachineSpiralRemaining
Var PayDetail="F:"
Var PayDetail = PayDetail + MachineSpiralErrorCode
Var PayDetail = PayDetail + ":"
Var PayDetail = PayDetail + SessionID4
Var Cid = 27
Var PointCrm = CounterOrderId
If FromCounterMulti = 1 Then
Var PointCrm = PayReference
EndIf
Var GetScore = Seeker.VendingTSID
Var param1 = PayDetail
Var ACC = "0899999999"
AddData Cid ACC param1 PointCrm GetScore
Open "ROOT/taobin_project/xml/page_spiral_failed.xml"
EndIf
If BoxID = 210699 Then
;If Timeout > 10 Then
;Open "ROOT/taobin_project/xml/page_spiral_failed.xml"
;EndIf
If Timeout > 10 Then
OpenInst 3 "ROOT/taobin_project/xml/topview2.xml"
Open "ROOT/taobin_project/inter/tha/xml/page_smoothie_suggest_and_process.xml"
EndIf
EndIf
If Timeout > 120 Then
Open "ROOT/taobin_project/xml/page_back_to_failed.xml"
EndIf
TimerReset
Refresh
</EventTimeout>
<Video>
<X> 0 </X>
<Y> 700 </Y>
<Width> 1080</Width>
<Height> 840 </Height>
<Refresh> "Reload" </Refresh>
<Loop> "true" </Loop>
<Filename> ShowSwapVDO </Filename>
;<Filename> "ROOT/taobin_project/spiral/video/sp01.mp4" </Filename>
</Video>
<EventActionOk>
</EventActionOk>
;include="ROOT/taobin_project/inc/video.inc"
</Popup>

3
xml/page_thankyou.xml
View file

@ -7,6 +7,9 @@
<Volume> SoundVolume </Volume>
<EventOpen>
; On open
RootLayoutVisible 3 "hide"
Var CountDownThankyou = 3
Var CountDownBrewing = BrewTime
Var CountUpBrewing = 0

1
xml/topview2.xml
View file

@ -19,6 +19,7 @@
EndIf
If CountryName = "Thailand" Then
Var BtnLangToggleIndex = "Invisible"
TRY topview2_script
EndIf