This commit is contained in:
kong 2023-06-15 09:56:20 +07:00
parent 6cb54114d6
commit 3f60f3d5fd
22 changed files with 889 additions and 670 deletions

View file

@ -152,6 +152,13 @@
Var TermTemOnline = "false"
Var TaobinOnline = "false"
If MaterialAvailable = "" Then
CacheVarStr "get" MaterialAvailable
Else
CacheVarStr "put" MaterialAvailable
EndIf
STRCONTAIN "9501" MaterialAvailable TaobinOnline
STRCONTAIN "9505" MaterialAvailable TermTemOnline
@ -248,6 +255,15 @@
DEBUGVAR SELLSTATUS
DEBUGVAR NetworkStatus
If SELLSTATUS = "" Then
CacheVarStr "get" SELLSTATUS
Else
CacheVarStr "put" SELLSTATUS
EndIf
DEBUGVAR SELLSTATUS
DEBUGVAR AdvertiseProfile
Var SELLONLINE = 0
If SELLSTATUS = "SELLONLINE" Then
Var SELLONLINE = 1
@ -606,33 +622,15 @@
Var TextPriceMenuSize = 14
Var TextPriceMenuY = 264
If CountryName = "Thailand" Then
Var TextPriceMenuSize = 14
EndIf
Var TextPriceMenuBlendX = 174
Var TextPriceMenuHotX = 50
; zone init lang
; CountryName
Var show_eng_button_stage = "Enable"
Var MemberButtonFileName = "ROOT/taobin_project/image/main_page/bp_main_page_member.png"
If CountryName = "Malaysia" Then
Var TextPriceMenuSize = 12
Var TextPriceMenuY = 266
Var ShowButtonClick2 = "Enable"
Var ButtontoTopupMenu = "Invisible"
Var MemberButtonFileName = "ROOT/taobin_project/image/main_page_en/bp_main_page_member.png"
Var show_eng_button_stage = "Invisible"
Var CountDownShowButton = 35
EndIf
If CountryName = "Indonesia" Then
Var TextPriceMenuSize = 14
Var show_eng_button_stage = "Invisible"
Var MemberButtonFileName = "ROOT/taobin_project/image/main_page_en/bp_main_page_member.png"
Var CountDownShowButton = 35
EndIf
Machine __arm_toggle
@ -654,54 +652,112 @@
ScreenRefresh
EndIf
; Set default lang
If JXMLVersionInt > 444 Then
SetLanguage LanguageInit
; zone config language
SetLanguage LanguageInit
Var InternationalEnable = 0
Var InternationalEnableStr = "false"
; CountryName
If CountryName = "" Then
READ_FILE "/mnt/sdcard/coffeevending/country/short" StrCountryShort
DEBUGVAR StrCountryShort
If StrCountryShort = "MYS" Then
Var CountryName = "Malaysia"
EndIf
If StrCountryShort = "MYR" Then
Var CountryName = "Malaysia"
EndIf
If StrCountryShort = "AUS" Then
Var CountryName = "Australia"
EndIf
EndIf
If CountryName = "Malaysia" Then
Var WebAppShow = "Invisible"
EnableLanguage "ENG"
;EnableLanguage "THAI"
;EnableLanguage "CHINA"
;EnableLanguage "JAPAN"
EnableLanguage "MALAY"
SetLanguage "MALAY"
LanguageControl "UpdateList" "-"
Var InternationalEnable = 1
Var show_eng = "true"
Var VideoMainPage = "ROOT/taobin_project/video/main_page_en.mp4"
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 TextPriceMenuSize = 12
Var TextPriceMenuY = 266
Var ShowButtonClick2 = "Enable"
Var ButtontoTopupMenu = "Invisible"
Var MemberButtonFileName = "ROOT/taobin_project/image/main_page_en/bp_main_page_member.png"
Var show_eng_button_stage = "Invisible"
Var CountDownShowButton = 35
EndIf
If CountryName = "Indonesia" Then
Var TextPriceMenuSize = 14
Var show_eng_button_stage = "Invisible"
Var MemberButtonFileName = "ROOT/taobin_project/image/main_page_en/bp_main_page_member.png"
Var CountDownShowButton = 35
EndIf
If CountryName = "Australia" Then
Var WebAppShow = "Invisible"
EnableLanguage "ENG"
SetLanguage "ENG"
LanguageControl "UpdateList" "-"
Var InternationalEnable = 1
Var show_eng = "true"
Var VideoMainPage = "ROOT/taobin_project/video/main_page_en.mp4"
Var img_press_main_page = "ROOT/taobin_project/image/main_page_en/bp_main_page_start.png"
Var InternationalEnable = 0
Var InternationalEnableStr = "false"
If CountryName = "" Then
READ_FILE "/mnt/sdcard/coffeevending/country/short" StrCountryShort
DEBUGVAR StrCountryShort
If StrCountryShort = "MYR" Then
Var CountryName = "Malaysia"
Var ShowNetworkProblemText = "Network error. Payment Cash only."
EndIf
EndIf
If CountryName = "Malaysia" Then
Var WebAppShow = "Invisible"
EnableLanguage "ENG"
;EnableLanguage "THAI"
;EnableLanguage "CHINA"
;EnableLanguage "JAPAN"
EnableLanguage "MALAY"
SetLanguage "MALAY"
LanguageControl "UpdateList" "-"
Var InternationalEnable = 1
Var show_eng = "true"
Var VideoMainPage = "ROOT/taobin_project/video/main_page_en.mp4"
Var img_press_main_page = "ROOT/taobin_project/image/main_page_en/bp_main_page_start.png"
Var ShowNetworkProblemText = "Network error. Payment Cash only."
If Not#LanguageLoaded = "" Then
LoadLanguage "/mnt/sdcard/coffeevending/taobin_project/ui/lang.tsv"
EndIf
EndIf
DEBUGVAR InternationalEnable
If InternationalEnable = 1 Then
Var LanguageObjectShow = "Enable"
Var NoLangObjectShow = "Invisible"
Else
Var LanguageObjectShow = "Invisible"
Var NoLangObjectShow = "Enable"
ar TextPriceMenuSize = 12
Var TextPriceMenuY = 264
Var TextPriceMenuBlendX = 180
Var TextPriceMenuHotX = 48
Var ShowButtonClick2 = "Enable"
Var ButtontoTopupMenu = "Invisible"
Var MemberButtonFileName = "ROOT/taobin_project/image/main_page_en/bp_main_page_member.png"
Var show_eng_button_stage = "Invisible"
Var CountDownShowButton = 35
EndIf
DEBUGVAR InternationalEnable
If InternationalEnable = 1 Then
Var LanguageObjectShow = "Enable"
Var NoLangObjectShow = "Invisible"
If Not#LanguageLoaded = "" Then
LoadLanguage "/mnt/sdcard/coffeevending/taobin_project/ui/lang.tsv"
EndIf
Else
Var LanguageObjectShow = "Invisible"
Var NoLangObjectShow = "Enable"
EndIf
@ -713,6 +769,20 @@
If SELLONLINE = 1 Then
Else
Var ShowNetworkProblem = "Enable"
Var ShowButtonClick2 = "Invisible"
If NetworkStatus = "DOWN" Then
Machine NetworkDown
EndIf
Var QRCODE99 = ""
WEB "DISABLE"
EndIf
Var CountDownCheckCamera = 10