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

THAI: 3 dialects sound

Browse source
This commit is contained in:
Kenta420 2025-03-25 10:51:41 +07:00
parent 78afd9aaf3
commit 3156f29f5f
32 changed files with 1614 additions and 1356 deletions
Download patch file Download diff file Expand all files Collapse all files

2328
xml/event/promotion_matcha_every_day.xml
View file

File diff suppressed because it is too large Load diff

7
xml/event/tricker.ev
View file

@ -74,6 +74,10 @@ Var MatchaEveryDayPro = 0
; Kingdom of Thai tea, 1 Apr - 30 Apr
Var KingdomThaiTeaPro = 0
; 3 dialects sound campaign, 1 Apr - 30 Apr
Var SongkranSoundCampaign = 0
Var NewCollectPoint = 1
Var PaymentCodeShouldCollectPromotionPoint = 0
@ -137,6 +141,8 @@ If SystemDateMonthInt = 4 Then
If SystemDateDayInt < 7 Then
Var AdvertisePepsiAtTheSun = 1
EndIf
Var KingdomThaiTeaPro = 1
Var SongkranSoundCampaign = 1
EndIf
If SystemDateMonthInt = 3 Then
If SystemDateDayInt = 31 Then
@ -147,6 +153,7 @@ EndIf
If SystemDateMonthInt = 4 Then
Var KingdomThaiTeaPro = 1
Var SongkranSoundCampaign = 1
EndIf

28
xml/page_NewBrewing3.xml
View file

@ -98,16 +98,8 @@
Else
Var PlaySoundLag = "ROOT/taobin_project/sound_thai/thankyou.mp3"
; Play Sound #zone
If SoundBackToSchoolEnable = 1 Then
If SoundBackToSchoolType = 1 Then
Var RootPathSoundBackToSchool = "/mnt/sdcard/coffeevending/taobin_project/sound_thai/boy/"
EndIf
If SoundBackToSchoolType = 2 Then
Var RootPathSoundBackToSchool = "/mnt/sdcard/coffeevending/taobin_project/sound_thai/girl/"
EndIf
Var PlaySoundLag = RootPathSoundBackToSchool + "thankyou.wav"
If SongkranSoundCampaign = 1 Then
Var PlaySoundLag = ThankyouSound[SoundCampaignIndex]
EndIf
Play PlaySoundLag
@ -769,20 +761,8 @@
Var PlaySoundLag = "/mnt/sdcard/coffeevending/taobin_project/sound_thai/next_drink.mp3"
If FromJemilaPro = 1 Then
Var PlaySoundLag = "/mnt/sdcard/coffeevending/taobin_project/sound_thai/jemila/next_drink.m4a"
EndIf
; Play Sound #zone
If SoundBackToSchoolEnable = 1 Then
If SoundBackToSchoolType = 1 Then
Var RootPathSoundBackToSchool = "/mnt/sdcard/coffeevending/taobin_project/sound_thai/boy/"
EndIf
If SoundBackToSchoolType = 2 Then
Var RootPathSoundBackToSchool = "/mnt/sdcard/coffeevending/taobin_project/sound_thai/girl/"
EndIf
Var PlaySoundLag = RootPathSoundBackToSchool + "next_drink.wav"
If SongkranSoundCampaign = 1 Then
Var PlaySoundLag = NextDrinkSound[SoundCampaignIndex]
EndIf
PlayLong PlaySoundLag

2
xml/page_catalog.xml
View file

@ -12,6 +12,8 @@
Open "/mnt/sdcard/coffeevending/taobin_project/xml/page_catalog.lxml"
EndIf
TRY "/mnt/sdcard/coffeevending/taobin_project/xml/sometime/campaign_sound.ev"
If CatalogLayoutV3 = 1 Then
TRY "/mnt/sdcard/coffeevending/taobin_project/xml/v3/open_catalog.ev"
Else

12
xml/page_catalog3.xml
View file

