This commit is contained in:
miggaze 2021-02-09 13:02:44 +07:00
parent 546c45f9ef
commit cbbeea9eaa
12 changed files with 216 additions and 53 deletions

View file

@ -73,6 +73,76 @@
SPLIT TaobinExpire "/" 2 TaobinExpireMonth
SPLIT TaobinExpire "/" 3 TaobinExpireYear
If show_eng = "true" Then
If TaobinExpireMonth = "01" Then
Var TaobinExpireMonth = "Jan"
Var TaobinExpireMonthX = "January"
EndIf
If TaobinExpireMonth = "02" Then
Var TaobinExpireMonth = "Feb"
Var TaobinExpireMonthX = "February"
EndIf
If TaobinExpireMonth = "03" Then
Var TaobinExpireMonth = "Mar"
Var TaobinExpireMonthX = "March"
EndIf
If TaobinExpireMonth = "04" Then
Var TaobinExpireMonth = "Apr"
Var TaobinExpireMonthX = "April"
EndIf
If TaobinExpireMonth = "05" Then
Var TaobinExpireMonth = "May"
Var TaobinExpireMonthX = "May"
EndIf
If TaobinExpireMonth = "06" Then
Var TaobinExpireMonth = "Jun"
Var TaobinExpireMonthX = "June"
EndIf
If TaobinExpireMonth = "07" Then
Var TaobinExpireMonth = "Jul"
Var TaobinExpireMonthX = "July"
EndIf
If TaobinExpireMonth = "08" Then
Var TaobinExpireMonth = "Aug"
Var TaobinExpireMonthX = "August"
EndIf
If TaobinExpireMonth = "09" Then
Var TaobinExpireMonth = "Sep"
Var TaobinExpireMonthX = "September"
EndIf
If TaobinExpireMonth = "10" Then
Var TaobinExpireMonth = "Oct"
Var TaobinExpireMonthX = "October"
EndIf
If TaobinExpireMonth = "11" Then
Var TaobinExpireMonth = "Nov"
Var TaobinExpireMonthX = "November"
EndIf
If TaobinExpireMonth = "12" Then
Var TaobinExpireMonth = "Dec"
Var TaobinExpireMonthX = "December"
EndIf
INT TaobinExpireYear
INT TaobinExpireDay
Var TaobinExpireYear = TaobinExpireYear + 0
Else
If TaobinExpireMonth = "01" Then
Var TaobinExpireMonth = "ม.ค."
Var TaobinExpireMonthX = "มกราคม"
@ -138,6 +208,8 @@
Var TaobinExpireYear = TaobinExpireYear + 543
EndIf
Var ExpireStrTmp = ""
Var ExpireStrTmp = ExpireStrTmp + TaobinExpireDay
@ -179,6 +251,7 @@
Var TaobinLevelDesc1 = "Flying turtle level "
Var TaobinLevelDesc2 = ""
Var CoffeePointRank = 0
EndIf
@ -220,6 +293,7 @@
Var TaobinLevelDesc1 = "ระดับสมาชิก เต่าติดปีก "
Var TaobinLevelDesc2 = ""
Var CoffeePointRank = 0
EndIf