Thai Inter: page_topping6***

This commit is contained in:
thanawat saiyota 2024-12-11 16:13:17 +07:00
commit 2548bc7a0e
37 changed files with 85 additions and 20 deletions

Binary file not shown.

Before

Width:  |  Height:  |  Size: 3.3 KiB

After

Width:  |  Height:  |  Size: 2.9 KiB

Before After
Before After

Binary file not shown.

Before

Width:  |  Height:  |  Size: 5.9 KiB

After

Width:  |  Height:  |  Size: 7.7 KiB

Before After
Before After

Binary file not shown.

Before

Width:  |  Height:  |  Size: 6.1 KiB

After

Width:  |  Height:  |  Size: 8.1 KiB

Before After
Before After

Binary file not shown.

Before

Width:  |  Height:  |  Size: 3.1 KiB

After

Width:  |  Height:  |  Size: 2.8 KiB

Before After
Before After

Binary file not shown.

Before

Width:  |  Height:  |  Size: 6.2 KiB

After

Width:  |  Height:  |  Size: 8.1 KiB

Before After
Before After

Binary file not shown.

Before

Width:  |  Height:  |  Size: 122 KiB

After

Width:  |  Height:  |  Size: 133 KiB

Before After
Before After

Binary file not shown.

Before

Width:  |  Height:  |  Size: 7.9 KiB

After

Width:  |  Height:  |  Size: 12 KiB

Before After
Before After

Binary file not shown.

After

Width:  |  Height:  |  Size: 4.3 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 4 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 3.6 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 3.5 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 36 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 15 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 18 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 18 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 15 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 15 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 18 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 3.3 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 5.5 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 3.3 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 3.6 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 6 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 5.6 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 4.8 KiB

View file

@ -387,8 +387,8 @@ If BoxID = 201729 Then
Var MomCocoaPro = 0 Var MomCocoaPro = 0
Var MomCocoaProDiscountEnable = 0 Var MomCocoaProDiscountEnable = 0
Var RobinsonBeautyPro = 0 Var RobinsonBeautyPro = 0
Var JemilaPro = 0 Var JemilaToppingFlag = 1
Var JemilaToppingFlag = 0 Var JemilaToppingFreeFlag = 1
Var 12Day12MenuPro = 0 Var 12Day12MenuPro = 0

View file

@ -1117,6 +1117,9 @@
If EnableMultiInstance = "true" Then If EnableMultiInstance = "true" Then
If CountryName = "Thailand" Then If CountryName = "Thailand" Then
; test payment
Var New_Payment = 1
Var InternationalEnable = 1 Var InternationalEnable = 1
DEBUGVAR InternationalEnable DEBUGVAR InternationalEnable
@ -1135,7 +1138,7 @@
Var ENABLE_UAE_DUBAI = "Invisible" Var ENABLE_UAE_DUBAI = "Invisible"
EnableLanguage "ENG" EnableLanguage "ENG"
EnableLanguage "THAI" EnableLanguage "THAI"
EnableLanguage "MYANMAR" ;EnableLanguage "MYANMAR"
If MyanmarLangEnable = "true" Then If MyanmarLangEnable = "true" Then
EnableLanguage "MYANMAR" EnableLanguage "MYANMAR"
@ -1154,6 +1157,7 @@
Var ShowButtonClick2 = "Invisible" Var ShowButtonClick2 = "Invisible"
Var ButtontoTopupMenu = "Enable" Var ButtontoTopupMenu = "Enable"
Var CurrentPageShowError = 0
Var PriceUnitText = "" Var PriceUnitText = ""

View file

@ -17,6 +17,10 @@
Var DirImage = "ROOT/taobin_project/image/collectiing/" Var DirImage = "ROOT/taobin_project/image/collectiing/"
EndIf EndIf
If LanguageShow = "MYANMAR" Then
Var DirImage = "ROOT/taobin_project/image/collectiing_mmr/"
EndIf
Var Timeout = 0 Var Timeout = 0
StopLongPlay StopLongPlay

View file