@ -79,16 +79,8 @@
Var PlaySoundLag = "/mnt/sdcard/coffeevending/taobin_project/sound_thai/taobin_sawade.mp3"
; Play Sound #zone
If SoundBackToSchoolEnable = 1 Then
If SoundBackToSchoolType = 1 Then
Var RootPathSoundBackToSchool = "/mnt/sdcard/coffeevending/taobin_project/sound_thai/boy/"
EndIf
If SoundBackToSchoolType = 2 Then
Var RootPathSoundBackToSchool = "/mnt/sdcard/coffeevending/taobin_project/sound_thai/girl/"
EndIf
Var PlaySoundLag = RootPathSoundBackToSchool + "taobin_sawade.wav"
If SongkranSoundCampaign = 1 Then
Var PlaySoundLag = GreetingSound[SoundCampaignIndex]
EndIf
Play PlaySoundLag

12
xml/page_catalog_with_vending.xml
View file

@ -14,6 +14,8 @@
Var MenuHealthyEnable = "Disable"
EndIf
TRY "/mnt/sdcard/coffeevending/taobin_project/xml/sometime/campaign_sound.ev"
If Seeker = "next" Then
;Open "ROOT/taobin_project/xml/page_catalog.xml"
EndIf
@ -63,14 +65,8 @@
Var show_btn = "ROOT/taobin_project/image/bn_eng_lang.png"
Var PlaySoundLag = "/mnt/sdcard/coffeevending/taobin_project/sound_thai/taobin_sawade.mp3"
If SoundThaiIndex = 1 Then
Var PlaySoundLag = "/mnt/sdcard/coffeevending/taobin_project/sound_thai/sublang/north/taobin_sawade.wav"
EndIf
If SoundThaiIndex = 2 Then
Var PlaySoundLag = "/mnt/sdcard/coffeevending/taobin_project/sound_thai/sublang/northeast/taobin_sawade.wav"
EndIf
If SoundThaiIndex = 3 Then
Var PlaySoundLag = "/mnt/sdcard/coffeevending/taobin_project/sound_thai/sublang/south/taobin_sawade.wav"
If SongkranSoundCampaign = 1 Then
Var PlaySoundLag = GreetingSound[SoundCampaignIndex]
EndIf
Play PlaySoundLag

32
xml/page_drinkok.xml
View file

@ -28,7 +28,7 @@
Var DirImage2 = "ROOT/taobin_project/image/topping2"
EndIf
If LanguageShow = "MYANMAR" Then
If LanguageShow = "MYANMAR" Then
Var DirImage2 = "ROOT/taobin_project/image/topping_mmr"
EndIf
@ -72,15 +72,15 @@
Var DirImage = "ROOT/taobin_project/image/complete/"
EndIf
If LanguageShow = "MYANMAR" Then
If LanguageShow = "MYANMAR" Then
Var DirImage = "ROOT/taobin_project/image/complete_mmr/"
EndIf
If LanguageShow = "MSC" Then
If LanguageShow = "MSC" Then
Var DirImage = "ROOT/taobin_project/inter/hkg/image/complete_msc/"
EndIf
If LanguageShow = "MTC" Then
If LanguageShow = "MTC" Then
Var DirImage = "ROOT/taobin_project/inter/hkg/image/complete_mtc/"
EndIf
@ -142,7 +142,7 @@
If show_eng = "true" Then
If LanguageShow = "MYANMAR" Then
If LanguageShow = "MYANMAR" Then
Var bnStrawProblemReport = "ROOT/taobin_project/image/page_doing/bn_send_report_straw_mmr.png"
Var bpStrawProblemReport = "ROOT/taobin_project/image/page_doing/bp_send_report_straw_mmr.png"
Else
@ -278,10 +278,10 @@
Var TextDoorJamStage = "Invisible"
Var CountUpDoorJamAlert = 0
Var BlinkUpDoorJamAlert = 0
Var EnableDoorJamAlert = 0
</EventOpen>
<Timeout> 500 </Timeout>
<EventTimeout>
@ -443,8 +443,8 @@
If CountryName = "Thailand" Then
Var PlaySoundLag = "/mnt/sdcard/coffeevending/taobin_project/sound_thai/drinkfinish.mp3"
If FromJemilaPro = 1 Then
Var PlaySoundLag = "/mnt/sdcard/coffeevending/taobin_project/sound_thai/jemila/drinkfinish.m4a"
If SongkranSoundCampaign = 1 Then
Var PlaySoundLag = DrinkFinishSound[SoundCampaignIndex]
EndIf
Else
Var PlaySoundLag = "/mnt/sdcard/coffeevending/taobin_project/sound_eng/Straw.mp3"
@ -484,9 +484,9 @@
EndIf
If EnableDoorJamAlert = 1 Then
Var BlinkUpDoorJamAlert = BlinkUpDoorJamAlert + 1
If DOOR_CUP_OPEN_ERROR = "true" Then
Var CountUpDoorJamAlert = CountUpDoorJamAlert + 1
@ -499,13 +499,13 @@
EndIf
If CountUpDoorJamAlert > 8 Then
DEBUGVAR DOOR_CUP_OPEN_ERROR
DEBUGVAR DOOR_CUP_CLOSE_ERROR
DEBUGVAR DOOR_CUP_OPEN_ERROR
DEBUGVAR DOOR_CUP_CLOSE_ERROR
Var TextBottomShow = "Invisible"
;Var TextDoorJamStage = "Enable"
If BlinkUpDoorJamAlert > 1 Then
Var TextDoorJamStage = "Enable"
Var BlinkUpDoorJamAlert = 0
@ -520,7 +520,7 @@
Var TextBottomShow = "Enable"
Var TextDoorJamStage = "Invisible"
EndIf
If show_eng = "true" Then
Var TextDoorJamString = " Door Error. "
Else

