This commit is contained in:
wanlop run 2024-01-12 14:17:54 +07:00
commit 36cce2da95
23 changed files with 131 additions and 29 deletions

Binary file not shown.

Before

Width:  |  Height:  |  Size: 4.7 KiB

After

Width:  |  Height:  |  Size: 4.8 KiB

Before After
Before After

Binary file not shown.

Before

Width:  |  Height:  |  Size: 8.8 KiB

After

Width:  |  Height:  |  Size: 8.8 KiB

Before After
Before After

Binary file not shown.

Before

Width:  |  Height:  |  Size: 5 KiB

After

Width:  |  Height:  |  Size: 4.6 KiB

Before After
Before After

Binary file not shown.

Before

Width:  |  Height:  |  Size: 11 KiB

After

Width:  |  Height:  |  Size: 10 KiB

Before After
Before After

Binary file not shown.

Before

Width:  |  Height:  |  Size: 5.7 KiB

After

Width:  |  Height:  |  Size: 8.3 KiB

Before After
Before After

View file

@ -61,11 +61,6 @@
Var PointDiff = 0 Var PointDiff = 0
Var Discount15Timeout = 0
Var TaobinExpireDay = "" Var TaobinExpireDay = ""
Var TaobinExpireMonth = "" Var TaobinExpireMonth = ""
Var TaobinExpireMonthX = "" Var TaobinExpireMonthX = ""
@ -675,16 +670,7 @@
If CoffeePoint >= 28 Then If CoffeePoint >= 28 Then
Open "ROOT/taobin_project/xml/page_display_get_drink_5_baht.xml" Open "ROOT/taobin_project/xml/page_display_get_drink_5_baht.xml"
Else Else
If CoffeePoint >= 15 Then Open "ROOT/taobin_project/xml/page_lid_straw.xml"
If Get15DiscountState = "Disable2" Then
Open "ROOT/taobin_project/xml/page_lid_straw.xml"
Else
Var Discount15Timeout = 1
Open "ROOT/taobin_project/xml/page_display_get_15_discount.xml"
EndIf
Else
Open "ROOT/taobin_project/xml/page_lid_straw.xml"
EndIf
EndIf EndIf
EndIf EndIf

View file

@ -14,17 +14,10 @@
Var DirImage = "ROOT/taobin_project/image/display_get_discount" Var DirImage = "ROOT/taobin_project/image/display_get_discount"
EndIf EndIf
DEBUGVAR Discount15Timeout Var PopUpState1 = "Invisible"
Var PopUpState2 = "Enable"
Var PopUpState1 = "Enable"
Var PopUpState2 = "Invisible"
Var PopUpErrorState = "Invisible" Var PopUpErrorState = "Invisible"
If Discount15Timeout = 1 Then
Var PopUpState2 = "Enable"
Var PopUpState1 = "Invisible"
EndIf
If PayOfflineMode = 1 Then If PayOfflineMode = 1 Then
Var PopUpErrorState = "Enable" Var PopUpErrorState = "Enable"
Var PopUpState1 = "Invisible" Var PopUpState1 = "Invisible"
@ -119,8 +112,10 @@
; goto lid straw ; goto lid straw
Var Seeker.UseGet15Discount = 1 Var Seeker.UseGet15Discount = 1
Var PreviousSeeker.UseGet15Discount = 1 Var PreviousSeeker.UseGet15Discount = 1
Var Discount15Timeout = 0 Var PopUpState2 = "Invisible"
Open "ROOT/taobin_project/xml/page_display_get_15_discount.xml" Var PopUpState1 = "Enable"
Var Timeout = 0
Refresh
</EventClick> </EventClick>
</Button> </Button>

View file

@ -1634,7 +1634,15 @@ EndIf
<Button> <Button>
<X> X_PS5 </X> <X> X_PS5 </X>
<Y> BOT_ROW </Y> <Y>
eval(
If EnableCash = "true" Then
Var return = BOT_ROW
Else
Var return = TOP_ROW
EndIf
)
</Y>
<State> PayState4</State> <State> PayState4</State>
<Filename> Var( DirImage + "/bn_pay_with_credit.png") </Filename> <Filename> Var( DirImage + "/bn_pay_with_credit.png") </Filename>
<FilenamePress> Var( DirImage + "/bp_pay_with_credit.png") </FilenamePress> <FilenamePress> Var( DirImage + "/bp_pay_with_credit.png") </FilenamePress>

View file

@ -349,6 +349,14 @@
Var text_show_error = DirImage + "/text_show_error4.png" Var text_show_error = DirImage + "/text_show_error4.png"
EndIf EndIf
If ErrorCause = "failed_fromoper_0007" Then
Var text_show_error = DirImage + "/text_show_error7.png"
EndIf
If ErrorCause = "failed_fromoper_0008" Then
Var text_show_error = DirImage + "/text_show_error8.png"
EndIf
Var GetPayInfoFlag = 0 Var GetPayInfoFlag = 0
Var Seeker.CodeChannel = 0 Var Seeker.CodeChannel = 0
Var Tel_Confirm_State = "Disable" Var Tel_Confirm_State = "Disable"

