THAI INTER : New lang for xml, New condition new lang, Add Image

This commit is contained in:
Ittipat Lusuk 2025-03-26 17:41:24 +07:00
parent 1e8450e91f
commit 7e0ede3946
183 changed files with 2075 additions and 155 deletions

View file

@ -12,11 +12,16 @@
Var Timeout = 0
Var CreditAmount = 0
;inter-multi
If show_eng = "true" Then
If LanguageShow = "MYANMAR" Then
SetLanguage "MYANMAR"
Else
SetLanguage "ENG"
Else
If LanguageShow = "MSC" Then
SetLanguage "MSC"
Else
SetLanguage "ENG"
EndIf
EndIf
Else
SetLanguage "THAI"
@ -94,6 +99,7 @@
DEBUGVAR LanguageShow
DEBUGVAR CreditAmount
;inter-image
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"
@ -175,6 +181,33 @@
EndIf
EndIf
EndIf
If LanguageShow = "MSC" Then
Var DirImage = "ROOT/taobin_project/image/page_payment_msc/page_payment"
Var DirImage2 = "ROOT/taobin_project/image/page_payment_cash_extend_msc"
Var page_doing_show_time_image = "ROOT/taobin_project/image/page_doing_msc/img2_msc.png"
Var RemainAmountStr !assigned StringFmt( CreditAmount, DisplayFormat, PreScaleConvertShow )
Var RemainAmountStr = "充值 " + RemainAmountStr
Var RemainAmountStr = RemainAmountStr + "###size=110"
If CoinAmount = 0 Then
Var RemainAmountStr = "已取消"
Else
Var RemainAmountStr = "保存余额"
EndIf
If ViewBill > 0 Then
Var RemainAmountStr = "充值 " + RemainAmountStr
Var RemainAmountStr = RemainAmountStr + "###size=110"
Else
If CoinAmount = 0 Then
Var RemainAmountStr !assigned StringFmt( CoinAmount, DisplayFormat, PreScaleConvertShow )
Var RemainAmountStr = "充值 " + RemainAmountStr
Var RemainAmountStr = RemainAmountStr + "###size=110"
EndIf
EndIf
EndIf
SAVELOG "EventLanguageOnChange menu -list"
@ -205,11 +238,16 @@
If CoinAmount = 0 Then
Var CancelFlag = 1
Var CancelCounter = 0
;inter-multi
If show_eng = "true" Then
If LanguageShow = "MYANMAR" Then
SetLanguage "MYANMAR"
Else
SetLanguage "ENG"
Else
If LanguageShow = "MSC" Then
SetLanguage "MSC"
Else
SetLanguage "ENG"
EndIf
EndIf
Else
SetLanguage "THAI"
@ -217,11 +255,16 @@
Else
Var CoinInOK = 1
Var CoinInCounter = 0
;inter-multi
If show_eng = "true" Then
If LanguageShow = "MYANMAR" Then
SetLanguage "MYANMAR"
Else
SetLanguage "ENG"
Else
If LanguageShow = "MSC" Then
SetLanguage "MSC"
Else
SetLanguage "ENG"
EndIf
EndIf
Else
SetLanguage "THAI"
@ -373,11 +416,16 @@
Var Timeout = 0
Var RemainAmountStr !assigned StringFmt( CoinAmount, DisplayFormat, PreScaleConvertShow )
;inter-multi
If show_eng = "true" Then
If LanguageShow = "MYANMAR" Then
SetLanguage "MYANMAR"
Else
SetLanguage "ENG"
Else
If LanguageShow = "MSC" Then
SetLanguage "MSC"
Else
SetLanguage "ENG"
EndIf
EndIf
Else
SetLanguage "THAI"
@ -388,11 +436,16 @@
If CoinInOK = 0 Then
;inter-multi
If show_eng = "true" Then
If LanguageShow = "MYANMAR" Then
SetLanguage "MYANMAR"
Else
SetLanguage "ENG"
Else
If LanguageShow = "MSC" Then
SetLanguage "MSC"
Else
SetLanguage "ENG"
EndIf
EndIf
Else
SetLanguage "THAI"
@ -496,8 +549,12 @@
Var CancelCounter = 0
Var CancelFlag = 1
If show_eng = "true" Then
;inter-multi
If LanguageShow = "MYANMAR" Then
Var RemainAmountStr = "ပယ်ဖျက်ခဲ့သည်။"
EndIf
If LanguageShow = "MSC" Then
Var RemainAmountStr = "已取消"
Else
Var RemainAmountStr = "Cancelled"
EndIf
@ -507,10 +564,15 @@
Else
Var ChangeOK = 1
If show_eng = "true" Then
;inter-text
If LanguageShow = "MYANMAR" Then
Var RemainAmountStr = "ခရက်ဒစ်စုဆောင်းပါ။"
Else
Var RemainAmountStr = "Keep credit"
If LanguageShow = "MSC" Then
Var RemainAmountStr = "保存余额"
Else
Var RemainAmountStr = "Keep credit"
EndIf
EndIf
Else
Var RemainAmountStr = "เก็บเครดิต"