16
xml/page_payment.xml
View file

@ -188,20 +188,8 @@
Var DirImage = "ROOT/taobin_project/image/page_payment"
Var PlaySoundLag = "ROOT/taobin_project/sound_thai/payment.mp3"
If FromJemilaPro = 1 Then
Var PlaySoundLag = "/mnt/sdcard/coffeevending/taobin_project/sound_thai/jemila/payment.m4a"
EndIf
; Play Sound #zone
If SoundBackToSchoolEnable = 1 Then
If SoundBackToSchoolType = 1 Then
Var RootPathSoundBackToSchool = "/mnt/sdcard/coffeevending/taobin_project/sound_thai/boy/"
EndIf
If SoundBackToSchoolType = 2 Then
Var RootPathSoundBackToSchool = "/mnt/sdcard/coffeevending/taobin_project/sound_thai/girl/"
EndIf
Var PlaySoundLag = RootPathSoundBackToSchool + "payment.wav"
If SongkranSoundCampaign = 1 Then
Var PlaySoundLag = SelectPayMethodSound[SoundCampaignIndex]
EndIf
If CountryName = "HongKong" Then

231
xml/page_payment_credit2.xml
View file

@ -4,9 +4,7 @@
<Width> 1080 </Width>
<Height> 1920 </Height>
<Background> "0xeae6e1" </Background>
<Volume> SoundVolume </Volume>
<Refresh> "Partial" </Refresh>
<EventOpen>
; On open
@ -18,8 +16,8 @@
Var Timeout = 0
Var TimeoutSMS = 0
Var StateBGetSMS = "Enable"
Var ShowSentSmsText = "Invisible"
Var ShowTextNumber1 = "Invisible"
@ -27,6 +25,9 @@
Var ShowTextNumber3 = "Invisible"
Var ShowTextNumber4 = "Invisible"
Var LoadingState = "Invisible"
Var ShowLoadingIn = 3
Var ShowErrorText = "Invisible"
Var Tel_Confirm_State = "Invisible"
@ -37,15 +38,15 @@
Var Xtext = 246
Var Ytext_16 = 699
If show_eng = "true" Then
If show_eng = "true" Then
Var DirImage = "ROOT/taobin_project/image/collectiing_en"
Var Xtext = 246
Else
Var DirImage = "ROOT/taobin_project/image/collectiing"
EndIf
If LanguageShow = "MYANMAR" Then
If LanguageShow = "MYANMAR" Then
Var DirImage = "ROOT/taobin_project/image/collectiing_mmr/"
Var Ytext_16 = 640
EndIf
@ -55,7 +56,7 @@
Var ReqAdddata22 = 0
Var timeout_Adddata22 = 0
GenHashWithTimeStamp PointCrm
If AcceptAuto = "true" Then
Var AcceptAuto = "false"
@ -66,7 +67,7 @@
Var ShowTextNumber2= "Enable"
Var ShowTextNumber3= "Enable"
Var ShowTextNumber4= "Enable"
Var PinNumber = web_pin
Var TelephoneNumber = web_telnum
@ -74,9 +75,9 @@
Var SumCreditAmount = CoffeeCredit
If SumCreditAmount >= PayAmountSubDiscount Then
If SumCreditAmount >= PayAmountSubDiscount Then
If ReqAdddata22 = 0 Then
If ReqAdddata22 = 0 Then
Var useCreditAmount = PayAmountSubDiscount
Var BmiYear = useCreditAmount
Var GetScore = "useCredit"
@ -84,9 +85,9 @@
Var ReqAdddata22 = 1
EndIf
Else
Open "ROOT/taobin_project/xml/page_payment_credit3.xml"
Open "ROOT/taobin_project/xml/page_payment_credit3.xml"
EndIf
Else
@ -102,7 +103,7 @@
Else
If show_eng = "true" Then
If show_eng = "true" Then
PlayLong "/mnt/sdcard/coffeevending/taobin_project/sound_eng/Please_enter_your_4_digits_pin.mp3"
Else
PlayLong "/mnt/sdcard/coffeevending/taobin_project/sound_thai/Please_enter_your_4_digits_pin.mp3"
@ -110,12 +111,12 @@
EndIf
</EventOpen>
<Timeout> 1000 </Timeout>
<EventTimeout>
;Open "ROOT/xml/page_board.xml"
<EventTimeout>
;Open "ROOT/xml/page_board.xml"
Var Timeout = Timeout + 1
If Timeout > 30 Then
@ -123,10 +124,19 @@
Var PayState2 = "Enable"
Var QRChannel = 0
;Var Seeker.CodeChannel = 0
If CART_COUNT >= 1 Then
Open "ROOT/taobin_project/xml/page_payment_cashMore.xml"
If CART_COUNT >= 1 Then
Open "ROOT/taobin_project/xml/page_payment_cashMore.xml"
Else
Open "ROOT/taobin_project/xml/page_payment_cash.xml"
Open "ROOT/taobin_project/xml/page_payment_cash.xml"
EndIf
EndIf
If ReqAdddata22 = 1 Then
If ShowLoadingIn <= 0 Then
Var LoadingState = "Enable"
Refresh
Else
Var ShowLoadingIn = ShowLoadingIn - 1
EndIf
EndIf
@ -145,10 +155,10 @@
EndIf
TimerReset
</EventTimeout>
</EventTimeout>
<EventIDCard>
@ -164,11 +174,11 @@
<EventActionOk>
If ReqFlag = 0 Then
If ReqAdddata22 = 1 Then
If ReqFlag = 0 Then
If ReqAdddata22 = 1 Then
Var Seeker.CreditReferenceTmp = "" + useCreditAmount
Var Seeker.CreditReferenceTmp = Seeker.CreditReferenceTmp + "/"
Var Seeker.CreditReferenceTmp = Seeker.CreditReferenceTmp + PointCrm
@ -185,25 +195,25 @@
Var VendingCreditRemain = "" + SumCreditAmount
Var LoadingState = "Invisible"
If useCreditTemp > 0 Then
If useCreditTemp > 0 Then
Var Seeker.CurrCreditUse = useCreditTemp
EndIf
If CART_COUNT >= 1 Then
If CART_COUNT >= 1 Then
Cart "PreparID" 1
Var CART_INDEX = 1
Var PayReference = ""
GenHashWithTimeStamp PayReference
Cart "MakeID" CART_INDEX
Open "ROOT/taobin_project/xml/page_thankyou.xml"
Open "ROOT/taobin_project/xml/page_thankyou.xml"
Else
Var CART_INDEX = 0
If Seeker = "curr" Then
If New_Payment = 1 Then
If New_Payment = 1 Then
__CMD "SetPay" "coffee-payment" Seeker.VendingTSID Seeker.ORDER_ID
EndIf
MakeDrinkV1 SelectDrink SelectSugarID
@ -218,21 +228,21 @@
Var DrinkPaid = SelectDrink
Var PaidPaymentFromNextStage = 1
EndIf
Open "ROOT/taobin_project/xml/page_thankyou.xml"
Open "ROOT/taobin_project/xml/page_thankyou.xml"
EndIf
Var ReqAdddata22 = 0
EndIf
;If Ext1a = "ok" Then
; If Ext1c = "" Then
;
; Open "ROOT/taobin_project/xml/page_payment_credit3.xml"
;
; Open "ROOT/taobin_project/xml/page_payment_credit3.xml"
; Else
; EndIf
@ -253,15 +263,12 @@
<EventActionError>
Var ShowErrorText = "Enable"
Refresh
If ReqAdddata22 = 1 Then
If ReqAdddata22 = 1 Then
Var LoadingState = "Invisible"
Var ReqAdddata22 = 0
EndIf
Refresh
</EventActionError>
@ -287,14 +294,14 @@
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_1.png" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
<EventClick>
Var Timeout = 0
Var PinNumber = PinNumber + "1"
Var ShowTextNumber = "Invisible"
Trim PinNumber 4
StrLen PinNumber TelNumLen
If TelNumLen >= 4 Then
If TelNumLen >= 4 Then
;Var Tel_Confirm_State = "Enable"
Function 2
EndIf
@ -332,14 +339,14 @@
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_2.png" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
<EventClick>
Var Timeout = 0
Var PinNumber = PinNumber + "2"
Var ShowTextNumber = "Invisible"
Trim PinNumber 4
StrLen PinNumber TelNumLen
If TelNumLen >= 4 Then
If TelNumLen >= 4 Then
;Var Tel_Confirm_State = "Enable"
Function 2
EndIf
@ -376,14 +383,14 @@
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_3.png" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
<EventClick>
Var Timeout = 0
Var PinNumber = PinNumber + "3"
Var ShowTextNumber = "Invisible"
Trim PinNumber 4
StrLen PinNumber TelNumLen
If TelNumLen >= 4 Then
If TelNumLen >= 4 Then
;Var Tel_Confirm_State = "Enable"
Function 2
EndIf
@ -420,14 +427,14 @@
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_4.png" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
<EventClick>
Var Timeout = 0
Var PinNumber = PinNumber + "4"
Var ShowTextNumber = "Invisible"
Trim PinNumber 4
StrLen PinNumber TelNumLen
If TelNumLen >= 4 Then
If TelNumLen >= 4 Then
;Var Tel_Confirm_State = "Enable"
Function 2
EndIf
@ -464,14 +471,14 @@
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_5.png" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
<EventClick>
Var Timeout = 0
Var PinNumber = PinNumber + "5"
Var ShowTextNumber = "Invisible"
Trim PinNumber 4
StrLen PinNumber TelNumLen
If TelNumLen >= 4 Then
If TelNumLen >= 4 Then
;Var Tel_Confirm_State = "Enable"
Function 2
EndIf
@ -508,14 +515,14 @@
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_6.png" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
<EventClick>
Var Timeout = 0
Var PinNumber = PinNumber + "6"
Var ShowTextNumber = "Invisible"
Trim PinNumber 4
StrLen PinNumber TelNumLen
If TelNumLen >= 4 Then
If TelNumLen >= 4 Then
;Var Tel_Confirm_State = "Enable"
Function 2
EndIf
@ -552,14 +559,14 @@
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_7.png" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
<EventClick>
Var Timeout = 0
Var PinNumber = PinNumber + "7"
Var ShowTextNumber = "Invisible"
Trim PinNumber 4
StrLen PinNumber TelNumLen
If TelNumLen >= 4 Then
If TelNumLen >= 4 Then
;Var Tel_Confirm_State = "Enable"
Function 2
EndIf
@ -596,14 +603,14 @@
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_8.png" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
<EventClick>
Var Timeout = 0
Var PinNumber = PinNumber + "8"
Var ShowTextNumber = "Invisible"
Trim PinNumber 4
StrLen PinNumber TelNumLen
If TelNumLen >= 4 Then
If TelNumLen >= 4 Then
;Var Tel_Confirm_State = "Enable"
Function 2
EndIf
@ -640,14 +647,14 @@
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_9.png" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
<EventClick>
Var Timeout = 0
Var PinNumber = PinNumber + "9"
Var ShowTextNumber = "Invisible"
Trim PinNumber 4
StrLen PinNumber TelNumLen
If TelNumLen >= 4 Then
If TelNumLen >= 4 Then
;Var Tel_Confirm_State = "Enable"
Function 2
EndIf
@ -687,14 +694,14 @@
<FilenamePress> Var( DirImage + "/bp_getPin.png") </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
<EventClick>
Var Timeout = 0
;Open "ROOT/taobin_project/xml/page_catalog.xml"
;Open "ROOT/taobin_project/xml/page_catalog.xml"
Var ShowSentSmsText = "Enable"
Var StateBGetSMS = "Disable"
Var BmiYear = ""
Var PointCrm1 = ""
@ -709,10 +716,10 @@
Var PinNumber = ""
Var ShowErrorText = "Invisible"
Var ReqFlag = 1
TimerReset
Refresh
</EventClick>
@ -725,18 +732,18 @@
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_0.png" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
<EventClick>
Var Timeout = 0
Var PinNumber = PinNumber + "0"
Trim PinNumber 4
StrLen PinNumber TelNumLen
If TelNumLen >= 4 Then
If TelNumLen >= 4 Then
;Var Tel_Confirm_State = "Enable"
Function 2
EndIf
Var ShowTextNumber = "Invisible"
Var ShowErrorText = "Invisible"
If TelNumLen > 0 Then
@ -771,14 +778,14 @@
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_back-1.png" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
<EventClick>
Var Timeout = 0
Trim PinNumber -1
;Var Tel_Confirm_State = "Invisible"
StrLen PinNumber TelNumLen
If TelNumLen = 0 Then
If TelNumLen = 0 Then
Var ShowTextNumber = "Enable"
EndIf
@ -808,7 +815,7 @@
TimerReset
Refresh
</EventClick>
</Button>
@ -820,15 +827,15 @@
<FilenamePress> Var( DirImage + "/bn_back.png") </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
<EventClick>
DEBUGVAR "USER BN_BACK"
If ReqAdddata22 = 1 Then
If ReqAdddata22 = 1 Then
Var BmiYear = useCreditAmount
Var GetScore = "useCredit"
AddData 24 TelephoneNumber BmiYear PointCrm GetScore
EndIf
Open "ROOT/taobin_project/xml/page_payment_credit.xml"
Open "ROOT/taobin_project/xml/page_payment_credit.xml"
</EventClick>
</Button>
@ -843,7 +850,7 @@
<FilenameDisable> Var( DirImage + "/bn_confirm.png" )</FilenameDisable>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
<EventClick>
</EventClick>
</Button>
@ -891,7 +898,7 @@
<Image>
<X> 188 </X>
@ -915,13 +922,29 @@
<Filename> Var( DirImage + "/text_show_sentSMS.png") </Filename>
</Image>
<Image>
<X> 158 </X>
<Y> 601 </Y>
<State> LoadingState </State>
<Filename> "ROOT/taobin_project/image/collectiing/alpha_loading.png" </Filename>
</Image>
<GIF>
<X> 494 </X>
<Y> 1078 </Y>
<Width> 94 </Width>
<Height> 94 </Height>
<State> LoadingState </State>
<Filename> "ROOT/taobin_project/image/page_payment/loading.gif" </Filename>
</GIF>
;include="ROOT/taobin_project/inc/video.inc"
<EventSecurity>
Open "/media/bt/xml/security_alarm.xml"
<EventSecurity>
Open "/media/bt/xml/security_alarm.xml"
</EventSecurity>
@ -933,25 +956,27 @@
If PinNumberUser = PinNumber Then
Var SumCreditAmount = CoffeeCredit
If SumCreditAmount >= PayAmountSubDiscount Then
If SumCreditAmount >= PayAmountSubDiscount Then
If SumCreditAmount >= 100 Then
If ReqAdddata22 = 0 Then
Var useCreditAmount = PayAmountSubDiscount
Var BmiYear = useCreditAmount
Var GetScore = "useCredit"
AddData 22 TelephoneNumber BmiYear PointCrm GetScore
Var ShowLoadingIn = 3
Var ReqAdddata22 = 1
Refresh
EndIf
Else
Open "ROOT/taobin_project/xml/page_payment_credit3-0.xml"
Else
Open "ROOT/taobin_project/xml/page_payment_credit3-0.xml"
EndIf
Else
Var ShowNotEnoughText = "Enable"
Var Seeker.TNumberTaobinCredit = TelephoneNumber
Var Seeker.CoffeePinNumber = PinNumber
Open "ROOT/taobin_project/xml/page_payment_credit3-1.xml"
Open "ROOT/taobin_project/xml/page_payment_credit3-1.xml"
EndIf
Else
@ -976,9 +1001,9 @@
Var SumCreditAmount = CoffeeCredit
If SumCreditAmount >= PayAmountSubDiscount Then
If SumCreditAmount >= PayAmountSubDiscount Then
If ReqAdddata22 = 0 Then
If ReqAdddata22 = 0 Then
;If Seeker = "next" Then
; Var Curr = "curr"
@ -994,9 +1019,9 @@
Var ReqAdddata22 = 1
EndIf
Else
Open "ROOT/taobin_project/xml/page_payment_credit3.xml"
Open "ROOT/taobin_project/xml/page_payment_credit3.xml"
EndIf
Else