View file

@ -203,6 +203,14 @@
Var text_show_error = DirImage + "/text_show_error4.png" Var text_show_error = DirImage + "/text_show_error4.png"
EndIf EndIf
If ErrorCause = "failed_fromoper_0007" Then
Var text_show_error = DirImage + "/text_show_error7.png"
EndIf
If ErrorCause = "failed_fromoper_0008" Then
Var text_show_error = DirImage + "/text_show_error8.png"
EndIf
Var GetPayInfoFlag = 0 Var GetPayInfoFlag = 0
Var Seeker.CodeChannel = 0 Var Seeker.CodeChannel = 0
Var Tel_Confirm_State = "Disable" Var Tel_Confirm_State = "Disable"

View file

@ -206,6 +206,14 @@
Var text_show_error = DirImage + "/text_show_error4.png" Var text_show_error = DirImage + "/text_show_error4.png"
EndIf EndIf
If ErrorCause = "failed_fromoper_0007" Then
Var text_show_error = DirImage + "/text_show_error7.png"
EndIf
If ErrorCause = "failed_fromoper_0008" Then
Var text_show_error = DirImage + "/text_show_error8.png"
EndIf
Var GetPayInfoFlag = 0 Var GetPayInfoFlag = 0
Var Seeker.CodeChannel = 0 Var Seeker.CodeChannel = 0
Var Tel_Confirm_State = "Disable" Var Tel_Confirm_State = "Disable"

View file

@ -206,6 +206,14 @@
Var text_show_error = DirImage + "/text_show_error4.png" Var text_show_error = DirImage + "/text_show_error4.png"
EndIf EndIf
If ErrorCause = "failed_fromoper_0007" Then
Var text_show_error = DirImage + "/text_show_error7.png"
EndIf
If ErrorCause = "failed_fromoper_0008" Then
Var text_show_error = DirImage + "/text_show_error8.png"
EndIf
Var GetPayInfoFlag = 0 Var GetPayInfoFlag = 0
Var Seeker.CodeChannel = 0 Var Seeker.CodeChannel = 0
Var Tel_Confirm_State = "Disable" Var Tel_Confirm_State = "Disable"

View file

@ -206,6 +206,14 @@
Var text_show_error = DirImage + "/text_show_error4.png" Var text_show_error = DirImage + "/text_show_error4.png"
EndIf EndIf
If ErrorCause = "failed_fromoper_0007" Then
Var text_show_error = DirImage + "/text_show_error7.png"
EndIf
If ErrorCause = "failed_fromoper_0008" Then
Var text_show_error = DirImage + "/text_show_error8.png"
EndIf
Var GetPayInfoFlag = 0 Var GetPayInfoFlag = 0
Var Seeker.CodeChannel = 0 Var Seeker.CodeChannel = 0
Var Tel_Confirm_State = "Disable" Var Tel_Confirm_State = "Disable"

View file

@ -206,6 +206,14 @@
Var text_show_error = DirImage + "/text_show_error4.png" Var text_show_error = DirImage + "/text_show_error4.png"
EndIf EndIf
If ErrorCause = "failed_fromoper_0007" Then
Var text_show_error = DirImage + "/text_show_error7.png"
EndIf
If ErrorCause = "failed_fromoper_0008" Then
Var text_show_error = DirImage + "/text_show_error8.png"
EndIf
Var GetPayInfoFlag = 0 Var GetPayInfoFlag = 0
Var Seeker.CodeChannel = 0 Var Seeker.CodeChannel = 0
Var Tel_Confirm_State = "Disable" Var Tel_Confirm_State = "Disable"

View file

@ -203,6 +203,14 @@
Var text_show_error = DirImage + "/text_show_error4.png" Var text_show_error = DirImage + "/text_show_error4.png"
EndIf EndIf
If ErrorCause = "failed_fromoper_0007" Then
Var text_show_error = DirImage + "/text_show_error7.png"
EndIf
If ErrorCause = "failed_fromoper_0008" Then
Var text_show_error = DirImage + "/text_show_error8.png"
EndIf
Var GetPayInfoFlag = 0 Var GetPayInfoFlag = 0
Var Seeker.CodeChannel = 0 Var Seeker.CodeChannel = 0
Var Tel_Confirm_State = "Disable" Var Tel_Confirm_State = "Disable"

View file