@ -8,6 +8,8 @@
<EventOpen> <EventOpen>
; On open ; On open
RootLayoutVisible 3 "hide"
Var Seeker.TNumberTaobinMember = "" Var Seeker.TNumberTaobinMember = ""

View file

@ -17,6 +17,10 @@
Var DirImage = "ROOT/taobin_project/image/collectiing/" Var DirImage = "ROOT/taobin_project/image/collectiing/"
EndIf EndIf
If LanguageShow = "MYANMAR" Then
Var DirImage = "ROOT/taobin_project/image/collectiing_mmr/"
EndIf
Var Timeout = 0 Var Timeout = 0
Var GetFreeFlag = 0 Var GetFreeFlag = 0

View file

@ -803,12 +803,12 @@
; Member not found ; Member not found
If ErrorCause = "failed_fromoper_1001" Then If ErrorCause = "failed_fromoper_1001" Then
Var QRErrorText = "Member cannot be found" Var QRErrorText = "Number not found"
EndIf EndIf
; Not enough balance ; Not enough balance
If ErrorCause = "failed_fromoper_1002" Then If ErrorCause = "failed_fromoper_1002" Then
Var QRErrorText = "Not having enough\nbalance" Var QRErrorText = "Insufficient Balance"
EndIf EndIf
Var QR_POPUP = "/img_popup8-2.png" Var QR_POPUP = "/img_popup8-2.png"

View file

@ -1233,10 +1233,11 @@
Var PayState2 = "Disable" Var PayState2 = "Disable"
EndIf EndIf
Var PayState2 = "Enable" ;for test
Var PayState3 = "Enable" ;Var PayState2 = "Enable"
Var PayState4 = "Enable" ;Var PayState3 = "Enable"
Var PayState5 = "Enable" ;Var PayState4 = "Enable"
;Var PayState5 = "Enable"
</EventOpen> </EventOpen>
<EventActionOk> <EventActionOk>

View file

@ -18,6 +18,11 @@
Var countClick = 0 Var countClick = 0
Var countClick2 = 0 Var countClick2 = 0
If InternationalEnable = 1 Then
If CountryName = "Thailand" Then
Var CurrentPageShowError = 1
EndIf
EndIf
DEBUGVAR MachineStage DEBUGVAR MachineStage
DEBUGVAR stop_now DEBUGVAR stop_now
@ -198,7 +203,7 @@
Function 2 Function 2
Refresh RefreshAll
</EventLanguageOnChange> </EventLanguageOnChange>
<Function2> <Function2>

View file

@ -69,6 +69,13 @@
Var DirImage = "ROOT/taobin_project/image/page_thankyou" Var DirImage = "ROOT/taobin_project/image/page_thankyou"
EndIf EndIf
If LanguageShow = "MYANMAR" Then
Var BottomText = PicturePath + "text_bottom_eng.png"
Var DirImage = "ROOT/taobin_project/image/page_thankyou_en"
EndIf
DEBUGVAR StarwState DEBUGVAR StarwState
DEBUGVAR LidState DEBUGVAR LidState
DEBUGVAR BottomText DEBUGVAR BottomText

View file