33
xml/page_topping_select7.xml
View file

@ -512,7 +512,7 @@
DEBUGVAR $12-02-03-0043.Name
DEBUGVAR $12-02-03-0043.NameE
If show_eng = "true" Then
Var showname = NameDrink
Var showdesc = DrinkDescription
@ -527,7 +527,7 @@
CRLFToSpace showdesc
DEBUGVAR showname
DEBUGVAR showdesc
Strlen showname show_name_len
@ -606,8 +606,8 @@
EndIf
EndIf
If Seeker = "next" Then
If CupRemain > 0 Then
@ -651,7 +651,7 @@
If FromEnergyDrink1BathPro = 1 Then
Open "ROOT/taobin_project/xml/event/energy_drink_1_bath/page_energy_drink_1_bath_consent.xml"
EndIf
If Only18 = "true" Then
DEBUGVAR SelectDrink
MenuProfile SelectDrink "IsMenuInProfile"
@ -808,7 +808,7 @@
EndIf
If MenuReason = "-" Then
Else
@ -955,10 +955,8 @@
Else
Var PlaySoundLag = "/mnt/sdcard/coffeevending/taobin_project/sound_thai/select_level.mp3"
; Play Sound #zone
If FromJemilaPro = 1 Then
Var PlaySoundLag = "/mnt/sdcard/coffeevending/taobin_project/sound_thai/jemila/select_level.m4a"
If SongkranSoundCampaign = 1 Then
Var PlaySoundLag = SelectToppingSound[SoundCampaignIndex]
EndIf
Play PlaySoundLag
@ -1200,7 +1198,7 @@
EndIf
Var CollagenState = "Enable"
If JemilaToppingFreeFlag = 1 Then
Var CollagenToppingBg = "/bg_top_jemila_free.png"
Var CollagenToppingPrice = 0
@ -1218,7 +1216,7 @@
Var CollagenState = "Invisible"
Var ShowCollagenOnly = "Invisible"
EndIf
EndIf
DEBUGVAR CollagenState
@ -2147,11 +2145,8 @@
Else
Var PlaySoundLag = "/mnt/sdcard/coffeevending/taobin_project/sound_thai/select_level.mp3"
; Play Sound #zone
If LipitPro = 1 Then
Var PlaySoundLag = "/mnt/sdcard/coffeevending/taobin_project/sound_thai/lipit/select_level.wav"
If SongkranSoundCampaign = 1 Then
Var PlaySoundLag = SelectToppingSound[SoundCampaignIndex]
EndIf
Play PlaySoundLag
@ -7981,7 +7976,7 @@
CRLFToSpace showdesc
DEBUGVAR showname
DEBUGVAR showdesc
Strlen showname show_name_len
If show_eng = "true" Then
@ -7998,7 +7993,7 @@
Var Timeout = 0
DEBUGVAR show_eng
RefreshAll