@ -203,6 +203,14 @@
Var text_show_error = DirImage + "/text_show_error4.png" Var text_show_error = DirImage + "/text_show_error4.png"
EndIf EndIf
If ErrorCause = "failed_fromoper_0007" Then
Var text_show_error = DirImage + "/text_show_error7.png"
EndIf
If ErrorCause = "failed_fromoper_0008" Then
Var text_show_error = DirImage + "/text_show_error8.png"
EndIf
Var GetPayInfoFlag = 0 Var GetPayInfoFlag = 0
Var Seeker.CodeChannel = 0 Var Seeker.CodeChannel = 0
Var Tel_Confirm_State = "Disable" Var Tel_Confirm_State = "Disable"

View file

@ -206,6 +206,14 @@
Var text_show_error = DirImage + "/text_show_error4.png" Var text_show_error = DirImage + "/text_show_error4.png"
EndIf EndIf
If ErrorCause = "failed_fromoper_0007" Then
Var text_show_error = DirImage + "/text_show_error7.png"
EndIf
If ErrorCause = "failed_fromoper_0008" Then
Var text_show_error = DirImage + "/text_show_error8.png"
EndIf
Var GetPayInfoFlag = 0 Var GetPayInfoFlag = 0
Var Seeker.CodeChannel = 0 Var Seeker.CodeChannel = 0
Var Tel_Confirm_State = "Disable" Var Tel_Confirm_State = "Disable"

View file

@ -206,6 +206,14 @@
Var text_show_error = DirImage + "/text_show_error4.png" Var text_show_error = DirImage + "/text_show_error4.png"
EndIf EndIf
If ErrorCause = "failed_fromoper_0007" Then
Var text_show_error = DirImage + "/text_show_error7.png"
EndIf
If ErrorCause = "failed_fromoper_0008" Then
Var text_show_error = DirImage + "/text_show_error8.png"
EndIf
Var GetPayInfoFlag = 0 Var GetPayInfoFlag = 0
Var Seeker.CodeChannel = 0 Var Seeker.CodeChannel = 0
Var Tel_Confirm_State = "Disable" Var Tel_Confirm_State = "Disable"

View file

@ -206,6 +206,14 @@
Var text_show_error = DirImage + "/text_show_error4.png" Var text_show_error = DirImage + "/text_show_error4.png"
EndIf EndIf
If ErrorCause = "failed_fromoper_0007" Then
Var text_show_error = DirImage + "/text_show_error7.png"
EndIf
If ErrorCause = "failed_fromoper_0008" Then
Var text_show_error = DirImage + "/text_show_error8.png"
EndIf
Var GetPayInfoFlag = 0 Var GetPayInfoFlag = 0
Var Seeker.CodeChannel = 0 Var Seeker.CodeChannel = 0
Var Tel_Confirm_State = "Disable" Var Tel_Confirm_State = "Disable"

View file

@ -206,6 +206,14 @@
Var text_show_error = DirImage + "/text_show_error4.png" Var text_show_error = DirImage + "/text_show_error4.png"
EndIf EndIf
If ErrorCause = "failed_fromoper_0007" Then
Var text_show_error = DirImage + "/text_show_error7.png"
EndIf
If ErrorCause = "failed_fromoper_0008" Then
Var text_show_error = DirImage + "/text_show_error8.png"
EndIf
Var GetPayInfoFlag = 0 Var GetPayInfoFlag = 0
Var Seeker.CodeChannel = 0 Var Seeker.CodeChannel = 0
Var Tel_Confirm_State = "Disable" Var Tel_Confirm_State = "Disable"

View file

@ -206,6 +206,14 @@
Var text_show_error = DirImage + "/text_show_error4.png" Var text_show_error = DirImage + "/text_show_error4.png"
EndIf EndIf
If ErrorCause = "failed_fromoper_0007" Then
Var text_show_error = DirImage + "/text_show_error7.png"
EndIf
If ErrorCause = "failed_fromoper_0008" Then
Var text_show_error = DirImage + "/text_show_error8.png"
EndIf
Var GetPayInfoFlag = 0 Var GetPayInfoFlag = 0
Var Seeker.CodeChannel = 0 Var Seeker.CodeChannel = 0
Var Tel_Confirm_State = "Disable" Var Tel_Confirm_State = "Disable"

View file

@ -206,6 +206,14 @@
Var text_show_error = DirImage + "/text_show_error4.png" Var text_show_error = DirImage + "/text_show_error4.png"
EndIf EndIf
If ErrorCause = "failed_fromoper_0007" Then
Var text_show_error = DirImage + "/text_show_error7.png"
EndIf
If ErrorCause = "failed_fromoper_0008" Then
Var text_show_error = DirImage + "/text_show_error8.png"
EndIf
Var GetPayInfoFlag = 0 Var GetPayInfoFlag = 0
Var Seeker.CodeChannel = 0 Var Seeker.CodeChannel = 0
Var Tel_Confirm_State = "Disable" Var Tel_Confirm_State = "Disable"

View file

@ -1,2 +1,3 @@
; ;Var EnableCash = ""
Var EnableCash = "true" ;Var EnableCash = "true"
DEBUGVAR EnableCash