THAI: 3 dialects sound

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

View file

@ -18,6 +18,8 @@
DEBUGVAR ToppingNewShow
TRY "/mnt/sdcard/coffeevending/taobin_project/xml/sometime/campaign_sound.ev"
DEBUGVAR OpenFromPageBoard
If OpenFromPageBoard = 1 Then
Var OpenFromPageBoard = 0
@ -44,16 +46,16 @@
Var web_telnumOK = ""
Var PicturePath = "/mnt/sdcard/coffeevending/taobin_project/image/page_doing/"
If CocktailShow = "true" Then
Open "/mnt/sdcard/coffeevending/taobin_project/xml/page_catalog_cocktail.xml"
If CocktailShow = "true" Then
Open "/mnt/sdcard/coffeevending/taobin_project/xml/page_catalog_cocktail.xml"
EndIf
If TermTemOnline = "true" Then
Open "/mnt/sdcard/coffeevending/taobin_project/xml/page_tt_catalog.xml"
EndIf
If Seeker = "curr" Then
If Seeker = "curr" Then
Machine DoorLidClose
EndIf
@ -64,11 +66,11 @@
CoinVending OFF
; Clear value
Topping "clear" "-"
Var DirImage = "ROOT/taobin_project/image/page2_inter/"
Var StrawAutoRelease1 = "false"
@ -98,7 +100,7 @@
;GenHashWithTimeStamp QRCODE99x
WEB "ENABLE"
Else
Var ShowNetworkProblem = "Enable"
Var ShowButtonClick2 = "Invisible"
@ -114,9 +116,9 @@
Var ShowNetworkProblem = "Invisible"
Var ShowNetworkProblemText = ""
EndIf
; 1035 is Coke.
STRCONTAIN "1035" MaterialAvailable CokeUI
STRCONTAIN "1035" MaterialAvailable CokeUI
Var bnSodaAndOther = DirImage + "/bn_soda_coke.png"
Var bpSodaAndOther = DirImage + "/bp_soda_coke.png"
@ -131,8 +133,8 @@
Var QRCODE99_Y = 1718
Var showCart = "Invisible"
If MultiPayEnable = "true" Then
If MultiPayEnable = "true" Then
If CART_COUNT = 1 Then
Var showCart = "Enable"
Var cart_image_bn = DirImageCart + "/bn_cart1.png"
@ -141,7 +143,7 @@
Var QRCODE99_Y = 1580
EndIf
If CART_COUNT = 2 Then
Var showCart = "Enable"
Var cart_image_bn = DirImageCart + "/bn_cart2.png"
@ -151,7 +153,7 @@
EndIf
If CART_COUNT = 3 Then
Open "ROOT/taobin_project/xml/page_payment_multi.xml"
@ -169,10 +171,10 @@
If XMLProfile = "taobin_notopup" Then
Var ButtontoTopupMenu = "Disable"
EndIf
Var menu_name_eng_hot = ""
Var menu_desc_eng_hot = ""
Var menu_name_thai_hot = ""
@ -194,29 +196,29 @@
TRY "ROOT/taobin_project/xml/sometime/RoadShow.ev"
If BoxID = 0 Then
If BoxID = 0 Then
RebootWithCause "BoxID was zero"
EndIf
DEBUGVAR ShowButtonClick2
DEBUGVAR MenuKidButtonState
DEBUGVAR New_Payment
Var PromotionIDCurrentOrder = 0
RootLayoutVisible 3 "show"
Var ButtonLanguageCurrentXPosition = 1005
Var ButtonLanguageCurrentYPosition = 458 - 38
Var ButtonLanguageListXPosition = 970
Var ButtonLanguageListXPosition = 970
Var ButtonLanguageListYPosition = 450 - 38
Var SelectedMenu = ""
@ -232,7 +234,7 @@
</EventOpen>
<Timeout> 1000 </Timeout>
<EventTimeout>
<EventTimeout>
;SAVELOG SoundPlaying
@ -241,15 +243,15 @@
EndIf
If countDownRetrun = 0 Then
If Seeker = "next" Then
If Seeker = "next" Then
RootLayoutVisible 3 "hide"
Open "ROOT/taobin_project/xml/page_brewing3Conti.xml"
Open "ROOT/taobin_project/xml/page_brewing3Conti.xml"
Else
Open "ROOT/taobin_project/xml/page_back_to_main.xml"
EndIf
EndIf
; zone cup on arm
If CupOnArm = "true" Then
@ -280,7 +282,7 @@
DEBUGVAR Inst11MenuLoaded
DEBUGVAR MultiProcessTimer
If MultiProcess = "Enable" Then
If SelectedMenu = "coffee" Then
@ -289,7 +291,7 @@
Var MultiProcess = "Invisible"
TabMenuVisibleInst 2
OpenInst 2 "/mnt/sdcard/coffeevending/taobin_project/inter/tha/xml/multi/page_instance2.xml"
Else
Else
If MultiProcessTimer >= 20 Then
Var MultiProcess = "Invisible"
TabMenuVisibleInst 2
@ -400,10 +402,10 @@
Refresh
TimerReset
</EventTimeout>
</EventTimeout>
<EventChangeStatus>
;If ChangeStatus = "payout-end" Then
;If ChangeStatus = "payout-end" Then
; Var ChangeOK = 1
;EndIf
</EventChangeStatus>
@ -416,15 +418,15 @@
Cart "DeleteMenuID" "ALL"
Var web_readyOK = web_ready
Var web_telnumOK = web_telnum
Open "/mnt/sdcard/coffeevending/taobin_project/xml/page_payment.xml"
EndIf
Else
EndIf
</EventWebApp>
<Image>
@ -447,26 +449,31 @@
If LanguageShow = "MALAY" Then
Var PlaySoundLag = "/mnt/sdcard/coffeevending/taobin_project/sound_eng/What_would_you_like_to_drink_today.mp3"
EndIf
If LanguageShow = "THAI" Then
Var PlaySoundLag = "/mnt/sdcard/coffeevending/taobin_project/sound_thai/taobin_sawade.mp3"
Var DirImage2 = "ROOT/taobin_project/image/drink_option/"
Var DirImageAlter = "ROOT/taobin_project/image/page3_2/"
If SongkranSoundCampaign = 1 Then
Var PlaySoundLag = GreetingSound[SoundCampaignIndex]
EndIf
EndIf
If LanguageShow = "MYANMAR" Then
If LanguageShow = "MYANMAR" Then
Var show_eng = "true"
Var DirImage2 = "ROOT/taobin_project/image/drink_option_mmr/"
Var DirImageAlter = "ROOT/taobin_project/image/page3_2_mmr/"
EndIf
If LanguageShow = "MSC" Then
If LanguageShow = "MSC" Then
Var show_eng = "true"
Var DirImage2 = "ROOT/taobin_project/inter/hkg/image/drink_option_msc/"
Var DirImageAlter = "ROOT/taobin_project/inter/hkg/image/page3_2_msc/"
EndIf
Play PlaySoundLag
Play PlaySoundLag
Var countDownRetrun = 120
Var LanguageButtonEnable = "Enable"
@ -484,10 +491,10 @@
<FilenamePress> "ROOT/taobin_project/image/page2/bn_back_arrow.png" </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
If Seeker = "next" Then
<EventClick>
If Seeker = "next" Then
RootLayoutVisible 3 "hide"
Open "ROOT/taobin_project/xml/page_brewing3Conti.xml"
Open "ROOT/taobin_project/xml/page_brewing3Conti.xml"
Else
Open "ROOT/taobin_project/xml/page_back_to_main.xml"
EndIf
@ -518,7 +525,7 @@
<FrameScroll>
<FrameScroll>
<X> 1 </X>
<Y> 844 </Y>
<Width> 1080 </Width>
@ -543,7 +550,7 @@
Var ColumnGravity[1] = 2
Var ColumnGravity[2] = 2
Var ColumnGravity[3] = 2
</Script>
<Block>
<Width> 296 </Width>
@ -557,15 +564,15 @@
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
<EventClick>
Var OpenFromMulti = 1
TRY "/mnt/sdcard/coffeevending/taobin_project/inter/tha/xml/event/script_common_for_open_promotion_xml.ev"
RootLayoutVisible 3 "hide"
RootLayoutVisible 13 "hide"
</EventClick>
<Language>
<ID> 000003 </ID>
@ -587,12 +594,12 @@
<FilenamePress> Var(DirImage + "/bp_coffee.png") </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
<EventClick>
If Inst5MenuLoaded = "done" Then
Var MultiProcess = "Invisible"
TabMenuVisibleInst 2
TabMenuVisibleInst 2
OpenInst 2 "/mnt/sdcard/coffeevending/taobin_project/inter/tha/xml/multi/page_instance2.xml"
Else
Var MultiProcessTimer = 0
@ -629,10 +636,10 @@
Else
Var show_eng = "true"
EndIf
RootLayoutVisible 3 "hide"
RootLayoutVisible 13 "hide"
; eng
Open "ROOT/taobin_project/spiral/xml/page_catalog_vending_machine.xml"
@ -658,17 +665,17 @@
<FilenamePress> Var(DirImage + "/bp_tea.png") </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
<EventClick>
If Inst6MenuLoaded = "done" Then
Var MultiProcess = "Invisible"
TabMenuVisibleInst 3
TabMenuVisibleInst 3
OpenInst 2 "/mnt/sdcard/coffeevending/taobin_project/inter/tha/xml/multi/page_instance2.xml"
Else
Var MultiProcessTimer = 0
Var MultiProcess = "Enable"
Var SelectedMenu = "tea"
Var SelectedMenu = "tea"
EndIf
</EventClick>
@ -692,17 +699,17 @@
<FilenamePress> Var(DirImage + "/bp_cho_caramel.png") </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
<EventClick>
If Inst7MenuLoaded = "done" Then
Var MultiProcess = "Invisible"
TabMenuVisibleInst 4
TabMenuVisibleInst 4
OpenInst 2 "/mnt/sdcard/coffeevending/taobin_project/inter/tha/xml/multi/page_instance2.xml"
Else
Var MultiProcessTimer = 0
Var MultiProcess = "Enable"
Var SelectedMenu = "caramel"
Var SelectedMenu = "caramel"
EndIf
</EventClick>
<Language>
@ -726,17 +733,17 @@
<FilenamePress> bpSodaAndOther </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
<EventClick>
If Inst11MenuLoaded = "done" Then
Var MultiProcess = "Invisible"
TabMenuVisibleInst 7
OpenInst 2 "/mnt/sdcard/coffeevending/taobin_project/inter/tha/xml/multi/page_instance2.xml"
Else
Var MultiProcessTimer = 0
Var MultiProcess = "Enable"
Var SelectedMenu = "soda"
Var SelectedMenu = "soda"
EndIf
</EventClick>
<Language>
@ -760,17 +767,17 @@
<FilenamePress> Var(DirImage + "/bp_Pepsi_7up.png") </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
<EventClick>
If Inst10MenuLoaded = "done" Then
Var MultiProcess = "Invisible"
TabMenuVisibleInst 8
OpenInst 2 "/mnt/sdcard/coffeevending/taobin_project/inter/tha/xml/multi/page_instance2.xml"
Else
Var MultiProcessTimer = 0
Var MultiProcess = "Enable"
Var SelectedMenu = "pepsi"
Var SelectedMenu = "pepsi"
EndIf
</EventClick>
@ -797,17 +804,17 @@
<FilenamePress> Var(DirImage + "/bn_kidmenu.png") </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
<EventClick>
If Inst8MenuLoaded = "done" Then
Var MultiProcess = "Invisible"
TabMenuVisibleInst 5
TabMenuVisibleInst 5
OpenInst 2 "/mnt/sdcard/coffeevending/taobin_project/inter/tha/xml/multi/page_instance2.xml"
Else
Var MultiProcessTimer = 0
Var MultiProcess = "Enable"
Var SelectedMenu = "kidmenu"
Var SelectedMenu = "kidmenu"
EndIf
</EventClick>
<Language>
@ -831,16 +838,16 @@
<FilenamePress> Var(DirImage + "/bp_appfast.png") </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
<EventClick>
If Inst8MenuLoaded = "done" Then
Var MultiProcess = "Invisible"
TabMenuVisibleInst 5
TabMenuVisibleInst 5
OpenInst 2 "/mnt/sdcard/coffeevending/taobin_project/inter/tha/xml/multi/page_instance2.xml"
Else
Var MultiProcessTimer = 0
Var MultiProcess = "Enable"
Var SelectedMenu = "appfast"
Var SelectedMenu = "appfast"
EndIf
</EventClick>
@ -865,7 +872,7 @@
<FilenamePress> Var(DirImage + "/bp_protein.png") </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
<EventClick>
TabMenuVisibleInst 5
OpenInst 2 "/mnt/sdcard/coffeevending/taobin_project/inter/tha/xml/multi/page_instance2.xml"
@ -891,17 +898,17 @@
<FilenamePress> Var(DirImage + "/bp_HealthyOption.png") </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
<EventClick>
If Inst9MenuLoaded = "done" Then
Var MultiProcess = "Invisible"
TabMenuVisibleInst 6
OpenInst 2 "/mnt/sdcard/coffeevending/taobin_project/inter/tha/xml/multi/page_instance2.xml"
Else
Var MultiProcessTimer = 0
Var MultiProcess = "Enable"
Var SelectedMenu = "healthy"
Var SelectedMenu = "healthy"
EndIf
</EventClick>
@ -927,11 +934,11 @@
<FilenamePress> Var(DirImage + "/bp_main_page_member.png") </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
<EventClick>
; eng
Var CheckMemberPage = "ROOT/taobin_project/xml/page_before_check_member.xml"
Open CheckMemberPage
</EventClick>
<Language>
@ -952,11 +959,11 @@
<FilenameDisable> Var(DirImage + "/bp_main_page_topup.png") </FilenameDisable>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
<EventClick>
; eng
Var PayDetail=""
Open "ROOT/taobin_project/xml/page_back_to_topup.xml"
Open "ROOT/taobin_project/xml/page_back_to_topup.xml"
</EventClick>
<Language>
<ID> 002004 </ID>
@ -974,10 +981,10 @@
<Color> "0xFF0000" </Color>
<Width> 1080 </Width>
<Height> 60 </Height>
<EventClick>
<EventClick>
Open "ROOT/taobin_project/xml/page_camera.xml"
</EventClick>
</Button>
@ -1001,7 +1008,7 @@
Var web_readyOK = web_ready
Var web_telnumOK = web_telnum
Var web_app_prepar = "true"
Open "/mnt/sdcard/coffeevending/taobin_project/xml/page_payment.xml"
@ -1009,7 +1016,7 @@
EndIf
Else
EndIf
</EventWebApp>
@ -1043,12 +1050,12 @@
<Height> 100 </Height>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
<EventClick>
Var ClickCountMainTe = ClickCountMainTe + 1
DEBUGVAR ClickCountMainTe
If ClickCountMainTe = 2 Then
If ClickCountMainTe = 2 Then
Var OpenRouteManTest = 1
Open "ROOT/taobin_project/xml/page_back_to_main.xml"
Var ClickCountMainTe = 0
@ -1073,7 +1080,7 @@
Var bg_lidProblem_ST = "Invisible"
Var GetLidButtonState2 = "Enable"
Var bg_lidProblem_ST2 ="Invisible"
Var EnableGetMoreStrawFileName2 = "Enable"
Var bg_strawProblem_ST2 ="Invisible"
</EventUnitTest1>
@ -1083,7 +1090,7 @@
Var bg_lidProblem_ST = "Enable"
Var GetLidButtonState2 = "Invisible"
Var bg_lidProblem_ST2 ="Enable"
Var XStraw = 376
Var EnableGetMoreStrawFileName2 = "Invisible"
Var bg_strawProblem_ST2 ="Enable"
@ -1096,7 +1103,7 @@
Var CountDownBrewing = 122
Var MachineStage = "testing"
Var BREW_CNT = 122
Var InternationalEnable = 1
DEBUGVAR InternationalEnable
Var LanguageObjectShow = "Enable"

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

File diff suppressed because it is too large Load diff

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

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

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

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

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

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

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

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

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

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

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

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