Merge branch 'masterpiece' of ssh://forthrd.ddns.net:2222/1TBHDD/ikong/taobin_project into masterpiece

This commit is contained in:
wanlop run 2025-03-11 11:04:08 +07:00
commit b2aae91681
684 changed files with 165171 additions and 288 deletions

View file

@ -1052,70 +1052,143 @@
EndIf
If CountryName = "HongKong" Then
TRY "/mnt/sdcard/coffeevending/taobin_project/inter/hkg/video/script_video.ev"
If EnableMultiInstance = "true" Then
EnableLanguage "ENG"
SetLanguage "ENG"
LanguageControl "UpdateList" "-"
Var BtnLangToggleIndex = "Enable"
Var InternationalEnable = 1
Var CurrentPageShowError = 0
TRY "/mnt/sdcard/coffeevending/taobin_project/inter/hkg/video/script_video.ev"
Var InternationalEnable = 1
Var show_eng = "true"
Var img_press_main_page = "ROOT/taobin_project/image/main_page_en/bp_main_page_start.png"
EnableLanguage "ENG"
EnableLanguage "MSC"
EnableLanguage "MTC"
Var LanguageShow = "ENG"
SetLanguage "ENG"
LanguageControl "UpdateList" "-"
Var ShowNetworkProblemText = "Network error. Payment Cash only."
Var show_eng = "true"
Var img_press_main_page = "ROOT/taobin_project/image/main_page_en/bp_main_page_start.png"
Var CountryRootPath = "ROOT/taobin_project/inter/hkg/"
Var CountryShortName = "hkg"
Var ShowNetworkProblemText = "Network error. Payment Cash only."
Var CountryRootPath = "ROOT/taobin_project/inter/hkg/"
Var CountryShortName = "hkg"
Var TextPriceMenuSize = 12
Var TextPriceMenuY = 266
Var TextPriceMenuBlendX = 180
Var TextPriceMenuHotX = 48
Var ShowButtonClick2 = "Invisible"
Var ButtontoTopupMenu = "Invisible"
Var TextPriceMenuSize = 12
Var TextPriceMenuY = 266
Var TextPriceMenuBlendX = 180
Var TextPriceMenuHotX = 48
Var ShowButtonClick2 = "Invisible"
Var ButtontoTopupMenu = "Invisible"
Var PriceUnitText = "HKG$"
Var PriceUnitText = "HKG$"
Var MemberButtonFileName = "ROOT/taobin_project/image/main_page_en/bp_main_page_member.png"
Var MemberButtonFileNameRest = "ROOT/taobin_project/image/main_page_en/bn_main_page_member.png"
Var show_eng_button_stage = "Invisible"
Var MemberButtonFileName = "ROOT/taobin_project/image/main_page_en/bp_main_page_member.png"
Var MemberButtonFileNameRest = "ROOT/taobin_project/image/main_page_en/bn_main_page_member.png"
Var show_eng_button_stage = "Invisible"
Var CountDownShowButton = 35
Var CountDownShowButton = 35
Var XButtonMember = 384
Var YButtonMember = 1695
Var XButtonMember = 384
Var YButtonMember = 1695
If Not#LanguageLoaded = "" Then
LoadLanguage "/mnt/sdcard/coffeevending/taobin_project/inter/hkg/menu/lang.tsv"
If Not#LanguageLoaded = "" Then
LoadLanguage "/mnt/sdcard/coffeevending/taobin_project/inter/hkg/menu/lang.tsv"
EndIf
Var cups_sold_text = "Cups Sold Worldwide"
STRCONTAIN "541215" MaterialAvailable SugarZeroCalEnable
Var SettingDisableTaobinCredit = "true"
;Var SettingDisableTaobinCode = "false"
Var SettingIgnoreCollectPoint = 1
READ_FILE "/mnt/sdcard/coffeevending/use_pt_dev" use_pt_dev
STRCONTAIN "1" use_pt_dev enable_pt_mode_by_cfg
If enable_pt_mode_by_cfg = "true" Then
DEBUGVAR enable_pt_mode_by_cfg
Var SettingIgnoreCollectPoint = 0
EndIf
Var SettingVideoBrewingUseCommon = 1
Var MinPhoneNumber = 8
Var MaxPhoneNumber = 8
Var ShowCountDownAsPercent = 0
DEBUGVAR ShowButtonClick2
OpenInst 1 "/mnt/sdcard/coffeevending/taobin_project/xml/sold_cup_count.xml"
Else
TRY "/mnt/sdcard/coffeevending/taobin_project/inter/hkg/video/script_video.ev"
EnableLanguage "ENG"
SetLanguage "ENG"
LanguageControl "UpdateList" "-"
Var InternationalEnable = 1
Var show_eng = "true"
Var img_press_main_page = "ROOT/taobin_project/image/main_page_en/bp_main_page_start.png"
Var ShowNetworkProblemText = "Network error. Payment Cash only."
Var CountryRootPath = "ROOT/taobin_project/inter/hkg/"
Var CountryShortName = "hkg"
Var TextPriceMenuSize = 12
Var TextPriceMenuY = 266
Var TextPriceMenuBlendX = 180
Var TextPriceMenuHotX = 48
Var ShowButtonClick2 = "Invisible"
Var ButtontoTopupMenu = "Invisible"
Var PriceUnitText = "HKG$"
Var MemberButtonFileName = "ROOT/taobin_project/image/main_page_en/bp_main_page_member.png"
Var MemberButtonFileNameRest = "ROOT/taobin_project/image/main_page_en/bn_main_page_member.png"
Var show_eng_button_stage = "Invisible"
Var CountDownShowButton = 35
Var XButtonMember = 384
Var YButtonMember = 1695
If Not#LanguageLoaded = "" Then
LoadLanguage "/mnt/sdcard/coffeevending/taobin_project/inter/hkg/menu/lang.tsv"
EndIf
Var cups_sold_text = "Cups Sold Worldwide"
STRCONTAIN "541215" MaterialAvailable SugarZeroCalEnable
Var SettingDisableTaobinCredit = "true"
;Var SettingDisableTaobinCode = "false"
Var SettingIgnoreCollectPoint = 1
READ_FILE "/mnt/sdcard/coffeevending/use_pt_dev" use_pt_dev
STRCONTAIN "1" use_pt_dev enable_pt_mode_by_cfg
If enable_pt_mode_by_cfg = "true" Then
DEBUGVAR enable_pt_mode_by_cfg
Var SettingIgnoreCollectPoint = 0
EndIf
Var SettingVideoBrewingUseCommon = 1
Var MinPhoneNumber = 8
Var MaxPhoneNumber = 8
Var ShowCountDownAsPercent = 0
DEBUGVAR ShowButtonClick2
OpenInst 1 "/mnt/sdcard/coffeevending/taobin_project/xml/sold_cup_count.xml"
EndIf
Var cups_sold_text = "Cups Sold Worldwide"
STRCONTAIN "541215" MaterialAvailable SugarZeroCalEnable
Var SettingDisableTaobinCredit = "true"
;Var SettingDisableTaobinCode = "false"
Var SettingIgnoreCollectPoint = 1
READ_FILE "/mnt/sdcard/coffeevending/use_pt_dev" use_pt_dev
STRCONTAIN "1" use_pt_dev enable_pt_mode_by_cfg
If enable_pt_mode_by_cfg = "true" Then
DEBUGVAR enable_pt_mode_by_cfg
Var SettingIgnoreCollectPoint = 0
EndIf
Var SettingVideoBrewingUseCommon = 1
Var MinPhoneNumber = 8
Var MaxPhoneNumber = 8
Var ShowCountDownAsPercent = 0
DEBUGVAR ShowButtonClick2
OpenInst 1 "/mnt/sdcard/coffeevending/taobin_project/xml/sold_cup_count.xml"
EndIf
; New mode