40
xml/sometime/campaign_sound.ev Normal file
View file

@ -0,0 +1,40 @@
If SongkranSoundCampaign = 1 Then
; 0 north, 1 south, 3 northeast
Var GreetingSound[0] = "ROOT/taobin_project/sound_thai/songkran/north/greeting.wav"
Var GreetingSound[1] = "ROOT/taobin_project/sound_thai/songkran/south/greeting.wav"
Var GreetingSound[2] = "ROOT/taobin_project/sound_thai/songkran/northeast/greeting.wav"
Var SelectToppingSound[0] = "ROOT/taobin_project/sound_thai/songkran/north/select_topping.wav"
Var SelectToppingSound[1] = "ROOT/taobin_project/sound_thai/songkran/south/select_topping.wav"
Var SelectToppingSound[2] = "ROOT/taobin_project/sound_thai/songkran/northeast/select_topping.wav"
Var SelectPayMethodSound[0] = "ROOT/taobin_project/sound_thai/songkran/north/select_pay_method.wav"
Var SelectPayMethodSound[1] = "ROOT/taobin_project/sound_thai/songkran/south/select_pay_method.wav"
Var SelectPayMethodSound[2] = "ROOT/taobin_project/sound_thai/songkran/northeast/select_pay_method.wav"
Var ThankyouSound[0] = "ROOT/taobin_project/sound_thai/songkran/north/thankyou.wav"
Var ThankyouSound[1] = "ROOT/taobin_project/sound_thai/songkran/south/thankyou.wav"
Var ThankyouSound[2] = "ROOT/taobin_project/sound_thai/songkran/northeast/thankyou.wav"
Var NextDrinkSound[0] = "ROOT/taobin_project/sound_thai/songkran/north/next_drink.wav"
Var NextDrinkSound[1] = "ROOT/taobin_project/sound_thai/songkran/south/next_drink.wav"
Var NextDrinkSound[2] = "ROOT/taobin_project/sound_thai/songkran/northeast/next_drink.wav"
Var DrinkFinishSound[0] = "ROOT/taobin_project/sound_thai/songkran/north/drink_finish.wav"
Var DrinkFinishSound[1] = "ROOT/taobin_project/sound_thai/songkran/south/drink_finish.wav"
Var DrinkFinishSound[2] = "ROOT/taobin_project/sound_thai/songkran/northeast/drink_finish.wav"
If SoundCampaignIndex = "" Then
Var SoundCampaignIndex = 0
Else
Var SoundCampaignIndex = SoundCampaignIndex + 1
If SoundCampaignIndex > 2 Then
Var SoundCampaignIndex = 0
EndIf
EndIf
EndIf

