1080 1920 Var Top2Timeout = 0 If InternationalEnable = 1 Then Var topview2_script = CountryRootPath + "/xml/topview2_script.ev" ; will apply other countries If CountryName = "UnitedArabEmirates Dubai" Then TRY topview2_script Else If CountryName = "Malaysia" Then TRY topview2_script EndIf If CountryName = "Thailand" Then TRY topview2_script EndIf If CountryName = "HongKong" Then If EnableMultiInstance = "true" Then TRY topview2_script EndIf EndIf EndIf 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[3] = "bn_japan_lang.png" Var lang_icon_file_name[2] = "bn_china_lang.png" Var lang_icon_file_name[4] = "bn_malay_lang.png" var lang_icon_file_name[5] = "bn_uae_dubai_lang.png" EndIf Var LanguageButtonListEnable = "Invisible" Var ENABLE_BOTTOM = "Enable" 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] Var langfn = "ROOT/taobin_project/image/lang/" + langFileNameIcon DEBUGVAR langfn Var DirLanguageImage = "ROOT/taobin_project/image/lang/" ;If CountryName = "Malaysia" Then ; Var dirImageLang = CountryRootPath + "image/lang/" ; Var langfn = dirImageLang + langFileNameIcon ; DEBUGVAR langfn ; DEBUGVAR ButtonLanguageCurrentXPosition ; DEBUGVAR ButtonLanguageCurrentYPosition ;EndIf Var ButtonLanguageListXPositionIcon = ButtonLanguageListXPosition + 27 Var ButtonLanguageListYPositionIcon = ButtonLanguageListYPosition + 14 DEBUGVAR ENABLE_LANGUAGE_COUNT If ENABLE_LANGUAGE_COUNT = "" Then LanguageControl "UpdateList" 1 EndIf If ENABLE_LANGUAGE_COUNT = 1 Then 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" EndIf IF Not#CountDownForMulti = "" Then Var Not#CountDownForMulti = 99 EndIf If EnableMultiInstance = "true" Then Var OpenRedirectSize = -1 GetRedirectCount OpenRedirectSize ;DEBUGVAR OpenRedirectSize If OpenRedirectSize = 0 Then SAVELOG "OpenRedirectSize zero size" Var Not#CountDownForMulti = 5 EndIf EndIf If CountryRootPath = "" Then Var exhaust_fan_schedule = "ROOT/taobin_project/inter/tha/hardware/exhaust_fan_schedule.ev" Else Var exhaust_fan_schedule = CountryRootPath + "/hardware/exhaust_fan_schedule.ev" EndIf If PowderScheduleTimeOut = "" Then Var PowderScheduleTimeOut = 1 EndIf If PowderScheduleTimeOut > 0 Then Var PowderScheduleTimeOut = PowderScheduleTimeOut - 1 If PowderScheduleTimeOut = 0 Then Var PowderScheduleTimeOut = 1 Var powder_sch_ev = "ROOT/taobin_project/inter/tha/" + "/hardware/powder_schedule.ev" TRY powder_sch_ev EndIf EndIf TRY exhaust_fan_schedule ;include="ROOT/taobin_project/inc/language_toggle_mode.inc" DEBUGVAR LanguageButtonEnable 1000 ;DEBUGVAR Top2Timeout Var Top2Timeout = Top2Timeout + 1 If Top2Timeout = 15 Then Open "ROOT/taobin_project/xml/topview2.xml" EndIf If TimeForClose > 0 Then Var TimeForClose = TimeForClose - 1 DEBUGVAR TimeForClose EndIf If TimeForClose = 1 Then Var LanguageButtonListEnable = "Invisible" Refresh EndIf If EnableMultiInstance = "true" Then If Not#CountDownForMulti = 99 Then ;DEBUGVAR Not#CountDownForMulti Else If Not#CountDownForMulti = 1 Then If InternationalEnable = 1 Then If CountryName = "Thailand" Then DEBUGVAR ENABLE_UAE_DUBAI 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" OpenRedirect "/taobin_project/xml/page_catalog_group_milk.xml" "/mnt/sdcard/coffeevending/taobin_project/xml/menutab/milk.ev" OpenRedirect "/taobin_project/xml/page_catalog_group_other_other.xml" "/mnt/sdcard/coffeevending/taobin_project/xml/menutab/otherOther.ev" OpenRedirect "/taobin_project/xml/page_catalog_group_pepsi7up.xml" "/mnt/sdcard/coffeevending/taobin_project/xml/menutab/pepsi7up.ev" Var InstanceTabOpenFile2 = "ROOT/taobin_project/xml/menutab/page_catalog_group_coffee.xml" Var InstanceTabOpenFile3 = "ROOT/taobin_project/xml/menutab/page_catalog_group_tea.xml" Var InstanceTabOpenFile4 = "ROOT/taobin_project/xml/menutab/page_catalog_group_milk.xml" If AppFastButtonState = "Enable" Then Var InstanceTabOpenFile5 = "ROOT/taobin_project/xml/menutab/page_catalog_group_appfast.xml" EndIf If WheyButtonState = "Enable" Then Var InstanceTabOpenFile5 = "ROOT/taobin_project/xml/menutab/page_catalog_group_whey.xml" OpenRedirect "/taobin_project/xml/page_catalog_group_whey.xml" "/mnt/sdcard/coffeevending/taobin_project/xml/menutab/kidandwhey.ev" EndIf If MenuKidButtonState = "Enable" Then Var InstanceTabOpenFile5 = "ROOT/taobin_project/xml/menutab/page_catalog_group_forkid.xml" OpenRedirect "/taobin_project/xml/page_catalog_group_forkid.xml" "/mnt/sdcard/coffeevending/taobin_project/xml/menutab/kidandwhey.ev" EndIf If CocktailShow = "true" Then Var InstanceTabOpenFile6 = "ROOT/taobin_project/xml/menutab/page_catalog_group_cocktail.xml" OpenRedirect "/taobin_project/xml/page_catalog_group_cocktail.xml" "/mnt/sdcard/coffeevending/taobin_project/xml/menutab/health.ev" Else Var InstanceTabOpenFile6 = "ROOT/taobin_project/xml/menutab/page_catalog_group_health.xml" OpenRedirect "/taobin_project/xml/page_catalog_group_health.xml" "/mnt/sdcard/coffeevending/taobin_project/xml/menutab/health.ev" EndIf Var InstanceTabOpenFile7 = "ROOT/taobin_project/xml/menutab/page_catalog_group_other_other.xml" Var InstanceTabOpenFile8 = "ROOT/taobin_project/xml/menutab/page_catalog_group_pepsi_7up.xml" Var InstanceTabOpenFile9 = "ROOT/taobin_project/xml/menutab/start_up_inst_dummy.xml" Var InstanceTabOpenFile10 = "ROOT/taobin_project/xml/menutab/start_up_inst_dummy.xml" Var InstanceTabOpenFile11 = "ROOT/taobin_project/xml/menutab/start_up_inst_dummy.xml" Var InstanceTabOpenFile12 = "ROOT/taobin_project/xml/menutab/start_up_inst_dummy.xml" Var InstanceTabOpenFile13 = "ROOT/taobin_project/xml/menutab/start_up_inst_dummy.xml" TabMenuVisibleInst 99 EndIf EndIf If Not#CountDownForMulti > 0 Then DEBUGVAR Not#CountDownForMulti Var Not#CountDownForMulti = Not#CountDownForMulti - 1 EndIf EndIf EndIf If BrewCommand = "RefreshAll" Then DEBUGVAR BrewCommand Var BrewCommand = "-" If EnableMultiInstance = "true" Then If CurrentPageShowError = 1 Then ;do not thing Else InstanceOverSetString "RefreshNow" 5 InstanceOverSetString "RefreshNow" 6 InstanceOverSetString "RefreshNow" 7 InstanceOverSetString "RefreshNow" 8 InstanceOverSetString "RefreshNow" 9 InstanceOverSetString "RefreshNow" 10 InstanceOverSetString "RefreshNow" 11 ; TODO ; Trick Refresh First Var SlientRefreshIndex = 2 EndIf EndIf If Not#CountDownForMulti = 99 Then Var Not#CountDownForMulti = 5 EndIf EndIf ;DEBUGVAR LanguageButtonEnable If CountDownRefreshAllGroup > 0 Then DEBUGVAR CountDownRefreshAllGroup Var CountDownRefreshAllGroup = CountDownRefreshAllGroup - 1 If CountDownRefreshAllGroup = 0 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" Var langnext9 = "true" EndIf EndIf TimerReset ; setvarint SlientRefreshEnable 1 ; ; BtnLangCurrentXPosition BtnLangCurrentYPosition LangState0 Var( CountryRootPath + "/image/lang/bn_eng_lang.png") 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" BtnLangCurrentXPosition BtnLangCurrentYPosition LangState1 Var( CountryRootPath + "/image/lang/bn_msc_lang.png") 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" BtnLangCurrentXPosition BtnLangCurrentYPosition LangState2 Var( CountryRootPath + "/image/lang/bn_mtc_lang.png") 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" ButtonLanguageCurrentXPosition ButtonLanguageCurrentYPosition LanguageButtonEnable "LangIcon" langfn DEBUGVAR ENABLE_LANGUAGE_COUNT If ENABLE_LANGUAGE_COUNT = 2 Then DEBUGVAR langfn LanguageControl "ChangeNextLang" "" ;include="ROOT/taobin_project/inc/language_toggle_mode.inc" If EnableMultiInstance = "true" Then Var CountDownRefreshAllGroup = 1 EndIf SAVELOG "============================== Select Toggle ==============================" Open "ROOT/taobin_project/xml/topview2.xml" Else Var LanguageButtonListEnable = "Enable" DEBUGVAR LanguageButtonListEnable Var TimeForClose = 10 EndIf Refresh ButtonLanguageListXPosition ButtonLanguageListYPosition 986 "auto" "vertical" LanguageButtonListEnable ; 82 51 "Enable" "ROOT/taobin_project/image/lang/lang_bg_top.png" 82 56 ENABLE_THAI "ROOT/taobin_project/image/lang/lang_bg_center.png" 82 56 ENABLE_ENG "ROOT/taobin_project/image/lang/lang_bg_center.png" 82 56 ENABLE_JAPAN "ROOT/taobin_project/image/lang/lang_bg_center.png" 82 56 ENABLE_CHINA "ROOT/taobin_project/image/lang/lang_bg_center.png" 82 56 ENABLE_MALAY "ROOT/taobin_project/image/lang/lang_bg_center.png" 82 56 ENABLE_UAE_DUBAI "ROOT/taobin_project/image/lang/lang_bg_center.png" 82 56 ENABLE_MSC "ROOT/taobin_project/image/lang/lang_bg_center.png" 82 56 ENABLE_MTC "ROOT/taobin_project/image/lang/lang_bg_bottom.png" 82 56 ENABLE_MYANMAR "ROOT/taobin_project/image/lang/lang_bg_bottom.png" 82 51 ENABLE_BOTTOM "ROOT/taobin_project/image/lang/lang_bg_bottom.png" ButtonLanguageListXPositionIcon ButtonLanguageListYPositionIcon 958 "auto" "vertical" LanguageButtonListEnable ; 82 68 ENABLE_THAI 0 0 56 56 ENABLE_THAI "ROOT/taobin_project/image/lang/bn_thai_lang.png" Var LanguageButtonListEnable = "Invisible" Var langFileNameIcon = lang_icon_file_name[LanguageShowByIndex] Var langfn = "ROOT/taobin_project/image/lang/" + langFileNameIcon SetLanguage "THAI" Var show_eng = "false" If EnableMultiInstance = "true" Then Var CountDownRefreshAllGroup = 1 EndIf SAVELOG "============================== Select Thai ==============================" Open "ROOT/taobin_project/xml/topview2.xml" 82 68 ENABLE_ENG 0 0 56 56 ENABLE_ENG "ROOT/taobin_project/image/lang/bn_eng_lang.png" SetLanguage "ENG" Var show_eng = "true" Var LanguageButtonListEnable = "Invisible" Var langFileNameIcon = lang_icon_file_name[LanguageShowByIndex] Var langfn = "ROOT/taobin_project/image/lang/" + langFileNameIcon If EnableMultiInstance = "true" Then Var CountDownRefreshAllGroup = 1 EndIf SAVELOG "============================== Select Eng ==============================" Open "ROOT/taobin_project/xml/topview2.xml" 82 68 ENABLE_JAPAN 0 0 56 56 ENABLE_JAPAN "ROOT/taobin_project/image/lang/bn_japan_lang.png" SetLanguage "JAPAN" 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" Var langnext9 = "true" EndIf Open "ROOT/taobin_project/xml/topview2.xml" 82 68 ENABLE_CHINA 0 0 82 56 ENABLE_CHINA "ROOT/taobin_project/image/lang/bn_china_lang.png" SetLanguage "CHINA" 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" Var langnext9 = "true" EndIf Open "ROOT/taobin_project/xml/topview2.xml" 82 68 ENABLE_MALAY 0 0 82 56 ENABLE_MALAY "ROOT/taobin_project/image/lang/bn_malay_lang.png" SetLanguage "MALAY" 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" Var langnext9 = "true" EndIf Open "ROOT/taobin_project/xml/topview2.xml" 82 68 ENABLE_MYANMAR 0 0 82 56 ENABLE_MYANMAR "ROOT/taobin_project/image/lang/bn_myanmar_lang.png" SetLanguage "MYANMAR" Var show_eng = "true" Var LanguageButtonListEnable = "Invisible" Var langFileNameIcon = lang_icon_file_name[LanguageShowByIndex] Var langfn = "ROOT/taobin_project/image/lang/" + langFileNameIcon If EnableMultiInstance = "true" Then Var CountDownRefreshAllGroup = 1 EndIf SAVELOG "============================== Select Myr ==============================" Open "ROOT/taobin_project/xml/topview2.xml" 82 68 ENABLE_MSC 0 0 82 56 ENABLE_MSC "ROOT/taobin_project/image/lang/bn_malay_lang.png" 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" 82 68 ENABLE_MTC 0 0 82 56 ENABLE_MTC "ROOT/taobin_project/image/lang/bn_myanmar_lang.png" 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" 82 68 ENABLE_UAE_DUBAI 0 0 82 56 ENABLE_UAE_DUBAI "ROOT/taobin_project/image/lang/bn_uae_dubai_lang.png" SetLanguage "UAE_DUBAI" 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" Var langnext9 = "true" EndIf Open "ROOT/taobin_project/xml/topview2.xml" ;