@ -48,6 +48,13 @@
Var BottomText = PicturePath + "text_bottom_thai2.png" Var BottomText = PicturePath + "text_bottom_thai2.png"
EndIf EndIf
If LanguageShow = "MYANMAR" Then
Var BottomText = PicturePath + "text_bottom_eng.png"
Var DirImage = "ROOT/taobin_project/image/page_thankyou_mmr"
EndIf
;DEBUGVAR StarwState ;DEBUGVAR StarwState
;DEBUGVAR LidState ;DEBUGVAR LidState
DEBUGVAR BottomText DEBUGVAR BottomText
@ -108,6 +115,10 @@
Var DirImage2 = "ROOT/taobin_project/image/complete/" Var DirImage2 = "ROOT/taobin_project/image/complete/"
EndIf EndIf
If LanguageShow = "MYANMAR" Then
Var DirImage2 = "ROOT/taobin_project/image/complete_mmr/"
EndIf
Var txtDrinkOKState = "Invisible" Var txtDrinkOKState = "Invisible"
Var buttonRemoveCup = "Invisible" Var buttonRemoveCup = "Invisible"
@ -282,12 +293,25 @@
Else Else
Var MachineErrorDetailAll = " กรุณานำแก้วออกก่อนครับ/คะ" Var MachineErrorDetailAll = " กรุณานำแก้วออกก่อนครับ/คะ"
EndIf EndIf
<<<<<<< HEAD
Else Else
=======
If LanguageShow = "MYANMAR" Then
Var MachineErrorDetailAll = " ကျေးဇူးပြုပြီး ဖန်ခွက်ကို အရင်ထုတ်ပါ။"
EndIf
Else
>>>>>>> 3637980ada4fd59458b0d1e714c0a7b556fbf717
If CupChecking = "true" Then If CupChecking = "true" Then
If show_eng = "true" Then If show_eng = "true" Then
Var MachineErrorDetailAll = " Please take a cup." Var MachineErrorDetailAll = " Please take a cup."
Else Else
Var MachineErrorDetailAll = " กรุณานำแก้วออกก่อนครับ/คะ" Var MachineErrorDetailAll = " กรุณานำแก้วออกก่อนครับ/คะ"
<<<<<<< HEAD
=======
EndIf
If LanguageShow = "MYANMAR" Then
Var MachineErrorDetailAll = " ကျေးဇူးပြုပြီး ဖန်ခွက်ကို အရင်ထုတ်ပါ။"
>>>>>>> 3637980ada4fd59458b0d1e714c0a7b556fbf717
EndIf EndIf
Else Else
If show_eng = "true" Then If show_eng = "true" Then
@ -295,6 +319,9 @@
Else Else
Var MachineErrorDetailAll = " กรุณากดปุ่ม แล้วนำแก้วออกก่อนครับ/คะ" Var MachineErrorDetailAll = " กรุณากดปุ่ม แล้วนำแก้วออกก่อนครับ/คะ"
EndIf EndIf
If LanguageShow = "MYANMAR" Then
Var MachineErrorDetailAll = " ကျေးဇူးပြုပြီး ဖန်ခွက်ကို အရင်ထုတ်ပါ။"
EndIf
EndIf EndIf
EndIf EndIf

View file

@ -39,6 +39,13 @@
Var BottomText = PicturePath + "text_bottom_thai2.png" Var BottomText = PicturePath + "text_bottom_thai2.png"
EndIf EndIf
If LanguageShow = "MYANMAR" Then
Var BottomText = PicturePath + "text_bottom_eng.png"
Var DirImage = "ROOT/taobin_project/image/page_thankyou_mmr"
EndIf
DEBUGVAR StarwState DEBUGVAR StarwState
DEBUGVAR LidState DEBUGVAR LidState
DEBUGVAR BottomText DEBUGVAR BottomText

View file

@ -219,17 +219,21 @@
DEBUGVAR BrewCommand DEBUGVAR BrewCommand
Var BrewCommand = "-" Var BrewCommand = "-"
If EnableMultiInstance = "true" Then If EnableMultiInstance = "true" Then
InstanceOverSetString "RefreshNow" 5 If CurrentPageShowError = 1 Then
InstanceOverSetString "RefreshNow" 6 ;do not thing
InstanceOverSetString "RefreshNow" 7 Else
InstanceOverSetString "RefreshNow" 8 InstanceOverSetString "RefreshNow" 5
InstanceOverSetString "RefreshNow" 9 InstanceOverSetString "RefreshNow" 6
InstanceOverSetString "RefreshNow" 10 InstanceOverSetString "RefreshNow" 7
InstanceOverSetString "RefreshNow" 11 InstanceOverSetString "RefreshNow" 8
; TODO InstanceOverSetString "RefreshNow" 9
InstanceOverSetString "RefreshNow" 10
InstanceOverSetString "RefreshNow" 11
; TODO
; Trick Refresh First ; Trick Refresh First
Var SlientRefreshIndex = 2 Var SlientRefreshIndex = 2
EndIf
EndIf EndIf
If Not#CountDownForMulti = 99 Then If Not#CountDownForMulti = 99 Then