View file

@ -23,6 +23,14 @@
EndIf
EndIf
If CountryName = "HongKong" Then
If EnableMultiInstance = "true" Then
Var OpenFromPageBoard = 1
OpenInst 1 "/mnt/sdcard/coffeevending/taobin_project/xml/page_advert.xml"
OpenInst 2 "/mnt/sdcard/coffeevending/taobin_project/inter/hkg/xml/multi/page_catalog.lxml"
EndIf
EndIf
If CountryName = "Malaysia" Then
Var ShowButtonClick2 = "Invisible"
EndIf

View file

@ -73,9 +73,16 @@
EndIf
If LanguageShow = "MYANMAR" Then
Var DirImage = "ROOT/taobin_project/image/complete_mmr/"
Var DirImage = "ROOT/taobin_project/image/complete_mmr/"
EndIf
If LanguageShow = "MSC" Then
Var DirImage = "ROOT/taobin_project/inter/hkg/image/complete_msc/"
EndIf
If LanguageShow = "MTC" Then
Var DirImage = "ROOT/taobin_project/inter/hkg/image/complete_mtc/"
EndIf
Var text_bottom = DirImage + "text_bottom.png"

View file

@ -124,6 +124,44 @@
;Var PictureEnd = "_en.png"
EndIf
If LanguageShow = "MSC" Then
Var VideoPath = "/mnt/sdcard/coffeevending/taobin_project/animation01/"
Var VideoFileBegin = "TaoBin2_draft02_art"
Var VideoFileEnd = ".mp4"
Var DirImage = "ROOT/taobin_project/image/page_lid_straw_msc"
Var BottomText = PicturePath + "text_bottom_msc.png"
Var lid_straw_bg_iamge = DirImage + "/img4.png"
If LidState = "Enable" Then
Var lid_straw_bg_iamge = DirImage + "/img3.png"
EndIf
Var PicturePath = "/mnt/sdcard/coffeevending/taobin_project/inter/hkg/image/page_doing/"
Var PictureBegin = "txt_"
Var PictureEnd = "_msc.png"
EndIf
If LanguageShow = "MTC" Then
Var VideoPath = "/mnt/sdcard/coffeevending/taobin_project/animation01/"
Var VideoFileBegin = "TaoBin2_draft02_art"
Var VideoFileEnd = ".mp4"
Var DirImage = "ROOT/taobin_project/image/page_lid_straw_mtc"
Var BottomText = PicturePath + "text_bottom_mtc.png"
Var lid_straw_bg_iamge = DirImage + "/img4.png"
If LidState = "Enable" Then
Var lid_straw_bg_iamge = DirImage + "/img3.png"
EndIf
Var PicturePath = "/mnt/sdcard/coffeevending/taobin_project/inter/hkg/image/page_doing/"
Var PictureBegin = "txt_"
Var PictureEnd = "_mtc.png"
EndIf
Else
Var VideoPath = "/mnt/sdcard/coffeevending/taobin_project/animation01/"
Var VideoFileBegin = "TaoBin2_draft02_art"