12
xml/v3/page_catalog3.xml
View file

@ -79,16 +79,8 @@
Var PlaySoundLag = "/mnt/sdcard/coffeevending/taobin_project/sound_thai/taobin_sawade.mp3"
; Play Sound #zone
If SoundBackToSchoolEnable = 1 Then
If SoundBackToSchoolType = 1 Then
Var RootPathSoundBackToSchool = "/mnt/sdcard/coffeevending/taobin_project/sound_thai/boy/"
EndIf
If SoundBackToSchoolType = 2 Then
Var RootPathSoundBackToSchool = "/mnt/sdcard/coffeevending/taobin_project/sound_thai/girl/"
EndIf
Var PlaySoundLag = RootPathSoundBackToSchool + "taobin_sawade.wav"
If SongkranSoundCampaign = 1 Then
Var PlaySoundLag = GreetingSound[SoundCampaignIndex]
EndIf
Play PlaySoundLag

10
xml/v3/page_catalog_with_vending.xml
View file

@ -63,14 +63,8 @@
Var show_btn = "ROOT/taobin_project/image/bn_eng_lang.png"
Var PlaySoundLag = "/mnt/sdcard/coffeevending/taobin_project/sound_thai/taobin_sawade.mp3"
If SoundThaiIndex = 1 Then
Var PlaySoundLag = "/mnt/sdcard/coffeevending/taobin_project/sound_thai/sublang/north/taobin_sawade.wav"
EndIf
If SoundThaiIndex = 2 Then
Var PlaySoundLag = "/mnt/sdcard/coffeevending/taobin_project/sound_thai/sublang/northeast/taobin_sawade.wav"
EndIf
If SoundThaiIndex = 3 Then
Var PlaySoundLag = "/mnt/sdcard/coffeevending/taobin_project/sound_thai/sublang/south/taobin_sawade.wav"
If SongkranSoundCampaign = 1 Then
Var PlaySoundLag = GreetingSound[SoundCampaignIndex]
EndIf
Play PlaySoundLag