pakin/taobin_project
1
0
Fork 0
Code Issues Pull requests Projects 1 Releases 1 Packages Wiki Activity Actions

THAI: payment code with loading

Browse source
This commit is contained in:
Kenta420 2024-12-20 18:34:29 +07:00
parent de007de327
commit 44c0f852dc
15 changed files with 1755 additions and 1324 deletions
Download patch file Download diff file Expand all files Collapse all files

73
xml/page_payment_code.xml
View file

@ -26,6 +26,7 @@
;CoinVending OFF
VendingQR OFF
Var ShowLoadingText = "Invisible"
Var ShowTextNumber = "Enable"
Var ShowErrorText = "Invisible"
Var Tel_Confirm_State = "Invisible"
@ -38,7 +39,7 @@
Var DirImage = "ROOT/taobin_project/image/collectiing"
EndIf
If LanguageShow = "MYANMAR" Then
If LanguageShow = "MYANMAR" Then
Var DirImage = "ROOT/taobin_project/image/collectiing_mmr/"
EndIf
@ -113,23 +114,37 @@
Var Timeout = Timeout + 1
If Timeout > 30 Then
;VendingQR OFF
;Open menu_back_to_main
Var Timeout = Timeout + 1
If Timeout > 30 Then
Var PayState1 = "PressForever"
Var PayState2 = "Enable"
Var QRChannel = 0
Var Seeker.CodeChannel = 0
If CART_COUNT >= 1 Then
Open "ROOT/taobin_project/xml/page_payment_cashMore.xml"
Else
Open "ROOT/taobin_project/xml/page_payment_cash.xml"
EndIf
If GetPayInfoFlag = 0 Then
;VendingQR OFF
;Open menu_back_to_main
Refresh
EndIf
Var ShowLoadingText = "Invisible"
Var PayState1 = "PressForever"
Var PayState2 = "Enable"
Var QRChannel = 0
Var Seeker.CodeChannel = 0
If CART_COUNT >= 1 Then
Open "ROOT/taobin_project/xml/page_payment_cashMore.xml"
Else
Open "ROOT/taobin_project/xml/page_payment_cash.xml"
EndIf
Else
Var ShowLoadingText = "Invisible"
Var text_show_error = DirImage + "/text_show_error2.png"
Var GetPayInfoFlag = 0
Var Seeker.CodeChannel = 0
Var Timeout = 0
EndIf
Refresh
EndIf
TimerReset
</EventTimeout>
@ -167,7 +182,10 @@
If Seeker.CodeChannel = 1 Then
SAVELOG "Seeker.CodeChannel 1 > ActOK."
Var ShowLoadingText = "Invisible"
SAVELOG "Seeker.CodeChannel 1 > ActOK."
DEBUGVAR ECommerce
SAVELOG ECommerce
@ -405,7 +423,10 @@
</EventActionOk>
<EventActionError>
If Seeker.CodeChannel = 1 Then
If Seeker.CodeChannel = 1 Then
Var ShowLoadingText = "Invisible"
Var TelephoneNumber = ""
Var ShowErrorText = "Enable"
@ -445,10 +466,10 @@
Var QRCODE99 = ""
Var QRCODETMP = ""
If CART_COUNT >= 1 Then
Open "ROOT/taobin_project/xml/page_payment_cashMore.xml"
Else
Open "ROOT/taobin_project/xml/page_payment_cash.xml"
EndIf
Open "ROOT/taobin_project/xml/page_payment_cashMore.xml"
Else
Open "ROOT/taobin_project/xml/page_payment_cash.xml"
EndIf
EndIf
@ -913,6 +934,7 @@
If GetPayInfoFlag = 0 Then
Var GetPayInfoFlag = 1
Var ShowLoadingText = "Enable"
VendingQR OFF
@ -1031,6 +1053,13 @@
<Filename> Var( DirImage + "/text_11.png" )</Filename>
</Image>
<Image>
<X> 260 </X>
<Y> 920 </Y>
<State> ShowLoadingText </State>
<Filename> Var( DirImage + "/loadingText.png") </Filename>
</Image>
<Image>
<X> 152 </X>
<Y> 935 </Y>