View file

@ -2386,10 +2386,10 @@ EndIf
<QRCode>
<X> 445 </X>
<Y> 958 </Y>
<Width> 200 </Width>
<Height> 200 </Height>
<X> 415 </X>
<Y> 975 </Y>
<Width> 250 </Width>
<Height> 250 </Height>
<State> alphaState </State>
<Service> testservice </Service>
</QRCode>

View file

@ -7,6 +7,9 @@
<Sound> PlaySoundLag </Sound>
<EventOpen>
;HKG doesn't use New_Payment
Var New_Payment = 0
Var cash_disable = "0"
READ_FILE "/mnt/sdcard/coffeevending/cash_disable" cash_disable
DEBUGVAR cash_disable
@ -362,14 +365,24 @@
; EndIf
;EndIf
If show_eng = "true" Then
If LanguageShow = "ENG" Then
Var DirImage = "ROOT/taobin_project/image/page_payment_en/page_payment"
Var DirImage2 = "ROOT/taobin_project/image/page_payment_cash_extend_en"
Var DirQR_popup = "ROOT/taobin_project/inter/hkg/image/page_payment"
Var page_doing_show_time_image = "ROOT/taobin_project/image/page_doing/img2.png"
EndIf
Else
Var DirImage = "ROOT/taobin_project/image/page_payment"
Var DirImage2 = "ROOT/taobin_project/image/page_payment_cash_extend"
If LanguageShow = "MSC" Then
Var DirImage = "ROOT/taobin_project/inter/hkg/image/page_payment_msc/page_payment"
Var DirImage2 = "ROOT/taobin_project/inter/hkg/image/page_payment_cash_extend_msc"
Var DirQR_popup = DirImage
Var page_doing_show_time_image = "ROOT/taobin_project/image/page_doing/img2.png"
EndIf
If LanguageShow = "MTC" Then
Var DirImage = "ROOT/taobin_project/inter/hkg/image/page_payment_mtc/page_payment"
Var DirImage2 = "ROOT/taobin_project/inter/hkg/image/page_payment_cash_extend_mtc"
Var DirQR_popup = DirImage
Var page_doing_show_time_image = "ROOT/taobin_project/image/page_doing/img2.png"
EndIf
@ -1180,7 +1193,7 @@
Var Timeout = 0
Var UserChoosePayment = "CreditCard"
Var QRErrorState = "Invisible"
Var QR_POPUP = CountryRootPath + "/image/page_payment/img_tap_card_5_sec.png"
Var QR_POPUP = DirQR_popup + "/img_tap_card_5_sec.png"
Var VendingCashless = "-"
;If FirstTimeDelayEnableButton = 0 Then
@ -1221,7 +1234,7 @@
Var Timeout = 0
Var UserChoosePayment = "QRCode"
Var QRErrorState = "Invisible"
Var QR_POPUP = CountryRootPath + "/image/page_payment/img_use_qr_code.png"
Var QR_POPUP = DirQR_popup + "/img_use_qr_code.png"
Var VendingCashless = "-"
Var LOADING_STATE = "Invisible"
Var AlphaPopupLoadingState = "Invisible"
@ -1698,12 +1711,12 @@ If alphaState = "Invisible" Then
Var QRCODE99 = ""
Var QRErrorState = "Invisible"
Var QR_POPUP = CountryRootPath + "/image/page_payment/img_tap_card_5_sec.png"
Var QR_POPUP = DirQR_popup + "/img_tap_card_5_sec.png"
Var alphaState = "Enable"
If UserChoosePayment = "CreditCard" Then
Var Timeout = 0
Var QR_POPUP = CountryRootPath + "/image/page_payment/img_tap_card_5_sec.png"
Var QR_POPUP = DirQR_popup + "/img_tap_card_5_sec.png"
If EnablingCreditCard = 1 Then
Var LOADING_STATE = "Enable"
Var AlphaPopupLoadingState = "Enable"
@ -1751,7 +1764,7 @@ If alphaState = "Invisible" Then
DEBUGVAR UserChoosePayment
Var QRCODE99 = ""
Var QRErrorState = "Invisible"
Var QR_POPUP = CountryRootPath + "/image/page_payment/img_use_qr_code.png"
Var QR_POPUP = DirQR_popup + "/img_use_qr_code.png"
Var LOADING_STATE = "Enable"
Var AlphaPopupLoadingState = "Enable"
Var alphaState = "Enable"
@ -2481,25 +2494,33 @@ eval(
<Filename> "ROOT/taobin_project/image/page_payment/alpha_popup.png" </Filename>
</Image>
<Text>
<X> 267 </X>
;<Text>
;<X> 267 </X>
;<Y> 1065 </Y>
;<Width> 516 </Width>
;<Height> 75 </Height>
;<Size> 48 </Size>
;<Font> RobotoBold </Font>
;<Color> eval(
;If AlphaLoadingState = "Enable" Then
;Var return = 0xFFFFFF
;Else
;Var return = 0x5A5A5A
;EndIf
;)
;</Color>
;<Align> Center </Align>
;<State> LOADING_STATE </State>
;<Value> "Just Moment, Please" </Value>
;<Filename> Var( DirImage + "/loadingText.png" )</Filename>
;</Text>
<Image>
<X> LOADING_STATE_X </X>
<Y> 1065 </Y>
<Width> 516 </Width>
<Height> 75 </Height>
<Size> 48 </Size>
<Font> RobotoBold </Font>
<Color> eval(
If AlphaLoadingState = "Enable" Then
Var return = 0xFFFFFF
Else
Var return = 0x5A5A5A
EndIf
)
</Color>
<Align> Center </Align>
<State> LOADING_STATE </State>
<Value> "Just Moment, Please" </Value>
</Text>
<Filename> Var( DirImage + "/loadingText.png" )</Filename>
</Image>
<GIF>
<X> 493 </X>

View file

@ -40,11 +40,20 @@
Var show_btp = "ROOT/taobin_project/image/bn_thai_lang_press.png"
Var show_btn = "ROOT/taobin_project/image/bn_thai_lang.png"
If LanguageShow = "MSC" Then
SetLanguage "MSC"
EndIf
If LanguageShow = "MTC" Then
SetLanguage "MTC"
EndIf
If LanguageShow = "MYANMAR" Then
SetLanguage "MYANMAR"
Else
SetLanguage "ENG"
EndIf
Else
SetLanguage "THAI"
EndIf
@ -78,6 +87,16 @@
If LanguageShow = "MYANMAR" Then
Var DirImage = "ROOT/taobin_project/image/user_take_cup_mmr/"
EndIf
If LanguageShow = "MSC" Then
Var DirImage = "ROOT/taobin_project/inter/hkg/image/user_take_cup_msc/"
Var show_btp = "ROOT/taobin_project/image/bn_thai_lang_press.png"
Var show_btn = "ROOT/taobin_project/image/bn_thai_lang.png"
EndIf
If LanguageShow = "MTC" Then
Var DirImage = "ROOT/taobin_project/inter/hkg/image/user_take_cup_mtc/"
Var show_btp = "ROOT/taobin_project/image/bn_thai_lang_press.png"
Var show_btn = "ROOT/taobin_project/image/bn_thai_lang.png"
EndIf
SAVELOG "EventLanguageOnChange menu -list"
@ -92,6 +111,9 @@
Var show_eng_button_stage = "Invisible"
Var LanguageButtonEnable = "Enable"
EndIf
If CountryName = "HongKong" Then
Var CurrentPageShowError = 1
EndIf
Else
Var LanguageButtonEnable = "Invisible"
Var show_eng_button_stage = "Enable"

View file

@ -22,6 +22,9 @@
If CountryName = "Thailand" Then
Var CurrentPageShowError = 1
EndIf
If CountryName = "HongKong" Then
Var CurrentPageShowError = 1
EndIf
EndIf
@ -219,62 +222,33 @@
<Function2>
DEBUGVAR MachineStage
DEBUGVAR stop_now
If InternationalEnable = 1 Then
Var DirImage = "ROOT/taobin_project/image/vending_error_en"
Else
Var DirImage = "ROOT/taobin_project/image/vending_error"
EndIf
If LanguageShow = "THAI" Then
Var DirImage = "ROOT/taobin_project/image/vending_error"
EndIf
If LanguageShow = "ENG" Then
Var DirImage = CountryRootPath + "image/vending_error_en"
EndIf
If LanguageShow = "JAPAN" Then
Var DirImage = CountryRootPath + "image/vending_error_en"
EndIf
If LanguageShow = "CHINA" Then
Var DirImage = CountryRootPath + "image/vending_error_en"
EndIf
If LanguageShow = "MALAY" Then
Var DirImage = CountryRootPath + "image/vending_error_en"
EndIf
If LanguageShow = "UAE_DUBAI" Then
Var DirImage = CountryRootPath + "image/vending_error_en"
EndIf
If LanguageShow = "MYANMAR" Then
Var DirImage = "ROOT/taobin_project/image/vending_error_mmr"
EndIf
If InternationalEnable = 1 Then
If CountryName = "Thailand" Then
If MachineStage = "show-menu" Then
If LanguageShow = "THAI" Then
Var DirImage = "ROOT/taobin_project/image/vending_error"
EndIf
If LanguageShow = "ENG" Then
Var DirImage = CountryRootPath + "image/vending_error_en"
EndIf
If LanguageShow = "JAPAN" Then
Var DirImage = CountryRootPath + "image/vending_error_en"
EndIf
If LanguageShow = "CHINA" Then
Var DirImage = CountryRootPath + "image/vending_error_en"
EndIf
If LanguageShow = "MALAY" Then
Var DirImage = CountryRootPath + "image/vending_error_en"
EndIf
If LanguageShow = "UAE_DUBAI" Then
Var DirImage = CountryRootPath + "image/vending_error_en"
EndIf
If LanguageShow = "MYANMAR" Then
Var DirImage = "ROOT/taobin_project/image/vending_error_mmr"
EndIf
EndIf
Var DirImage = "ROOT/taobin_project/image/vending_error_en"
If MachineStage = "show-menu" Then
If LanguageShow = "ENG" Then
Var DirImage = CountryRootPath + "image/vending_error_en"
EndIf
If LanguageShow = "JAPAN" Then
Var DirImage = CountryRootPath + "image/vending_error_en"
EndIf
If LanguageShow = "CHINA" Then
Var DirImage = CountryRootPath + "image/vending_error_en"
EndIf
If LanguageShow = "MALAY" Then
Var DirImage = CountryRootPath + "image/vending_error_en"
EndIf
If LanguageShow = "UAE_DUBAI" Then
Var DirImage = CountryRootPath + "image/vending_error_en"
EndIf
If LanguageShow = "MYANMAR" Then
Var DirImage = "ROOT/taobin_project/image/vending_error_mmr"
EndIf
If LanguageShow = "MSC" Then
Var DirImage = CountryRootPath + "image/vending_error_msc"
EndIf
If LanguageShow = "MTC" Then
Var DirImage = CountryRootPath + "image/vending_error_mtc"
EndIf
EndIf
If MachineStage = "mcu-upgrade" Then
If LanguageShow = "THAI" Then
Var DirImage = "ROOT/taobin_project/image/vending_error"
@ -297,6 +271,12 @@
If LanguageShow = "MYANMAR" Then
Var DirImage = "ROOT/taobin_project/image/vending_error_mmr"
EndIf
If LanguageShow = "MSC" Then
Var DirImage = CountryRootPath + "image/vending_error_msc"
EndIf
If LanguageShow = "MTC" Then
Var DirImage = CountryRootPath + "image/vending_error_mtc"
EndIf
EndIf
If NeedUpgrade = "true" Then
@ -321,6 +301,12 @@
If LanguageShow = "MYANMAR" Then
Var DirImage = "ROOT/taobin_project/image/vending_error_mmr"
EndIf
If LanguageShow = "MSC" Then
Var DirImage = CountryRootPath + "image/vending_error_msc"
EndIf
If LanguageShow = "MTC" Then
Var DirImage = CountryRootPath + "image/vending_error_mtc"
EndIf
EndIf
DEBUGVAR MachineStage
@ -349,6 +335,12 @@
If LanguageShow = "MYANMAR" Then
Var DirImage = "ROOT/taobin_project/image/vending_error_mmr"
EndIf
If LanguageShow = "MSC" Then
Var DirImage = CountryRootPath + "image/vending_error_msc"
EndIf
If LanguageShow = "MTC" Then
Var DirImage = CountryRootPath + "image/vending_error_mtc"
EndIf
Else
Var show_error_normal = "Enable"
Var show_error_sp1 = "Invisible"
@ -374,6 +366,12 @@
If LanguageShow = "MYANMAR" Then
Var DirImage = CountryRootPath + "image/close_en"
EndIf
If LanguageShow = "MSC" Then
Var DirImage = CountryRootPath + "image/close_hkg"
EndIf
If LanguageShow = "MTC" Then
Var DirImage = CountryRootPath + "image/close_hkg"
EndIf
EndIf
EndIf
@ -399,6 +397,12 @@
If LanguageShow = "MYANMAR" Then
Var DirImage = "ROOT/taobin_project/image/vending_error_mmr"
EndIf
If LanguageShow = "MSC" Then
Var DirImage = CountryRootPath + "image/vending_error_msc"
EndIf
If LanguageShow = "MTC" Then
Var DirImage = CountryRootPath + "image/vending_error_mtc"
EndIf
Else
Var show_error_normal = "Enable"
Var show_error_sp1 = "Invisible"
@ -420,6 +424,12 @@
If LanguageShow = "MYANMAR" Then
Var DirImage = CountryRootPath + "image/close_en"
EndIf
If LanguageShow = "MSC" Then
Var DirImage = CountryRootPath + "image/close_hkg"
EndIf
If LanguageShow = "MTC" Then
Var DirImage = CountryRootPath + "image/close_hkg"
EndIf
EndIf
EndIf
@ -442,6 +452,12 @@
If LanguageShow = "MYANMAR" Then
Var DirImage = "ROOT/taobin_project/image/vending_error_mmr"
EndIf
If LanguageShow = "MSC" Then
Var DirImage = CountryRootPath + "image/vending_error_msc"
EndIf
If LanguageShow = "MTC" Then
Var DirImage = CountryRootPath + "image/vending_error_mtc"
EndIf
EndIf
If NETCORE_EVENT_CNT_X >= 30 Then
@ -464,6 +480,12 @@
If LanguageShow = "MYANMAR" Then
Var DirImage = "ROOT/taobin_project/image/vending_error_mmr"
EndIf
If LanguageShow = "MSC" Then
Var DirImage = CountryRootPath + "image/vending_error_msc"
EndIf
If LanguageShow = "MTC" Then
Var DirImage = CountryRootPath + "image/vending_error_mtc"
EndIf
EndIf
Var MaintenanceCard = 20

View file

@ -16,19 +16,17 @@
Else
If CountryName = "Malaysia" Then
TRY topview2_script
Else
Var lang_icon_file_name[0] = "bn_eng_lang.png"
Var lang_icon_file_name[1] = "bn_thai_lang.png"
Var lang_icon_file_name[2] = "bn_china_lang.png"
Var lang_icon_file_name[3] = "bn_japan_lang.png"
Var lang_icon_file_name[4] = "bn_malay_lang.png"
var lang_icon_file_name[5] = "bn_uae_dubai_lang.png"
EndIf
If CountryName = "Thailand" Then
TRY topview2_script
EndIf
If CountryName = "HongKong" Then
If EnableMultiInstance = "true" Then
TRY topview2_script
EndIf
EndIf
EndIf
Else
@ -50,6 +48,9 @@
If ENABLE_MYANMAR = "Enable" Then
Var ENABLE_BOTTOM = "Invisible"
EndIf
If ENABLE_MTC = "Enable" Then
Var ENABLE_BOTTOM = "Invisible"
EndIf
DEBUGVAR LanguageShowByIndex
Var langFileNameIcon = lang_icon_file_name[LanguageShowByIndex]
@ -79,6 +80,37 @@
Var LanguageButtonEnable = "Invisible"
EndIf
If BtnLangToggleIndex = "Enable" Then
Var LanguageButtonEnable = "Invisible"
If CurrentPageShowError = 1 Then
Var BtnLangCurrentXPosition = 990
Var BtnLangCurrentYPosition = 648
Else
Var BtnLangCurrentXPosition = 1005
Var BtnLangCurrentYPosition = 458 - 48
EndIf
If LanguageShowByIndex = 0 Then
Var LangState0 = "Enable"
Var LangState1 = "Invisible"
Var LangState2 = "Invisible"
EndIf
If LanguageShowByIndex = 1 Then
Var LangState0 = "Invisible"
Var LangState1 = "Enable"
Var LangState2 = "Invisible"
EndIf
If LanguageShowByIndex = 2 Then
Var LangState0 = "Invisible"
Var LangState1 = "Invisible"
Var LangState2 = "Enable"
EndIf
Else
Var LangState0 = "Invisible"
Var LangState1 = "Invisible"
Var LangState2 = "Invisible"
EndIf
If FirstTimeOpenFile = "" Then
;Var Not#CountDownForMulti = 5
Var FirstTimeOpenFile = "done"
@ -158,6 +190,17 @@
Var ENABLE_UAE_DUBAI = "Invisible"
TRY "ROOT/taobin_project/inter/tha/xml/multi/control_and_lang_swith.ev"
EndIf
If CountryName = "HongKong" Then
If EnableMultiInstance = "true" Then
Var ENABLE_UAE_DUBAI = "Invisible"
Var ENABLE_THAI = "Invisible"
Var ENABLE_JAPAN = "Invisible"
Var ENABLE_CHINA = "Invisible"
Var ENABLE_MALAY = "Invisible"
Var ENABLE_MYANMAR = "Invisible"
TRY "ROOT/taobin_project/inter/hkg/xml/multi/control_and_lang_swith.ev"
EndIf
EndIf
Else
OpenRedirect "/taobin_project/xml/page_catalog_group_coffee.xml" "/mnt/sdcard/coffeevending/taobin_project/xml/menutab/coffee.ev"
OpenRedirect "/taobin_project/xml/page_catalog_group_tea.xml" "/mnt/sdcard/coffeevending/taobin_project/xml/menutab/tea.ev"
@ -270,6 +313,70 @@
;
;
<Button>
<X> BtnLangCurrentXPosition </X>
<Y> BtnLangCurrentYPosition </Y>
<State> LangState0 </State>
<Filename> Var( CountryRootPath + "/image/lang/bn_eng_lang.png") </Filename>
<EventClick>
SetLanguage "MSC"
Var show_eng = "false"
If EnableMultiInstance = "true" Then
Var langnext1 = "true"
Var langnext2 = "true"
Var langnext3 = "true"
Var langnext4 = "true"
Var langnext5 = "true"
Var langnext6 = "true"
Var langnext7 = "true"
Var langnext8 = "true"
EndIf
Open "ROOT/taobin_project/xml/topview2.xml"
</EventClick>
</Button>
<Button>
<X> BtnLangCurrentXPosition </X>
<Y> BtnLangCurrentYPosition </Y>
<State> LangState1 </State>
<Filename> Var( CountryRootPath + "/image/lang/bn_msc_lang.png") </Filename>
<EventClick>
SetLanguage "MTC"
If EnableMultiInstance = "true" Then
Var langnext1 = "true"
Var langnext2 = "true"
Var langnext3 = "true"
Var langnext4 = "true"
Var langnext5 = "true"
Var langnext6 = "true"
Var langnext7 = "true"
Var langnext8 = "true"
EndIf
Open "ROOT/taobin_project/xml/topview2.xml"
</EventClick>
</Button>
<Button>
<X> BtnLangCurrentXPosition </X>
<Y> BtnLangCurrentYPosition </Y>
<State> LangState2 </State>
<Filename> Var( CountryRootPath + "/image/lang/bn_mtc_lang.png") </Filename>
<EventClick>
SetLanguage "ENG"
If EnableMultiInstance = "true" Then
Var langnext1 = "true"
Var langnext2 = "true"
Var langnext3 = "true"
Var langnext4 = "true"
Var langnext5 = "true"
Var langnext6 = "true"
Var langnext7 = "true"
Var langnext8 = "true"
EndIf
Open "ROOT/taobin_project/xml/topview2.xml"
</EventClick>
</Button>
<Button>
<X> ButtonLanguageCurrentXPosition </X>
<Y> ButtonLanguageCurrentYPosition </Y>
@ -368,6 +475,22 @@
<Filename> "ROOT/taobin_project/image/lang/lang_bg_center.png" </Filename>
</Image>
</Row1>
<Row1>
<Width> 82 </Width>
<Height> 56 </Height>
<State> ENABLE_MSC </State>
<Image>
<Filename> "ROOT/taobin_project/image/lang/lang_bg_center.png" </Filename>
</Image>
</Row1>
<Row1>
<Width> 82 </Width>
<Height> 56 </Height>
<State> ENABLE_MTC </State>
<Image>
<Filename> "ROOT/taobin_project/image/lang/lang_bg_bottom.png" </Filename>
</Image>
</Row1>
<Row1>
<Width> 82 </Width>
<Height> 56 </Height>
@ -566,6 +689,66 @@
</EventClick>
</Button>
</Row1>
<Row1>
<Width> 82 </Width>
<Height> 68 </Height>
<State> ENABLE_MSC </State>
<Button>
<X> 0 </X>
<Y> 0 </Y>
<Width> 82 </Width>
<Height> 56 </Height>
<State> ENABLE_MSC </State>
<Filename> "ROOT/taobin_project/image/lang/bn_malay_lang.png" </Filename>
<EventClick>
SetLanguage "MSC"
Var LanguageButtonListEnable = "Invisible"
Var langFileNameIcon = lang_icon_file_name[LanguageShowByIndex]
Var langfn = "ROOT/taobin_project/image/lang/" + langFileNameIcon
If EnableMultiInstance = "true" Then
Var langnext1 = "true"
Var langnext2 = "true"
Var langnext3 = "true"
Var langnext4 = "true"
Var langnext5 = "true"
Var langnext6 = "true"
Var langnext7 = "true"
Var langnext8 = "true"
EndIf
Open "ROOT/taobin_project/xml/topview2.xml"
</EventClick>
</Button>
</Row1>
<Row1>
<Width> 82 </Width>
<Height> 68 </Height>
<State> ENABLE_MTC </State>
<Button>
<X> 0 </X>
<Y> 0 </Y>
<Width> 82 </Width>
<Height> 56 </Height>
<State> ENABLE_MTC </State>
<Filename> "ROOT/taobin_project/image/lang/bn_myanmar_lang.png" </Filename>
<EventClick>
SetLanguage "MTC"
Var LanguageButtonListEnable = "Invisible"
Var langFileNameIcon = lang_icon_file_name[LanguageShowByIndex]
Var langfn = "ROOT/taobin_project/image/lang/" + langFileNameIcon
If EnableMultiInstance = "true" Then
Var langnext1 = "true"
Var langnext2 = "true"
Var langnext3 = "true"
Var langnext4 = "true"
Var langnext5 = "true"
Var langnext6 = "true"
Var langnext7 = "true"
Var langnext8 = "true"
EndIf
Open "ROOT/taobin_project/xml/topview2.xml"
</EventClick>
</Button>
</Row1>
<Row1>
<Width> 82 </Width>
<Height> 68 </Height>