taobin_project/xml/page_lid_straw.xml
2024-07-19 13:51:36 +07:00

298 lines
6.7 KiB
XML

<Popup>
<Cache> "Enable" </Cache>
<Width> 1080 </Width>
<Height> 1920 </Height>
<Background> "0xeae6e1" </Background>
<Volume> SoundVolume </Volume>
<EventOpen>
; On open
Var CountUpBrewing = BrewTime - CountDownBrewing
;Var CountUpBrewing = 0
Var CountDownVideoTimeReload = AnimationVideoPlayTime
Var CountDownVideoTime = 1
Var StepVideo = 1
Var PreviseStepVideo = 90
Var Timeout = 0
If show_eng = "true" Then
Var DirImage = "ROOT/taobin_project/image/page_lid_straw_en"
Var PictureEnd = "_en.png"
Var BottomText = PicturePath + "text_bottom_eng.png"
Var lid_straw_bg_iamge = DirImage + "/img4.png"
If LidState = "Enable" Then
Var lid_straw_bg_iamge = DirImage + "/img3.png"
EndIf
Else
Var DirImage = "ROOT/taobin_project/image/page_lid_straw"
Var PictureEnd = ".png"
Var BottomText = PicturePath + "text_bottom_thai2.png"
Var lid_straw_bg_iamge = DirImage + "/img4.png"
If LidState = "Enable" Then
Var lid_straw_bg_iamge = DirImage + "/img3.png"
EndIf
EndIf
If InternationalEnable = 1 Then
Var PicturePath = "/mnt/sdcard/coffeevending/taobin_project/image/page_doing/"
Var PictureBegin = "txt_"
Var PictureEnd = "_en.png"
If SettingVideoBrewingUseCommon = 1 Then
Var VideoPath = "/mnt/sdcard/coffeevending/taobin_project/inter/common/animation01/"
Var VideoFileBegin = "TaoBin2_draft02_art"
Var VideoFileEnd = ".mp4"
Else
;inter-play-list
Var VideoPath = "/mnt/sdcard/coffeevending/taobin_project/animation01/"
Var VideoFileBegin = "TaoBin2_draft02_art"
Var VideoFileEnd = ".mp4"
EndIf
Var PicturePath = CountryRootPath + "/image/page_doing/"
Var PictureBegin = "txt_"
Var PictureEnd = "_en.png"
;inter-has-alter-anim
If CountryName = "UnitedArabEmirates Dubai" Then
;check LanguageShow
If LanguageShow = "ENG" Then
Var PicturePath = "ROOT/taobin_project/image/page_doing/"
EndIf
EndIf
Else
Var VideoPath = "/mnt/sdcard/coffeevending/taobin_project/animation01/"
Var VideoFileBegin = "TaoBin2_draft02_art"
Var VideoFileEnd = ".mp4"
Var PicturePath = "/mnt/sdcard/coffeevending/taobin_project/image/page_doing/"
Var PictureBegin = "txt_"
EndIf
Var VideoPlayFile = VideoPath
Var VideoPlayFile = VideoPlayFile + VideoFileBegin
Var VideoPlayFile = VideoPlayFile + "1"
Var VideoPlayFile = VideoPlayFile + VideoFileEnd
Var PictureFile = PicturePath
Var PictureFile = PictureFile + PictureBegin
Var PictureFile = PictureFile + "1"
Var PictureFile = PictureFile + PictureEnd
If Seeker.PayWithQR = 0 Then
If Seeker.TNumberTaobinCredit = "" Then
Var TelephoneNumber = "0899999999"
Var PayO2 = ""
If Seeker.TNumberTaobinMember = "" Then
Else
Var TelephoneNumber = Seeker.TNumberTaobinMember
EndIf
Else
Var TelephoneNumber = Seeker.TNumberTaobinCredit
Var PayO2 = Seeker.CoffeePinNumber
EndIf
EndIf
If Seeker = "next" Then
;CoinBack
If ChangeFlag2 = 0 Then
If Seeker.PayWithQR = 0 Then
DEBUGVAR TxRef1
Var PayDetail2 = ToppingDetail
DEBUGVAR PayDetail
DEBUGVAR PayDetail2
UpdateTxRef2 TxRef1 ServiceType TelephoneNumber ServiceCredit SuggestID SessionID2 ServiceAmount2 ServiceCharge Donate PayO2 PdpaAccept VendingDiscount VendingCampaign PayReference PayType CreditReference PayDetail PayDetail2
EndIf
If CountryName = "UnitedArabEmirates Dubai" Then
Var brewing3ContiInter = CountryRootPath + "/xml/page_brewing3Conti.lxml"
Open brewing3ContiInter
Else
If New_Payment = 1 Then
TRY "/mnt/sdcard/coffeevending/taobin_project/xml/process/payment.ev"
EndIf
Open "ROOT/taobin_project/xml/page_brewing3Conti.xml"
EndIf
Else
Open "ROOT/taobin_project/xml/page_get_yourchange.xml"
EndIf
Else
DEBUGVAR ChangeFlag2
If ChangeFlag2 = 0 Then
If Seeker.PayWithQR = 0 Then
DEBUGVAR TxRef1
Var PayDetail2 = ToppingDetail
DEBUGVAR PayDetail
DEBUGVAR PayDetail2
UpdateTxRef2 TxRef1 ServiceType TelephoneNumber ServiceCredit SuggestID SessionID2 ServiceAmount2 ServiceCharge Donate PayO2 PdpaAccept VendingDiscount VendingCampaign PayReference PayType CreditReference PayDetail PayDetail2
EndIf
If InternationalEnable = 1 Then
Var Brew3Inter = CountryRootPath + "/xml/page_brewing3.lxml"
Open Brew3Inter
Else
If New_Payment = 1 Then
TRY "/mnt/sdcard/coffeevending/taobin_project/xml/process/payment.ev"
EndIf
Open "ROOT/taobin_project/xml/page_brewing3.xml"
EndIf
Else
Open "ROOT/taobin_project/xml/page_get_yourchange.xml"
EndIf
EndIf
Var LidState = Lid1Status
;Lid1Status
Var StarwState = "Enable"
If Lid1Status = "Disable" Then
Var LidState = "Invisible"
EndIf
STRCONTAIN "9701" BrewParam IgnoreLidStraw
DEBUGVAR BrewParam
DEBUGVAR IgnoreLidStraw
DEBUGVAR Service_LidStraw
If IgnoreLidStraw = "true" Then
Var IgnoreLidStraw = "false"
SAVELOG "Ignore lid straw because recipe disable"
If InternationalEnable = 1 Then
Var Brew3Inter = CountryRootPath + "/xml/page_brewing3.lxml"
Open Brew3Inter
Else
Open "ROOT/taobin_project/xml/page_brewing3.xml"
EndIf
EndIf
If Service_LidStraw = "Disable" Then
SAVELOG "Service_LidStraw"
If InternationalEnable = 1 Then
Var Brew3Inter = CountryRootPath + "/xml/page_brewing3.lxml"
Open Brew3Inter
Else
Open "ROOT/taobin_project/xml/page_brewing3.xml"
EndIf
EndIf
DEBUGVAR StrawAutoRelease1
Var UserPressButton = "false"
SAVELOG "page_lid_straw.xml"
If InternationalEnable = 1 Then
Var Brew3Inter = CountryRootPath + "/xml/page_brewing3.lxml"
Open Brew3Inter
Else
Open "ROOT/taobin_project/xml/page_brewing3.xml"
EndIf
</EventOpen>
<Timeout> 1000 </Timeout>
<EventTimeout>
If CountDownBrewing > 0 Then
Var CountDownBrewing = CountDownBrewing - 1
EndIf
Var ShowCountDownBrewing = BREW_CNT
Var Timeout = Timeout + 1
If Timeout > 10 Then
If InternationalEnable = 1 Then
Var Brew3Inter = CountryRootPath + "/xml/page_brewing3.lxml"
Open Brew3Inter
Else
Open "ROOT/taobin_project/xml/page_brewing3.xml"
EndIf
EndIf
Refresh
TimerReset
</EventTimeout>
; remove by kong ; optimize new step advertise
;
<Image>
<X> 751 </X>
<Y> 413 </Y>
<Filename> page_doing_show_time_image </Filename>
</Image>
;
<Text>
<X> XPosiShowCountDownBrew </X>
<Y> 470 </Y>
<Align> End </Align>
<Width> 153 </Width>
<Size> 88 </Size>
<Font> RobotoBold </Font>
<Color> 0x513C2F </Color>
<Value> ShowCountDownBrewing </Value>
</Text>
<EventMachine>
If MachineStage = "drink-success" Then
Var MachineState_Result = 1
EndIf
If MachineStage = "drink-failed" Then
Var MachineState_Result = 2
EndIf
</EventMachine>
<EventChangeStatus>
If ChangeStatus = "payout-end" Then
EndIf
</EventChangeStatus>
</Popup>