1080 1920 Var Top2Timeout = 0 Var InitialMultiInstance = 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 ;inter-lang If CountryName = "Malaysia" Then TRY topview2_script EndIf If CountryName = "Thailand" Then Var BtnLangToggleIndex = "Invisible" TRY topview2_script EndIf If CountryName = "HongKong" Then If EnableMultiInstance = "true" Then TRY topview2_script TRY "ROOT/taobin_project/inter/hkg/xml/multi/GetStringTextId.ev" Else ENABLE_MULTI_INSTANCE "set" Var InitialMultiInstance = 1 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" Var SupportLangMyanmarHeight = 51 Var BottomImageMyanmar = "ROOT/taobin_project/image/lang/lang_bg_bottom.png" If ENABLE_LANGUAGE_COUNT > 3 Then Var SupportLangMyanmarHeight = 76 Var BottomImageMyanmar = "ROOT/taobin_project/image/lang/lang_bg_bottom2.png" EndIf 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 Var DirLanguageImage = "ROOT/taobin_project/image/lang/" Var ButtonLanguageListXPositionIcon = ButtonLanguageListXPosition + 27 Var ButtonLanguageListYPositionIcon = ButtonLanguageListYPosition + 14 Var ButtonLanguageListWidth = 70 Var ButtonLanguageListXPositionIconForFlag = ButtonLanguageListXPositionIcon - 10 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 show_eng_button_stage = "Invisible" Var LanguageButtonEnable = "Invisible" If CurrentPageShowError = 1 Then Var BtnLangCurrentXPosition = 990 Var BtnLangCurrentYPosition = 648 Else Var BtnLangCurrentXPosition = 990 Var BtnLangCurrentYPosition = 458 - 65 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 = 2 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 = 3 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_v2.ev" TRY powder_sch_ev EndIf EndIf TRY exhaust_fan_schedule ;include="ROOT/taobin_project/inc/language_toggle_mode.inc" ;DEBUGVAR langfn ;DEBUGVAR LanguageButtonEnable ;DEBUGVAR LanguageShow Var CheckDisableTimeout = 0 TRY "ROOT/taobin_project/xml/features/alert_sms/check_disable.ev" READ_FILE "/mnt/sdcard/coffeevending/openfile_xml_0" str_openfile_xml_0 READ_FILE "/mnt/sdcard/coffeevending/openfile_xml_2" str_openfile_xml_2 If str_openfile_xml_0 = "/mnt/sdcard/coffeevending/taobin_project/xml/page_main_blank.xml" Then If str_openfile_xml_2 = "/mnt/sdcard/coffeevending/taobin_project/xml/page_list.xml" Then Var CountUpForProjectThisFileStruct = CountUpForProjectThisFileStruct + 1 DEBUGVAR CountUpForProjectThisFileStruct EndIf EndIf 1000 ;DEBUGVAR Top2Timeout Var Top2Timeout = Top2Timeout + 1 Var CheckDisableTimeout = CheckDisableTimeout + 1 If Top2Timeout = 15 Then Open "ROOT/taobin_project/xml/topview2.xml" EndIf If CheckDisableTimeout > 5 Then TRY "ROOT/taobin_project/xml/features/alert_sms/check_disable.ev" Var CheckDisableTimeout = 0 Endif If TimeForClose > 0 Then Var TimeForClose = TimeForClose - 1 DEBUGVAR TimeForClose EndIf If TimeForClose = 1 Then Var LanguageButtonListEnable = "Invisible" Refresh EndIf If InitialMultiInstance = 1 Then If Top2Timeout >= 5 Then FINISH Var InitialMultiInstance = 0 EndIf EndIf If EnableMultiInstance = "true" Then If Not#CountDownForMulti = 99 Then ;DEBUGVAR Not#CountDownForMulti Else If Not#CountDownForMulti = 1 Then DEBUGVAR InternationalEnable DEBUGVAR CountryName If InternationalEnable = 1 Then If CountryName = "Thailand" Then DEBUGVAR ENABLE_UAE_DUBAI Var ENABLE_UAE_DUBAI = "Invisible" Var ENABLE_CHINA = "Invisible" Var ENABLE_MALAY = "Invisible" Var ENABLE_MTC = "Invisible" TRY "ROOT/taobin_project/inter/tha/xml/multi/control_and_lang_swith.ev" EndIf If CountryName = "HongKong" 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 If CountryName = "Australia" Then TRY "ROOT/taobin_project/inter/aus/xml/multi/control_and_lang_swith.ev" EndIf Else 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 ; ; ; Only for HongKong btn_langs !! BtnLangCurrentXPosition BtnLangCurrentYPosition LangState0 Var( CountryRootPath + "/image/lang/bn_eng_lang.png") SetLanguage "MTC" Var show_eng = "true" 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 "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" BtnLangCurrentXPosition BtnLangCurrentYPosition LangState2 Var( CountryRootPath + "/image/lang/bn_mtc_lang.png") SetLanguage "MSC" 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" "" 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 SupportLangMyanmarHeight ENABLE_MYANMAR BottomImageMyanmar 82 51 ENABLE_BOTTOM "ROOT/taobin_project/image/lang/lang_bg_bottom.png" ButtonLanguageListXPositionIconForFlag ButtonLanguageListYPositionIcon 1080 "auto" "vertical" LanguageButtonListEnable ; ButtonLanguageListWidth 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" ButtonLanguageListWidth 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" ButtonLanguageListWidth 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" ButtonLanguageListWidth 68 ENABLE_CHINA 0 0 56 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" ButtonLanguageListWidth 68 ENABLE_MALAY 0 0 56 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" ButtonLanguageListWidth 68 ENABLE_MSC 0 0 56 56 ENABLE_MSC "ROOT/taobin_project/image/lang/bn_china_lang.png" SetLanguage "MSC" 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 If CountryName = "Thailand" Then Var CountDownRefreshAllGroup = 1 Else 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 Open "ROOT/taobin_project/xml/topview2.xml" ButtonLanguageListWidth 68 ENABLE_MTC 0 0 56 56 ENABLE_MTC "ROOT/taobin_project/image/lang/bn_myanmar_lang.png" SetLanguage "MTC" 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 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" ButtonLanguageListWidth 68 ENABLE_MYANMAR 0 0 56 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" ButtonLanguageListWidth 68 ENABLE_UAE_DUBAI 0 0 56 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" ; ;include="ROOT/taobin_project/inc/button_remove_cup.inc"