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

THAI: Added Halloween promotion

Browse source
This commit is contained in:
Kenta420 2024-10-08 12:49:38 +07:00
parent 8f878da088
commit c90edea31e
172 changed files with 30448 additions and 493 deletions
Download patch file Download diff file Expand all files Collapse all files

106
xml/page_thankyou.xml
View file

@ -30,7 +30,7 @@
Var FailedCount = 0
Var ChangeAmountSum = 0
Var Tel_Confirm_Flag = 0
Var TimeoutToNext = 3
@ -48,8 +48,8 @@
WRITE_FILE "/mnt/sdcard/coffeevending/log/drink-success" "--"
EndIf
If show_eng = "true" Then
Var ImageDoing = "ROOT/taobin_project/image/page_doing/img2_eng.png"
If show_eng = "true" Then
Var ImageDoing = "ROOT/taobin_project/image/page_doing/img2_eng.png"
Var show_btp = "ROOT/taobin_project/image/bn_thai_lang_press.png"
Var show_btn = "ROOT/taobin_project/image/bn_thai_lang.png"
@ -57,7 +57,7 @@
Var DirImage = "ROOT/taobin_project/image/page_thankyou_en"
Else
Var ImageDoing = "ROOT/taobin_project/image/page_doing/img2.png"
Var ImageDoing = "ROOT/taobin_project/image/page_doing/img2.png"
Var show_btp = "ROOT/taobin_project/image/bn_eng_lang_press.png"
Var show_btn = "ROOT/taobin_project/image/bn_eng_lang.png"
Var BottomText = PicturePath + "text_bottom_thai2.png"
@ -86,7 +86,7 @@
If Seeker = "next" Then
Var NextOrder = "true"
EndIf
If VendingCreditRemain = "" Then
Var RemainCreditST = "Invisible"
@ -114,25 +114,25 @@
DEBUGVAR SaveTheWorldCount
If SaveTheWorldCount = 2 Then
If LedLidBlink = "no" Then
Var SaveTheWorldST = "Enable"
EndIf
Var video_id_to_ran = 3
Var video_name_to_play = "taobin_save_world"
Random2 1 3 video_id_to_ran
Var ThankyouST = "Invisible"
Else
Var video_id_to_ran = 2
Var video_name_to_play = "taobin_thank"
Random2 1 2 video_id_to_ran
Var ThankyouST = "Enable"
EndIf
@ -140,14 +140,14 @@
DEBUGVAR video_id_to_ran
Var show_video = 1
Var SaveTheWorldST = "Invisible"
Var SaveTheWorldST = "Invisible"
If InternationalEnable = 1 Then
Var video_file_name = "ROOT/taobin_project/inter/common/video/" + video_name_to_play
Else
Var video_file_name = "ROOT/taobin_project/video/" + video_name_to_play
Var video_file_name = "ROOT/taobin_project/video/" + video_name_to_play
EndIf
Var video_file_name = video_file_name + video_id_to_ran
Var video_file_name = video_file_name + ".mp4"
Var video_file_name = video_file_name + video_id_to_ran
Var video_file_name = video_file_name + ".mp4"
If SaveTheWorldCount < 2 Then
@ -158,11 +158,11 @@
TRY "/mnt/sdcard/coffeevending/taobin_project/video/script2.ev"
EndIf
EndIf
DEBUGVAR video_file_name
Var VideoFileNameStage = "Enable"
Var TimeoutToNext = 5
Var ThankyouST = "Invisible"
@ -177,7 +177,7 @@
;inter-image
If CountryName = "Indonesia" Then
Var remainCredit = "/remainCredit-IDR.png"
EndIf
EndIf
;inter-image
If CountryName = "Australia" Then
@ -198,22 +198,22 @@
DEBUGVAR Seeker.CreditCardRef
TRY "/mnt/sdcard/coffeevending/taobin_project/xml/sometime/script_thankyou.ev"
</EventOpen>
<Timeout> 1000 </Timeout>
<EventTimeout>
<EventTimeout>
Var CountDownBrewing = BREW_CNT
Var Timeout = Timeout + 1
Var Timeout = Timeout + 1
If Timeout = TimeoutToNext Then
If CART_INDEX = 0 Then
If CART_INDEX = 0 Then
Else
;Cart "MakeID" CART_INDEX
EndIf
If Seeker.PayWithQR = 0 Then
If Seeker.FreeVendingCampaign = 0 Then
@ -221,10 +221,10 @@
If Seeker.CreditCard = 1 Then
DEBUGVAR CoinAmount
If CoinAmount > 0 Then
DEBUGVAR "Change Canout"
Change CoinAmount
Change CoinAmount
Var ChangeFlag2 = 1
EndIf
@ -237,19 +237,19 @@
Var DetectCoinAmount = 1
EndIf
Else
If Seeker.IntVendingCampaign < PayAmount Then
If Seeker.IntVendingCampaign < PayAmount Then
Var SumCoinAmount = CoinAmount + Seeker.IntVendingCampaign
Var SumCoinAmount = SumCoinAmount + Seeker.IntVendingCredit
If SumCoinAmount >= PayAmount Then
If SumCoinAmount >= PayAmount Then
Var Canout = SumCoinAmount - PayAmount
If Canout > 0 Then
;Change Canout
;Change Canout
;Var ChangeFlag2 = 1
Var GotoStoreCredit0 = 1
Var StoreCreditAmount = Canout
EndIf
EndIf
EndIf
@ -260,12 +260,12 @@
Else
Var Canout = CoinAmount
If Canout > 0 Then
;Change Canout
;Change Canout
;Var ChangeFlag2 = 1
Var GotoStoreCredit0 = 1
Var StoreCreditAmount = Canout
@ -276,7 +276,7 @@
Var Canout = CoinAmount
If Canout > 0 Then
;Change Canout
;Change Canout
;Var ChangeFlag2 = 1
Var GotoStoreCredit0 = 1
Var StoreCreditAmount = Canout
@ -285,14 +285,14 @@
EndIf
Var CountDownThankyou = 0
EndIf
; run test;
If CountDownThankyou = 0 Then
If IgnoreNetCore = "true" Then
If CountDownThankyou = 0 Then
If IgnoreNetCore = "true" Then
If Seeker.IsLineMember = 0 Then
If LuckyDrawCampaign = 1 Then
Open "ROOT/taobin_project/xml/sometime/page_campaign_ads_lucky_draw.xml"
@ -304,8 +304,8 @@
EndIf
EndIf
If TestLoopMakeDrink = 1 Then
Open "ROOT/taobin_project/xml/page_brewing_test_loop.xml"
If TestLoopMakeDrink = 1 Then
Open "ROOT/taobin_project/xml/page_brewing_test_loop.xml"
EndIf
Var CountDownBrewing = BrewTime
@ -380,7 +380,7 @@
DEBUGVAR PayDetail
DEBUGVAR PayDetail2
UpdateTxRef2 TxRef1 ServiceType TelephoneNumber ServiceCredit SuggestID SessionID2 ServiceAmount2 ServiceCharge Donate PayO2 PdpaAccept VendingDiscount VendingCampaign PayReference PayType CreditReference PayDetail PayDetail2
UpdateTxRef2 TxRef1 ServiceType TelephoneNumber ServiceCredit SuggestID SessionID2 ServiceAmount2 ServiceCharge Donate PayO2 PdpaAccept VendingDiscount VendingCampaign PayReference PayType CreditReference PayDetail PayDetail2
Else
DEBUGVAR TxRef1
@ -388,7 +388,7 @@
DEBUGVAR PayDetail
DEBUGVAR PayDetail2
UpdateTxRef2 TxRef1 ServiceType TelephoneNumber ServiceCredit SuggestID SessionID2 ServiceAmount2 ServiceCharge Donate PayO2 PdpaAccept VendingDiscount VendingCampaign PayReference PayType CreditReference PayDetail PayDetail2
UpdateTxRef2 TxRef1 ServiceType TelephoneNumber ServiceCredit SuggestID SessionID2 ServiceAmount2 ServiceCharge Donate PayO2 PdpaAccept VendingDiscount VendingCampaign PayReference PayType CreditReference PayDetail PayDetail2
EndIf
EndIf
@ -396,13 +396,13 @@
If StoreCreditAmount > 0 Then
Change StoreCreditAmount
Change StoreCreditAmount
Var ChangeFlag2 = 1
EndIf
If CART_INDEX >= 2 Then
If CART_INDEX >= 2 Then
If Seeker.IsLineMember = 0 Then
If LuckyDrawCampaign = 1 Then
Open "ROOT/taobin_project/xml/sometime/page_campaign_ads_lucky_draw.xml"
@ -460,7 +460,7 @@
If CoinAmount >= ServiceAmountSupCampain Then
DEBUGVAR Seeker.IntVendingCredit
Var CurrAmount = Seeker.CurrCreditAmount - Seeker.IntVendingCredit
Var Seeker.IntVendingCredit = 0
Var RefID = "0/" + Seeker.CreditNotEnoughRefID
@ -497,7 +497,7 @@
Open "ROOT/taobin_project/xml/page_lid_straw.xml"
EndIf
Else
If CART_INDEX >= 2 Then
If CART_INDEX >= 2 Then
If Seeker.IsLineMember = 0 Then
If LuckyDrawCampaign = 1 Then
Open "ROOT/taobin_project/xml/sometime/page_campaign_ads_lucky_draw.xml"
@ -506,7 +506,7 @@
EndIf
Else
Open "ROOT/taobin_project/xml/page_lid_straw.xml"
EndIf
EndIf
EndIf
TRY "ROOT/taobin_project/xml/open_page_collect_point.ev"
@ -529,7 +529,7 @@
Open MemberPrompt
EndIf
Else
Open "ROOT/taobin_project/xml/page_payment_storeCredit0.xml"
Open "ROOT/taobin_project/xml/page_payment_storeCredit0.xml"
EndIf
Else
@ -557,7 +557,7 @@
Open "ROOT/taobin_project/xml/page_lid_straw.xml"
EndIf
Else
If CART_INDEX >= 2 Then
If CART_INDEX >= 2 Then
If Seeker.IsLineMember = 0 Then
If LuckyDrawCampaign = 1 Then
Open "ROOT/taobin_project/xml/sometime/page_campaign_ads_lucky_draw.xml"
@ -571,17 +571,17 @@
TRY "ROOT/taobin_project/xml/open_page_collect_point.ev"
EndIf
EndIf
EndIf
EndIf
EndIf
EndIf
Var ShowCountDownBrewing = CountDownBrewing
Refresh
TimerReset
</EventTimeout>
</EventTimeout>
;<Image>
;<X> 0 </X>
@ -655,8 +655,8 @@
;</Text>
<EventChangeStatus>
If ChangeStatus = "payout-end" Then
If ChangeStatus = "payout-end" Then
EndIf
</EventChangeStatus>